Sub AStream_NewData (Buffer() As Byte)
Dim localmsg As String
'If Buffer(0) = 1 AND Buffer(1) = 1 Then
localmsg = BytesToString(Buffer, 0, Buffer.Length, "UTF8") ' 3rd byte is start of data
Log(localmsg)
msg = localmsg.SubString(2) ' Process Global - First 2 bytes are command bytes
If IsPaused(Page2) = False Then
CallSub(Page2,"LoadLabelText") ' Only update label text if Page2 is active
End If
'End If
End Sub