alias fastwalk {
var %cnt = 1,%total = $len($1)
while (%cnt <= %total) {
if ($mid($1,%cnt,1) isnum) {
var %number = $iif(%number,%number $+ $mid($1,%cnt,1),$mid($1,%cnt,1))
}
else var %direction = $mid($1,%cnt,1)
inc %cnt
if (%direction) {
echo -a $str(%direction,$iif(%number,$v1,1))
unset %number %direction
}
}
}