$who_track="";

#
#  (    )

alias { enable("AUTOTREN"); }  "";
alias { disable("AUTOTREN"); }  "!";

trig { sendl("\r\n $U::magsymb$U::magsymb\r\n \r\n\r\nafk") } 
'^     "".$', "500ng-:AUTOTREN";
         
trig { sendl("\r\n $U::magsymb$U::magsymb\r\n \r\n\r\nafk") } 
'^     "".$', "500ng-:AUTOTREN";

trig { sendl("\r\n") }
'^     \' \'.$', "500ng-:AUTOTREN";

trig { sendl("\r\n") }
'^   .$', "500ng-:AUTOTREN";

trig { $: = "\003P$_"; sendl(" $U::magsymb\r\nafk\r\n") }
'^     .$', "500ng-:AUTOTREN";

trig { $: = "\003P$_"; sendl(" $U::magsymb\r\nafk\r\n") }
'^    .$', "500ng-:AUTOTREN";

#
#  (       )

alias {$who_track="@_";} "_";

trig { if ($1 eq $who_track) { sendl("stand\r\n $U::magsymb$U::magsymb $who_track\r\nrest\r\nafk"); } }
'^([--]+)  : \"\"', '500n:TRAINTRACK';

trig { if ($1 eq $who_track) { sendl("stand\r\n $U::magsymb$U::magsymb $who_track\r\nrest\r\nafk"); } }
'^([--]+)  : \"\"', '500n:TRAINTRACK';

trig { if ($1 eq $who_track) { sendl("stand\r\ne\r\ne\r\nw\r\nw\r\nrest\r\nafk"); } }
'^([--]+)  : \"\"', '500n:TRAINTRACK';


