@p
MAIN  p
OPEN  p
SUBSC p
SRAND p
IRAND p
SHUF1 p
WRITE A1%MAIN  `!~H
;`\
\
7
)!}H
P`\
\
	
!7
<`!|H
_`E\
{
S!zHya\
	\
x\
}\
x
Ax
AzA{A|A}A~	Ap
IOH   p
DIV   p
MPY   A`\
~\
`H	

3*0
@\
}\
}}!|H{a\
\
~\
z\
~`\
\
	7\
yy`I\
xww`J\
x!yyy`I\
vuu`J\
v!yyy`I\
tsru(qHqs!\
r`J\
t!yyt`I\
 py`I\
$
o
Ao!Ap$Ar AsAtAuAv$AwAxHAyAz	A|A}A~
AAqB`\
~\
}\
}}!|H
`\
\
`H	
`H	
$
1/4q
@
\
{{{..1h
\
zyy;;>S`\
~\
M`H\
`H	
R
2/lq
@x`\
~\
b`H\
`H	
g
2/
lq
@x
\
|w`\
$\
7
Bw$By"BzB{B| B}B~
Bp
EXIT  Bx.A{0Ay2Bt6Br6A*6A(6AM6AH6A86A56B%
!\
~(


`\
!\
676\
`\
}\
)`H\
#`H\
`H	
.
1/2q
@|{``B{`B|B}
B~B#