diff --git a/scripts/zmcontrol-pelco-d.pl.z b/scripts/zmcontrol-pelco-d.pl.z
index baab97819..647599d34 100644
--- a/scripts/zmcontrol-pelco-d.pl.z
+++ b/scripts/zmcontrol-pelco-d.pl.z
@@ -536,7 +536,7 @@ sub presetGoto
 sub presetHome
 {
 	print( "Home Preset\n" );
-	my @msg = ( $sync, $address, 0x00, 0x07, 0x00, 22 );
+	my @msg = ( $sync, $address, 0x00, 0x07, 0x00, 0x22 );
 	sendCmd( \@msg );
 }