Sub Process_Globals
Dim sp As SerialPort
Dim spStream As AsyncStreams
End Sub
Sub Service_Create
End Sub
Sub Service_Start (StartingIntent As Intent)
sp.SetPort("/dev/ttyMT1", 115200, 0)
spStream.Initialize(sp.InputStream, sp.OutputStream, "Astream")
End Sub