equal
deleted
inserted
replaced
20 print $r->ok ? $r->data : $r->error, "\n"; |
20 print $r->ok ? $r->data : $r->error, "\n"; |
21 |
21 |
22 sleep 1; |
22 sleep 1; |
23 $r = $q->cmd("WB010001"); # 1 bit setzen |
23 $r = $q->cmd("WB010001"); # 1 bit setzen |
24 print $r->ok ? $r->data : $r->error, "\n"; |
24 print $r->ok ? $r->data : $r->error, "\n"; |
|
25 |
|
26 sleep 1; |
|
27 $r = $q->cmd("WB010055"); # 0101|0101 |
|
28 print $r->ok ? $r->data : $r->error, "\n"; |
|
29 |
|
30 sleep 1; |
|
31 $r = $q->cmd("WB0100AA"); # 1010|1010 |
|
32 print $r->ok ? $r->data : $r->error, "\n"; |
|
33 |
|
34 sleep 1; |
|
35 $r = $q->cmd("SL010000000055"); # + 0101|0101 |
|
36 print $r->ok ? $r->data : $r->error, "\n"; |
25 } |
37 } |
26 |
38 |