%%HP: T(1)A(D)F(.);
 -3 CF 'X' PURGE X
SWAP DUP X  / - -3
SF STEQ 30 MENU

