chiark / gitweb /
some better replay
authorian <ian>
Sun, 25 May 2008 23:19:13 +0000 (23:19 +0000)
committerian <ian>
Sun, 25 May 2008 23:19:13 +0000 (23:19 +0000)
hostside/multiplex

index b7326debf7f7331fbd6216c6f035efc711b3e433..0af07c6f9444a59be705f8f0e5d4022e3b00d3c7 100755 (executable)
 #    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 ) |