Added RESET test to examples/client.
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/README Tue Jan 06 09:31:17 2009 +0100
@@ -0,0 +1,1 @@
+Default IP:Port: 172.16.0.22:1001
--- a/examples/client Tue Jan 06 02:01:26 2009 +0100
+++ b/examples/client Tue Jan 06 09:31:17 2009 +0100
@@ -13,12 +13,21 @@
my $r;
- # switch on/off all lights on the first relais
- $r = $q->cmd("WB0100FF");
+ # reset
+ $r = $q->cmd("SL000700000001");
print $r->ok ? $r->data : $r->error_message, "\n";
sleep 1;
- $r = $q->cmd("WB010000");
+ $r = $q->cmd("WX0100FFFFFFFFFFFFFFFF");
+ print $r->ok ? $r->data : $r->error_message, "\n";
+
+ sleep 1;
+ # switch off all lights
+ $r = $q->cmd("WX01000000000000000000");
+ print $r->ok ? $r->data : $r->error_message, "\n";
+
+ sleep 1;
+ $r = $q->cmd("WB0100FF");
print $r->ok ? $r->data : $r->error_message, "\n";
sleep 1;