Print binary content of a variable to the serial port.
PRINTBIN var [ ; varn]
PRINTBIN #dev, var ; [,varn]
var The variable which
value is send to the serial port.
varn Optional variables to send separated by a ;.
#dev Device number for use with OPEN and CLOSE
PRINTBIN is equivalent to PRINT CHR(var); but whole arrays can be printed
When you use a Long
for example, 4 bytes are printed.
Dim a(10) as Byte,
c as Byte
For c = 1 To
a(c) = a 'fill array
PRINTBIN a(1) 'print content
code only for 80517/80537 with dual serial port
For Binary As #1 'open
serial channel 1
PRINTBIN #1 , a(1) ; a(2) ; a(3) 'note
that the channel is separated by a , and the vars by ;