X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=zc-send;h=4d9639f5074a5d33cac66e060282174e924bce67;hb=e1971c054d71f5093964c96e403162bf4efd06cf;hp=42873688d3300e9140517d953efeec84b4d96d40;hpb=72ab52fb55562eb83df8395bd75c4df41edd9487;p=zc

diff --git a/zc-send b/zc-send
index 4287368..4d9639f 100755
--- a/zc-send
+++ b/zc-send
@@ -28,6 +28,10 @@ if ( $ARGV[0] =~ m/interval/ ) {
 	my $interval = $ARGV[1] || 300;
 	print "set heartbeat interval to $interval s\n";
 	$raw = write_parameter_frame( "\x21" => "\x04" . pack('l',$interval) );
+} elsif ( $ARGV[0] =~ m/zero/ ) {
+	my $rel_zero = $ARGV[1] || 0;
+	print "Set relative zero $rel_zero\n";
+	$raw = write_parameter_frame( "\x3a" => "\x01" . pack('C',$rel_zero) );
 
 } else {
 	print "read_parameter_frame\n";
@@ -36,7 +40,7 @@ if ( $ARGV[0] =~ m/interval/ ) {
 	"\x44",
 	"\x12",
 	"\x14",
-	"\x1a\x21\x22\x23\x24\x33\x34\x35\x3b" );
+	"\x1a\x21\x22\x23\x24\x33\x34\x35\x3a\x3b" );
 }
 
 # temporary store to done