alias me { var %text = $1-, %t = $numtok($1-,32) while (%t) { var %text = $iif($hget(Spelling,$gettok(%text,%t,32)),$puttok(%text,$v1,%t,32),%text) dec %t } $iif($show,!me,!.me) %text }