LBL "BASE"
LBL 00
255
AND
STO "WORD"
CLMENU
"ASCII"
KEY 1 XEQ 01
"HEX"
KEY 2 XEQ 02
"DEC"
KEY 3 XEQ 03
"BIN"
KEY 4 XEQ 04
KEY 9 GTO 09
" "
XTOA
10
X<>Y
X=Y?
"LF"
├" "
256
+
HEXM
ARCL ST X
744
AIP
LASTX
-
BINM
4
AROT
ATOX
5
8
AVIEW
MENU
RCL "WORD"
STOP
GTO 00
LBL 01
CLA
AON
AOFF
RTN
LBL 02
GTO 05
LBL 03
DECM
LBL 04
LBL 05
INPUT "WORD"
LBL 09
EXITALL
END