'PhoneNumber - should start with + and include country code.
Public Sub SendSMS(PhoneNumber() As Byte, message() As Byte) As Boolean
If busy Then Return False
busy = True
astream.Write("AT+CMGS=""").Write(PhoneNumber).Write("""").Write(EOL)
'copy the message to the global variable
bc.ArrayCopy(message, messageToSend)
Return True
End Sub