!
@AABBCCp
MAIN  p
OPEN  p
MPY   p
LTAPE p
SUBSC Ddl4HMAIN  `222!~H}2`C\
||	{z!2H
c|	{{`D\
y		

333!xHw~
DxDy
DzD{

D|D~Dp
FAD   p
ISTO  p
INEXT p
FLOAT p
FMP   p
STO   DwD`E\
3\
2\
7 `\
3\
p`F\
E`G\
~	}\
|\
||!{Hz`H\
3y\
yy!xHw`H\
3`H\
6vHut`E\
3\
2\
t`E\
3\
2\
7
7`I\
6`J\
B
K\
7`H\
6vHsr
DtDv6DxDy5D{2D|4D}
D~lDp
IFAD  p
FDV   DsDrDu9Dw?DzAE`F\
?`F\
7`K\
7~}~`I\
6`F\
7`K\
7 `\
3\
p `\
3\
p`L\
`F\
7`G\

=`H\
6|{\
z\
zz!yHxw`E\
3\
2\
8 `\
3\
pw`E\
3\
2\
h`I	`K\
;`L\

EwEyEz3E{!E|-E}E~6Ep
FIX   p
WRITE p
IOH   Ex
D}E`M\
;`7~}|!\
{z`E\
y\
y\
8`D\
>	\
x|!\
{z`E\
w\
v\
84`D\
>	\
u`\
y\
C`P	
O
/o	`O   S
Cg
@\
t\
tt!sHr`F\
E`K\
7qp\
pp!zHoz
Ep2Eq:EsEt3EuEvEwExEy
EzE{>E|E}LE~CEp
CKIO  p
EXIT  Eo<ErfEsESsE7sE#sDXsDHsDsDsD
sDsEquE[uE/uE+uDTuDRuF`E\
3\
2\
8`I	`K\
;~`E\
3\
2\
`I	`J\
;`F\
7`K\
7~`E\
3\
2\
s7s\
}}|`I\
:`K\
;`F\
7`M\
;`{`\
z\
g`P\
3`P\
:`P\
6`P	y
l
2u	)`x`
FxFyQFz
F{6F|bF}:F~FF^

Note: Lines longer than 256 characters were wrapped