From: ian <ian>
Date: Sun, 25 May 2008 23:19:13 +0000 (+0000)
Subject: some better replay
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=2f1acc1060fecb0949e07c64d7ce07cd5ff1df1d;p=trains.git

some better replay
---

diff --git a/hostside/multiplex b/hostside/multiplex
index b7326de..0af07c6 100755
--- a/hostside/multiplex
+++ b/hostside/multiplex
@@ -37,8 +37,10 @@
 #    41 warning save-dump-failed
 #    42 info save-dump
 #    50 resolution ....
+#    55 picio out on|off
 #    60 movpos ...
 #       train ...
+#       picio out polarity ...
 #    70 detect <seg> 0|1
 
 #---------- replay, general utilities, etc. ----------
@@ -177,6 +179,7 @@ proc local/replay {conn args} {
 	xmit-only $conn $m
     }
     if {[llength $args]} {
+	rename msel/$conn {}
 	rename mreplay/$conn msel/$conn
     }
 }
@@ -529,6 +532,8 @@ proc realtime-inputline {dummy l} {
 	set pri 10
     } elseif {[regexp {^(resolution) (.*)$} $l dummy key addvalue]} {
 	set pri 50
+    } elseif {[regexp {^(picio out) (on|off)$} $l dummy key value]} {
+	set pri 55
     } elseif {[regexp -expanded {
 	^( movpos \s \S+ \s (?: feat \s \S+ | position) |
 	   train  \s \S+ \s (?: has | at ) |