# HG changeset patch
# User Heiko Schlittermann <hs@schlittermann.de>
# Date 1229986308 -3600
# Node ID 67d97311077a80b7d355ff1492e2489f5c3858bb
# Parent  c248fbd9b624be3aa98c981de4a4b63f2b6d586c
Example extended with "bit" operation.

diff -r c248fbd9b624 -r 67d97311077a examples/example
--- 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";
 }