@p
MAIN  p
OPEN  p
IOPEN p
READ  p
SUBS^ A 
N
    	M
@01XMAIN  `FFFF@F`\
U\
RFBFDDD!~H}F`\
|\
~ 
A|A~2Ap
IOH   p
IFAD  p
STO   p
FAD   p
FSB   p
CLEAR p
WRITE AwA}?A`\
D\
	`F	`F	



)F~ `\
D\
`G\
`H\
=F`I\
`J\
O	}` 
8
A2
\
||{I\
z\
zz!|HyF~ `\
D\
`G\
`H\
=F`\
U\
=i
\
xxFwvF
AvAAwAx@AzDA{kA|BA}A~2AB`\
~\
`F\
=`F\
@`F	
3
'
CLCM	 G
M
g1
,	n
	lp,	S
I	lso
@F\
}\
}}!|H{F`\
~\
bz\
zz!yH
[y `\
F\
X`F	
E`F	
f
1A)Fy\
x
My `\
G\

BxGByBzFB|AB}EB~
BB`G\
`H\
F`I\
`J\
L	~` 
F }}F|FF`\
{\
bz\
zz!}H
<y `\
F\
9`F	
&`F	F
xxFy `\
{\
`G\
`J\
L	~`( wy `\
v\
`G\
`J\
I	~`
BvBwHBxAByBzFB{
B|lB}GB~Bp
EXIT  B{AyGBRJBNJBJBuJAXJATJA#JAJBkLBgLC( \

~F~(


#^}F`\
|\
`F	

/o
@F{
, \
zy\
yy!xH
CF`\
|\
<`F	
?
''
@o
'+wF`CwCCxFCyECzAC{fC|
C}6C~CCHx