This should do what is necessary:

Code:
alias fw {
  ;syntax: /fw 1n2w3s4e
  var %r = $1
  while ($regsub(fw,%r,/(\d+)([news])/i,,%r)) {
    echo -a $str($regml(fw,2),$regml(fw,1))
  }
}


/fw 1n2e3s4w5n6e7w8s
=
n
ee
www
ssss
nnnnn
eeeeee
wwwwwww
ssssssss


-genius_at_work