%%HP: T(1)A(R)F(.);
 CLEAR CLLCD
"PRESS <ENTER> TO
SORT MENU"
4 DISP 0 WAIT VARS
SORT ORDER
"MENU SORTED" SWAP
DROP

