mm...
taking it back one step:
code:
if ascan($1,$n)+$m<0 | (ascan($1,$n) & $m) $=$+chr(1)+$n endif 

looks pretty long... too long.
_________________________
!

download KiXnet