%%HP: T(3)A(D)F(.);
\<< CLEAR { }
'NEWORDER' STO
ALIST 'TEMPLIST'
STO YUCHOOSE
\>>
