<���:�:�" at Line ";�:�
Z
�UV:�UW:�
����UV:UX=4:UY=2:UZ=1:Ua=-2:Ub=&DE8:Uc=&FF9:Ud$="Delta":Ue$="Delta":Uf=2*1024 :�Ug Uf:Uh=2*1024 :�Ui Uh:Uj=2*1024 :�Uk Uj:Ul=2*1024 :�Um Ul:Un=4*1024 :�Uo Un:Up=8*1024 :�Uq Up:Ur=256:�Us$(Ur):�Ut(Ur):�Uu(4,Ur):Uv=256:�Uw$(1+1+4+1,Uv):Ux=0:Uy= ��

^iUz=�VU(2*100,Ue$):VV=0:�VW:�VX:�VY:VZ=�Va(Ui):Vb=�Vc:Vd=0:Ve=0:Vf=3:Vg=-1:�Vh(32):Ut()=0:Uu()=0:�Vi:�
��UW:�:Vj=�Vk(Ug,Ux):ȎVj �
0�0:�Ve=4 ��Vl
:�1:�Vm(Ug)
D�2:�Vn(Ug,Ui,-1,�)
N�3:�!Ug=Vo ��Vp
X�Vq(Ui,Ug!0)
b�6:�Vr(Ug)
l�7:�Vs(Ug)
v�8:�Vt(Ug)
��9:�Vu(Ug)
��17:�Vv(Ug)
��18:�Vv(Ug)
��:�Uy:�Vw(Vb):�Vx(Uz):�
iݤVa(Vy):Vy!0=-1:Vy!4=0:Vy!8=0:Vy!12=68:Vy!16=68:Vy!20=&3002:$(Vy+24)="!"+Ud$+�0:ș&400C2,,Vy �Vz:=Vz
z=��Vr(WU):WV=WU!0:WW=WU!4:WX=WU!8:WY=WU!12:Vz=WU!16:ȎWX �
��UX:ȎWY �
��Ua:�Vz=VZ ��WZ(Ui,Wa)
��Vo:�Vz=2 �
�#Wb$=�Wc(Ui,Vo,1):�Wb$,".")=0 �
�NWd=�We(Ui,99,Ud$,"To save, drag the file icon to a directory display",�,�)
��:�Wf(Wb$):ș&400D4,,-1
�
$�
.�Wg:�Vz=4 ��Vq(Ui,Wg)
8�Wh:�Vz=2 ��Wi(WV,WW)
B�Wa:�Wj(Ug)
L�
V�UY:ȎWY �
`�Ua:�Vz=VZ ��Wk(WV)
j�Wa:�Wl(WV,WW)
t�
~�UZ:ȎWY �
��Vo:�Vz=2 �
�#Wb$=�Wc(Ui,Vo,1):�Wb$,".")=0 �
�NWd=�We(Ui,99,Ud$,"To save, drag the file icon to a directory display",�,�)
��:�Wf(Wb$)
��
��
��Wg:�Vz=4 ��Vq(Ui,Wg)
��
��64,16:ȎWY �
��Vo:�Vz=0 �Wd=�Wm(Ui,WY,Vz)
�Wg:�Vz=Vf �Vz=2 �

�Ve=0 �
�Wn(Wg,Vf,2)
�
(�
2�
<�:�
d��Vv(WU):ȎWU!16 �
x�0:Uy=�
��2:�Wo(WU)
��3:�Wp(WU)
��&502:�Wq(WU)
��:�
�,��Vt(WU):WY=WU!0:Vz=WU!4:Wr=WU!24:ȎWY �
��Vo:�Vz=1 �Wr=13 �
#Wb$=�Wc(Ui,Vo,1):�Wb$,".")=0 �
NWd=�We(Ui,99,Ud$,"To save, drag the file icon to a directory display",�,�)
"�:�Wf(Wb$):�Vp:�Vq(Ui,Vo)
J�
T�
^�Wh:�Wr=13 �
h
ȎVz �
r�4:�Ws=1 ��Wt(Wu)
|�6:�Ws=2 ��Wt(Wu)
��8:�Ws=3 ��Wt(Wu)
��10:�Ws=4 ��Wt(Wu)
��
��
�
:�Wv(Wr)
��:�
�v��Vm(WU):ș&400C8,,WU �Ww:Wx=WU!4:Wy=WU!16:Wz=WU!8:XU=WU!20:XV=WU!24:ȕWw:�XW(Wx,Wy,Wz,XU,XV):ș&400CA,,WU �Ww:�:�
v5��VW:�XX(Uo,Un):�XY(Uo,"<"+Ud$+"$Dir>.Sprites"):�
����VX:XZ=Um:�Xa(Ui,"<"+Ud$+"$Dir>.Templates"):XZ=�Xb(Uk,XZ,Um+Ul,"information",Uo):Xc=�Xd(Uk):XZ=�Xb(Uk,XZ,Um+Ul,"main",Uo):Wa=�Xd(Uk):XZ=�Xb(Uk,XZ,Um+Ul,"xfer_send",Uo):Vo=�Xd(Uk):XZ=�Xb(Uk,XZ,Um+Ul,"parameters",Uo):Wh=�Xd(Uk)
 3XZ=�Xb(Uk,XZ,Um+Ul,"prefs",Uo):Wg=�Xd(Uk):�Xe:�
\��Wk(WV):VV=1:�Xf(Ud$,128,44):�Xg("Info",0,Xc, ��):�Xg("Prefs...",0,-1, ��):�Xg("Quit",128,-1, ��):ș&400D4,,Uq,WV-64,228:�
�u��Wl(WV,WW):VV=2:�Xf(Ud$,128,44):�Xg("Compile",2,-1,Vd<2):�Xg("Delete #"+�Vd,128,-1,Vd<1):ș&400D4,,Uq,WV-64,WW:�
	���Xf(Xh$,Xi,Xj):Xk=0:$(Uq+Xk)=Xh$+�0:?(Uq+Xk+12)=7:?(Uq+Xk+13)=2:?(Uq+Xk+14)=7:?(Uq+Xk+15)=0:!(Uq+Xk+16)=Xi:!(Uq+Xk+20)=Xj:!(Uq+Xk+24)=0:Xk+=28:�
	�l��Xg(Xl$,Xm,Xn,Xo):!(Uq+Xk+0)=Xm:!(Uq+Xk+4)=Xn:!(Uq+Xk+8)=&07000001+�Xo*2^22:$(Uq+Xk+12)=Xl$+�0:Xk+=24:�
��Vu(WU):Xp=WU!0:ȎVV �

�1:ȎXp �
(�0
2�1:�WZ(Ui,Wg)
<�2:Uy=�
F�
P
�2:ȎXp �
Z�0:�Vn(Ug,Ui,Vo, ��)
d
�1:�Xq
n�
x�3:�Xr(Xp)
�3�:ș&400CF,,WU:WV=WU!0:WW=WU!4:WX=WU!8:�WX=UZ �
�
ȎVV �
��1:�Wk(WV)
��2:�Wl(WV,WW)
��3:�Wi(Xs,Xt)
��
��:�VV<>1 �
ș&400D4,,-1:VV=0
�
"�:�
J[��Wp(WU):Xu=WU!40:Wb$=�Xv(WU+44):Xw=WU!4:WU!16=4:WU!12=WU!8:ș&400E7,17,WU,Xw:�Xu<>Uc �
�3Xx$=�Xy(Vb,"err06"):Wd=�We(Ui,99,Ud$,Xx$, ��,�)
��:� ��Xz(Ui,Wa) �
��WZ(Ui,Wa)
��:�Vp:�Vq(Ui,Vo):�YU(Wb$)
��:�
���Vs(WU):ș&400CF,,WU:WV=WU!0:WW=WU!4:WY=WU!12:Vz=WU!16:Wb$=�Wc(Ui,Vo,1):YV$=�Wb$,10-��Wb$,10),".")):WU!0=44+((�YV$ �4)*4)+4:WU!4=0:WU!8=0:WU!12=0:WU!16=1:WU!20=WY:WU!24=Vz:WU!28=WV:WU!32=WW:WU!36=64:WU!40=Ub:$(WU+44)=YV$+�0:ș&400E7,17,WU,WY:�

`��Wo(WU):Xw=WU!4:WU!12=WU!8:WU!16=3:Wb$=�Xv(WU+44):ș&400E7,17,WU,Xw:�Wb$,"Wimp$Scrap")=0 �

R�Wf(Wb$)

\�:ș&400D4,,-1:�

��ݤWm(Vy,WY,Vz):�Xi,Xj,YW,YX:Vy!0=4:Vy!4=5:Vy!8=11:Vy!12=12:Vy!16=-1:ș&31,Vy,Vy+32:Xi=(Vy!40+1)* 2^( Vy!32 ):Xj=(Vy!44+1)* 2^( Vy!36 ):Vy!0=WY:ș&400CC,,Vy:YW=Vy!4:YX=Vy!16:Vy!0=WY:Vy!4=Vz:ș&400CE,,Vy:Vy!8+=YW:Vy!12+=YX:Vy!16+=YW:Vy!20+=YX
8CVy!0=0:Vy!4=5:Vy!24=0:Vy!28=0:Vy!32=Xi:Vy!36=Xj:ș&400D0,,Vy:=0
~4��Wq(WU):YY$="":Xw=WU!4:YZ=WU!32:Ya=WU!36:ȎYZ �
��Ua:�Ya=VZ �YY$="ibar"
��Wg:YY$="pref":ȎYa �
��3:YY$="pr03"
��4:YY$="pr04"
��5:YY$="pr05"
��
�Wh:YY$="para":ȎYa �
�1:YY$="pa01"
�2:YY$="pa02"
(�4:YY$="pa04"
2�6:YY$="pa06"
<�8:YY$="pa08"
F�10:YY$="pa10"
P�
Z�Wa:YY$="ma00"
d�:�YY$<>"" �
xeYb$=�Xy(Vb,YY$):WU!0=20+((�(Yb$) �4)*4)+4:WU!12=WU!8:WU!16=&503:$(WU+20)=Yb$+�0:ș&400E7,17,WU,Xw
��:�
ܕ��XW(Wx,Wy,Wz,XU,XV):Yc=Wy-XV-119:Yd=Wz+XV-119:i=1:Yc-=i*48 - 48:x=Wx-XU+24:y=Yc+32:ȕ(i<=Vd):x=Wx-XU+24:y=Yc+32:�Ut(i)=0 �ș&400E6,7�ș&400E6,11
J}Ye$=�"   "+�(i),3)+" : ..."+�Us$(i),29):�5:�x,y:�Ye$:�4:i+=1:Yc-=48:�:ș&400E6,8:�5:�x,Yc+32:��15," ");"*** END ***":�4:�
���Vh(Yf):�Yf<>Vg �
�Vg=Yf:�Yg(Ui,Wg,5,�Vg+"K")
��:�
���YU(Wb$):�Vd=Ur �
3Xx$=�Xy(Vb,"err07"):Wd=�We(Ui,99,Ud$,Xx$, ��,�)
&w�:Vd+=1:Us$(Vd)=Wb$:Ut(Vd)=0:Uu(1,Vd)=0:Uu(2,Vd)=0:Uu(3,Vd)=0:Uu(4,Vd)=0:�Yh(Ui,Wa,0,720,-138-(Vd*48),0):�Yi(Ui,Wa)
v�:�
����Xq:Ut(Vd)=0:Uu(1,Vd)=0:Uu(2,Vd)=0:Uu(3,Vd)=0:Uu(4,Vd)=0:Vd-=1:�Yh(Ui,Wa,0,720,-138-(Vd*48),0):�Vn(Ug,Ui,Wa, ��):�Yi(Ui,Wa):�
��Wj(WU):�Vd>0 �
 xWV=WU!0:WW=WU!4:Ui!0=Wa:ș&400CC,,Ui:Wy=Ui!(12+4):XV=Ui!(20+4):Yj=�(((WW-Wy)+XV)):Yk=((Yj-(119-48)) �48)+1:�Yk<=Vd �
p�Wu=Yk:Yl=Ut(Wu):Ym=Uu(1,Wu):Yn=Uu(2,Wu):Yo=Uu(3,Wu):Yp=Uu(4,Wu):Yq=�Yr(�"00"+�~Yl,2)):Ws=�Uw$(7,Yq):Ys$="&"+�"00"+�~Yq,2)+" : "+Uw$(2,Yq):�Yt(Ws):�Yg(Ui,Wh,1,Ys$):�Ws>0 ��Yg(Ui,Wh,4,�Ym)
��Ws>1 ��Yg(Ui,Wh,6,�Yn)
��Ws>2 ��Yg(Ui,Wh,8,�Yo)
��Ws>3 ��Yg(Ui,Wh,10,�Yp)
o�Yg(Ui,Wh,3,Uw$(3,Yq)):�Yg(Ui,Wh,5,Uw$(4,Yq)):�Yg(Ui,Wh,7,Uw$(5,Yq)):�Yg(Ui,Wh,9,Uw$(6,Yq)):� ��Xz(Ui,Wh) �
8�Vn(Ug,Ui,Wh, ��)
B�
L�
V�:�
~8ݤYr(Yu$):Yv=0:ȕUw$(1,Yv)<>Yu$ �Yv<=&FF:Yv+=1:�:=Yv
�Wi(Xs,Xt):VV=3:�Xf("Triggers",20*24,44):Yw=Uq+4*1024:Yx=0:Yy=0:�:Yu$=Uw$(1,Yy):Ys$=Uw$(2,Yy):Yz$=Uw$(3,Yy):ZU$=Uw$(4,Yy):ZV$=Uw$(5,Yy):ZW$=Uw$(6,Yy):ZX$=Uw$(7,Yy):�Yu$<>"END" �
d*�ZY(Yu$,Ys$,Yz$,ZU$,ZV$,ZW$,ZX$):Yy+=1
x5�:�Yu$="END":!(Uq+Xk-24)=128:ș&400D4,,Uq,WV,WW:�
�u��ZY(Yu$,Ys$,Yz$,ZU$,ZV$,ZW$,ZX$):ZZ$="&"+Yu$+" : "+Ys$:Za=�("&"+Yu$):Zb=�("&"+Uw$(1,Yy+1)):�(Za-Zb<-1) �(Za=0) �
�!(Uq+Xk+0)=2
��:!(Uq+Xk+0)=0
}�:!(Uq+Xk+4)=-1:!(Uq+Xk+8)=&07000101:Zc=Yw+Yx:$Zc=ZZ$+�0:Yx+=�ZZ$+1:!(Uq+Xk+12)=Zc:!(Uq+Xk+16)=Yw:!(Uq+Xk+20)=16:Xk+=24:�
|���Xr(Zd):Yy$=�Xv(!(Uq+28+Zd*24+12)):�Yg(Ui,Wh,1,Yy$):Yq=�Yr(�Yy$,2,2)):Ws=�Uw$(7,Yq):�Yg(Ui,Wh,3,Uw$(3,Yq)):�Yg(Ui,Wh,5,Uw$(4,Yq)):�Yg(Ui,Wh,7,Uw$(5,Yq)):�Yg(Ui,Wh,9,Uw$(6,Yq)):�Yt(Ws):�Vn(Ug,Ui,Wh, ��):�Ws=0 �
��Wt(Wu)
��:�Ze(Wh,4,1)
�:�
: ��Wt(Zf):�VV=3 �ș&400D4,,-1
N�Ut(Zf)=�(��Wc(Ui,Wh,1),3)):Uu(1,Zf)=��Wc(Ui,Wh,4):Uu(2,Zf)=��Wc(Ui,Wh,6):Uu(3,Zf)=��Wc(Ui,Wh,8):Uu(4,Zf)=��Wc(Ui,Wh,10):�Vq(Ui,Wh):�Yi(Ui,Wa):�
�4��Yt(ZX):�i=1 �4:�Zg(Ui,Wh,4+i*2-2,i>ZX):�i>ZX �
��Yg(Ui,Wh,4+i*2-2,"")
��:�Yg(Ui,Wh,4+i*2-2,"0")
�
�:�i:�
*?��Vi:�:Yy=0:�:�Yu$,Ys$,Yz$,ZU$,ZV$,ZW$:ZX=0:�Yz$<>"" �ZX+=1
p�ZU$<>"" �ZX+=1
z�ZV$<>"" �ZX+=1
��ZW$<>"" �ZX+=1
�xUw$(1,Yy)=Yu$:Uw$(2,Yy)=Ys$:Uw$(3,Yy)=Yz$:Uw$(4,Yy)=ZU$:Uw$(5,Yy)=ZV$:Uw$(6,Yy)=ZW$:Uw$(7,Yy)=�ZX:Yy+=1:�Yu$="END":�
�� "00" , "[no event]"               , ""                         , ""                         , ""                         , ""
��� "01" , "Blank Palette"            , ""                         , ""                         , ""                         , ""
�� "02" , "Set Palette"              , "Palette number"           , "Brightness %age"          , ""                         , ""
�� "03" , "Fade palette out"         , "Target %age"              , "Palette number"           , "Number of seconds"        , ""
�� "04" , "Fade palette in"          , "Target %age"              , "Palette number"           , "Number of seconds"        , ""
$�� "05" , "Set colour"               , "Colour number"            , "Colour RED byte"          , "Colour GREEN byte"        , "Colour BLUE byte"
8�� "10" , "Make sound"               , "Channel number"           , "Instrument"               , "Octave"                   , "Note"
B�� "11" , "Play soundtrack"          , "Soundtrack number"        , ""                         , ""                         , ""
L�� "12" , "Stop soundtrack"          , ""                         , ""                         , ""                         , ""
V�� "13" , "Fade music out"           , "Target %age"              , "Number of seconds"        , ""                         , ""
`�� "14" , "Fade music in"            , "Target %age"              , "Number of seconds"        , ""                         , ""
j�� "15" , "Pause soundtrack"         , ""                         , ""                         , ""                         , ""
t�� "16" , "Continue soundtrack"      , ""                         , ""                         , ""                         , ""
~�� "17" , "Set soundtrack volume"    , "Target %age"              , ""                         , ""                         , ""
��� "18" , "Set stereo position"      , "Channel number"           , "Stereo position"          , ""                         , ""
��� "20" , "Pause "                   , "Number of 1/50th frames"  , ""                         , ""                         , ""
�� "END" , "" , "","","",""
2*��Wf(Wb$):Zh=�:Zi=�Zj(Vg*1024):� �Zi �
x3Xx$=�Xy(Vb,"err02"):Wd=�We(Ui,99,Ud$,Xx$, ��,�)
�'�:ș&20008,13,Wb$ �Zk:Wd=1:�Zk<>0 �
�1Xx$=�Xy(Vb,"war01"):Wd=�We(Ui,99,Ud$,Xx$,�,�)
�
�:�Wd=1 �
��:���Zl:�Vp:�
Zm=�Wb$:�Zn=� �
6ș&406C0:�Zo
JO�:�Vp:�#Zm:�"SetType "+Wb$+" "+�~Ub:ș&406C1:�Vq(Ui,Vo):�Yg(Ui,Vo,1,Wb$):��
��
��:�
�=ݤZn:Zp=�:Zq=Zr:Zs=�Zt(Us$(1))+16:Zi=�Zj(Vg*1024):� �Zi �
0:Xx$=�Xy(Vb,"err01"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):Zp= ��
NF�:�XX(Zq,Zs):�XY(Zq,Us$(1)):Zu$=�Zv(Zq):Xi=�Zw(Zq,Zu$):�Xi �8<>0 �
�3Xx$=�Xy(Vb,"war02"):Wd=�We(Ui,99,Ud$,Xx$,�, ��)
�F�:Zx=�Zy(Zq,Zu$):Zz=�aU(Xi):aV=�aW(Zq,Zu$):aX=�aY(Zq,Zu$):�aX<>9 �
�:Xx$=�Xy(Vb,"err03"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):Zp= ��
�.�:ș&90105,Zx,Zh,Zz,aV �,,,,Zi,aZ:�aZ=-1 �
:Xx$=�Xy(Vb,"err04"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):Zp= ��
4(�:�aa(aX,Vd,Zz,aV):�ab(Zh,aZ):�ac(1)
\�
f�
p	�:=Zp
�s��Zo:ad=1:ae= ��:af=0:ȕad<=Vd-1 � �ae:ș&406C4,(ad/Vd)*100:ag=�Zt(Us$(ad))+16:ah=�Zt(Us$(ad+1))+16:�af<ag+ah �
$ai=�Zj((ag+ah-af))
.
�:ai=�
B
�:� �ai �
`8Xx$=�Xy(Vb,"err01"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):ae=�
~��:af=ag+ah:aj=Zh+Vg*1024:ak=�al(aj):am=�al(aj+ag):�XX(ak,ag):�XX(am,ah):�XY(ak,Us$(ad)):�XY(am,Us$(ad+1)):an$=�Zv(ak):ao=�Zy(ak,an$):ap=�aU(�Zw(ak,an$)):aq=�aW(ak,an$):ar=�aY(ak,an$):as$=�Zv(am):at=�Zy(am,as$):au=�aU(�Zw(am,as$)):av=�aW(am,as$)
Z$aw=�aY(am,as$):�ap<>Zz �au<>Zz �
x8Xx$=�Xy(Vb,"err09"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):ae=�
��:�aq<>aV �av<>aV �
�8Xx$=�Xy(Vb,"err10"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):ae=�
��:�ar<>aX �aw<>aX �
�8Xx$=�Xy(Vb,"err03"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):ae=�
F�:ș&90106,ao,at,Zh,Vg*1024,Zz,aV �Zk,ax,ay,az,bU,bV,Zi,aZ:�Zi=0 �
68Xx$=�Xy(Vb,"err05"):Wd=�We(Ui,99,Ud$,Xx$, ��,�):ae=�
T�:�ab(Zh,aZ):�ac(ad+1)
r�
��
��
��:ad+=1:�:�
�)��ab(Xn,bW):�i=0 �bW-1:�#Zm,Xn?i:�i:�
 k��ac(bX):bY=Ut(bX):�#Zm,bY:Yq=�Yr(�"00"+�~bY,2)):bZ=�(Uw$(7,Yq)):ba=1:ȕba<=bZ:�#Zm,Uu(ba,bX):ba+=1:�:�
 �ݤZv(bb):�bc(bb)>1 �
 �3Xx$=�Xy(Vb,"war03"):Wd=�We(Ui,99,Ud$,Xx$,�, ��)
 ��:=�bd(bb,1)
 ����aa(be,bf,Xi,Xj):bg%=(be<<16)+bf:bh%=(Xi<<16)+Xj:�#Zm,(bg%) �&FF:�#Zm,(bg%>>8) �&FF:�#Zm,(bg%>>16) �&FF:�#Zm,(bg%>>24) �&FF:�#Zm,(bh%) �&FF:�#Zm,(bh%>>8) �&FF:�#Zm,(bh%>>16) �&FF:�#Zm,(bh%>>24) �&FF:�
!z:ݤZt(Wb$):�bi:ș&8,17,Wb$ �Zk,ax,ay,az,bU,bV:bi=bU:=bi
!�X��Zl:ș&406C1:�#Zm:Xx$=�Xy(Vb,"err08"):Wd=�We(Ui,99,Ud$,"error$ "+Þ+" "+�$, ��,�):�
"ݤaU(Xi):=((Xi+7) �8)*8
"Bݤal(bj):=(bj+3) � �3
#(%��VY:ș&51 �bk:bl=�bm:bn=0:Zr=�:�
#xGݤZj(bo):�bp,bq:�br,bs,bt:�bu,Zi:bp=(bo �bk)+1:bq=bp* bk:�bv>=bo �
#�/br=�bm:bs=br+bo:bt=�bw(bs):bn+=bo:bu=�:Zi=�
#��:Zi= ��
$	�:=Zi
$6(ݤbx(bo):bp=(bo �bk)+1:bq=bp* bk:=bq
$r��Vp:br=�bm:�br>bl �
$�Wd=�bw(bl):bn=0
$��:�
& >ݤZw(by,bz$):ș&2E,256+40,by,bz$ �,,,az,bU,bV,cU:cV=az:=cV
&\>ݤaW(by,bz$):ș&2E,256+40,by,bz$ �,,,az,bU,bV,cU:cW=bU:=cW
&�>ݤaY(by,bz$):ș&2E,256+40,by,bz$ �,,,az,bU,bV,cU:cX=cU:=cX
&�?ݤcY(by,bz$):ș&2E,256+40,by,bz$ �,,,az,bU,bV,cU:cZ=-bV:=cX
'3ݤca(by,bz$):cb=�cc(by,bz$):cd=cb!32:�cd=11*4 �
'8
ce= ��
'B�:ce=cb+11*4
'V	�:=ce
'~ݤbc(by):=by!4
'�Oݤbd(by,n):cf=by+by!8:cg=1:ȕcg<n:ch=cf!0:cf+=ch:cg+=1:�:=��Xv(cf+4),12)+�0
((FݤZy(by,bz$):ș&2E,256+24,by,bz$ �,,ay:ci=ay:cd=ci!32:cj=ci+cd:=cj
(xFݤck(by,bz$):ș&2E,256+24,by,bz$ �,,ay:ci=ay:cl=ci!36:cm=ci+cl:=cm
(�4ݤcc(by,bz$):ș&2E,256+24,by,bz$ �,,ay:cn=ay:=cn
)&��co(by,Wb$):ș&2E,256+12,by,Wb$:�
)6&��XY(by,Wb$):ș&2E,256+10,by,Wb$:�
)h0��XX(by,cp):by!0=cp:by!8=16:ș&2E,256+9,by:�
)�Oݤcq(by,bz$,x,y):�cr,cs:ș&2E,256+41,by,bz$,x,y �,,,,,bV,cU:cr=bV:cs=cU:=cr
)�:��ct(by,bz$,x,y,cr,cs):ș&2E,256+42,by,bz$,x,y,cr,cs:�
,�EݤVU(cu,cv$):�Zk,ax:ș&400C0,cu,&4B534154,cv$+�0 �Zk,ax:cw=ax:=cw
,�!��Vx(cw):ș&400DD,cw,"TASK":�
-�ݤWe(Vy,cx,Xh$,Xx$,cy,cz):�Xm,ax,dU:$Vy=Xh$+�0:Vy!32=cx:$(Vy+36)=Xx$+�0:Xm=(�cy*2^0)+(�cz*2^1):ș&400DF,Vy+32,Xm,Vy �,ax:dU=ax:=dU
-���Vn(WU,Vy,WY,dV):�dV= �� �
-�%Vy!0=WY:ș&400CB,,Vy:ș&400C5,,Vy
-��:ș&400C5,,WU
-��:�
-�&��Vq(Vy,WY):Vy!0=WY:ș&400C6,,Vy:�
.6S��WZ(Vy,WY):�Xi,Xj,dW,dX,dY,dZ:Vy!0=WY:ș&400CC,,Vy:Xi=�Vy!52:�Xi>1000 �Xi=1000
.hXj=�Vy!48:�Xj>512 �Xj=512
.r�Vy!0=4:Vy!4=5:Vy!8=11:Vy!12=12:Vy!16=-1:ș&31,Vy,Vy+32:dW=Vy!32:dX=Vy!36:dY=Vy!40:dZ=Vy!44:x=dY* 2^dW :y=dZ* 2^dX:x=(x-Xi) �2:y=(y-Xj) �2:Vy!(0)=WY:Vy!(4+0)=x:Vy!(4+4)=y:Vy!(4+8)=Vy!(4+0)+Xi:Vy!(4+12)=Vy!(4+4)+Xj:Vy!28=-1:ș&400C5,,Vy:�
/M��Yh(Vy,WY,da,db,dc,dd):Vy!0=da:Vy!4=dc:Vy!8=db:Vy!12=dd:ș&400D7,WY,Vy:�
/lKݤXz(Vy,WY):�de,df:Vy!0=WY:ș&400CB,,Vy:de=Vy!32:df=(de �2^16)=2^16:=df
/Ƥ��Yi(Vy,WY):�Xi,Xj,dg,dh:�di,dj,dk,dl:Vy!0=WY:ș&400CC,,Vy:Xi=Vy!12-Ui!4:Xj=Vy!16-Vy!8:dg=Vy!20:dh=Vy!24:di=dg:dl=dh:dk=dl-Xj:dj=di+Xi:ș&400D1,WY,di,dk,dj,dl:�
0H@��dm(Vy,WY,Vz):Vy!0=WY:Vy!4=Vz:Vy!8=0:Vy!12=0:ș&400CD,,Vy:�
0�-��Ze(WY,Vz,dn):ș&400D2,WY,Vz,0,0,-1,dn:�
0�%��do:ș&400D2,-1,-1,-1,-1,-1,-1:�
1^ݤWc(Vy,WY,Vz):�Xm,dp,Ye$:Vy!0=WY:Vy!4=Vz:ș&400CE,,Vy:Xm=Vy!(8+16):dp=(Xm �2^8)=2^8:�dp �
1VYe$=�Xv(Vy!(8+20))
1`�:Ye$=�Xv(Vy+8+20)
1t
�:=Ye$
1�^��Yg(Vy,WY,Vz,dq$):�Xm,dp:Vy!0=WY:Vy!4=Vz:ș&400CE,,Vy:Xm=Vy!(8+16):dp=(Xm �2^8)=2^8:�dp �
1�$(Vy!(8+20))=dq$
1��:$(Vy+8+20)=dq$
2
3�:Vy!0=WY:Vy!4=Vz:Vy!8=0:Vy!12=0:ș&400CD,,Vy:�
2d��Wv(dr):ș&400DC,dr:�
2�8ݤXv(Xn):�ds$:ds$="":ȕ?Xn>31:ds$+=�?Xn:Xn+=1:�:=ds$
2�*��Xa(Vy,Wb$):$Vy=Wb$+�0:ș&400D9,,Vy:�
36�ݤXb(dt,du,dv,dw$,dx):�ay,dy,dz,eU,eV:ș&400DB,,dt,du,dv,-1,dw$,0 �,,ay:dy=dt!84:dz=ay:eU=0:ȕeU<dy:eV=dt+88+eU*32:�(eV!16 �&103)=&102 �eV!24=dx
3�eU+=1:�:=dz
3�%ݤXd(dt):�WY:ș&400C1,,dt �WY:=WY
4��Xe:ș&400DA:�
4D0ݤVk(WU,eW):�Zk:ș&400C7,eW,WU �Zk:eX=Zk:=eX
4�<ݤbw(eY):�Zk,ax,ay,eZ:ș&400EC,eY,-1 �Zk,ax,ay:eZ=Zk:=eZ
4�8ݤbm:�Zk,ax,ay,eZ:ș&400EC,-1,-1 �Zk,ax,ay:eZ=Zk:=eZ
58ݤbv:�Zk,ax,ay,ea:ș&400EC,-1,-1 �Zk,ax,ay:ea=ay:=ea
5\���eb(Vy):�dW,dX,dY,dZ:Vy!0=4:Vy!4=5:Vy!8=11:Vy!12=12:Vy!16=-1:ș&31,Vy,Vy+32:dW=Vy!32:dX=Vy!36:dY=Vy!40:dZ=Vy!44:ȗȓ0,0,dY*2^dW,dZ*2^dX:�
5����ec(Vy,WY):�Xi,Xj,dW,dX,dY,dZ:!Vy=WY:ș&400CC,,Vy:Xi=�Vy!52:Xj=�Vy!48:Vy!0=4:Vy!4=5:Vy!8=11:Vy!12=12:Vy!16=-1:ș&31,Vy,Vy+32:dW=Vy!32:dX=Vy!36:dY=Vy!40:dZ=Vy!44:x=dY* 2^dW :y=dZ* 2^dX:x=(x-Xi)/2:y=(y-Xj)/2:Vy!0=WY:Vy!(0+4+0)=x:Vy!(0+4+4)=y
6`~Vy!(0+4+8)=Vy!(0+4+0)+Xi:Vy!(0+4+12)=Vy!(0+4+4)+Xj:ș&400C5,,Vy:x=((dY*2^dW)-Xi ) / 2:y=((dZ*2^dX)-Xj) / 2:ȗȓx,y,Xi,Xj:�
6����ed(Vy,WY,Vz,ee,ef):!Vy=WY:ș&400CC,,Vy:eg=Vy!4:eh=Vy!8:ei=Vy!12:ej=Vy!16:Vy!0=WY:Vy!4=Vz:ș&400CE,,Vy:ek=Vy!8:el=Vy!12:em=Vy!16:en=Vy!20:eo=em-ek:ep=en-el:Wx=eg+ek:Wz=ej+el:ȗȓWx+ee,Wz+ef,eo-ee*2,ep-ef*2:�
7Zo��eq(Vy,WY,WV,WW):!Vy=WY:ș&400CC,,Vy:er=Vy!4-Vy!20:es=Vy!16-Vy!24:er=WV-er:es=1024-(es-WW):et%=er:eu%=es:�
7����ev(Vy,WY,ew):Vy!0=WY:ș&400CC,,Vy:ex=Vy!4:ey=Vy!12:ez=Vy!8:fU=Vy!16:fV=Vy!28:Vy!0=ew:ș&400CC,,Vy:Wx=ex-(Vy!12-Vy!4)-1:Xj=Vy!8-Vy!16:Vy!4=Wx:Vy!12=ey:Vy!8=Xj:Vy!16=fU:Vy!20=0:Vy!28=fV:ș&400C5,,Vy:�
8�ݤal(bj):=((bj+3) �(�3))
8�LݤVc:ș&1E,6,,,16 �,,ay:Vb=ay:ș&41501,Vb,"<"+Ud$+"$Dir>.Messages",0:=Vb
8�&��Vw(fW):ș&41504,fW:ș&1E,7,,fW:�
90IݤXy(fW,YY$):ș&41502,fW,YY$,0,0,0,0,0,0 �,,ay:fX=ay:fY$=�Xv(fX):=fY$
9vZ��Wn(fZ,fa,fb):fc=fZ:fd=fa:fe=fb:Ve=4:�ed(Ui,fc,fe,16,0):ș&1C �ff,fg,fh:fi=ff-1:�Vl:�
9���Vl:Ȏfc �
:�Wg:Ȏfe �
: '�2:Vf=�fj(Vf,2):�Vh(�(64*(fk/100)))
:4�
:>�:�
:f'ݤfj(fa,fb):ș&1C �ff,fg,fh:�fh=0 �
:�Ve=0:�eb(Ui)
:��:�ff<>fi �
;�!Ui=fc:ș&400CC,,Ui:eg=Ui!4:fl=ff-eg:Ui!0=fc:Ui!4=fa:ș&400CE,,Ui:ek=Ui!(8+0):el=Ui!(8+4):em=Ui!(8+8):en=Ui!(8+12):Ui!(100+0)=fc:Ui!(100+4)=fa:ș&400C4,,Ui+100:ș&400D1,fc,ek,el,em,en:Ui!(8+8)=fl:Ui!4=fc:ș&400C2,,Ui+4 �fa:�dm(Ui,fc,fa):Ui!0=fc
<?Ui!4=fe:ș&400CE,,Ui:fm=Ui!(8+8)-16:fi=ff:fk=�((fl/fm)*100)
<Z�
<n	�:=fa
<�R��fn(Vy,WY,fo$):�Xm,dp:!Vy=WY:ș&400CC,,Vy:Xm=Vy!(4+56):dp=(Xm �2^8)=2^8:�dp �
<�$fp=!(Vy+4+72):$!(Vy+4+72)=fo$+�0
<��:$(Vy+4+72)=dq$+�0
=�:�
=6O��fq(Vy,WY,Vz,fr):Vy!0=WY:Vy!4=Vz:Vy!8=(�fr)<<21:Vy!12=1<<21:ș&400CD,,Vy:�
=�O��Zg(Vy,WY,Vz,fs):Vy!0=WY:Vy!4=Vz:Vy!8=(�fs)<<22:Vy!12=1<<22:ș&400CD,,Vy:�
�

00000000  0d 00 3c 1b ee 85 eb eb  3a f6 3a f1 22 20 61 74  |..<.....:.:." at|
00000010  20 4c 69 6e 65 20 22 3b  9e 3a e0 0d 00 5a 0d f2  | Line ";.:...Z..|
00000020  55 56 3a f2 55 57 3a e0  0d 00 8c f7 dd f2 55 56  |UV:.UW:.......UV|
00000030  3a 55 58 3d 34 3a 55 59  3d 32 3a 55 5a 3d 31 3a  |:UX=4:UY=2:UZ=1:|
00000040  55 61 3d 2d 32 3a 55 62  3d 26 44 45 38 3a 55 63  |Ua=-2:Ub=&DE8:Uc|
00000050  3d 26 46 46 39 3a 55 64  24 3d 22 44 65 6c 74 61  |=&FF9:Ud$="Delta|
00000060  22 3a 55 65 24 3d 22 44  65 6c 74 61 22 3a 55 66  |":Ue$="Delta":Uf|
00000070  3d 32 2a 31 30 32 34 20  3a de 55 67 20 55 66 3a  |=2*1024 :.Ug Uf:|
00000080  55 68 3d 32 2a 31 30 32  34 20 3a de 55 69 20 55  |Uh=2*1024 :.Ui U|
00000090  68 3a 55 6a 3d 32 2a 31  30 32 34 20 3a de 55 6b  |h:Uj=2*1024 :.Uk|
000000a0  20 55 6a 3a 55 6c 3d 32  2a 31 30 32 34 20 3a de  | Uj:Ul=2*1024 :.|
000000b0  55 6d 20 55 6c 3a 55 6e  3d 34 2a 31 30 32 34 20  |Um Ul:Un=4*1024 |
000000c0  3a de 55 6f 20 55 6e 3a  55 70 3d 38 2a 31 30 32  |:.Uo Un:Up=8*102|
000000d0  34 20 3a de 55 71 20 55  70 3a 55 72 3d 32 35 36  |4 :.Uq Up:Ur=256|
000000e0  3a de 55 73 24 28 55 72  29 3a de 55 74 28 55 72  |:.Us$(Ur):.Ut(Ur|
000000f0  29 3a de 55 75 28 34 2c  55 72 29 3a 55 76 3d 32  |):.Uu(4,Ur):Uv=2|
00000100  35 36 3a de 55 77 24 28  31 2b 31 2b 34 2b 31 2c  |56:.Uw$(1+1+4+1,|
00000110  55 76 29 3a 55 78 3d 30  3a 55 79 3d 20 ac b9 0d  |Uv):Ux=0:Uy= ...|
00000120  01 5e 69 55 7a 3d a4 56  55 28 32 2a 31 30 30 2c  |.^iUz=.VU(2*100,|
00000130  55 65 24 29 3a 56 56 3d  30 3a f2 56 57 3a f2 56  |Ue$):VV=0:.VW:.V|
00000140  58 3a f2 56 59 3a 56 5a  3d a4 56 61 28 55 69 29  |X:.VY:VZ=.Va(Ui)|
00000150  3a 56 62 3d a4 56 63 3a  56 64 3d 30 3a 56 65 3d  |:Vb=.Vc:Vd=0:Ve=|
00000160  30 3a 56 66 3d 33 3a 56  67 3d 2d 31 3a f2 56 68  |0:Vf=3:Vg=-1:.Vh|
00000170  28 33 32 29 3a 55 74 28  29 3d 30 3a 55 75 28 29  |(32):Ut()=0:Uu()|
00000180  3d 30 3a f2 56 69 3a e1  0d 02 08 1f dd f2 55 57  |=0:.Vi:.......UW|
00000190  3a f5 3a 56 6a 3d a4 56  6b 28 55 67 2c 55 78 29  |:.:Vj=.Vk(Ug,Ux)|
000001a0  3a c8 8e 56 6a 20 ca 0d  02 30 11 c9 30 3a e7 56  |:..Vj ...0..0:.V|
000001b0  65 3d 34 20 8c f2 56 6c  0d 02 3a 0e c9 31 3a f2  |e=4 ..Vl..:..1:.|
000001c0  56 6d 28 55 67 29 0d 02  44 16 c9 32 3a f2 56 6e  |Vm(Ug)..D..2:.Vn|
000001d0  28 55 67 2c 55 69 2c 2d  31 2c b9 29 0d 02 4e 13  |(Ug,Ui,-1,.)..N.|
000001e0  c9 33 3a e7 21 55 67 3d  56 6f 20 8c f2 56 70 0d  |.3:.!Ug=Vo ..Vp.|
000001f0  02 58 10 f2 56 71 28 55  69 2c 55 67 21 30 29 0d  |.X..Vq(Ui,Ug!0).|
00000200  02 62 0e c9 36 3a f2 56  72 28 55 67 29 0d 02 6c  |.b..6:.Vr(Ug)..l|
00000210  0e c9 37 3a f2 56 73 28  55 67 29 0d 02 76 0e c9  |..7:.Vs(Ug)..v..|
00000220  38 3a f2 56 74 28 55 67  29 0d 02 80 0e c9 39 3a  |8:.Vt(Ug).....9:|
00000230  f2 56 75 28 55 67 29 0d  02 8a 0f c9 31 37 3a f2  |.Vu(Ug).....17:.|
00000240  56 76 28 55 67 29 0d 02  94 0f c9 31 38 3a f2 56  |Vv(Ug).....18:.V|
00000250  76 28 55 67 29 0d 02 9e  1b cb 3a fd 55 79 3a f2  |v(Ug).....:.Uy:.|
00000260  56 77 28 56 62 29 3a f2  56 78 28 55 7a 29 3a e1  |Vw(Vb):.Vx(Uz):.|
00000270  0d 03 02 69 dd a4 56 61  28 56 79 29 3a 56 79 21  |...i..Va(Vy):Vy!|
00000280  30 3d 2d 31 3a 56 79 21  34 3d 30 3a 56 79 21 38  |0=-1:Vy!4=0:Vy!8|
00000290  3d 30 3a 56 79 21 31 32  3d 36 38 3a 56 79 21 31  |=0:Vy!12=68:Vy!1|
000002a0  36 3d 36 38 3a 56 79 21  32 30 3d 26 33 30 30 32  |6=68:Vy!20=&3002|
000002b0  3a 24 28 56 79 2b 32 34  29 3d 22 21 22 2b 55 64  |:$(Vy+24)="!"+Ud|
000002c0  24 2b bd 30 3a c8 99 26  34 30 30 43 32 2c 2c 56  |$+.0:..&400C2,,V|
000002d0  79 20 b8 56 7a 3a 3d 56  7a 0d 03 7a 3d dd f2 56  |y .Vz:=Vz..z=..V|
000002e0  72 28 57 55 29 3a 57 56  3d 57 55 21 30 3a 57 57  |r(WU):WV=WU!0:WW|
000002f0  3d 57 55 21 34 3a 57 58  3d 57 55 21 38 3a 57 59  |=WU!4:WX=WU!8:WY|
00000300  3d 57 55 21 31 32 3a 56  7a 3d 57 55 21 31 36 3a  |=WU!12:Vz=WU!16:|
00000310  c8 8e 57 58 20 ca 0d 03  c0 0e c9 55 58 3a c8 8e  |..WX ......UX:..|
00000320  57 59 20 ca 0d 03 ca 1a  c9 55 61 3a e7 56 7a 3d  |WY ......Ua:.Vz=|
00000330  56 5a 20 8c f2 57 5a 28  55 69 2c 57 61 29 0d 03  |VZ ..WZ(Ui,Wa)..|
00000340  d4 0f c9 56 6f 3a e7 56  7a 3d 32 20 8c 0d 03 de  |...Vo:.Vz=2 ....|
00000350  23 57 62 24 3d a4 57 63  28 55 69 2c 56 6f 2c 31  |#Wb$=.Wc(Ui,Vo,1|
00000360  29 3a e7 a7 57 62 24 2c  22 2e 22 29 3d 30 20 8c  |):..Wb$,".")=0 .|
00000370  0d 03 f2 4e 57 64 3d a4  57 65 28 55 69 2c 39 39  |...NWd=.We(Ui,99|
00000380  2c 55 64 24 2c 22 54 6f  20 73 61 76 65 2c 20 64  |,Ud$,"To save, d|
00000390  72 61 67 20 74 68 65 20  66 69 6c 65 20 69 63 6f  |rag the file ico|
000003a0  6e 20 74 6f 20 61 20 64  69 72 65 63 74 6f 72 79  |n to a directory|
000003b0  20 64 69 73 70 6c 61 79  22 2c b9 2c a3 29 0d 03  | display",.,.)..|
000003c0  fc 1b cc 3a f2 57 66 28  57 62 24 29 3a c8 99 26  |...:.Wf(Wb$):..&|
000003d0  34 30 30 44 34 2c 2c 2d  31 0d 04 1a 05 cd 0d 04  |400D4,,-1.......|
000003e0  24 05 cd 0d 04 2e 19 c9  57 67 3a e7 56 7a 3d 34  |$.......Wg:.Vz=4|
000003f0  20 8c f2 56 71 28 55 69  2c 57 67 29 0d 04 38 19  | ..Vq(Ui,Wg)..8.|
00000400  c9 57 68 3a e7 56 7a 3d  32 20 8c f2 57 69 28 57  |.Wh:.Vz=2 ..Wi(W|
00000410  56 2c 57 57 29 0d 04 42  0f c9 57 61 3a f2 57 6a  |V,WW)..B..Wa:.Wj|
00000420  28 55 67 29 0d 04 4c 05  cb 0d 04 56 0e c9 55 59  |(Ug)..L....V..UY|
00000430  3a c8 8e 57 59 20 ca 0d  04 60 17 c9 55 61 3a e7  |:..WY ...`..Ua:.|
00000440  56 7a 3d 56 5a 20 8c f2  57 6b 28 57 56 29 0d 04  |Vz=VZ ..Wk(WV)..|
00000450  6a 12 c9 57 61 3a f2 57  6c 28 57 56 2c 57 57 29  |j..Wa:.Wl(WV,WW)|
00000460  0d 04 74 05 cb 0d 04 7e  0e c9 55 5a 3a c8 8e 57  |..t....~..UZ:..W|
00000470  59 20 ca 0d 04 88 0f c9  56 6f 3a e7 56 7a 3d 32  |Y ......Vo:.Vz=2|
00000480  20 8c 0d 04 92 23 57 62  24 3d a4 57 63 28 55 69  | ....#Wb$=.Wc(Ui|
00000490  2c 56 6f 2c 31 29 3a e7  a7 57 62 24 2c 22 2e 22  |,Vo,1):..Wb$,"."|
000004a0  29 3d 30 20 8c 0d 04 a6  4e 57 64 3d a4 57 65 28  |)=0 ....NWd=.We(|
000004b0  55 69 2c 39 39 2c 55 64  24 2c 22 54 6f 20 73 61  |Ui,99,Ud$,"To sa|
000004c0  76 65 2c 20 64 72 61 67  20 74 68 65 20 66 69 6c  |ve, drag the fil|
000004d0  65 20 69 63 6f 6e 20 74  6f 20 61 20 64 69 72 65  |e icon to a dire|
000004e0  63 74 6f 72 79 20 64 69  73 70 6c 61 79 22 2c b9  |ctory display",.|
000004f0  2c a3 29 0d 04 b0 0e cc  3a f2 57 66 28 57 62 24  |,.).....:.Wf(Wb$|
00000500  29 0d 04 c4 05 cd 0d 04  ce 05 cd 0d 04 d8 19 c9  |)...............|
00000510  57 67 3a e7 56 7a 3d 34  20 8c f2 56 71 28 55 69  |Wg:.Vz=4 ..Vq(Ui|
00000520  2c 57 67 29 0d 04 e2 05  cb 0d 04 ec 11 c9 36 34  |,Wg)..........64|
00000530  2c 31 36 3a c8 8e 57 59  20 ca 0d 04 f6 1f c9 56  |,16:..WY ......V|
00000540  6f 3a e7 56 7a 3d 30 20  8c 57 64 3d a4 57 6d 28  |o:.Vz=0 .Wd=.Wm(|
00000550  55 69 2c 57 59 2c 56 7a  29 0d 05 00 16 c9 57 67  |Ui,WY,Vz).....Wg|
00000560  3a e7 56 7a 3d 56 66 20  84 56 7a 3d 32 20 8c 0d  |:.Vz=Vf .Vz=2 ..|
00000570  05 0a 0b e7 56 65 3d 30  20 8c 0d 05 14 10 f2 57  |....Ve=0 ......W|
00000580  6e 28 57 67 2c 56 66 2c  32 29 0d 05 1e 05 cd 0d  |n(Wg,Vf,2)......|
00000590  05 28 05 cd 0d 05 32 05  cb 0d 05 3c 07 cb 3a e1  |.(....2....<..:.|
000005a0  0d 05 64 16 dd f2 56 76  28 57 55 29 3a c8 8e 57  |..d...Vv(WU):..W|
000005b0  55 21 31 36 20 ca 0d 05  78 0b c9 30 3a 55 79 3d  |U!16 ...x..0:Uy=|
000005c0  b9 0d 05 82 0e c9 32 3a  f2 57 6f 28 57 55 29 0d  |......2:.Wo(WU).|
000005d0  05 8c 0e c9 33 3a f2 57  70 28 57 55 29 0d 05 96  |....3:.Wp(WU)...|
000005e0  11 c9 26 35 30 32 3a f2  57 71 28 57 55 29 0d 05  |..&502:.Wq(WU)..|
000005f0  a0 07 cb 3a e1 0d 05 c8  2c dd f2 56 74 28 57 55  |...:....,..Vt(WU|
00000600  29 3a 57 59 3d 57 55 21  30 3a 56 7a 3d 57 55 21  |):WY=WU!0:Vz=WU!|
00000610  34 3a 57 72 3d 57 55 21  32 34 3a c8 8e 57 59 20  |4:Wr=WU!24:..WY |
00000620  ca 0d 05 fa 16 c9 56 6f  3a e7 56 7a 3d 31 20 80  |......Vo:.Vz=1 .|
00000630  57 72 3d 31 33 20 8c 0d  06 04 23 57 62 24 3d a4  |Wr=13 ....#Wb$=.|
00000640  57 63 28 55 69 2c 56 6f  2c 31 29 3a e7 a7 57 62  |Wc(Ui,Vo,1):..Wb|
00000650  24 2c 22 2e 22 29 3d 30  20 8c 0d 06 18 4e 57 64  |$,".")=0 ....NWd|
00000660  3d a4 57 65 28 55 69 2c  39 39 2c 55 64 24 2c 22  |=.We(Ui,99,Ud$,"|
00000670  54 6f 20 73 61 76 65 2c  20 64 72 61 67 20 74 68  |To save, drag th|
00000680  65 20 66 69 6c 65 20 69  63 6f 6e 20 74 6f 20 61  |e file icon to a|
00000690  20 64 69 72 65 63 74 6f  72 79 20 64 69 73 70 6c  | directory displ|
000006a0  61 79 22 2c b9 2c a3 29  0d 06 22 1d cc 3a f2 57  |ay",.,.).."..:.W|
000006b0  66 28 57 62 24 29 3a f2  56 70 3a f2 56 71 28 55  |f(Wb$):.Vp:.Vq(U|
000006c0  69 2c 56 6f 29 0d 06 4a  05 cd 0d 06 54 05 cd 0d  |i,Vo)..J....T...|
000006d0  06 5e 10 c9 57 68 3a e7  57 72 3d 31 33 20 8c 0d  |.^..Wh:.Wr=13 ..|
000006e0  06 68 0a c8 8e 56 7a 20  ca 0d 06 72 15 c9 34 3a  |.h...Vz ...r..4:|
000006f0  e7 57 73 3d 31 20 8c f2  57 74 28 57 75 29 0d 06  |.Ws=1 ..Wt(Wu)..|
00000700  7c 15 c9 36 3a e7 57 73  3d 32 20 8c f2 57 74 28  ||..6:.Ws=2 ..Wt(|
00000710  57 75 29 0d 06 86 15 c9  38 3a e7 57 73 3d 33 20  |Wu).....8:.Ws=3 |
00000720  8c f2 57 74 28 57 75 29  0d 06 90 16 c9 31 30 3a  |..Wt(Wu).....10:|
00000730  e7 57 73 3d 34 20 8c f2  57 74 28 57 75 29 0d 06  |.Ws=4 ..Wt(Wu)..|
00000740  9a 05 cb 0d 06 a4 05 cd  0d 06 ae 0d 7f 3a f2 57  |.............:.W|
00000750  76 28 57 72 29 0d 06 c2  07 cb 3a e1 0d 06 ea 76  |v(Wr).....:....v|
00000760  dd f2 56 6d 28 57 55 29  3a c8 99 26 34 30 30 43  |..Vm(WU):..&400C|
00000770  38 2c 2c 57 55 20 b8 57  77 3a 57 78 3d 57 55 21  |8,,WU .Ww:Wx=WU!|
00000780  34 3a 57 79 3d 57 55 21  31 36 3a 57 7a 3d 57 55  |4:Wy=WU!16:Wz=WU|
00000790  21 38 3a 58 55 3d 57 55  21 32 30 3a 58 56 3d 57  |!8:XU=WU!20:XV=W|
000007a0  55 21 32 34 3a c8 95 57  77 3a f2 58 57 28 57 78  |U!24:..Ww:.XW(Wx|
000007b0  2c 57 79 2c 57 7a 2c 58  55 2c 58 56 29 3a c8 99  |,Wy,Wz,XU,XV):..|
000007c0  26 34 30 30 43 41 2c 2c  57 55 20 b8 57 77 3a ce  |&400CA,,WU .Ww:.|
000007d0  3a e1 0d 07 76 35 dd f2  56 57 3a f2 58 58 28 55  |:...v5..VW:.XX(U|
000007e0  6f 2c 55 6e 29 3a f2 58  59 28 55 6f 2c 22 3c 22  |o,Un):.XY(Uo,"<"|
000007f0  2b 55 64 24 2b 22 24 44  69 72 3e 2e 53 70 72 69  |+Ud$+"$Dir>.Spri|
00000800  74 65 73 22 29 3a e1 0d  07 b2 e6 dd f2 56 58 3a  |tes"):.......VX:|
00000810  58 5a 3d 55 6d 3a f2 58  61 28 55 69 2c 22 3c 22  |XZ=Um:.Xa(Ui,"<"|
00000820  2b 55 64 24 2b 22 24 44  69 72 3e 2e 54 65 6d 70  |+Ud$+"$Dir>.Temp|
00000830  6c 61 74 65 73 22 29 3a  58 5a 3d a4 58 62 28 55  |lates"):XZ=.Xb(U|
00000840  6b 2c 58 5a 2c 55 6d 2b  55 6c 2c 22 69 6e 66 6f  |k,XZ,Um+Ul,"info|
00000850  72 6d 61 74 69 6f 6e 22  2c 55 6f 29 3a 58 63 3d  |rmation",Uo):Xc=|
00000860  a4 58 64 28 55 6b 29 3a  58 5a 3d a4 58 62 28 55  |.Xd(Uk):XZ=.Xb(U|
00000870  6b 2c 58 5a 2c 55 6d 2b  55 6c 2c 22 6d 61 69 6e  |k,XZ,Um+Ul,"main|
00000880  22 2c 55 6f 29 3a 57 61  3d a4 58 64 28 55 6b 29  |",Uo):Wa=.Xd(Uk)|
00000890  3a 58 5a 3d a4 58 62 28  55 6b 2c 58 5a 2c 55 6d  |:XZ=.Xb(Uk,XZ,Um|
000008a0  2b 55 6c 2c 22 78 66 65  72 5f 73 65 6e 64 22 2c  |+Ul,"xfer_send",|
000008b0  55 6f 29 3a 56 6f 3d a4  58 64 28 55 6b 29 3a 58  |Uo):Vo=.Xd(Uk):X|
000008c0  5a 3d a4 58 62 28 55 6b  2c 58 5a 2c 55 6d 2b 55  |Z=.Xb(Uk,XZ,Um+U|
000008d0  6c 2c 22 70 61 72 61 6d  65 74 65 72 73 22 2c 55  |l,"parameters",U|
000008e0  6f 29 3a 57 68 3d a4 58  64 28 55 6b 29 0d 08 20  |o):Wh=.Xd(Uk).. |
000008f0  33 58 5a 3d a4 58 62 28  55 6b 2c 58 5a 2c 55 6d  |3XZ=.Xb(Uk,XZ,Um|
00000900  2b 55 6c 2c 22 70 72 65  66 73 22 2c 55 6f 29 3a  |+Ul,"prefs",Uo):|
00000910  57 67 3d a4 58 64 28 55  6b 29 3a f2 58 65 3a e1  |Wg=.Xd(Uk):.Xe:.|
00000920  0d 08 5c 7f dd f2 57 6b  28 57 56 29 3a 56 56 3d  |..\...Wk(WV):VV=|
00000930  31 3a f2 58 66 28 55 64  24 2c 31 32 38 2c 34 34  |1:.Xf(Ud$,128,44|
00000940  29 3a f2 58 67 28 22 49  6e 66 6f 22 2c 30 2c 58  |):.Xg("Info",0,X|
00000950  63 2c 20 ac b9 29 3a f2  58 67 28 22 50 72 65 66  |c, ..):.Xg("Pref|
00000960  73 2e 2e 2e 22 2c 30 2c  2d 31 2c 20 ac b9 29 3a  |s...",0,-1, ..):|
00000970  f2 58 67 28 22 51 75 69  74 22 2c 31 32 38 2c 2d  |.Xg("Quit",128,-|
00000980  31 2c 20 ac b9 29 3a c8  99 26 34 30 30 44 34 2c  |1, ..):..&400D4,|
00000990  2c 55 71 2c 57 56 2d 36  34 2c 32 32 38 3a e1 0d  |,Uq,WV-64,228:..|
000009a0  08 c0 75 dd f2 57 6c 28  57 56 2c 57 57 29 3a 56  |..u..Wl(WV,WW):V|
000009b0  56 3d 32 3a f2 58 66 28  55 64 24 2c 31 32 38 2c  |V=2:.Xf(Ud$,128,|
000009c0  34 34 29 3a f2 58 67 28  22 43 6f 6d 70 69 6c 65  |44):.Xg("Compile|
000009d0  22 2c 32 2c 2d 31 2c 56  64 3c 32 29 3a f2 58 67  |",2,-1,Vd<2):.Xg|
000009e0  28 22 44 65 6c 65 74 65  20 23 22 2b c3 56 64 2c  |("Delete #"+.Vd,|
000009f0  31 32 38 2c 2d 31 2c 56  64 3c 31 29 3a c8 99 26  |128,-1,Vd<1):..&|
00000a00  34 30 30 44 34 2c 2c 55  71 2c 57 56 2d 36 34 2c  |400D4,,Uq,WV-64,|
00000a10  57 57 3a e1 0d 09 1a 95  dd f2 58 66 28 58 68 24  |WW:.......Xf(Xh$|
00000a20  2c 58 69 2c 58 6a 29 3a  58 6b 3d 30 3a 24 28 55  |,Xi,Xj):Xk=0:$(U|
00000a30  71 2b 58 6b 29 3d 58 68  24 2b bd 30 3a 3f 28 55  |q+Xk)=Xh$+.0:?(U|
00000a40  71 2b 58 6b 2b 31 32 29  3d 37 3a 3f 28 55 71 2b  |q+Xk+12)=7:?(Uq+|
00000a50  58 6b 2b 31 33 29 3d 32  3a 3f 28 55 71 2b 58 6b  |Xk+13)=2:?(Uq+Xk|
00000a60  2b 31 34 29 3d 37 3a 3f  28 55 71 2b 58 6b 2b 31  |+14)=7:?(Uq+Xk+1|
00000a70  35 29 3d 30 3a 21 28 55  71 2b 58 6b 2b 31 36 29  |5)=0:!(Uq+Xk+16)|
00000a80  3d 58 69 3a 21 28 55 71  2b 58 6b 2b 32 30 29 3d  |=Xi:!(Uq+Xk+20)=|
00000a90  58 6a 3a 21 28 55 71 2b  58 6b 2b 32 34 29 3d 30  |Xj:!(Uq+Xk+24)=0|
00000aa0  3a 58 6b 2b 3d 32 38 3a  e1 0d 09 a6 6c dd f2 58  |:Xk+=28:....l..X|
00000ab0  67 28 58 6c 24 2c 58 6d  2c 58 6e 2c 58 6f 29 3a  |g(Xl$,Xm,Xn,Xo):|
00000ac0  21 28 55 71 2b 58 6b 2b  30 29 3d 58 6d 3a 21 28  |!(Uq+Xk+0)=Xm:!(|
00000ad0  55 71 2b 58 6b 2b 34 29  3d 58 6e 3a 21 28 55 71  |Uq+Xk+4)=Xn:!(Uq|
00000ae0  2b 58 6b 2b 38 29 3d 26  30 37 30 30 30 30 30 31  |+Xk+8)=&07000001|
00000af0  2b 94 58 6f 2a 32 5e 32  32 3a 24 28 55 71 2b 58  |+.Xo*2^22:$(Uq+X|
00000b00  6b 2b 31 32 29 3d 58 6c  24 2b bd 30 3a 58 6b 2b  |k+12)=Xl$+.0:Xk+|
00000b10  3d 32 34 3a e1 0d 0a 00  1b dd f2 56 75 28 57 55  |=24:.......Vu(WU|
00000b20  29 3a 58 70 3d 57 55 21  30 3a c8 8e 56 56 20 ca  |):Xp=WU!0:..VV .|
00000b30  0d 0a 1e 0d c9 31 3a c8  8e 58 70 20 ca 0d 0a 28  |.....1:..Xp ...(|
00000b40  06 c9 30 0d 0a 32 11 c9  31 3a f2 57 5a 28 55 69  |..0..2..1:.WZ(Ui|
00000b50  2c 57 67 29 0d 0a 3c 0b  c9 32 3a 55 79 3d b9 0d  |,Wg)..<..2:Uy=..|
00000b60  0a 46 05 cb 0d 0a 50 0d  c9 32 3a c8 8e 58 70 20  |.F....P..2:..Xp |
00000b70  ca 0d 0a 5a 18 c9 30 3a  f2 56 6e 28 55 67 2c 55  |...Z..0:.Vn(Ug,U|
00000b80  69 2c 56 6f 2c 20 ac b9  29 0d 0a 64 0a c9 31 3a  |i,Vo, ..)..d..1:|
00000b90  f2 58 71 0d 0a 6e 05 cb  0d 0a 78 0e c9 33 3a f2  |.Xq..n....x..3:.|
00000ba0  58 72 28 58 70 29 0d 0a  82 33 cb 3a c8 99 26 34  |Xr(Xp)...3.:..&4|
00000bb0  30 30 43 46 2c 2c 57 55  3a 57 56 3d 57 55 21 30  |00CF,,WU:WV=WU!0|
00000bc0  3a 57 57 3d 57 55 21 34  3a 57 58 3d 57 55 21 38  |:WW=WU!4:WX=WU!8|
00000bd0  3a e7 57 58 3d 55 5a 20  8c 0d 0a be 0a c8 8e 56  |:.WX=UZ .......V|
00000be0  56 20 ca 0d 0a c8 0e c9  31 3a f2 57 6b 28 57 56  |V ......1:.Wk(WV|
00000bf0  29 0d 0a d2 11 c9 32 3a  f2 57 6c 28 57 56 2c 57  |).....2:.Wl(WV,W|
00000c00  57 29 0d 0a dc 11 c9 33  3a f2 57 69 28 58 73 2c  |W).....3:.Wi(Xs,|
00000c10  58 74 29 0d 0a e6 05 cb  0d 0a f0 0e cc 3a e7 56  |Xt)..........:.V|
00000c20  56 3c 3e 31 20 8c 0d 0b  04 15 c8 99 26 34 30 30  |V<>1 .......&400|
00000c30  44 34 2c 2c 2d 31 3a 56  56 3d 30 0d 0b 18 05 cd  |D4,,-1:VV=0.....|
00000c40  0d 0b 22 07 cd 3a e1 0d  0b 4a 5b dd f2 57 70 28  |.."..:...J[..Wp(|
00000c50  57 55 29 3a 58 75 3d 57  55 21 34 30 3a 57 62 24  |WU):Xu=WU!40:Wb$|
00000c60  3d a4 58 76 28 57 55 2b  34 34 29 3a 58 77 3d 57  |=.Xv(WU+44):Xw=W|
00000c70  55 21 34 3a 57 55 21 31  36 3d 34 3a 57 55 21 31  |U!4:WU!16=4:WU!1|
00000c80  32 3d 57 55 21 38 3a c8  99 26 34 30 30 45 37 2c  |2=WU!8:..&400E7,|
00000c90  31 37 2c 57 55 2c 58 77  3a e7 58 75 3c 3e 55 63  |17,WU,Xw:.Xu<>Uc|
00000ca0  20 8c 0d 0b 9a 33 58 78  24 3d a4 58 79 28 56 62  | ....3Xx$=.Xy(Vb|
00000cb0  2c 22 65 72 72 30 36 22  29 3a 57 64 3d a4 57 65  |,"err06"):Wd=.We|
00000cc0  28 55 69 2c 39 39 2c 55  64 24 2c 58 78 24 2c 20  |(Ui,99,Ud$,Xx$, |
00000cd0  ac b9 2c b9 29 0d 0b ae  15 cc 3a e7 20 ac a4 58  |..,.).....:. ..X|
00000ce0  7a 28 55 69 2c 57 61 29  20 8c 0d 0b c2 0e f2 57  |z(Ui,Wa) ......W|
00000cf0  5a 28 55 69 2c 57 61 29  0d 0b cc 1d cd 3a f2 56  |Z(Ui,Wa).....:.V|
00000d00  70 3a f2 56 71 28 55 69  2c 56 6f 29 3a f2 59 55  |p:.Vq(Ui,Vo):.YU|
00000d10  28 57 62 24 29 0d 0b f4  07 cd 3a e1 0d 0c 1c f8  |(Wb$).....:.....|
00000d20  dd f2 56 73 28 57 55 29  3a c8 99 26 34 30 30 43  |..Vs(WU):..&400C|
00000d30  46 2c 2c 57 55 3a 57 56  3d 57 55 21 30 3a 57 57  |F,,WU:WV=WU!0:WW|
00000d40  3d 57 55 21 34 3a 57 59  3d 57 55 21 31 32 3a 56  |=WU!4:WY=WU!12:V|
00000d50  7a 3d 57 55 21 31 36 3a  57 62 24 3d a4 57 63 28  |z=WU!16:Wb$=.Wc(|
00000d60  55 69 2c 56 6f 2c 31 29  3a 59 56 24 3d c2 57 62  |Ui,Vo,1):YV$=.Wb|
00000d70  24 2c 31 30 2d a7 c2 57  62 24 2c 31 30 29 2c 22  |$,10-..Wb$,10),"|
00000d80  2e 22 29 29 3a 57 55 21  30 3d 34 34 2b 28 28 a9  |.")):WU!0=44+((.|
00000d90  59 56 24 20 81 34 29 2a  34 29 2b 34 3a 57 55 21  |YV$ .4)*4)+4:WU!|
00000da0  34 3d 30 3a 57 55 21 38  3d 30 3a 57 55 21 31 32  |4=0:WU!8=0:WU!12|
00000db0  3d 30 3a 57 55 21 31 36  3d 31 3a 57 55 21 32 30  |=0:WU!16=1:WU!20|
00000dc0  3d 57 59 3a 57 55 21 32  34 3d 56 7a 3a 57 55 21  |=WY:WU!24=Vz:WU!|
00000dd0  32 38 3d 57 56 3a 57 55  21 33 32 3d 57 57 3a 57  |28=WV:WU!32=WW:W|
00000de0  55 21 33 36 3d 36 34 3a  57 55 21 34 30 3d 55 62  |U!36=64:WU!40=Ub|
00000df0  3a 24 28 57 55 2b 34 34  29 3d 59 56 24 2b bd 30  |:$(WU+44)=YV$+.0|
00000e00  3a c8 99 26 34 30 30 45  37 2c 31 37 2c 57 55 2c  |:..&400E7,17,WU,|
00000e10  57 59 3a e1 0d 0d 0c 60  dd f2 57 6f 28 57 55 29  |WY:....`..Wo(WU)|
00000e20  3a 58 77 3d 57 55 21 34  3a 57 55 21 31 32 3d 57  |:Xw=WU!4:WU!12=W|
00000e30  55 21 38 3a 57 55 21 31  36 3d 33 3a 57 62 24 3d  |U!8:WU!16=3:Wb$=|
00000e40  a4 58 76 28 57 55 2b 34  34 29 3a c8 99 26 34 30  |.Xv(WU+44):..&40|
00000e50  30 45 37 2c 31 37 2c 57  55 2c 58 77 3a e7 a7 57  |0E7,17,WU,Xw:..W|
00000e60  62 24 2c 22 57 69 6d 70  24 53 63 72 61 70 22 29  |b$,"Wimp$Scrap")|
00000e70  3d 30 20 8c 0d 0d 52 0c  f2 57 66 28 57 62 24 29  |=0 ...R..Wf(Wb$)|
00000e80  0d 0d 5c 14 cd 3a c8 99  26 34 30 30 44 34 2c 2c  |..\..:..&400D4,,|
00000e90  2d 31 3a e1 0d 0d 8e f4  dd a4 57 6d 28 56 79 2c  |-1:.......Wm(Vy,|
00000ea0  57 59 2c 56 7a 29 3a ea  58 69 2c 58 6a 2c 59 57  |WY,Vz):.Xi,Xj,YW|
00000eb0  2c 59 58 3a 56 79 21 30  3d 34 3a 56 79 21 34 3d  |,YX:Vy!0=4:Vy!4=|
00000ec0  35 3a 56 79 21 38 3d 31  31 3a 56 79 21 31 32 3d  |5:Vy!8=11:Vy!12=|
00000ed0  31 32 3a 56 79 21 31 36  3d 2d 31 3a c8 99 26 33  |12:Vy!16=-1:..&3|
00000ee0  31 2c 56 79 2c 56 79 2b  33 32 3a 58 69 3d 28 56  |1,Vy,Vy+32:Xi=(V|
00000ef0  79 21 34 30 2b 31 29 2a  20 32 5e 28 20 56 79 21  |y!40+1)* 2^( Vy!|
00000f00  33 32 20 29 3a 58 6a 3d  28 56 79 21 34 34 2b 31  |32 ):Xj=(Vy!44+1|
00000f10  29 2a 20 32 5e 28 20 56  79 21 33 36 20 29 3a 56  |)* 2^( Vy!36 ):V|
00000f20  79 21 30 3d 57 59 3a c8  99 26 34 30 30 43 43 2c  |y!0=WY:..&400CC,|
00000f30  2c 56 79 3a 59 57 3d 56  79 21 34 3a 59 58 3d 56  |,Vy:YW=Vy!4:YX=V|
00000f40  79 21 31 36 3a 56 79 21  30 3d 57 59 3a 56 79 21  |y!16:Vy!0=WY:Vy!|
00000f50  34 3d 56 7a 3a c8 99 26  34 30 30 43 45 2c 2c 56  |4=Vz:..&400CE,,V|
00000f60  79 3a 56 79 21 38 2b 3d  59 57 3a 56 79 21 31 32  |y:Vy!8+=YW:Vy!12|
00000f70  2b 3d 59 58 3a 56 79 21  31 36 2b 3d 59 57 3a 56  |+=YX:Vy!16+=YW:V|
00000f80  79 21 32 30 2b 3d 59 58  0d 0e 38 43 56 79 21 30  |y!20+=YX..8CVy!0|
00000f90  3d 30 3a 56 79 21 34 3d  35 3a 56 79 21 32 34 3d  |=0:Vy!4=5:Vy!24=|
00000fa0  30 3a 56 79 21 32 38 3d  30 3a 56 79 21 33 32 3d  |0:Vy!28=0:Vy!32=|
00000fb0  58 69 3a 56 79 21 33 36  3d 58 6a 3a c8 99 26 34  |Xi:Vy!36=Xj:..&4|
00000fc0  30 30 44 30 2c 2c 56 79  3a 3d 30 0d 0e 7e 34 dd  |00D0,,Vy:=0..~4.|
00000fd0  f2 57 71 28 57 55 29 3a  59 59 24 3d 22 22 3a 58  |.Wq(WU):YY$="":X|
00000fe0  77 3d 57 55 21 34 3a 59  5a 3d 57 55 21 33 32 3a  |w=WU!4:YZ=WU!32:|
00000ff0  59 61 3d 57 55 21 33 36  3a c8 8e 59 5a 20 ca 0d  |Ya=WU!36:..YZ ..|
00001000  0e ba 1a c9 55 61 3a e7  59 61 3d 56 5a 20 8c 59  |....Ua:.Ya=VZ .Y|
00001010  59 24 3d 22 69 62 61 72  22 0d 0e c4 19 c9 57 67  |Y$="ibar".....Wg|
00001020  3a 59 59 24 3d 22 70 72  65 66 22 3a c8 8e 59 61  |:YY$="pref":..Ya|
00001030  20 ca 0d 0e d8 11 c9 33  3a 59 59 24 3d 22 70 72  | ......3:YY$="pr|
00001040  30 33 22 0d 0e e2 11 c9  34 3a 59 59 24 3d 22 70  |03".....4:YY$="p|
00001050  72 30 34 22 0d 0e ec 11  c9 35 3a 59 59 24 3d 22  |r04".....5:YY$="|
00001060  70 72 30 35 22 0d 0e f6  05 cb 0d 0f 00 19 c9 57  |pr05"..........W|
00001070  68 3a 59 59 24 3d 22 70  61 72 61 22 3a c8 8e 59  |h:YY$="para":..Y|
00001080  61 20 ca 0d 0f 14 11 c9  31 3a 59 59 24 3d 22 70  |a ......1:YY$="p|
00001090  61 30 31 22 0d 0f 1e 11  c9 32 3a 59 59 24 3d 22  |a01".....2:YY$="|
000010a0  70 61 30 32 22 0d 0f 28  11 c9 34 3a 59 59 24 3d  |pa02"..(..4:YY$=|
000010b0  22 70 61 30 34 22 0d 0f  32 11 c9 36 3a 59 59 24  |"pa04"..2..6:YY$|
000010c0  3d 22 70 61 30 36 22 0d  0f 3c 11 c9 38 3a 59 59  |="pa06"..<..8:YY|
000010d0  24 3d 22 70 61 30 38 22  0d 0f 46 12 c9 31 30 3a  |$="pa08"..F..10:|
000010e0  59 59 24 3d 22 70 61 31  30 22 0d 0f 50 05 cb 0d  |YY$="pa10"..P...|
000010f0  0f 5a 12 c9 57 61 3a 59  59 24 3d 22 6d 61 30 30  |.Z..Wa:YY$="ma00|
00001100  22 0d 0f 64 10 cb 3a e7  59 59 24 3c 3e 22 22 20  |"..d..:.YY$<>"" |
00001110  8c 0d 0f 78 65 59 62 24  3d a4 58 79 28 56 62 2c  |...xeYb$=.Xy(Vb,|
00001120  59 59 24 29 3a 57 55 21  30 3d 32 30 2b 28 28 a9  |YY$):WU!0=20+((.|
00001130  28 59 62 24 29 20 81 34  29 2a 34 29 2b 34 3a 57  |(Yb$) .4)*4)+4:W|
00001140  55 21 31 32 3d 57 55 21  38 3a 57 55 21 31 36 3d  |U!12=WU!8:WU!16=|
00001150  26 35 30 33 3a 24 28 57  55 2b 32 30 29 3d 59 62  |&503:$(WU+20)=Yb|
00001160  24 2b bd 30 3a c8 99 26  34 30 30 45 37 2c 31 37  |$+.0:..&400E7,17|
00001170  2c 57 55 2c 58 77 0d 0f  b4 07 cd 3a e1 0d 0f dc  |,WU,Xw.....:....|
00001180  95 dd f2 58 57 28 57 78  2c 57 79 2c 57 7a 2c 58  |...XW(Wx,Wy,Wz,X|
00001190  55 2c 58 56 29 3a 59 63  3d 57 79 2d 58 56 2d 31  |U,XV):Yc=Wy-XV-1|
000011a0  31 39 3a 59 64 3d 57 7a  2b 58 56 2d 31 31 39 3a  |19:Yd=Wz+XV-119:|
000011b0  69 3d 31 3a 59 63 2d 3d  69 2a 34 38 20 2d 20 34  |i=1:Yc-=i*48 - 4|
000011c0  38 3a 78 3d 57 78 2d 58  55 2b 32 34 3a 79 3d 59  |8:x=Wx-XU+24:y=Y|
000011d0  63 2b 33 32 3a c8 95 28  69 3c 3d 56 64 29 3a 78  |c+32:..(i<=Vd):x|
000011e0  3d 57 78 2d 58 55 2b 32  34 3a 79 3d 59 63 2b 33  |=Wx-XU+24:y=Yc+3|
000011f0  32 3a e7 55 74 28 69 29  3d 30 20 8c c8 99 26 34  |2:.Ut(i)=0 ...&4|
00001200  30 30 45 36 2c 37 8b c8  99 26 34 30 30 45 36 2c  |00E6,7...&400E6,|
00001210  31 31 0d 10 4a 7d 59 65  24 3d c2 22 20 20 20 22  |11..J}Ye$=."   "|
00001220  2b c3 28 69 29 2c 33 29  2b 22 20 3a 20 2e 2e 2e  |+.(i),3)+" : ...|
00001230  22 2b c2 55 73 24 28 69  29 2c 32 39 29 3a ef 35  |"+.Us$(i),29):.5|
00001240  3a ec 78 2c 79 3a f1 59  65 24 3a ef 34 3a 69 2b  |:.x,y:.Ye$:.4:i+|
00001250  3d 31 3a 59 63 2d 3d 34  38 3a ce 3a c8 99 26 34  |=1:Yc-=48:.:..&4|
00001260  30 30 45 36 2c 38 3a ef  35 3a ec 78 2c 59 63 2b  |00E6,8:.5:.x,Yc+|
00001270  33 32 3a f1 c4 31 35 2c  22 20 22 29 3b 22 2a 2a  |32:..15," ");"**|
00001280  2a 20 45 4e 44 20 2a 2a  2a 22 3a ef 34 3a e1 0d  |* END ***":.4:..|
00001290  10 ae 16 dd f2 56 68 28  59 66 29 3a e7 59 66 3c  |.....Vh(Yf):.Yf<|
000012a0  3e 56 67 20 8c 0d 10 c2  1e 56 67 3d 59 66 3a f2  |>Vg .....Vg=Yf:.|
000012b0  59 67 28 55 69 2c 57 67  2c 35 2c c3 56 67 2b 22  |Yg(Ui,Wg,5,.Vg+"|
000012c0  4b 22 29 0d 10 d6 07 cd  3a e1 0d 10 fe 16 dd f2  |K").....:.......|
000012d0  59 55 28 57 62 24 29 3a  e7 56 64 3d 55 72 20 8c  |YU(Wb$):.Vd=Ur .|
000012e0  0d 11 12 33 58 78 24 3d  a4 58 79 28 56 62 2c 22  |...3Xx$=.Xy(Vb,"|
000012f0  65 72 72 30 37 22 29 3a  57 64 3d a4 57 65 28 55  |err07"):Wd=.We(U|
00001300  69 2c 39 39 2c 55 64 24  2c 58 78 24 2c 20 ac b9  |i,99,Ud$,Xx$, ..|
00001310  2c b9 29 0d 11 26 77 cc  3a 56 64 2b 3d 31 3a 55  |,.)..&w.:Vd+=1:U|
00001320  73 24 28 56 64 29 3d 57  62 24 3a 55 74 28 56 64  |s$(Vd)=Wb$:Ut(Vd|
00001330  29 3d 30 3a 55 75 28 31  2c 56 64 29 3d 30 3a 55  |)=0:Uu(1,Vd)=0:U|
00001340  75 28 32 2c 56 64 29 3d  30 3a 55 75 28 33 2c 56  |u(2,Vd)=0:Uu(3,V|
00001350  64 29 3d 30 3a 55 75 28  34 2c 56 64 29 3d 30 3a  |d)=0:Uu(4,Vd)=0:|
00001360  f2 59 68 28 55 69 2c 57  61 2c 30 2c 37 32 30 2c  |.Yh(Ui,Wa,0,720,|
00001370  2d 31 33 38 2d 28 56 64  2a 34 38 29 2c 30 29 3a  |-138-(Vd*48),0):|
00001380  f2 59 69 28 55 69 2c 57  61 29 0d 11 76 07 cd 3a  |.Yi(Ui,Wa)..v..:|
00001390  e1 0d 11 9e 82 dd f2 58  71 3a 55 74 28 56 64 29  |.......Xq:Ut(Vd)|
000013a0  3d 30 3a 55 75 28 31 2c  56 64 29 3d 30 3a 55 75  |=0:Uu(1,Vd)=0:Uu|
000013b0  28 32 2c 56 64 29 3d 30  3a 55 75 28 33 2c 56 64  |(2,Vd)=0:Uu(3,Vd|
000013c0  29 3d 30 3a 55 75 28 34  2c 56 64 29 3d 30 3a 56  |)=0:Uu(4,Vd)=0:V|
000013d0  64 2d 3d 31 3a f2 59 68  28 55 69 2c 57 61 2c 30  |d-=1:.Yh(Ui,Wa,0|
000013e0  2c 37 32 30 2c 2d 31 33  38 2d 28 56 64 2a 34 38  |,720,-138-(Vd*48|
000013f0  29 2c 30 29 3a f2 56 6e  28 55 67 2c 55 69 2c 57  |),0):.Vn(Ug,Ui,W|
00001400  61 2c 20 ac b9 29 3a f2  59 69 28 55 69 2c 57 61  |a, ..):.Yi(Ui,Wa|
00001410  29 3a e1 0d 12 0c 14 dd  f2 57 6a 28 57 55 29 3a  |):.......Wj(WU):|
00001420  e7 56 64 3e 30 20 8c 0d  12 20 78 57 56 3d 57 55  |.Vd>0 ... xWV=WU|
00001430  21 30 3a 57 57 3d 57 55  21 34 3a 55 69 21 30 3d  |!0:WW=WU!4:Ui!0=|
00001440  57 61 3a c8 99 26 34 30  30 43 43 2c 2c 55 69 3a  |Wa:..&400CC,,Ui:|
00001450  57 79 3d 55 69 21 28 31  32 2b 34 29 3a 58 56 3d  |Wy=Ui!(12+4):XV=|
00001460  55 69 21 28 32 30 2b 34  29 3a 59 6a 3d 94 28 28  |Ui!(20+4):Yj=.((|
00001470  28 57 57 2d 57 79 29 2b  58 56 29 29 3a 59 6b 3d  |(WW-Wy)+XV)):Yk=|
00001480  28 28 59 6a 2d 28 31 31  39 2d 34 38 29 29 20 81  |((Yj-(119-48)) .|
00001490  34 38 29 2b 31 3a e7 59  6b 3c 3d 56 64 20 8c 0d  |48)+1:.Yk<=Vd ..|
000014a0  12 70 be 57 75 3d 59 6b  3a 59 6c 3d 55 74 28 57  |.p.Wu=Yk:Yl=Ut(W|
000014b0  75 29 3a 59 6d 3d 55 75  28 31 2c 57 75 29 3a 59  |u):Ym=Uu(1,Wu):Y|
000014c0  6e 3d 55 75 28 32 2c 57  75 29 3a 59 6f 3d 55 75  |n=Uu(2,Wu):Yo=Uu|
000014d0  28 33 2c 57 75 29 3a 59  70 3d 55 75 28 34 2c 57  |(3,Wu):Yp=Uu(4,W|
000014e0  75 29 3a 59 71 3d a4 59  72 28 c2 22 30 30 22 2b  |u):Yq=.Yr(."00"+|
000014f0  c3 7e 59 6c 2c 32 29 29  3a 57 73 3d bb 55 77 24  |.~Yl,2)):Ws=.Uw$|
00001500  28 37 2c 59 71 29 3a 59  73 24 3d 22 26 22 2b c2  |(7,Yq):Ys$="&"+.|
00001510  22 30 30 22 2b c3 7e 59  71 2c 32 29 2b 22 20 3a  |"00"+.~Yq,2)+" :|
00001520  20 22 2b 55 77 24 28 32  2c 59 71 29 3a f2 59 74  | "+Uw$(2,Yq):.Yt|
00001530  28 57 73 29 3a f2 59 67  28 55 69 2c 57 68 2c 31  |(Ws):.Yg(Ui,Wh,1|
00001540  2c 59 73 24 29 3a e7 57  73 3e 30 20 8c f2 59 67  |,Ys$):.Ws>0 ..Yg|
00001550  28 55 69 2c 57 68 2c 34  2c c3 59 6d 29 0d 12 e8  |(Ui,Wh,4,.Ym)...|
00001560  1b e7 57 73 3e 31 20 8c  f2 59 67 28 55 69 2c 57  |..Ws>1 ..Yg(Ui,W|
00001570  68 2c 36 2c c3 59 6e 29  0d 12 f2 1b e7 57 73 3e  |h,6,.Yn).....Ws>|
00001580  32 20 8c f2 59 67 28 55  69 2c 57 68 2c 38 2c c3  |2 ..Yg(Ui,Wh,8,.|
00001590  59 6f 29 0d 12 fc 1c e7  57 73 3e 33 20 8c f2 59  |Yo).....Ws>3 ..Y|
000015a0  67 28 55 69 2c 57 68 2c  31 30 2c c3 59 70 29 0d  |g(Ui,Wh,10,.Yp).|
000015b0  13 06 6f f2 59 67 28 55  69 2c 57 68 2c 33 2c 55  |..o.Yg(Ui,Wh,3,U|
000015c0  77 24 28 33 2c 59 71 29  29 3a f2 59 67 28 55 69  |w$(3,Yq)):.Yg(Ui|
000015d0  2c 57 68 2c 35 2c 55 77  24 28 34 2c 59 71 29 29  |,Wh,5,Uw$(4,Yq))|
000015e0  3a f2 59 67 28 55 69 2c  57 68 2c 37 2c 55 77 24  |:.Yg(Ui,Wh,7,Uw$|
000015f0  28 35 2c 59 71 29 29 3a  f2 59 67 28 55 69 2c 57  |(5,Yq)):.Yg(Ui,W|
00001600  68 2c 39 2c 55 77 24 28  36 2c 59 71 29 29 3a e7  |h,9,Uw$(6,Yq)):.|
00001610  20 ac a4 58 7a 28 55 69  2c 57 68 29 20 8c 0d 13  | ..Xz(Ui,Wh) ...|
00001620  38 15 f2 56 6e 28 55 67  2c 55 69 2c 57 68 2c 20  |8..Vn(Ug,Ui,Wh, |
00001630  ac b9 29 0d 13 42 05 cd  0d 13 4c 05 cd 0d 13 56  |..)..B....L....V|
00001640  07 cd 3a e1 0d 13 7e 38  dd a4 59 72 28 59 75 24  |..:...~8..Yr(Yu$|
00001650  29 3a 59 76 3d 30 3a c8  95 55 77 24 28 31 2c 59  |):Yv=0:..Uw$(1,Y|
00001660  76 29 3c 3e 59 75 24 20  80 59 76 3c 3d 26 46 46  |v)<>Yu$ .Yv<=&FF|
00001670  3a 59 76 2b 3d 31 3a ce  3a 3d 59 76 0d 13 ce b6  |:Yv+=1:.:=Yv....|
00001680  dd f2 57 69 28 58 73 2c  58 74 29 3a 56 56 3d 33  |..Wi(Xs,Xt):VV=3|
00001690  3a f2 58 66 28 22 54 72  69 67 67 65 72 73 22 2c  |:.Xf("Triggers",|
000016a0  32 30 2a 32 34 2c 34 34  29 3a 59 77 3d 55 71 2b  |20*24,44):Yw=Uq+|
000016b0  34 2a 31 30 32 34 3a 59  78 3d 30 3a 59 79 3d 30  |4*1024:Yx=0:Yy=0|
000016c0  3a f5 3a 59 75 24 3d 55  77 24 28 31 2c 59 79 29  |:.:Yu$=Uw$(1,Yy)|
000016d0  3a 59 73 24 3d 55 77 24  28 32 2c 59 79 29 3a 59  |:Ys$=Uw$(2,Yy):Y|
000016e0  7a 24 3d 55 77 24 28 33  2c 59 79 29 3a 5a 55 24  |z$=Uw$(3,Yy):ZU$|
000016f0  3d 55 77 24 28 34 2c 59  79 29 3a 5a 56 24 3d 55  |=Uw$(4,Yy):ZV$=U|
00001700  77 24 28 35 2c 59 79 29  3a 5a 57 24 3d 55 77 24  |w$(5,Yy):ZW$=Uw$|
00001710  28 36 2c 59 79 29 3a 5a  58 24 3d 55 77 24 28 37  |(6,Yy):ZX$=Uw$(7|
00001720  2c 59 79 29 3a e7 59 75  24 3c 3e 22 45 4e 44 22  |,Yy):.Yu$<>"END"|
00001730  20 8c 0d 14 64 2a f2 5a  59 28 59 75 24 2c 59 73  | ...d*.ZY(Yu$,Ys|
00001740  24 2c 59 7a 24 2c 5a 55  24 2c 5a 56 24 2c 5a 57  |$,Yz$,ZU$,ZV$,ZW|
00001750  24 2c 5a 58 24 29 3a 59  79 2b 3d 31 0d 14 78 35  |$,ZX$):Yy+=1..x5|
00001760  cd 3a fd 59 75 24 3d 22  45 4e 44 22 3a 21 28 55  |.:.Yu$="END":!(U|
00001770  71 2b 58 6b 2d 32 34 29  3d 31 32 38 3a c8 99 26  |q+Xk-24)=128:..&|
00001780  34 30 30 44 34 2c 2c 55  71 2c 57 56 2c 57 57 3a  |400D4,,Uq,WV,WW:|
00001790  e1 0d 14 be 75 dd f2 5a  59 28 59 75 24 2c 59 73  |....u..ZY(Yu$,Ys|
000017a0  24 2c 59 7a 24 2c 5a 55  24 2c 5a 56 24 2c 5a 57  |$,Yz$,ZU$,ZV$,ZW|
000017b0  24 2c 5a 58 24 29 3a 5a  5a 24 3d 22 26 22 2b 59  |$,ZX$):ZZ$="&"+Y|
000017c0  75 24 2b 22 20 3a 20 22  2b 59 73 24 3a 5a 61 3d  |u$+" : "+Ys$:Za=|
000017d0  a0 28 22 26 22 2b 59 75  24 29 3a 5a 62 3d a0 28  |.("&"+Yu$):Zb=.(|
000017e0  22 26 22 2b 55 77 24 28  31 2c 59 79 2b 31 29 29  |"&"+Uw$(1,Yy+1))|
000017f0  3a e7 28 5a 61 2d 5a 62  3c 2d 31 29 20 84 28 5a  |:.(Za-Zb<-1) .(Z|
00001800  61 3d 30 29 20 8c 0d 14  f0 10 21 28 55 71 2b 58  |a=0) .....!(Uq+X|
00001810  6b 2b 30 29 3d 32 0d 14  fa 12 cc 3a 21 28 55 71  |k+0)=2.....:!(Uq|
00001820  2b 58 6b 2b 30 29 3d 30  0d 15 0e 7d cd 3a 21 28  |+Xk+0)=0...}.:!(|
00001830  55 71 2b 58 6b 2b 34 29  3d 2d 31 3a 21 28 55 71  |Uq+Xk+4)=-1:!(Uq|
00001840  2b 58 6b 2b 38 29 3d 26  30 37 30 30 30 31 30 31  |+Xk+8)=&07000101|
00001850  3a 5a 63 3d 59 77 2b 59  78 3a 24 5a 63 3d 5a 5a  |:Zc=Yw+Yx:$Zc=ZZ|
00001860  24 2b bd 30 3a 59 78 2b  3d a9 5a 5a 24 2b 31 3a  |$+.0:Yx+=.ZZ$+1:|
00001870  21 28 55 71 2b 58 6b 2b  31 32 29 3d 5a 63 3a 21  |!(Uq+Xk+12)=Zc:!|
00001880  28 55 71 2b 58 6b 2b 31  36 29 3d 59 77 3a 21 28  |(Uq+Xk+16)=Yw:!(|
00001890  55 71 2b 58 6b 2b 32 30  29 3d 31 36 3a 58 6b 2b  |Uq+Xk+20)=16:Xk+|
000018a0  3d 32 34 3a e1 0d 15 7c  d6 dd f2 58 72 28 5a 64  |=24:...|...Xr(Zd|
000018b0  29 3a 59 79 24 3d a4 58  76 28 21 28 55 71 2b 32  |):Yy$=.Xv(!(Uq+2|
000018c0  38 2b 5a 64 2a 32 34 2b  31 32 29 29 3a f2 59 67  |8+Zd*24+12)):.Yg|
000018d0  28 55 69 2c 57 68 2c 31  2c 59 79 24 29 3a 59 71  |(Ui,Wh,1,Yy$):Yq|
000018e0  3d a4 59 72 28 c1 59 79  24 2c 32 2c 32 29 29 3a  |=.Yr(.Yy$,2,2)):|
000018f0  57 73 3d bb 55 77 24 28  37 2c 59 71 29 3a f2 59  |Ws=.Uw$(7,Yq):.Y|
00001900  67 28 55 69 2c 57 68 2c  33 2c 55 77 24 28 33 2c  |g(Ui,Wh,3,Uw$(3,|
00001910  59 71 29 29 3a f2 59 67  28 55 69 2c 57 68 2c 35  |Yq)):.Yg(Ui,Wh,5|
00001920  2c 55 77 24 28 34 2c 59  71 29 29 3a f2 59 67 28  |,Uw$(4,Yq)):.Yg(|
00001930  55 69 2c 57 68 2c 37 2c  55 77 24 28 35 2c 59 71  |Ui,Wh,7,Uw$(5,Yq|
00001940  29 29 3a f2 59 67 28 55  69 2c 57 68 2c 39 2c 55  |)):.Yg(Ui,Wh,9,U|
00001950  77 24 28 36 2c 59 71 29  29 3a f2 59 74 28 57 73  |w$(6,Yq)):.Yt(Ws|
00001960  29 3a f2 56 6e 28 55 67  2c 55 69 2c 57 68 2c 20  |):.Vn(Ug,Ui,Wh, |
00001970  ac b9 29 3a e7 57 73 3d  30 20 8c 0d 15 f4 0b f2  |..):.Ws=0 ......|
00001980  57 74 28 57 75 29 0d 15  fe 11 cc 3a f2 5a 65 28  |Wt(Wu).....:.Ze(|
00001990  57 68 2c 34 2c 31 29 0d  16 12 07 cd 3a e1 0d 16  |Wh,4,1).....:...|
000019a0  3a 20 dd f2 57 74 28 5a  66 29 3a e7 56 56 3d 33  |: ..Wt(Zf):.VV=3|
000019b0  20 8c c8 99 26 34 30 30  44 34 2c 2c 2d 31 0d 16  | ...&400D4,,-1..|
000019c0  4e 93 55 74 28 5a 66 29  3d a0 28 c0 a4 57 63 28  |N.Ut(Zf)=.(..Wc(|
000019d0  55 69 2c 57 68 2c 31 29  2c 33 29 29 3a 55 75 28  |Ui,Wh,1),3)):Uu(|
000019e0  31 2c 5a 66 29 3d bb a4  57 63 28 55 69 2c 57 68  |1,Zf)=..Wc(Ui,Wh|
000019f0  2c 34 29 3a 55 75 28 32  2c 5a 66 29 3d bb a4 57  |,4):Uu(2,Zf)=..W|
00001a00  63 28 55 69 2c 57 68 2c  36 29 3a 55 75 28 33 2c  |c(Ui,Wh,6):Uu(3,|
00001a10  5a 66 29 3d bb a4 57 63  28 55 69 2c 57 68 2c 38  |Zf)=..Wc(Ui,Wh,8|
00001a20  29 3a 55 75 28 34 2c 5a  66 29 3d bb a4 57 63 28  |):Uu(4,Zf)=..Wc(|
00001a30  55 69 2c 57 68 2c 31 30  29 3a f2 56 71 28 55 69  |Ui,Wh,10):.Vq(Ui|
00001a40  2c 57 68 29 3a f2 59 69  28 55 69 2c 57 61 29 3a  |,Wh):.Yi(Ui,Wa):|
00001a50  e1 0d 16 b2 34 dd f2 59  74 28 5a 58 29 3a e3 69  |....4..Yt(ZX):.i|
00001a60  3d 31 20 b8 34 3a f2 5a  67 28 55 69 2c 57 68 2c  |=1 .4:.Zg(Ui,Wh,|
00001a70  34 2b 69 2a 32 2d 32 2c  69 3e 5a 58 29 3a e7 69  |4+i*2-2,i>ZX):.i|
00001a80  3e 5a 58 20 8c 0d 16 da  19 f2 59 67 28 55 69 2c  |>ZX ......Yg(Ui,|
00001a90  57 68 2c 34 2b 69 2a 32  2d 32 2c 22 22 29 0d 16  |Wh,4+i*2-2,"")..|
00001aa0  e4 1c cc 3a f2 59 67 28  55 69 2c 57 68 2c 34 2b  |...:.Yg(Ui,Wh,4+|
00001ab0  69 2a 32 2d 32 2c 22 30  22 29 0d 16 f8 0a cd 3a  |i*2-2,"0").....:|
00001ac0  ed 69 3a e1 0d 17 2a 3f  dd f2 56 69 3a f7 3a 59  |.i:...*?..Vi:.:Y|
00001ad0  79 3d 30 3a f5 3a f3 59  75 24 2c 59 73 24 2c 59  |y=0:.:.Yu$,Ys$,Y|
00001ae0  7a 24 2c 5a 55 24 2c 5a  56 24 2c 5a 57 24 3a 5a  |z$,ZU$,ZV$,ZW$:Z|
00001af0  58 3d 30 3a e7 59 7a 24  3c 3e 22 22 20 8c 5a 58  |X=0:.Yz$<>"" .ZX|
00001b00  2b 3d 31 0d 17 70 13 e7  5a 55 24 3c 3e 22 22 20  |+=1..p..ZU$<>"" |
00001b10  8c 5a 58 2b 3d 31 0d 17  7a 13 e7 5a 56 24 3c 3e  |.ZX+=1..z..ZV$<>|
00001b20  22 22 20 8c 5a 58 2b 3d  31 0d 17 84 13 e7 5a 57  |"" .ZX+=1.....ZW|
00001b30  24 3c 3e 22 22 20 8c 5a  58 2b 3d 31 0d 17 8e 78  |$<>"" .ZX+=1...x|
00001b40  55 77 24 28 31 2c 59 79  29 3d 59 75 24 3a 55 77  |Uw$(1,Yy)=Yu$:Uw|
00001b50  24 28 32 2c 59 79 29 3d  59 73 24 3a 55 77 24 28  |$(2,Yy)=Ys$:Uw$(|
00001b60  33 2c 59 79 29 3d 59 7a  24 3a 55 77 24 28 34 2c  |3,Yy)=Yz$:Uw$(4,|
00001b70  59 79 29 3d 5a 55 24 3a  55 77 24 28 35 2c 59 79  |Yy)=ZU$:Uw$(5,Yy|
00001b80  29 3d 5a 56 24 3a 55 77  24 28 36 2c 59 79 29 3d  |)=ZV$:Uw$(6,Yy)=|
00001b90  5a 57 24 3a 55 77 24 28  37 2c 59 79 29 3d c3 5a  |ZW$:Uw$(7,Yy)=.Z|
00001ba0  58 3a 59 79 2b 3d 31 3a  fd 59 75 24 3d 22 45 4e  |X:Yy+=1:.Yu$="EN|
00001bb0  44 22 3a e1 0d 17 e8 83  dc 20 22 30 30 22 20 2c  |D":...... "00" ,|
00001bc0  20 22 5b 6e 6f 20 65 76  65 6e 74 5d 22 20 20 20  | "[no event]"   |
00001bd0  20 20 20 20 20 20 20 20  20 20 20 20 2c 20 22 22  |            , ""|
00001be0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001bf0  20 20 20 20 20 20 20 20  20 2c 20 22 22 20 20 20  |         , ""   |
00001c00  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001c10  20 20 20 20 20 20 2c 20  22 22 20 20 20 20 20 20  |      , ""      |
00001c20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001c30  20 20 20 2c 20 22 22 0d  17 fc 83 dc 20 22 30 31  |   , ""..... "01|
00001c40  22 20 2c 20 22 42 6c 61  6e 6b 20 50 61 6c 65 74  |" , "Blank Palet|
00001c50  74 65 22 20 20 20 20 20  20 20 20 20 20 20 20 2c  |te"            ,|
00001c60  20 22 22 20 20 20 20 20  20 20 20 20 20 20 20 20  | ""             |
00001c70  20 20 20 20 20 20 20 20  20 20 20 20 2c 20 22 22  |            , ""|
00001c80  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001c90  20 20 20 20 20 20 20 20  20 2c 20 22 22 20 20 20  |         , ""   |
00001ca0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001cb0  20 20 20 20 20 20 2c 20  22 22 0d 18 06 83 dc 20  |      , ""..... |
00001cc0  22 30 32 22 20 2c 20 22  53 65 74 20 50 61 6c 65  |"02" , "Set Pale|
00001cd0  74 74 65 22 20 20 20 20  20 20 20 20 20 20 20 20  |tte"            |
00001ce0  20 20 2c 20 22 50 61 6c  65 74 74 65 20 6e 75 6d  |  , "Palette num|
00001cf0  62 65 72 22 20 20 20 20  20 20 20 20 20 20 20 2c  |ber"           ,|
00001d00  20 22 42 72 69 67 68 74  6e 65 73 73 20 25 61 67  | "Brightness %ag|
00001d10  65 22 20 20 20 20 20 20  20 20 20 20 2c 20 22 22  |e"          , ""|
00001d20  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001d30  20 20 20 20 20 20 20 20  20 2c 20 22 22 0d 18 10  |         , ""...|
00001d40  83 dc 20 22 30 33 22 20  2c 20 22 46 61 64 65 20  |.. "03" , "Fade |
00001d50  70 61 6c 65 74 74 65 20  6f 75 74 22 20 20 20 20  |palette out"    |
00001d60  20 20 20 20 20 2c 20 22  54 61 72 67 65 74 20 25  |     , "Target %|
00001d70  61 67 65 22 20 20 20 20  20 20 20 20 20 20 20 20  |age"            |
00001d80  20 20 2c 20 22 50 61 6c  65 74 74 65 20 6e 75 6d  |  , "Palette num|
00001d90  62 65 72 22 20 20 20 20  20 20 20 20 20 20 20 2c  |ber"           ,|
00001da0  20 22 4e 75 6d 62 65 72  20 6f 66 20 73 65 63 6f  | "Number of seco|
00001db0  6e 64 73 22 20 20 20 20  20 20 20 20 2c 20 22 22  |nds"        , ""|
00001dc0  0d 18 1a 83 dc 20 22 30  34 22 20 2c 20 22 46 61  |..... "04" , "Fa|
00001dd0  64 65 20 70 61 6c 65 74  74 65 20 69 6e 22 20 20  |de palette in"  |
00001de0  20 20 20 20 20 20 20 20  2c 20 22 54 61 72 67 65  |        , "Targe|
00001df0  74 20 25 61 67 65 22 20  20 20 20 20 20 20 20 20  |t %age"         |
00001e00  20 20 20 20 20 2c 20 22  50 61 6c 65 74 74 65 20  |     , "Palette |
00001e10  6e 75 6d 62 65 72 22 20  20 20 20 20 20 20 20 20  |number"         |
00001e20  20 20 2c 20 22 4e 75 6d  62 65 72 20 6f 66 20 73  |  , "Number of s|
00001e30  65 63 6f 6e 64 73 22 20  20 20 20 20 20 20 20 2c  |econds"        ,|
00001e40  20 22 22 0d 18 24 93 dc  20 22 30 35 22 20 2c 20  | ""..$.. "05" , |
00001e50  22 53 65 74 20 63 6f 6c  6f 75 72 22 20 20 20 20  |"Set colour"    |
00001e60  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 43 6f  |           , "Co|
00001e70  6c 6f 75 72 20 6e 75 6d  62 65 72 22 20 20 20 20  |lour number"    |
00001e80  20 20 20 20 20 20 20 20  2c 20 22 43 6f 6c 6f 75  |        , "Colou|
00001e90  72 20 52 45 44 20 62 79  74 65 22 20 20 20 20 20  |r RED byte"     |
00001ea0  20 20 20 20 20 2c 20 22  43 6f 6c 6f 75 72 20 47  |     , "Colour G|
00001eb0  52 45 45 4e 20 62 79 74  65 22 20 20 20 20 20 20  |REEN byte"      |
00001ec0  20 20 2c 20 22 43 6f 6c  6f 75 72 20 42 4c 55 45  |  , "Colour BLUE|
00001ed0  20 62 79 74 65 22 0d 18  38 87 dc 20 22 31 30 22  | byte"..8.. "10"|
00001ee0  20 2c 20 22 4d 61 6b 65  20 73 6f 75 6e 64 22 20  | , "Make sound" |
00001ef0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 20  |              , |
00001f00  22 43 68 61 6e 6e 65 6c  20 6e 75 6d 62 65 72 22  |"Channel number"|
00001f10  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 49 6e  |           , "In|
00001f20  73 74 72 75 6d 65 6e 74  22 20 20 20 20 20 20 20  |strument"       |
00001f30  20 20 20 20 20 20 20 20  2c 20 22 4f 63 74 61 76  |        , "Octav|
00001f40  65 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |e"              |
00001f50  20 20 20 20 20 2c 20 22  4e 6f 74 65 22 0d 18 42  |     , "Note"..B|
00001f60  83 dc 20 22 31 31 22 20  2c 20 22 50 6c 61 79 20  |.. "11" , "Play |
00001f70  73 6f 75 6e 64 74 72 61  63 6b 22 20 20 20 20 20  |soundtrack"     |
00001f80  20 20 20 20 20 2c 20 22  53 6f 75 6e 64 74 72 61  |     , "Soundtra|
00001f90  63 6b 20 6e 75 6d 62 65  72 22 20 20 20 20 20 20  |ck number"      |
00001fa0  20 20 2c 20 22 22 20 20  20 20 20 20 20 20 20 20  |  , ""          |
00001fb0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00001fc0  20 22 22 20 20 20 20 20  20 20 20 20 20 20 20 20  | ""             |
00001fd0  20 20 20 20 20 20 20 20  20 20 20 20 2c 20 22 22  |            , ""|
00001fe0  0d 18 4c 83 dc 20 22 31  32 22 20 2c 20 22 53 74  |..L.. "12" , "St|
00001ff0  6f 70 20 73 6f 75 6e 64  74 72 61 63 6b 22 20 20  |op soundtrack"  |
00002000  20 20 20 20 20 20 20 20  2c 20 22 22 20 20 20 20  |        , ""    |
00002010  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002020  20 20 20 20 20 2c 20 22  22 20 20 20 20 20 20 20  |     , ""       |
00002030  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002040  20 20 2c 20 22 22 20 20  20 20 20 20 20 20 20 20  |  , ""          |
00002050  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2c  |               ,|
00002060  20 22 22 0d 18 56 83 dc  20 22 31 33 22 20 2c 20  | ""..V.. "13" , |
00002070  22 46 61 64 65 20 6d 75  73 69 63 20 6f 75 74 22  |"Fade music out"|
00002080  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 54 61  |           , "Ta|
00002090  72 67 65 74 20 25 61 67  65 22 20 20 20 20 20 20  |rget %age"      |
000020a0  20 20 20 20 20 20 20 20  2c 20 22 4e 75 6d 62 65  |        , "Numbe|
000020b0  72 20 6f 66 20 73 65 63  6f 6e 64 73 22 20 20 20  |r of seconds"   |
000020c0  20 20 20 20 20 2c 20 22  22 20 20 20 20 20 20 20  |     , ""       |
000020d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000020e0  20 20 2c 20 22 22 0d 18  60 83 dc 20 22 31 34 22  |  , ""..`.. "14"|
000020f0  20 2c 20 22 46 61 64 65  20 6d 75 73 69 63 20 69  | , "Fade music i|
00002100  6e 22 20 20 20 20 20 20  20 20 20 20 20 20 2c 20  |n"            , |
00002110  22 54 61 72 67 65 74 20  25 61 67 65 22 20 20 20  |"Target %age"   |
00002120  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 4e 75  |           , "Nu|
00002130  6d 62 65 72 20 6f 66 20  73 65 63 6f 6e 64 73 22  |mber of seconds"|
00002140  20 20 20 20 20 20 20 20  2c 20 22 22 20 20 20 20  |        , ""    |
00002150  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002160  20 20 20 20 20 2c 20 22  22 0d 18 6a 83 dc 20 22  |     , ""..j.. "|
00002170  31 35 22 20 2c 20 22 50  61 75 73 65 20 73 6f 75  |15" , "Pause sou|
00002180  6e 64 74 72 61 63 6b 22  20 20 20 20 20 20 20 20  |ndtrack"        |
00002190  20 2c 20 22 22 20 20 20  20 20 20 20 20 20 20 20  | , ""           |
000021a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 20  |              , |
000021b0  22 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |""              |
000021c0  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 22 20  |           , "" |
000021d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000021e0  20 20 20 20 20 20 20 20  2c 20 22 22 0d 18 74 83  |        , ""..t.|
000021f0  dc 20 22 31 36 22 20 2c  20 22 43 6f 6e 74 69 6e  |. "16" , "Contin|
00002200  75 65 20 73 6f 75 6e 64  74 72 61 63 6b 22 20 20  |ue soundtrack"  |
00002210  20 20 20 20 2c 20 22 22  20 20 20 20 20 20 20 20  |    , ""        |
00002220  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002230  20 2c 20 22 22 20 20 20  20 20 20 20 20 20 20 20  | , ""           |
00002240  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 20  |              , |
00002250  22 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |""              |
00002260  20 20 20 20 20 20 20 20  20 20 20 2c 20 22 22 0d  |           , "".|
00002270  18 7e 83 dc 20 22 31 37  22 20 2c 20 22 53 65 74  |.~.. "17" , "Set|
00002280  20 73 6f 75 6e 64 74 72  61 63 6b 20 76 6f 6c 75  | soundtrack volu|
00002290  6d 65 22 20 20 20 20 2c  20 22 54 61 72 67 65 74  |me"    , "Target|
000022a0  20 25 61 67 65 22 20 20  20 20 20 20 20 20 20 20  | %age"          |
000022b0  20 20 20 20 2c 20 22 22  20 20 20 20 20 20 20 20  |    , ""        |
000022c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000022d0  20 2c 20 22 22 20 20 20  20 20 20 20 20 20 20 20  | , ""           |
000022e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2c 20  |              , |
000022f0  22 22 0d 18 88 83 dc 20  22 31 38 22 20 2c 20 22  |""..... "18" , "|
00002300  53 65 74 20 73 74 65 72  65 6f 20 70 6f 73 69 74  |Set stereo posit|
00002310  69 6f 6e 22 20 20 20 20  20 20 2c 20 22 43 68 61  |ion"      , "Cha|
00002320  6e 6e 65 6c 20 6e 75 6d  62 65 72 22 20 20 20 20  |nnel number"    |
00002330  20 20 20 20 20 20 20 2c  20 22 53 74 65 72 65 6f  |       , "Stereo|
00002340  20 70 6f 73 69 74 69 6f  6e 22 20 20 20 20 20 20  | position"      |
00002350  20 20 20 20 2c 20 22 22  20 20 20 20 20 20 20 20  |    , ""        |
00002360  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002370  20 2c 20 22 22 0d 18 9c  83 dc 20 22 32 30 22 20  | , ""..... "20" |
00002380  2c 20 22 50 61 75 73 65  20 22 20 20 20 20 20 20  |, "Pause "      |
00002390  20 20 20 20 20 20 20 20  20 20 20 20 20 2c 20 22  |             , "|
000023a0  4e 75 6d 62 65 72 20 6f  66 20 31 2f 35 30 74 68  |Number of 1/50th|
000023b0  20 66 72 61 6d 65 73 22  20 20 2c 20 22 22 20 20  | frames"  , ""  |
000023c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000023d0  20 20 20 20 20 20 20 2c  20 22 22 20 20 20 20 20  |       , ""     |
000023e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000023f0  20 20 20 20 2c 20 22 22  0d 18 b0 1e dc 20 22 45  |    , ""..... "E|
00002400  4e 44 22 20 2c 20 22 22  20 2c 20 22 22 2c 22 22  |ND" , "" , "",""|
00002410  2c 22 22 2c 22 22 0d 19  32 2a dd f2 57 66 28 57  |,"",""..2*..Wf(W|
00002420  62 24 29 3a 5a 68 3d 93  3a 5a 69 3d a4 5a 6a 28  |b$):Zh=.:Zi=.Zj(|
00002430  56 67 2a 31 30 32 34 29  3a e7 20 ac 5a 69 20 8c  |Vg*1024):. .Zi .|
00002440  0d 19 78 33 58 78 24 3d  a4 58 79 28 56 62 2c 22  |..x3Xx$=.Xy(Vb,"|
00002450  65 72 72 30 32 22 29 3a  57 64 3d a4 57 65 28 55  |err02"):Wd=.We(U|
00002460  69 2c 39 39 2c 55 64 24  2c 58 78 24 2c 20 ac b9  |i,99,Ud$,Xx$, ..|
00002470  2c b9 29 0d 19 96 27 cc  3a c8 99 26 32 30 30 30  |,.)...'.:..&2000|
00002480  38 2c 31 33 2c 57 62 24  20 b8 5a 6b 3a 57 64 3d  |8,13,Wb$ .Zk:Wd=|
00002490  31 3a e7 5a 6b 3c 3e 30  20 8c 0d 19 be 31 58 78  |1:.Zk<>0 ....1Xx|
000024a0  24 3d a4 58 79 28 56 62  2c 22 77 61 72 30 31 22  |$=.Xy(Vb,"war01"|
000024b0  29 3a 57 64 3d a4 57 65  28 55 69 2c 39 39 2c 55  |):Wd=.We(Ui,99,U|
000024c0  64 24 2c 58 78 24 2c b9  2c b9 29 0d 19 d2 0d cd  |d$,Xx$,.,.).....|
000024d0  3a e7 57 64 3d 31 20 8c  0d 19 fa 13 ea 85 3a ee  |:.Wd=1 .......:.|
000024e0  85 ea f2 5a 6c 3a f2 56  70 3a e1 0d 1a 0e 14 5a  |...Zl:.Vp:.....Z|
000024f0  6d 3d ae 57 62 24 3a e7  a4 5a 6e 3d b9 20 8c 0d  |m=.Wb$:..Zn=. ..|
00002500  1a 36 10 c8 99 26 34 30  36 43 30 3a f2 5a 6f 0d  |.6...&406C0:.Zo.|
00002510  1a 4a 4f cd 3a f2 56 70  3a d9 23 5a 6d 3a ff 22  |.JO.:.Vp:.#Zm:."|
00002520  53 65 74 54 79 70 65 20  22 2b 57 62 24 2b 22 20  |SetType "+Wb$+" |
00002530  22 2b c3 7e 55 62 3a c8  99 26 34 30 36 43 31 3a  |"+.~Ub:..&406C1:|
00002540  f2 56 71 28 55 69 2c 56  6f 29 3a f2 59 67 28 55  |.Vq(Ui,Vo):.Yg(U|
00002550  69 2c 56 6f 2c 31 2c 57  62 24 29 3a f7 85 0d 1a  |i,Vo,1,Wb$):....|
00002560  ae 05 cd 0d 1a c2 07 cd  3a e1 0d 1a f4 3d dd a4  |........:....=..|
00002570  5a 6e 3a 5a 70 3d b9 3a  5a 71 3d 5a 72 3a 5a 73  |Zn:Zp=.:Zq=Zr:Zs|
00002580  3d a4 5a 74 28 55 73 24  28 31 29 29 2b 31 36 3a  |=.Zt(Us$(1))+16:|
00002590  5a 69 3d a4 5a 6a 28 56  67 2a 31 30 32 34 29 3a  |Zi=.Zj(Vg*1024):|
000025a0  e7 20 ac 5a 69 20 8c 0d  1b 30 3a 58 78 24 3d a4  |. .Zi ...0:Xx$=.|
000025b0  58 79 28 56 62 2c 22 65  72 72 30 31 22 29 3a 57  |Xy(Vb,"err01"):W|
000025c0  64 3d a4 57 65 28 55 69  2c 39 39 2c 55 64 24 2c  |d=.We(Ui,99,Ud$,|
000025d0  58 78 24 2c 20 ac b9 2c  b9 29 3a 5a 70 3d 20 ac  |Xx$, ..,.):Zp= .|
000025e0  b9 0d 1b 4e 46 cc 3a f2  58 58 28 5a 71 2c 5a 73  |...NF.:.XX(Zq,Zs|
000025f0  29 3a f2 58 59 28 5a 71  2c 55 73 24 28 31 29 29  |):.XY(Zq,Us$(1))|
00002600  3a 5a 75 24 3d a4 5a 76  28 5a 71 29 3a 58 69 3d  |:Zu$=.Zv(Zq):Xi=|
00002610  a4 5a 77 28 5a 71 2c 5a  75 24 29 3a e7 58 69 20  |.Zw(Zq,Zu$):.Xi |
00002620  83 38 3c 3e 30 20 8c 0d  1b 8a 33 58 78 24 3d a4  |.8<>0 ....3Xx$=.|
00002630  58 79 28 56 62 2c 22 77  61 72 30 32 22 29 3a 57  |Xy(Vb,"war02"):W|
00002640  64 3d a4 57 65 28 55 69  2c 39 39 2c 55 64 24 2c  |d=.We(Ui,99,Ud$,|
00002650  58 78 24 2c b9 2c 20 ac  b9 29 0d 1b 9e 46 cd 3a  |Xx$,., ..)...F.:|
00002660  5a 78 3d a4 5a 79 28 5a  71 2c 5a 75 24 29 3a 5a  |Zx=.Zy(Zq,Zu$):Z|
00002670  7a 3d a4 61 55 28 58 69  29 3a 61 56 3d a4 61 57  |z=.aU(Xi):aV=.aW|
00002680  28 5a 71 2c 5a 75 24 29  3a 61 58 3d a4 61 59 28  |(Zq,Zu$):aX=.aY(|
00002690  5a 71 2c 5a 75 24 29 3a  e7 61 58 3c 3e 39 20 8c  |Zq,Zu$):.aX<>9 .|
000026a0  0d 1b da 3a 58 78 24 3d  a4 58 79 28 56 62 2c 22  |...:Xx$=.Xy(Vb,"|
000026b0  65 72 72 30 33 22 29 3a  57 64 3d a4 57 65 28 55  |err03"):Wd=.We(U|
000026c0  69 2c 39 39 2c 55 64 24  2c 58 78 24 2c 20 ac b9  |i,99,Ud$,Xx$, ..|
000026d0  2c b9 29 3a 5a 70 3d 20  ac b9 0d 1b f8 2e cc 3a  |,.):Zp= .......:|
000026e0  c8 99 26 39 30 31 30 35  2c 5a 78 2c 5a 68 2c 5a  |..&90105,Zx,Zh,Z|
000026f0  7a 2c 61 56 20 b8 2c 2c  2c 2c 5a 69 2c 61 5a 3a  |z,aV .,,,,Zi,aZ:|
00002700  e7 61 5a 3d 2d 31 20 8c  0d 1c 16 3a 58 78 24 3d  |.aZ=-1 ....:Xx$=|
00002710  a4 58 79 28 56 62 2c 22  65 72 72 30 34 22 29 3a  |.Xy(Vb,"err04"):|
00002720  57 64 3d a4 57 65 28 55  69 2c 39 39 2c 55 64 24  |Wd=.We(Ui,99,Ud$|
00002730  2c 58 78 24 2c 20 ac b9  2c b9 29 3a 5a 70 3d 20  |,Xx$, ..,.):Zp= |
00002740  ac b9 0d 1c 34 28 cc 3a  f2 61 61 28 61 58 2c 56  |....4(.:.aa(aX,V|
00002750  64 2c 5a 7a 2c 61 56 29  3a f2 61 62 28 5a 68 2c  |d,Zz,aV):.ab(Zh,|
00002760  61 5a 29 3a f2 61 63 28  31 29 0d 1c 5c 05 cd 0d  |aZ):.ac(1)..\...|
00002770  1c 66 05 cd 0d 1c 70 09  cd 3a 3d 5a 70 0d 1c 98  |.f....p..:=Zp...|
00002780  73 dd f2 5a 6f 3a 61 64  3d 31 3a 61 65 3d 20 ac  |s..Zo:ad=1:ae= .|
00002790  b9 3a 61 66 3d 30 3a c8  95 61 64 3c 3d 56 64 2d  |.:af=0:..ad<=Vd-|
000027a0  31 20 80 20 ac 61 65 3a  c8 99 26 34 30 36 43 34  |1 . .ae:..&406C4|
000027b0  2c 28 61 64 2f 56 64 29  2a 31 30 30 3a 61 67 3d  |,(ad/Vd)*100:ag=|
000027c0  a4 5a 74 28 55 73 24 28  61 64 29 29 2b 31 36 3a  |.Zt(Us$(ad))+16:|
000027d0  61 68 3d a4 5a 74 28 55  73 24 28 61 64 2b 31 29  |ah=.Zt(Us$(ad+1)|
000027e0  29 2b 31 36 3a e7 61 66  3c 61 67 2b 61 68 20 8c  |)+16:.af<ag+ah .|
000027f0  0d 1d 24 16 61 69 3d a4  5a 6a 28 28 61 67 2b 61  |..$.ai=.Zj((ag+a|
00002800  68 2d 61 66 29 29 0d 1d  2e 0a cc 3a 61 69 3d b9  |h-af)).....:ai=.|
00002810  0d 1d 42 0d cd 3a e7 20  ac 61 69 20 8c 0d 1d 60  |..B..:. .ai ...`|
00002820  38 58 78 24 3d a4 58 79  28 56 62 2c 22 65 72 72  |8Xx$=.Xy(Vb,"err|
00002830  30 31 22 29 3a 57 64 3d  a4 57 65 28 55 69 2c 39  |01"):Wd=.We(Ui,9|
00002840  39 2c 55 64 24 2c 58 78  24 2c 20 ac b9 2c b9 29  |9,Ud$,Xx$, ..,.)|
00002850  3a 61 65 3d b9 0d 1d 7e  f8 cc 3a 61 66 3d 61 67  |:ae=...~..:af=ag|
00002860  2b 61 68 3a 61 6a 3d 5a  68 2b 56 67 2a 31 30 32  |+ah:aj=Zh+Vg*102|
00002870  34 3a 61 6b 3d a4 61 6c  28 61 6a 29 3a 61 6d 3d  |4:ak=.al(aj):am=|
00002880  a4 61 6c 28 61 6a 2b 61  67 29 3a f2 58 58 28 61  |.al(aj+ag):.XX(a|
00002890  6b 2c 61 67 29 3a f2 58  58 28 61 6d 2c 61 68 29  |k,ag):.XX(am,ah)|
000028a0  3a f2 58 59 28 61 6b 2c  55 73 24 28 61 64 29 29  |:.XY(ak,Us$(ad))|
000028b0  3a f2 58 59 28 61 6d 2c  55 73 24 28 61 64 2b 31  |:.XY(am,Us$(ad+1|
000028c0  29 29 3a 61 6e 24 3d a4  5a 76 28 61 6b 29 3a 61  |)):an$=.Zv(ak):a|
000028d0  6f 3d a4 5a 79 28 61 6b  2c 61 6e 24 29 3a 61 70  |o=.Zy(ak,an$):ap|
000028e0  3d a4 61 55 28 a4 5a 77  28 61 6b 2c 61 6e 24 29  |=.aU(.Zw(ak,an$)|
000028f0  29 3a 61 71 3d a4 61 57  28 61 6b 2c 61 6e 24 29  |):aq=.aW(ak,an$)|
00002900  3a 61 72 3d a4 61 59 28  61 6b 2c 61 6e 24 29 3a  |:ar=.aY(ak,an$):|
00002910  61 73 24 3d a4 5a 76 28  61 6d 29 3a 61 74 3d a4  |as$=.Zv(am):at=.|
00002920  5a 79 28 61 6d 2c 61 73  24 29 3a 61 75 3d a4 61  |Zy(am,as$):au=.a|
00002930  55 28 a4 5a 77 28 61 6d  2c 61 73 24 29 29 3a 61  |U(.Zw(am,as$)):a|
00002940  76 3d a4 61 57 28 61 6d  2c 61 73 24 29 0d 1e 5a  |v=.aW(am,as$)..Z|
00002950  24 61 77 3d a4 61 59 28  61 6d 2c 61 73 24 29 3a  |$aw=.aY(am,as$):|
00002960  e7 61 70 3c 3e 5a 7a 20  84 61 75 3c 3e 5a 7a 20  |.ap<>Zz .au<>Zz |
00002970  8c 0d 1e 78 38 58 78 24  3d a4 58 79 28 56 62 2c  |...x8Xx$=.Xy(Vb,|
00002980  22 65 72 72 30 39 22 29  3a 57 64 3d a4 57 65 28  |"err09"):Wd=.We(|
00002990  55 69 2c 39 39 2c 55 64  24 2c 58 78 24 2c 20 ac  |Ui,99,Ud$,Xx$, .|
000029a0  b9 2c b9 29 3a 61 65 3d  b9 0d 1e 96 17 cc 3a e7  |.,.):ae=......:.|
000029b0  61 71 3c 3e 61 56 20 84  61 76 3c 3e 61 56 20 8c  |aq<>aV .av<>aV .|
000029c0  0d 1e b4 38 58 78 24 3d  a4 58 79 28 56 62 2c 22  |...8Xx$=.Xy(Vb,"|
000029d0  65 72 72 31 30 22 29 3a  57 64 3d a4 57 65 28 55  |err10"):Wd=.We(U|
000029e0  69 2c 39 39 2c 55 64 24  2c 58 78 24 2c 20 ac b9  |i,99,Ud$,Xx$, ..|
000029f0  2c b9 29 3a 61 65 3d b9  0d 1e d2 17 cc 3a e7 61  |,.):ae=......:.a|
00002a00  72 3c 3e 61 58 20 84 61  77 3c 3e 61 58 20 8c 0d  |r<>aX .aw<>aX ..|
00002a10  1e f0 38 58 78 24 3d a4  58 79 28 56 62 2c 22 65  |..8Xx$=.Xy(Vb,"e|
00002a20  72 72 30 33 22 29 3a 57  64 3d a4 57 65 28 55 69  |rr03"):Wd=.We(Ui|
00002a30  2c 39 39 2c 55 64 24 2c  58 78 24 2c 20 ac b9 2c  |,99,Ud$,Xx$, ..,|
00002a40  b9 29 3a 61 65 3d b9 0d  1f 0e 46 cc 3a c8 99 26  |.):ae=....F.:..&|
00002a50  39 30 31 30 36 2c 61 6f  2c 61 74 2c 5a 68 2c 56  |90106,ao,at,Zh,V|
00002a60  67 2a 31 30 32 34 2c 5a  7a 2c 61 56 20 b8 5a 6b  |g*1024,Zz,aV .Zk|
00002a70  2c 61 78 2c 61 79 2c 61  7a 2c 62 55 2c 62 56 2c  |,ax,ay,az,bU,bV,|
00002a80  5a 69 2c 61 5a 3a e7 5a  69 3d 30 20 8c 0d 1f 36  |Zi,aZ:.Zi=0 ...6|
00002a90  38 58 78 24 3d a4 58 79  28 56 62 2c 22 65 72 72  |8Xx$=.Xy(Vb,"err|
00002aa0  30 35 22 29 3a 57 64 3d  a4 57 65 28 55 69 2c 39  |05"):Wd=.We(Ui,9|
00002ab0  39 2c 55 64 24 2c 58 78  24 2c 20 ac b9 2c b9 29  |9,Ud$,Xx$, ..,.)|
00002ac0  3a 61 65 3d b9 0d 1f 54  1a cc 3a f2 61 62 28 5a  |:ae=...T..:.ab(Z|
00002ad0  68 2c 61 5a 29 3a f2 61  63 28 61 64 2b 31 29 0d  |h,aZ):.ac(ad+1).|
00002ae0  1f 72 05 cd 0d 1f 86 05  cd 0d 1f 90 05 cd 0d 1f  |.r..............|
00002af0  9a 0f cd 3a 61 64 2b 3d  31 3a ce 3a e1 0d 1f d6  |...:ad+=1:.:....|
00002b00  29 dd f2 61 62 28 58 6e  2c 62 57 29 3a e3 69 3d  |)..ab(Xn,bW):.i=|
00002b10  30 20 b8 62 57 2d 31 3a  d5 23 5a 6d 2c 58 6e 3f  |0 .bW-1:.#Zm,Xn?|
00002b20  69 3a ed 69 3a e1 0d 20  1c 6b dd f2 61 63 28 62  |i:.i:.. .k..ac(b|
00002b30  58 29 3a 62 59 3d 55 74  28 62 58 29 3a d5 23 5a  |X):bY=Ut(bX):.#Z|
00002b40  6d 2c 62 59 3a 59 71 3d  a4 59 72 28 c2 22 30 30  |m,bY:Yq=.Yr(."00|
00002b50  22 2b c3 7e 62 59 2c 32  29 29 3a 62 5a 3d bb 28  |"+.~bY,2)):bZ=.(|
00002b60  55 77 24 28 37 2c 59 71  29 29 3a 62 61 3d 31 3a  |Uw$(7,Yq)):ba=1:|
00002b70  c8 95 62 61 3c 3d 62 5a  3a d5 23 5a 6d 2c 55 75  |..ba<=bZ:.#Zm,Uu|
00002b80  28 62 61 2c 62 58 29 3a  62 61 2b 3d 31 3a ce 3a  |(ba,bX):ba+=1:.:|
00002b90  e1 0d 20 9e 19 dd a4 5a  76 28 62 62 29 3a e7 a4  |.. ....Zv(bb):..|
00002ba0  62 63 28 62 62 29 3e 31  20 8c 0d 20 b2 33 58 78  |bc(bb)>1 .. .3Xx|
00002bb0  24 3d a4 58 79 28 56 62  2c 22 77 61 72 30 33 22  |$=.Xy(Vb,"war03"|
00002bc0  29 3a 57 64 3d a4 57 65  28 55 69 2c 39 39 2c 55  |):Wd=.We(Ui,99,U|
00002bd0  64 24 2c 58 78 24 2c b9  2c 20 ac b9 29 0d 20 c6  |d$,Xx$,., ..). .|
00002be0  10 cd 3a 3d a4 62 64 28  62 62 2c 31 29 0d 20 ee  |..:=.bd(bb,1). .|
00002bf0  cd dd f2 61 61 28 62 65  2c 62 66 2c 58 69 2c 58  |...aa(be,bf,Xi,X|
00002c00  6a 29 3a 62 67 25 3d 28  62 65 3c 3c 31 36 29 2b  |j):bg%=(be<<16)+|
00002c10  62 66 3a 62 68 25 3d 28  58 69 3c 3c 31 36 29 2b  |bf:bh%=(Xi<<16)+|
00002c20  58 6a 3a d5 23 5a 6d 2c  28 62 67 25 29 20 80 26  |Xj:.#Zm,(bg%) .&|
00002c30  46 46 3a d5 23 5a 6d 2c  28 62 67 25 3e 3e 38 29  |FF:.#Zm,(bg%>>8)|
00002c40  20 80 26 46 46 3a d5 23  5a 6d 2c 28 62 67 25 3e  | .&FF:.#Zm,(bg%>|
00002c50  3e 31 36 29 20 80 26 46  46 3a d5 23 5a 6d 2c 28  |>16) .&FF:.#Zm,(|
00002c60  62 67 25 3e 3e 32 34 29  20 80 26 46 46 3a d5 23  |bg%>>24) .&FF:.#|
00002c70  5a 6d 2c 28 62 68 25 29  20 80 26 46 46 3a d5 23  |Zm,(bh%) .&FF:.#|
00002c80  5a 6d 2c 28 62 68 25 3e  3e 38 29 20 80 26 46 46  |Zm,(bh%>>8) .&FF|
00002c90  3a d5 23 5a 6d 2c 28 62  68 25 3e 3e 31 36 29 20  |:.#Zm,(bh%>>16) |
00002ca0  80 26 46 46 3a d5 23 5a  6d 2c 28 62 68 25 3e 3e  |.&FF:.#Zm,(bh%>>|
00002cb0  32 34 29 20 80 26 46 46  3a e1 0d 21 7a 3a dd a4  |24) .&FF:..!z:..|
00002cc0  5a 74 28 57 62 24 29 3a  ea 62 69 3a c8 99 26 38  |Zt(Wb$):.bi:..&8|
00002cd0  2c 31 37 2c 57 62 24 20  b8 5a 6b 2c 61 78 2c 61  |,17,Wb$ .Zk,ax,a|
00002ce0  79 2c 61 7a 2c 62 55 2c  62 56 3a 62 69 3d 62 55  |y,az,bU,bV:bi=bU|
00002cf0  3a 3d 62 69 0d 21 ca 58  dd f2 5a 6c 3a c8 99 26  |:=bi.!.X..Zl:..&|
00002d00  34 30 36 43 31 3a d9 23  5a 6d 3a 58 78 24 3d a4  |406C1:.#Zm:Xx$=.|
00002d10  58 79 28 56 62 2c 22 65  72 72 30 38 22 29 3a 57  |Xy(Vb,"err08"):W|
00002d20  64 3d a4 57 65 28 55 69  2c 39 39 2c 55 64 24 2c  |d=.We(Ui,99,Ud$,|
00002d30  22 65 72 72 6f 72 24 20  22 2b c3 9e 2b 22 20 22  |"error$ "+..+" "|
00002d40  2b f6 24 2c 20 ac b9 2c  b9 29 3a e1 0d 22 1a 1b  |+.$, ..,.):.."..|
00002d50  dd a4 61 55 28 58 69 29  3a 3d 28 28 58 69 2b 37  |..aU(Xi):=((Xi+7|
00002d60  29 20 81 38 29 2a 38 0d  22 42 19 dd a4 61 6c 28  |) .8)*8."B...al(|
00002d70  62 6a 29 3a 3d 28 62 6a  2b 33 29 20 80 20 ac 33  |bj):=(bj+3) . .3|
00002d80  0d 23 28 25 dd f2 56 59  3a c8 99 26 35 31 20 b8  |.#(%..VY:..&51 .|
00002d90  62 6b 3a 62 6c 3d a4 62  6d 3a 62 6e 3d 30 3a 5a  |bk:bl=.bm:bn=0:Z|
00002da0  72 3d 93 3a e1 0d 23 78  47 dd a4 5a 6a 28 62 6f  |r=.:..#xG..Zj(bo|
00002db0  29 3a ea 62 70 2c 62 71  3a ea 62 72 2c 62 73 2c  |):.bp,bq:.br,bs,|
00002dc0  62 74 3a ea 62 75 2c 5a  69 3a 62 70 3d 28 62 6f  |bt:.bu,Zi:bp=(bo|
00002dd0  20 81 62 6b 29 2b 31 3a  62 71 3d 62 70 2a 20 62  | .bk)+1:bq=bp* b|
00002de0  6b 3a e7 a4 62 76 3e 3d  62 6f 20 8c 0d 23 be 2f  |k:..bv>=bo ..#./|
00002df0  62 72 3d a4 62 6d 3a 62  73 3d 62 72 2b 62 6f 3a  |br=.bm:bs=br+bo:|
00002e00  62 74 3d a4 62 77 28 62  73 29 3a 62 6e 2b 3d 62  |bt=.bw(bs):bn+=b|
00002e10  6f 3a 62 75 3d 93 3a 5a  69 3d b9 0d 23 fa 0c cc  |o:bu=.:Zi=..#...|
00002e20  3a 5a 69 3d 20 ac b9 0d  24 0e 09 cd 3a 3d 5a 69  |:Zi= ...$...:=Zi|
00002e30  0d 24 36 28 dd a4 62 78  28 62 6f 29 3a 62 70 3d  |.$6(..bx(bo):bp=|
00002e40  28 62 6f 20 81 62 6b 29  2b 31 3a 62 71 3d 62 70  |(bo .bk)+1:bq=bp|
00002e50  2a 20 62 6b 3a 3d 62 71  0d 24 72 18 dd f2 56 70  |* bk:=bq.$r...Vp|
00002e60  3a 62 72 3d a4 62 6d 3a  e7 62 72 3e 62 6c 20 8c  |:br=.bm:.br>bl .|
00002e70  0d 24 90 13 57 64 3d a4  62 77 28 62 6c 29 3a 62  |.$..Wd=.bw(bl):b|
00002e80  6e 3d 30 0d 24 a4 07 cd  3a e1 0d 26 20 3e dd a4  |n=0.$...:..& >..|
00002e90  5a 77 28 62 79 2c 62 7a  24 29 3a c8 99 26 32 45  |Zw(by,bz$):..&2E|
00002ea0  2c 32 35 36 2b 34 30 2c  62 79 2c 62 7a 24 20 b8  |,256+40,by,bz$ .|
00002eb0  2c 2c 2c 61 7a 2c 62 55  2c 62 56 2c 63 55 3a 63  |,,,az,bU,bV,cU:c|
00002ec0  56 3d 61 7a 3a 3d 63 56  0d 26 5c 3e dd a4 61 57  |V=az:=cV.&\>..aW|
00002ed0  28 62 79 2c 62 7a 24 29  3a c8 99 26 32 45 2c 32  |(by,bz$):..&2E,2|
00002ee0  35 36 2b 34 30 2c 62 79  2c 62 7a 24 20 b8 2c 2c  |56+40,by,bz$ .,,|
00002ef0  2c 61 7a 2c 62 55 2c 62  56 2c 63 55 3a 63 57 3d  |,az,bU,bV,cU:cW=|
00002f00  62 55 3a 3d 63 57 0d 26  98 3e dd a4 61 59 28 62  |bU:=cW.&.>..aY(b|
00002f10  79 2c 62 7a 24 29 3a c8  99 26 32 45 2c 32 35 36  |y,bz$):..&2E,256|
00002f20  2b 34 30 2c 62 79 2c 62  7a 24 20 b8 2c 2c 2c 61  |+40,by,bz$ .,,,a|
00002f30  7a 2c 62 55 2c 62 56 2c  63 55 3a 63 58 3d 63 55  |z,bU,bV,cU:cX=cU|
00002f40  3a 3d 63 58 0d 26 d4 3f  dd a4 63 59 28 62 79 2c  |:=cX.&.?..cY(by,|
00002f50  62 7a 24 29 3a c8 99 26  32 45 2c 32 35 36 2b 34  |bz$):..&2E,256+4|
00002f60  30 2c 62 79 2c 62 7a 24  20 b8 2c 2c 2c 61 7a 2c  |0,by,bz$ .,,,az,|
00002f70  62 55 2c 62 56 2c 63 55  3a 63 5a 3d 2d 62 56 3a  |bU,bV,cU:cZ=-bV:|
00002f80  3d 63 58 0d 27 10 33 dd  a4 63 61 28 62 79 2c 62  |=cX.'.3..ca(by,b|
00002f90  7a 24 29 3a 63 62 3d a4  63 63 28 62 79 2c 62 7a  |z$):cb=.cc(by,bz|
00002fa0  24 29 3a 63 64 3d 63 62  21 33 32 3a e7 63 64 3d  |$):cd=cb!32:.cd=|
00002fb0  31 31 2a 34 20 8c 0d 27  38 0a 63 65 3d 20 ac b9  |11*4 ..'8.ce= ..|
00002fc0  0d 27 42 10 cc 3a 63 65  3d 63 62 2b 31 31 2a 34  |.'B..:ce=cb+11*4|
00002fd0  0d 27 56 09 cd 3a 3d 63  65 0d 27 7e 12 dd a4 62  |.'V..:=ce.'~...b|
00002fe0  63 28 62 79 29 3a 3d 62  79 21 34 0d 27 a6 4f dd  |c(by):=by!4.'.O.|
00002ff0  a4 62 64 28 62 79 2c 6e  29 3a 63 66 3d 62 79 2b  |.bd(by,n):cf=by+|
00003000  62 79 21 38 3a 63 67 3d  31 3a c8 95 63 67 3c 6e  |by!8:cg=1:..cg<n|
00003010  3a 63 68 3d 63 66 21 30  3a 63 66 2b 3d 63 68 3a  |:ch=cf!0:cf+=ch:|
00003020  63 67 2b 3d 31 3a ce 3a  3d c0 a4 58 76 28 63 66  |cg+=1:.:=..Xv(cf|
00003030  2b 34 29 2c 31 32 29 2b  bd 30 0d 28 28 46 dd a4  |+4),12)+.0.((F..|
00003040  5a 79 28 62 79 2c 62 7a  24 29 3a c8 99 26 32 45  |Zy(by,bz$):..&2E|
00003050  2c 32 35 36 2b 32 34 2c  62 79 2c 62 7a 24 20 b8  |,256+24,by,bz$ .|
00003060  2c 2c 61 79 3a 63 69 3d  61 79 3a 63 64 3d 63 69  |,,ay:ci=ay:cd=ci|
00003070  21 33 32 3a 63 6a 3d 63  69 2b 63 64 3a 3d 63 6a  |!32:cj=ci+cd:=cj|
00003080  0d 28 78 46 dd a4 63 6b  28 62 79 2c 62 7a 24 29  |.(xF..ck(by,bz$)|
00003090  3a c8 99 26 32 45 2c 32  35 36 2b 32 34 2c 62 79  |:..&2E,256+24,by|
000030a0  2c 62 7a 24 20 b8 2c 2c  61 79 3a 63 69 3d 61 79  |,bz$ .,,ay:ci=ay|
000030b0  3a 63 6c 3d 63 69 21 33  36 3a 63 6d 3d 63 69 2b  |:cl=ci!36:cm=ci+|
000030c0  63 6c 3a 3d 63 6d 0d 28  c8 34 dd a4 63 63 28 62  |cl:=cm.(.4..cc(b|
000030d0  79 2c 62 7a 24 29 3a c8  99 26 32 45 2c 32 35 36  |y,bz$):..&2E,256|
000030e0  2b 32 34 2c 62 79 2c 62  7a 24 20 b8 2c 2c 61 79  |+24,by,bz$ .,,ay|
000030f0  3a 63 6e 3d 61 79 3a 3d  63 6e 0d 29 04 26 dd f2  |:cn=ay:=cn.).&..|
00003100  63 6f 28 62 79 2c 57 62  24 29 3a c8 99 26 32 45  |co(by,Wb$):..&2E|
00003110  2c 32 35 36 2b 31 32 2c  62 79 2c 57 62 24 3a e1  |,256+12,by,Wb$:.|
00003120  0d 29 36 26 dd f2 58 59  28 62 79 2c 57 62 24 29  |.)6&..XY(by,Wb$)|
00003130  3a c8 99 26 32 45 2c 32  35 36 2b 31 30 2c 62 79  |:..&2E,256+10,by|
00003140  2c 57 62 24 3a e1 0d 29  68 30 dd f2 58 58 28 62  |,Wb$:..)h0..XX(b|
00003150  79 2c 63 70 29 3a 62 79  21 30 3d 63 70 3a 62 79  |y,cp):by!0=cp:by|
00003160  21 38 3d 31 36 3a c8 99  26 32 45 2c 32 35 36 2b  |!8=16:..&2E,256+|
00003170  39 2c 62 79 3a e1 0d 29  ae 4f dd a4 63 71 28 62  |9,by:..).O..cq(b|
00003180  79 2c 62 7a 24 2c 78 2c  79 29 3a ea 63 72 2c 63  |y,bz$,x,y):.cr,c|
00003190  73 3a c8 99 26 32 45 2c  32 35 36 2b 34 31 2c 62  |s:..&2E,256+41,b|
000031a0  79 2c 62 7a 24 2c 78 2c  79 20 b8 2c 2c 2c 2c 2c  |y,bz$,x,y .,,,,,|
000031b0  62 56 2c 63 55 3a 63 72  3d 62 56 3a 63 73 3d 63  |bV,cU:cr=bV:cs=c|
000031c0  55 3a 3d 63 72 0d 29 fe  3a dd f2 63 74 28 62 79  |U:=cr.).:..ct(by|
000031d0  2c 62 7a 24 2c 78 2c 79  2c 63 72 2c 63 73 29 3a  |,bz$,x,y,cr,cs):|
000031e0  c8 99 26 32 45 2c 32 35  36 2b 34 32 2c 62 79 2c  |..&2E,256+42,by,|
000031f0  62 7a 24 2c 78 2c 79 2c  63 72 2c 63 73 3a e1 0d  |bz$,x,y,cr,cs:..|
00003200  2c 9c 45 dd a4 56 55 28  63 75 2c 63 76 24 29 3a  |,.E..VU(cu,cv$):|
00003210  ea 5a 6b 2c 61 78 3a c8  99 26 34 30 30 43 30 2c  |.Zk,ax:..&400C0,|
00003220  63 75 2c 26 34 42 35 33  34 31 35 34 2c 63 76 24  |cu,&4B534154,cv$|
00003230  2b bd 30 20 b8 5a 6b 2c  61 78 3a 63 77 3d 61 78  |+.0 .Zk,ax:cw=ax|
00003240  3a 3d 63 77 0d 2c e2 21  dd f2 56 78 28 63 77 29  |:=cw.,.!..Vx(cw)|
00003250  3a c8 99 26 34 30 30 44  44 2c 63 77 2c 22 54 41  |:..&400DD,cw,"TA|
00003260  53 4b 22 3a e1 0d 2d 14  86 dd a4 57 65 28 56 79  |SK":..-....We(Vy|
00003270  2c 63 78 2c 58 68 24 2c  58 78 24 2c 63 79 2c 63  |,cx,Xh$,Xx$,cy,c|
00003280  7a 29 3a ea 58 6d 2c 61  78 2c 64 55 3a 24 56 79  |z):.Xm,ax,dU:$Vy|
00003290  3d 58 68 24 2b bd 30 3a  56 79 21 33 32 3d 63 78  |=Xh$+.0:Vy!32=cx|
000032a0  3a 24 28 56 79 2b 33 36  29 3d 58 78 24 2b bd 30  |:$(Vy+36)=Xx$+.0|
000032b0  3a 58 6d 3d 28 94 63 79  2a 32 5e 30 29 2b 28 94  |:Xm=(.cy*2^0)+(.|
000032c0  63 7a 2a 32 5e 31 29 3a  c8 99 26 34 30 30 44 46  |cz*2^1):..&400DF|
000032d0  2c 56 79 2b 33 32 2c 58  6d 2c 56 79 20 b8 2c 61  |,Vy+32,Xm,Vy .,a|
000032e0  78 3a 64 55 3d 61 78 3a  3d 64 55 0d 2d 8c 1f dd  |x:dU=ax:=dU.-...|
000032f0  f2 56 6e 28 57 55 2c 56  79 2c 57 59 2c 64 56 29  |.Vn(WU,Vy,WY,dV)|
00003300  3a e7 64 56 3d 20 ac b9  20 8c 0d 2d a0 25 56 79  |:.dV= .. ..-.%Vy|
00003310  21 30 3d 57 59 3a c8 99  26 34 30 30 43 42 2c 2c  |!0=WY:..&400CB,,|
00003320  56 79 3a c8 99 26 34 30  30 43 35 2c 2c 56 79 0d  |Vy:..&400C5,,Vy.|
00003330  2d be 12 cc 3a c8 99 26  34 30 30 43 35 2c 2c 57  |-...:..&400C5,,W|
00003340  55 0d 2d d2 07 cd 3a e1  0d 2d fa 26 dd f2 56 71  |U.-...:..-.&..Vq|
00003350  28 56 79 2c 57 59 29 3a  56 79 21 30 3d 57 59 3a  |(Vy,WY):Vy!0=WY:|
00003360  c8 99 26 34 30 30 43 36  2c 2c 56 79 3a e1 0d 2e  |..&400C6,,Vy:...|
00003370  36 53 dd f2 57 5a 28 56  79 2c 57 59 29 3a ea 58  |6S..WZ(Vy,WY):.X|
00003380  69 2c 58 6a 2c 64 57 2c  64 58 2c 64 59 2c 64 5a  |i,Xj,dW,dX,dY,dZ|
00003390  3a 56 79 21 30 3d 57 59  3a c8 99 26 34 30 30 43  |:Vy!0=WY:..&400C|
000033a0  43 2c 2c 56 79 3a 58 69  3d 94 56 79 21 35 32 3a  |C,,Vy:Xi=.Vy!52:|
000033b0  e7 58 69 3e 31 30 30 30  20 8c 58 69 3d 31 30 30  |.Xi>1000 .Xi=100|
000033c0  30 0d 2e 68 1d 58 6a 3d  94 56 79 21 34 38 3a e7  |0..h.Xj=.Vy!48:.|
000033d0  58 6a 3e 35 31 32 20 8c  58 6a 3d 35 31 32 0d 2e  |Xj>512 .Xj=512..|
000033e0  72 f0 56 79 21 30 3d 34  3a 56 79 21 34 3d 35 3a  |r.Vy!0=4:Vy!4=5:|
000033f0  56 79 21 38 3d 31 31 3a  56 79 21 31 32 3d 31 32  |Vy!8=11:Vy!12=12|
00003400  3a 56 79 21 31 36 3d 2d  31 3a c8 99 26 33 31 2c  |:Vy!16=-1:..&31,|
00003410  56 79 2c 56 79 2b 33 32  3a 64 57 3d 56 79 21 33  |Vy,Vy+32:dW=Vy!3|
00003420  32 3a 64 58 3d 56 79 21  33 36 3a 64 59 3d 56 79  |2:dX=Vy!36:dY=Vy|
00003430  21 34 30 3a 64 5a 3d 56  79 21 34 34 3a 78 3d 64  |!40:dZ=Vy!44:x=d|
00003440  59 2a 20 32 5e 64 57 20  3a 79 3d 64 5a 2a 20 32  |Y* 2^dW :y=dZ* 2|
00003450  5e 64 58 3a 78 3d 28 78  2d 58 69 29 20 81 32 3a  |^dX:x=(x-Xi) .2:|
00003460  79 3d 28 79 2d 58 6a 29  20 81 32 3a 56 79 21 28  |y=(y-Xj) .2:Vy!(|
00003470  30 29 3d 57 59 3a 56 79  21 28 34 2b 30 29 3d 78  |0)=WY:Vy!(4+0)=x|
00003480  3a 56 79 21 28 34 2b 34  29 3d 79 3a 56 79 21 28  |:Vy!(4+4)=y:Vy!(|
00003490  34 2b 38 29 3d 56 79 21  28 34 2b 30 29 2b 58 69  |4+8)=Vy!(4+0)+Xi|
000034a0  3a 56 79 21 28 34 2b 31  32 29 3d 56 79 21 28 34  |:Vy!(4+12)=Vy!(4|
000034b0  2b 34 29 2b 58 6a 3a 56  79 21 32 38 3d 2d 31 3a  |+4)+Xj:Vy!28=-1:|
000034c0  c8 99 26 34 30 30 43 35  2c 2c 56 79 3a e1 0d 2f  |..&400C5,,Vy:../|
000034d0  12 4d dd f2 59 68 28 56  79 2c 57 59 2c 64 61 2c  |.M..Yh(Vy,WY,da,|
000034e0  64 62 2c 64 63 2c 64 64  29 3a 56 79 21 30 3d 64  |db,dc,dd):Vy!0=d|
000034f0  61 3a 56 79 21 34 3d 64  63 3a 56 79 21 38 3d 64  |a:Vy!4=dc:Vy!8=d|
00003500  62 3a 56 79 21 31 32 3d  64 64 3a c8 99 26 34 30  |b:Vy!12=dd:..&40|
00003510  30 44 37 2c 57 59 2c 56  79 3a e1 0d 2f 6c 4b dd  |0D7,WY,Vy:../lK.|
00003520  a4 58 7a 28 56 79 2c 57  59 29 3a ea 64 65 2c 64  |.Xz(Vy,WY):.de,d|
00003530  66 3a 56 79 21 30 3d 57  59 3a c8 99 26 34 30 30  |f:Vy!0=WY:..&400|
00003540  43 42 2c 2c 56 79 3a 64  65 3d 56 79 21 33 32 3a  |CB,,Vy:de=Vy!32:|
00003550  64 66 3d 28 64 65 20 80  32 5e 31 36 29 3d 32 5e  |df=(de .2^16)=2^|
00003560  31 36 3a 3d 64 66 0d 2f  c6 a4 dd f2 59 69 28 56  |16:=df./....Yi(V|
00003570  79 2c 57 59 29 3a ea 58  69 2c 58 6a 2c 64 67 2c  |y,WY):.Xi,Xj,dg,|
00003580  64 68 3a ea 64 69 2c 64  6a 2c 64 6b 2c 64 6c 3a  |dh:.di,dj,dk,dl:|
00003590  56 79 21 30 3d 57 59 3a  c8 99 26 34 30 30 43 43  |Vy!0=WY:..&400CC|
000035a0  2c 2c 56 79 3a 58 69 3d  56 79 21 31 32 2d 55 69  |,,Vy:Xi=Vy!12-Ui|
000035b0  21 34 3a 58 6a 3d 56 79  21 31 36 2d 56 79 21 38  |!4:Xj=Vy!16-Vy!8|
000035c0  3a 64 67 3d 56 79 21 32  30 3a 64 68 3d 56 79 21  |:dg=Vy!20:dh=Vy!|
000035d0  32 34 3a 64 69 3d 64 67  3a 64 6c 3d 64 68 3a 64  |24:di=dg:dl=dh:d|
000035e0  6b 3d 64 6c 2d 58 6a 3a  64 6a 3d 64 69 2b 58 69  |k=dl-Xj:dj=di+Xi|
000035f0  3a c8 99 26 34 30 30 44  31 2c 57 59 2c 64 69 2c  |:..&400D1,WY,di,|
00003600  64 6b 2c 64 6a 2c 64 6c  3a e1 0d 30 48 40 dd f2  |dk,dj,dl:..0H@..|
00003610  64 6d 28 56 79 2c 57 59  2c 56 7a 29 3a 56 79 21  |dm(Vy,WY,Vz):Vy!|
00003620  30 3d 57 59 3a 56 79 21  34 3d 56 7a 3a 56 79 21  |0=WY:Vy!4=Vz:Vy!|
00003630  38 3d 30 3a 56 79 21 31  32 3d 30 3a c8 99 26 34  |8=0:Vy!12=0:..&4|
00003640  30 30 43 44 2c 2c 56 79  3a e1 0d 30 a2 2d dd f2  |00CD,,Vy:..0.-..|
00003650  5a 65 28 57 59 2c 56 7a  2c 64 6e 29 3a c8 99 26  |Ze(WY,Vz,dn):..&|
00003660  34 30 30 44 32 2c 57 59  2c 56 7a 2c 30 2c 30 2c  |400D2,WY,Vz,0,0,|
00003670  2d 31 2c 64 6e 3a e1 0d  30 d4 25 dd f2 64 6f 3a  |-1,dn:..0.%..do:|
00003680  c8 99 26 34 30 30 44 32  2c 2d 31 2c 2d 31 2c 2d  |..&400D2,-1,-1,-|
00003690  31 2c 2d 31 2c 2d 31 2c  2d 31 3a e1 0d 31 06 5e  |1,-1,-1,-1:..1.^|
000036a0  dd a4 57 63 28 56 79 2c  57 59 2c 56 7a 29 3a ea  |..Wc(Vy,WY,Vz):.|
000036b0  58 6d 2c 64 70 2c 59 65  24 3a 56 79 21 30 3d 57  |Xm,dp,Ye$:Vy!0=W|
000036c0  59 3a 56 79 21 34 3d 56  7a 3a c8 99 26 34 30 30  |Y:Vy!4=Vz:..&400|
000036d0  43 45 2c 2c 56 79 3a 58  6d 3d 56 79 21 28 38 2b  |CE,,Vy:Xm=Vy!(8+|
000036e0  31 36 29 3a 64 70 3d 28  58 6d 20 80 32 5e 38 29  |16):dp=(Xm .2^8)|
000036f0  3d 32 5e 38 3a e7 64 70  20 8c 0d 31 56 16 59 65  |=2^8:.dp ..1V.Ye|
00003700  24 3d a4 58 76 28 56 79  21 28 38 2b 32 30 29 29  |$=.Xv(Vy!(8+20))|
00003710  0d 31 60 16 cc 3a 59 65  24 3d a4 58 76 28 56 79  |.1`..:Ye$=.Xv(Vy|
00003720  2b 38 2b 32 30 29 0d 31  74 0a cd 3a 3d 59 65 24  |+8+20).1t..:=Ye$|
00003730  0d 31 9c 5e dd f2 59 67  28 56 79 2c 57 59 2c 56  |.1.^..Yg(Vy,WY,V|
00003740  7a 2c 64 71 24 29 3a ea  58 6d 2c 64 70 3a 56 79  |z,dq$):.Xm,dp:Vy|
00003750  21 30 3d 57 59 3a 56 79  21 34 3d 56 7a 3a c8 99  |!0=WY:Vy!4=Vz:..|
00003760  26 34 30 30 43 45 2c 2c  56 79 3a 58 6d 3d 56 79  |&400CE,,Vy:Xm=Vy|
00003770  21 28 38 2b 31 36 29 3a  64 70 3d 28 58 6d 20 80  |!(8+16):dp=(Xm .|
00003780  32 5e 38 29 3d 32 5e 38  3a e7 64 70 20 8c 0d 31  |2^8)=2^8:.dp ..1|
00003790  ec 14 24 28 56 79 21 28  38 2b 32 30 29 29 3d 64  |..$(Vy!(8+20))=d|
000037a0  71 24 0d 31 f6 14 cc 3a  24 28 56 79 2b 38 2b 32  |q$.1...:$(Vy+8+2|
000037b0  30 29 3d 64 71 24 0d 32  0a 33 cd 3a 56 79 21 30  |0)=dq$.2.3.:Vy!0|
000037c0  3d 57 59 3a 56 79 21 34  3d 56 7a 3a 56 79 21 38  |=WY:Vy!4=Vz:Vy!8|
000037d0  3d 30 3a 56 79 21 31 32  3d 30 3a c8 99 26 34 30  |=0:Vy!12=0:..&40|
000037e0  30 43 44 2c 2c 56 79 3a  e1 0d 32 64 1a dd f2 57  |0CD,,Vy:..2d...W|
000037f0  76 28 64 72 29 3a c8 99  26 34 30 30 44 43 2c 64  |v(dr):..&400DC,d|
00003800  72 3a e1 0d 32 96 38 dd  a4 58 76 28 58 6e 29 3a  |r:..2.8..Xv(Xn):|
00003810  ea 64 73 24 3a 64 73 24  3d 22 22 3a c8 95 3f 58  |.ds$:ds$="":..?X|
00003820  6e 3e 33 31 3a 64 73 24  2b 3d bd 3f 58 6e 3a 58  |n>31:ds$+=.?Xn:X|
00003830  6e 2b 3d 31 3a ce 3a 3d  64 73 24 0d 32 fa 2a dd  |n+=1:.:=ds$.2.*.|
00003840  f2 58 61 28 56 79 2c 57  62 24 29 3a 24 56 79 3d  |.Xa(Vy,Wb$):$Vy=|
00003850  57 62 24 2b bd 30 3a c8  99 26 34 30 30 44 39 2c  |Wb$+.0:..&400D9,|
00003860  2c 56 79 3a e1 0d 33 36  94 dd a4 58 62 28 64 74  |,Vy:..36...Xb(dt|
00003870  2c 64 75 2c 64 76 2c 64  77 24 2c 64 78 29 3a ea  |,du,dv,dw$,dx):.|
00003880  61 79 2c 64 79 2c 64 7a  2c 65 55 2c 65 56 3a c8  |ay,dy,dz,eU,eV:.|
00003890  99 26 34 30 30 44 42 2c  2c 64 74 2c 64 75 2c 64  |.&400DB,,dt,du,d|
000038a0  76 2c 2d 31 2c 64 77 24  2c 30 20 b8 2c 2c 61 79  |v,-1,dw$,0 .,,ay|
000038b0  3a 64 79 3d 64 74 21 38  34 3a 64 7a 3d 61 79 3a  |:dy=dt!84:dz=ay:|
000038c0  65 55 3d 30 3a c8 95 65  55 3c 64 79 3a 65 56 3d  |eU=0:..eU<dy:eV=|
000038d0  64 74 2b 38 38 2b 65 55  2a 33 32 3a e7 28 65 56  |dt+88+eU*32:.(eV|
000038e0  21 31 36 20 80 26 31 30  33 29 3d 26 31 30 32 20  |!16 .&103)=&102 |
000038f0  8c 65 56 21 32 34 3d 64  78 0d 33 a4 0f 65 55 2b  |.eV!24=dx.3..eU+|
00003900  3d 31 3a ce 3a 3d 64 7a  0d 33 d6 25 dd a4 58 64  |=1:.:=dz.3.%..Xd|
00003910  28 64 74 29 3a ea 57 59  3a c8 99 26 34 30 30 43  |(dt):.WY:..&400C|
00003920  31 2c 2c 64 74 20 b8 57  59 3a 3d 57 59 0d 34 12  |1,,dt .WY:=WY.4.|
00003930  13 dd f2 58 65 3a c8 99  26 34 30 30 44 41 3a e1  |...Xe:..&400DA:.|
00003940  0d 34 44 30 dd a4 56 6b  28 57 55 2c 65 57 29 3a  |.4D0..Vk(WU,eW):|
00003950  ea 5a 6b 3a c8 99 26 34  30 30 43 37 2c 65 57 2c  |.Zk:..&400C7,eW,|
00003960  57 55 20 b8 5a 6b 3a 65  58 3d 5a 6b 3a 3d 65 58  |WU .Zk:eX=Zk:=eX|
00003970  0d 34 8a 3c dd a4 62 77  28 65 59 29 3a ea 5a 6b  |.4.<..bw(eY):.Zk|
00003980  2c 61 78 2c 61 79 2c 65  5a 3a c8 99 26 34 30 30  |,ax,ay,eZ:..&400|
00003990  45 43 2c 65 59 2c 2d 31  20 b8 5a 6b 2c 61 78 2c  |EC,eY,-1 .Zk,ax,|
000039a0  61 79 3a 65 5a 3d 5a 6b  3a 3d 65 5a 0d 34 d0 38  |ay:eZ=Zk:=eZ.4.8|
000039b0  dd a4 62 6d 3a ea 5a 6b  2c 61 78 2c 61 79 2c 65  |..bm:.Zk,ax,ay,e|
000039c0  5a 3a c8 99 26 34 30 30  45 43 2c 2d 31 2c 2d 31  |Z:..&400EC,-1,-1|
000039d0  20 b8 5a 6b 2c 61 78 2c  61 79 3a 65 5a 3d 5a 6b  | .Zk,ax,ay:eZ=Zk|
000039e0  3a 3d 65 5a 0d 35 16 38  dd a4 62 76 3a ea 5a 6b  |:=eZ.5.8..bv:.Zk|
000039f0  2c 61 78 2c 61 79 2c 65  61 3a c8 99 26 34 30 30  |,ax,ay,ea:..&400|
00003a00  45 43 2c 2d 31 2c 2d 31  20 b8 5a 6b 2c 61 78 2c  |EC,-1,-1 .Zk,ax,|
00003a10  61 79 3a 65 61 3d 61 79  3a 3d 65 61 0d 35 5c 8e  |ay:ea=ay:=ea.5\.|
00003a20  dd f2 65 62 28 56 79 29  3a ea 64 57 2c 64 58 2c  |..eb(Vy):.dW,dX,|
00003a30  64 59 2c 64 5a 3a 56 79  21 30 3d 34 3a 56 79 21  |dY,dZ:Vy!0=4:Vy!|
00003a40  34 3d 35 3a 56 79 21 38  3d 31 31 3a 56 79 21 31  |4=5:Vy!8=11:Vy!1|
00003a50  32 3d 31 32 3a 56 79 21  31 36 3d 2d 31 3a c8 99  |2=12:Vy!16=-1:..|
00003a60  26 33 31 2c 56 79 2c 56  79 2b 33 32 3a 64 57 3d  |&31,Vy,Vy+32:dW=|
00003a70  56 79 21 33 32 3a 64 58  3d 56 79 21 33 36 3a 64  |Vy!32:dX=Vy!36:d|
00003a80  59 3d 56 79 21 34 30 3a  64 5a 3d 56 79 21 34 34  |Y=Vy!40:dZ=Vy!44|
00003a90  3a c8 97 c8 93 30 2c 30  2c 64 59 2a 32 5e 64 57  |:....0,0,dY*2^dW|
00003aa0  2c 64 5a 2a 32 5e 64 58  3a e1 0d 35 ca f4 dd f2  |,dZ*2^dX:..5....|
00003ab0  65 63 28 56 79 2c 57 59  29 3a ea 58 69 2c 58 6a  |ec(Vy,WY):.Xi,Xj|
00003ac0  2c 64 57 2c 64 58 2c 64  59 2c 64 5a 3a 21 56 79  |,dW,dX,dY,dZ:!Vy|
00003ad0  3d 57 59 3a c8 99 26 34  30 30 43 43 2c 2c 56 79  |=WY:..&400CC,,Vy|
00003ae0  3a 58 69 3d 94 56 79 21  35 32 3a 58 6a 3d 94 56  |:Xi=.Vy!52:Xj=.V|
00003af0  79 21 34 38 3a 56 79 21  30 3d 34 3a 56 79 21 34  |y!48:Vy!0=4:Vy!4|
00003b00  3d 35 3a 56 79 21 38 3d  31 31 3a 56 79 21 31 32  |=5:Vy!8=11:Vy!12|
00003b10  3d 31 32 3a 56 79 21 31  36 3d 2d 31 3a c8 99 26  |=12:Vy!16=-1:..&|
00003b20  33 31 2c 56 79 2c 56 79  2b 33 32 3a 64 57 3d 56  |31,Vy,Vy+32:dW=V|
00003b30  79 21 33 32 3a 64 58 3d  56 79 21 33 36 3a 64 59  |y!32:dX=Vy!36:dY|
00003b40  3d 56 79 21 34 30 3a 64  5a 3d 56 79 21 34 34 3a  |=Vy!40:dZ=Vy!44:|
00003b50  78 3d 64 59 2a 20 32 5e  64 57 20 3a 79 3d 64 5a  |x=dY* 2^dW :y=dZ|
00003b60  2a 20 32 5e 64 58 3a 78  3d 28 78 2d 58 69 29 2f  |* 2^dX:x=(x-Xi)/|
00003b70  32 3a 79 3d 28 79 2d 58  6a 29 2f 32 3a 56 79 21  |2:y=(y-Xj)/2:Vy!|
00003b80  30 3d 57 59 3a 56 79 21  28 30 2b 34 2b 30 29 3d  |0=WY:Vy!(0+4+0)=|
00003b90  78 3a 56 79 21 28 30 2b  34 2b 34 29 3d 79 0d 36  |x:Vy!(0+4+4)=y.6|
00003ba0  60 7e 56 79 21 28 30 2b  34 2b 38 29 3d 56 79 21  |`~Vy!(0+4+8)=Vy!|
00003bb0  28 30 2b 34 2b 30 29 2b  58 69 3a 56 79 21 28 30  |(0+4+0)+Xi:Vy!(0|
00003bc0  2b 34 2b 31 32 29 3d 56  79 21 28 30 2b 34 2b 34  |+4+12)=Vy!(0+4+4|
00003bd0  29 2b 58 6a 3a c8 99 26  34 30 30 43 35 2c 2c 56  |)+Xj:..&400C5,,V|
00003be0  79 3a 78 3d 28 28 64 59  2a 32 5e 64 57 29 2d 58  |y:x=((dY*2^dW)-X|
00003bf0  69 20 29 20 2f 20 32 3a  79 3d 28 28 64 5a 2a 32  |i ) / 2:y=((dZ*2|
00003c00  5e 64 58 29 2d 58 6a 29  20 2f 20 32 3a c8 97 c8  |^dX)-Xj) / 2:...|
00003c10  93 78 2c 79 2c 58 69 2c  58 6a 3a e1 0d 36 ba d4  |.x,y,Xi,Xj:..6..|
00003c20  dd f2 65 64 28 56 79 2c  57 59 2c 56 7a 2c 65 65  |..ed(Vy,WY,Vz,ee|
00003c30  2c 65 66 29 3a 21 56 79  3d 57 59 3a c8 99 26 34  |,ef):!Vy=WY:..&4|
00003c40  30 30 43 43 2c 2c 56 79  3a 65 67 3d 56 79 21 34  |00CC,,Vy:eg=Vy!4|
00003c50  3a 65 68 3d 56 79 21 38  3a 65 69 3d 56 79 21 31  |:eh=Vy!8:ei=Vy!1|
00003c60  32 3a 65 6a 3d 56 79 21  31 36 3a 56 79 21 30 3d  |2:ej=Vy!16:Vy!0=|
00003c70  57 59 3a 56 79 21 34 3d  56 7a 3a c8 99 26 34 30  |WY:Vy!4=Vz:..&40|
00003c80  30 43 45 2c 2c 56 79 3a  65 6b 3d 56 79 21 38 3a  |0CE,,Vy:ek=Vy!8:|
00003c90  65 6c 3d 56 79 21 31 32  3a 65 6d 3d 56 79 21 31  |el=Vy!12:em=Vy!1|
00003ca0  36 3a 65 6e 3d 56 79 21  32 30 3a 65 6f 3d 65 6d  |6:en=Vy!20:eo=em|
00003cb0  2d 65 6b 3a 65 70 3d 65  6e 2d 65 6c 3a 57 78 3d  |-ek:ep=en-el:Wx=|
00003cc0  65 67 2b 65 6b 3a 57 7a  3d 65 6a 2b 65 6c 3a c8  |eg+ek:Wz=ej+el:.|
00003cd0  97 c8 93 57 78 2b 65 65  2c 57 7a 2b 65 66 2c 65  |...Wx+ee,Wz+ef,e|
00003ce0  6f 2d 65 65 2a 32 2c 65  70 2d 65 66 2a 32 3a e1  |o-ee*2,ep-ef*2:.|
00003cf0  0d 37 5a 6f dd f2 65 71  28 56 79 2c 57 59 2c 57  |.7Zo..eq(Vy,WY,W|
00003d00  56 2c 57 57 29 3a 21 56  79 3d 57 59 3a c8 99 26  |V,WW):!Vy=WY:..&|
00003d10  34 30 30 43 43 2c 2c 56  79 3a 65 72 3d 56 79 21  |400CC,,Vy:er=Vy!|
00003d20  34 2d 56 79 21 32 30 3a  65 73 3d 56 79 21 31 36  |4-Vy!20:es=Vy!16|
00003d30  2d 56 79 21 32 34 3a 65  72 3d 57 56 2d 65 72 3a  |-Vy!24:er=WV-er:|
00003d40  65 73 3d 31 30 32 34 2d  28 65 73 2d 57 57 29 3a  |es=1024-(es-WW):|
00003d50  65 74 25 3d 65 72 3a 65  75 25 3d 65 73 3a e1 0d  |et%=er:eu%=es:..|
00003d60  37 e6 cc dd f2 65 76 28  56 79 2c 57 59 2c 65 77  |7....ev(Vy,WY,ew|
00003d70  29 3a 56 79 21 30 3d 57  59 3a c8 99 26 34 30 30  |):Vy!0=WY:..&400|
00003d80  43 43 2c 2c 56 79 3a 65  78 3d 56 79 21 34 3a 65  |CC,,Vy:ex=Vy!4:e|
00003d90  79 3d 56 79 21 31 32 3a  65 7a 3d 56 79 21 38 3a  |y=Vy!12:ez=Vy!8:|
00003da0  66 55 3d 56 79 21 31 36  3a 66 56 3d 56 79 21 32  |fU=Vy!16:fV=Vy!2|
00003db0  38 3a 56 79 21 30 3d 65  77 3a c8 99 26 34 30 30  |8:Vy!0=ew:..&400|
00003dc0  43 43 2c 2c 56 79 3a 57  78 3d 65 78 2d 28 56 79  |CC,,Vy:Wx=ex-(Vy|
00003dd0  21 31 32 2d 56 79 21 34  29 2d 31 3a 58 6a 3d 56  |!12-Vy!4)-1:Xj=V|
00003de0  79 21 38 2d 56 79 21 31  36 3a 56 79 21 34 3d 57  |y!8-Vy!16:Vy!4=W|
00003df0  78 3a 56 79 21 31 32 3d  65 79 3a 56 79 21 38 3d  |x:Vy!12=ey:Vy!8=|
00003e00  58 6a 3a 56 79 21 31 36  3d 66 55 3a 56 79 21 32  |Xj:Vy!16=fU:Vy!2|
00003e10  30 3d 30 3a 56 79 21 32  38 3d 66 56 3a c8 99 26  |0=0:Vy!28=fV:..&|
00003e20  34 30 30 43 35 2c 2c 56  79 3a e1 0d 38 86 1c dd  |400C5,,Vy:..8...|
00003e30  a4 61 6c 28 62 6a 29 3a  3d 28 28 62 6a 2b 33 29  |.al(bj):=((bj+3)|
00003e40  20 80 28 ac 33 29 29 0d  38 ae 4c dd a4 56 63 3a  | .(.3)).8.L..Vc:|
00003e50  c8 99 26 31 45 2c 36 2c  2c 2c 31 36 20 b8 2c 2c  |..&1E,6,,,16 .,,|
00003e60  61 79 3a 56 62 3d 61 79  3a c8 99 26 34 31 35 30  |ay:Vb=ay:..&4150|
00003e70  31 2c 56 62 2c 22 3c 22  2b 55 64 24 2b 22 24 44  |1,Vb,"<"+Ud$+"$D|
00003e80  69 72 3e 2e 4d 65 73 73  61 67 65 73 22 2c 30 3a  |ir>.Messages",0:|
00003e90  3d 56 62 0d 38 f4 26 dd  f2 56 77 28 66 57 29 3a  |=Vb.8.&..Vw(fW):|
00003ea0  c8 99 26 34 31 35 30 34  2c 66 57 3a c8 99 26 31  |..&41504,fW:..&1|
00003eb0  45 2c 37 2c 2c 66 57 3a  e1 0d 39 30 49 dd a4 58  |E,7,,fW:..90I..X|
00003ec0  79 28 66 57 2c 59 59 24  29 3a c8 99 26 34 31 35  |y(fW,YY$):..&415|
00003ed0  30 32 2c 66 57 2c 59 59  24 2c 30 2c 30 2c 30 2c  |02,fW,YY$,0,0,0,|
00003ee0  30 2c 30 2c 30 20 b8 2c  2c 61 79 3a 66 58 3d 61  |0,0,0 .,,ay:fX=a|
00003ef0  79 3a 66 59 24 3d a4 58  76 28 66 58 29 3a 3d 66  |y:fY$=.Xv(fX):=f|
00003f00  59 24 0d 39 76 5a dd f2  57 6e 28 66 5a 2c 66 61  |Y$.9vZ..Wn(fZ,fa|
00003f10  2c 66 62 29 3a 66 63 3d  66 5a 3a 66 64 3d 66 61  |,fb):fc=fZ:fd=fa|
00003f20  3a 66 65 3d 66 62 3a 56  65 3d 34 3a f2 65 64 28  |:fe=fb:Ve=4:.ed(|
00003f30  55 69 2c 66 63 2c 66 65  2c 31 36 2c 30 29 3a c8  |Ui,fc,fe,16,0):.|
00003f40  99 26 31 43 20 b8 66 66  2c 66 67 2c 66 68 3a 66  |.&1C .ff,fg,fh:f|
00003f50  69 3d 66 66 2d 31 3a f2  56 6c 3a e1 0d 39 f8 0f  |i=ff-1:.Vl:..9..|
00003f60  dd f2 56 6c 3a c8 8e 66  63 20 ca 0d 3a 16 0e c9  |..Vl:..fc ..:...|
00003f70  57 67 3a c8 8e 66 65 20  ca 0d 3a 20 27 c9 32 3a  |Wg:..fe ..: '.2:|
00003f80  56 66 3d a4 66 6a 28 56  66 2c 32 29 3a f2 56 68  |Vf=.fj(Vf,2):.Vh|
00003f90  28 a8 28 36 34 2a 28 66  6b 2f 31 30 30 29 29 29  |(.(64*(fk/100)))|
00003fa0  0d 3a 34 05 cb 0d 3a 3e  07 cb 3a e1 0d 3a 66 27  |.:4...:>..:..:f'|
00003fb0  dd a4 66 6a 28 66 61 2c  66 62 29 3a c8 99 26 31  |..fj(fa,fb):..&1|
00003fc0  43 20 b8 66 66 2c 66 67  2c 66 68 3a e7 66 68 3d  |C .ff,fg,fh:.fh=|
00003fd0  30 20 8c 0d 3a b6 10 56  65 3d 30 3a f2 65 62 28  |0 ..:..Ve=0:.eb(|
00003fe0  55 69 29 0d 3a d4 0f cc  3a e7 66 66 3c 3e 66 69  |Ui).:...:.ff<>fi|
00003ff0  20 8c 0d 3b 06 f8 21 55  69 3d 66 63 3a c8 99 26  | ..;..!Ui=fc:..&|
00004000  34 30 30 43 43 2c 2c 55  69 3a 65 67 3d 55 69 21  |400CC,,Ui:eg=Ui!|
00004010  34 3a 66 6c 3d 66 66 2d  65 67 3a 55 69 21 30 3d  |4:fl=ff-eg:Ui!0=|
00004020  66 63 3a 55 69 21 34 3d  66 61 3a c8 99 26 34 30  |fc:Ui!4=fa:..&40|
00004030  30 43 45 2c 2c 55 69 3a  65 6b 3d 55 69 21 28 38  |0CE,,Ui:ek=Ui!(8|
00004040  2b 30 29 3a 65 6c 3d 55  69 21 28 38 2b 34 29 3a  |+0):el=Ui!(8+4):|
00004050  65 6d 3d 55 69 21 28 38  2b 38 29 3a 65 6e 3d 55  |em=Ui!(8+8):en=U|
00004060  69 21 28 38 2b 31 32 29  3a 55 69 21 28 31 30 30  |i!(8+12):Ui!(100|
00004070  2b 30 29 3d 66 63 3a 55  69 21 28 31 30 30 2b 34  |+0)=fc:Ui!(100+4|
00004080  29 3d 66 61 3a c8 99 26  34 30 30 43 34 2c 2c 55  |)=fa:..&400C4,,U|
00004090  69 2b 31 30 30 3a c8 99  26 34 30 30 44 31 2c 66  |i+100:..&400D1,f|
000040a0  63 2c 65 6b 2c 65 6c 2c  65 6d 2c 65 6e 3a 55 69  |c,ek,el,em,en:Ui|
000040b0  21 28 38 2b 38 29 3d 66  6c 3a 55 69 21 34 3d 66  |!(8+8)=fl:Ui!4=f|
000040c0  63 3a c8 99 26 34 30 30  43 32 2c 2c 55 69 2b 34  |c:..&400C2,,Ui+4|
000040d0  20 b8 66 61 3a f2 64 6d  28 55 69 2c 66 63 2c 66  | .fa:.dm(Ui,fc,f|
000040e0  61 29 3a 55 69 21 30 3d  66 63 0d 3c 14 3f 55 69  |a):Ui!0=fc.<.?Ui|
000040f0  21 34 3d 66 65 3a c8 99  26 34 30 30 43 45 2c 2c  |!4=fe:..&400CE,,|
00004100  55 69 3a 66 6d 3d 55 69  21 28 38 2b 38 29 2d 31  |Ui:fm=Ui!(8+8)-1|
00004110  36 3a 66 69 3d 66 66 3a  66 6b 3d a8 28 28 66 6c  |6:fi=ff:fk=.((fl|
00004120  2f 66 6d 29 2a 31 30 30  29 0d 3c 5a 05 cd 0d 3c  |/fm)*100).<Z...<|
00004130  6e 09 cd 3a 3d 66 61 0d  3c a0 52 dd f2 66 6e 28  |n..:=fa.<.R..fn(|
00004140  56 79 2c 57 59 2c 66 6f  24 29 3a ea 58 6d 2c 64  |Vy,WY,fo$):.Xm,d|
00004150  70 3a 21 56 79 3d 57 59  3a c8 99 26 34 30 30 43  |p:!Vy=WY:..&400C|
00004160  43 2c 2c 56 79 3a 58 6d  3d 56 79 21 28 34 2b 35  |C,,Vy:Xm=Vy!(4+5|
00004170  36 29 3a 64 70 3d 28 58  6d 20 80 32 5e 38 29 3d  |6):dp=(Xm .2^8)=|
00004180  32 5e 38 3a e7 64 70 20  8c 0d 3c e6 24 66 70 3d  |2^8:.dp ..<.$fp=|
00004190  21 28 56 79 2b 34 2b 37  32 29 3a 24 21 28 56 79  |!(Vy+4+72):$!(Vy|
000041a0  2b 34 2b 37 32 29 3d 66  6f 24 2b bd 30 0d 3c fa  |+4+72)=fo$+.0.<.|
000041b0  17 cc 3a 24 28 56 79 2b  34 2b 37 32 29 3d 64 71  |..:$(Vy+4+72)=dq|
000041c0  24 2b bd 30 0d 3d 0e 07  cd 3a e1 0d 3d 36 4f dd  |$+.0.=...:..=6O.|
000041d0  f2 66 71 28 56 79 2c 57  59 2c 56 7a 2c 66 72 29  |.fq(Vy,WY,Vz,fr)|
000041e0  3a 56 79 21 30 3d 57 59  3a 56 79 21 34 3d 56 7a  |:Vy!0=WY:Vy!4=Vz|
000041f0  3a 56 79 21 38 3d 28 94  66 72 29 3c 3c 32 31 3a  |:Vy!8=(.fr)<<21:|
00004200  56 79 21 31 32 3d 31 3c  3c 32 31 3a c8 99 26 34  |Vy!12=1<<21:..&4|
00004210  30 30 43 44 2c 2c 56 79  3a e1 0d 3d 90 4f dd f2  |00CD,,Vy:..=.O..|
00004220  5a 67 28 56 79 2c 57 59  2c 56 7a 2c 66 73 29 3a  |Zg(Vy,WY,Vz,fs):|
00004230  56 79 21 30 3d 57 59 3a  56 79 21 34 3d 56 7a 3a  |Vy!0=WY:Vy!4=Vz:|
00004240  56 79 21 38 3d 28 94 66  73 29 3c 3c 32 32 3a 56  |Vy!8=(.fs)<<22:V|
00004250  79 21 31 32 3d 31 3c 3c  32 32 3a c8 99 26 34 30  |y!12=1<<22:..&40|
00004260  30 43 44 2c 2c 56 79 3a  e1 0d ff                 |0CD,,Vy:...|
0000426b