Remove the useless DELAY parameter and add command-line access to the STATUS_DELAY

serial/launchd/com.uberzach.amplifier.plist

@@ -24,7 +24,6 @@
 	<key>ProgramArguments</key>
 	<array>
 		<string>/Users/tv/bin/video/serial/amplifier.pl</string>
-		<string>5</string>
 	</array>
 	<!--
 		<key>EnvironmentVariables</key>

serial/launchd/com.uberzach.projector.plist

@@ -18,7 +18,6 @@
 	<key>ProgramArguments</key>
 	<array>
 		<string>/Users/tv/bin/video/serial/projector.pl</string>
-		<string>5</string>
 	</array>
 </dict>
 </plist>

serial/launchd/com.uberzach.tv.plist

@@ -18,7 +18,7 @@
 	<key>ProgramArguments</key>
 	<array>
 		<string>/Users/tv/bin/video/serial/tv.pl</string>
-		<string>5</string>
+		<string>2</string>
 	</array>
 </dict>
 </plist>

serial/serial.pl

@@ -184,7 +184,6 @@ if (basename($0) =~ /PROJECTOR/i) {
 my $DATA_DIR        = DMX::dataDir();
 my $CMD_FILE        = uc($DEV);
 my $BT_CHECK        = $ENV{'HOME'} . '/bin/btcheck';
-my $DELAY_STATUS    = 1;
 my $BYTE_TIMEOUT    = 50;
 my $SILENCE_TIMEOUT = $BYTE_TIMEOUT * 10;
 
@@ -196,9 +195,9 @@ if ($ENV{'DEBUG'}) {
 }
 
 # Command-line arguments
-my ($DELAY) = @ARGV;
-if (!$DELAY) {
-	$DELAY = 15;
+my ($DELAY_STATUS) = @ARGV;
+if (!$DELAY_STATUS) {
+	$DELAY_STATUS = 1;
 }
 
 # Sanity check