examples/example
changeset 9 67d97311077a
parent 7 9c3e112933ae
--- a/examples/example	Thu Dec 18 13:44:06 2008 +0100
+++ b/examples/example	Mon Dec 22 23:51:48 2008 +0100
@@ -22,5 +22,17 @@
     sleep 1;
     $r = $q->cmd("WB010001");	# 1 bit setzen
     print $r->ok ? $r->data : $r->error, "\n";
+
+    sleep 1;
+    $r = $q->cmd("WB010055");	# 0101|0101
+    print $r->ok ? $r->data : $r->error, "\n";
+
+    sleep 1;
+    $r = $q->cmd("WB0100AA");	# 1010|1010
+    print $r->ok ? $r->data : $r->error, "\n";
+
+    sleep 1;
+    $r = $q->cmd("SL010000000055");	# + 0101|0101
+    print $r->ok ? $r->data : $r->error, "\n";
 }