Add test case.

breaker27 · Oct 14, 2014 · cb1ebbe · cb1ebbe · Roadyweb · Oct 18, 2014
1 parent 26f6cec
commit cb1ebbe
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/host_software/fhem/SHC_parser_test.pl b/host_software/fhem/SHC_parser_test.pl
@@ -130,6 +130,14 @@ ($)
 
 # Create message string for sending
 
+$parser->initPacket("GPIO", "DigitalPort", "Set");
+$parser->setField("GPIO", "DigitalPort", "On", 1, 0);
+$parser->setField("GPIO", "DigitalPort", "On", 1, 2);
+$parser->setField("GPIO", "DigitalPort", "On", 1, 4);
+$parser->setField("GPIO", "DigitalPort", "On", 1, 6);
+
+print "BaseStation command = " . $parser->getSendString(61) . "\n";
+
 $parser->initPacket("GPIO", "DigitalPinTimeout", "SetGet");
 $parser->setField("GPIO", "DigitalPinTimeout", "Pos", 3);
 $parser->setField("GPIO", "DigitalPinTimeout", "On", 1);