@AABp
MAIN  p
OPEN  p
SUBSC p
LTAPE BN@N@-N	,N--2PMAIN  `~`C\
}\
}\
a`D\
}	\
|~`C\
{\
z\

BzB{B|B}
B~Bp
FAD   p
STO   p
ISTO  p
FLOT  BnC`D\
~	\
}`E\
M`F\
t`E\
M`F\
w`E\
M`F\
z`E\
M`F\
}|\
||!{H
A `\
\
8`E\
M`G\

)\
z\
zz!yHx`E\
M`F\
`E\
M`F\
|\
||!{Hw{`C\

\
\
7``F\

CyCz
C{C|C}C~
Cp
FMP   p
IFAD  p
FDV   Cw9C`E\
`I\
`E\
`F\
 `\
\
8 `\
\
8`J\
`E\
`G\
`E\
`E\
`F\
~`E\
`E\
w`F\
w`E\
`I\
`E\
z`F\
z`E\
`E\
t`F\
t`E\
`K\
J`
\
`E\
`K\
J`F\
2
C~[Cp
CHS   p
SQRT  p
WRITE p
IOH   Cx5D`E\
`I\
``E\
2`K\
J`F\
2`M\
2`F\
`\
~\
6`O\

`O\
`O\
`O	}
<
	,p2
@\
|\
||!{H
n `\
\
8 `\
\
8`J\
`F\
2`J\
`I\
2`E\
}`F\
}
>`E\
}`K\
G
D{D|D}CD~
Dp
FSB   D`F\
}`E\
z`K\
J`F\
z`E\
t`I\
t`K\
D`F\
t`\
~\
+`O	
;
/o'S	lp,	Mg7,	D
'o
@`E\
}`P\
t`F\
`E\
`K\
A`F\
}|`\
~\
l`O\
`O\
`O\
`O	
u
'	lp2	)`E\
w
D|D}D~
DE`P\
}`F\
`E\
`K\
>`F\
~}`\
|\
-`O\
`O\
`O\
`O	
6
'S	lp2	)`E\
z`P\
t`F\
`E\
`K\
;`F\
 {}`\
|\
g`O\
`O\
 `O\
`O	
p
'	lp2	)`E\
w`P\
z
E{E|
E}E~
$EE`P\
}`E\
t`F\
#`E\
#`K\
8`F\
&~}`\
|\
1`O\
#`O\
&`O\
`O	
:
' 	lp2	)`E\
w`P\
t`F\
)`E\
)`K\
5`F\
,{}`E\
 `K\
&`F\
/`\
|\
`O\
)`O\
,`O\
`O\
/
E{
7E|
E}E~
Ep
EXIT  EeDXDLC+CCmCkC?C7D`DTC#CF`O	

' 	lp2	/g
=	l
1.i` 

Note: Lines longer than 256 characters were wrapped