WOOHOO!

dude can I borrow those 'fine-tooth comb code-eyes' ???
Well, I do have 4 eyes, so I guess you can have a couple of them.
Need a new pair of specs anyhow.

For the SEROUT prob...
Steve's keypad routine returns a result that represents the number of the key. For a 4x4 pad it's 1-16.

With a LOOKUP statement you can change them to match your keypad ...
Code:
LOOKUP  myvar,[0,"123A456B789C*0#D"],myvar
hthm,