

COM WriteString str1
'Variable String str1 = "PIPPO"

's1 = "AA AA 00 00 00 00 00 80 00 00 00 01 00 00 06 00 00 00 87 55 55"
'
's1 = Chr(170) + Chr(170) + Chr(0) + Chr(0) + Chr(0) + Chr(0) + Chr(0)
's1 = s1 + Chr(128) + Chr(0) + Chr(0) + Chr(0)
's1 = s1 + Chr(1) + Chr(0) + Chr(0)
's1 = s1 + Chr(6) + Chr(0) + Chr(0) + Chr(0)
's1 = s1 + Chr(Asc("87")) + Chr(Asc("55")) + Chr(Asc("55"))
'
COM Open 1 9600

Print Asc(Chr(FromHex("AA")))

s1 = Chr(FromHex("AA"))

COM WriteString s1


Stop


'WATCH len(BytesString)
'EXEC DestX = 12
