LBL "DECBIN" ; Key: 14
CLST
10
STO 01 
2
STO 02 
10
/ 
+ 
FIX 1 
STOP 
LBL "BINDEC" ; Key: 15
2
STO 01 
10
STO 02 
CLST
2.1
FIX 2 
STOP 
LBL "CONV" ; Key: 11
FIX 0 
STO 00 
STO 03
STO 04 
RCL 01 
RCL 02 
- 
STO 05 
LBL 01 
RCL 04 
RCL 02 
/ 
INT 
STO 04 
X=0?
GTO 02 
RCL 05 
* 
ST+ 00 
RCL 01 
ST* 05 
GTO 01 
LBL 02 
CLX
STO T
STO Z
STO Y
RCL 03
RCL 00 
STOP 
END