#al n={#var $dir=n;#send ("n")}
#al s={#var $dir=s;#send ("s")}
#al w={#var $dir=w;#send ("w")}
#al e={#var $dir=e;#send ("e")}
#al u={#var $dir=u;#send ("u")}
#al d={#var $dir=d;#send ("d")}

#ac >+exits ^Exits: &1.=#mum ^exits