alias gettokn { var %c = \x $+ $base($3,10,16,2) returnex $remove($gettok($regsubex($1,/(?<=^| %c )(?=$| %c )/gx,$lf),$2,$3),$lf) }