Man kann das folgendermaßen senden
do
print chr(32); chr(32); chr(32); chr(37); chr(135) ;
print chr(32); chr(32); chr(32); chr(37); chr(135) ;
loop
(auf zwei Zeilen aufgeteilt, damit übersichtlich bleibt)
Es werden so bei jedem Loop zehn Byte gesendet
ABER: das ist weder elegant noch gut brauchbar.
Mach lieber ein Array
Code:
DIM Sendepaket(10) as byte
'erstmal die Daten ins Paket reinschreiben
Sendepaket(1) = 2
Sendepaket(2) = 50
Sendepaket(3) = 0
Sendepaket(4) = 32
Sendepaket(5) = 32
Sendepaket(6) = 32
Sendepaket(7) = 32
Sendepaket(8) = 32
Sendepaket(9) = 37
Sendepaket(10) = 135
'und jetz komplett alle 10 Byte senden
Do
PRINTBIN Sendepaket(1); 10
Loop
Beim empfang geht's umgekehrt:
Code:
DIM Sendepaket(10) as byte
DO
' zehn byte empfangen
INPUTBIN Sendepaket(1), 10
if Sendepaket(2) = 2 then LCD "OK"
LOOP
Schau mal
Lesezeichen