P-���:�"Fatal Error : ";�$;" at Line ";�:�
Z
�UV:��UW
x	�UX:�
����UV:UY=4:UZ=2:Ua=1:Ub=-2:Uc$="Morph":Ud$="Morph":Ue=&FF9:Uf=&3E1:Ug=6*1024 :�Uh Ug:Ui=6*1024 :�Uj Ui:Uk=6*1024 :�Ul Uk:Um=6*1024 :�Un Um:Uo=24*1024 :�Up Uo:Uq=6*1024 :�Ur Uq:�Us 1024*2:�Ut 1024:�Uu 1024:�Uv 1024:�Uw 1024:�Ux 10:�Uy(Ux):�Uz 10:�Uy(Uz)

��VU=0:VV= ��:VW=0:�VX 32:VY=�ction_InitialiseTask(2*100,Ud$):VZ=0:Va=0:�Vb:�Vc:�Vd:�Ve:�Vf(0):�Vg(0):�Vf(2):�Vg(2):Vh=�ction_IconbarSprite(Uj):Vi=�ction_InstallHelp:Vj= ��:Vk=0:Vl=0:Vm= ��:Vn= ��:Vo=0:Vp=0:Vq= ��:Vr= ��:Vs=0:Vt=0:Vu= ��:Vv%=0:Vw%=0
X�Vx%=0:Vy%=0:Vz%=0:WU%=0:WV=0:WW=15:WX= ��:WY= ��:WZ=1:Wa=-1:Wb$="Morph-Data":Wc$="Frames":Wd=0:�We:�Wf(1):�Wg(1):�Wh("SOURCE",1,1):�Wh("DEST",1,1):�Wi(Uj,Wj,1,�ction_TagToString("srce")+�ction_TagToString("none"))
*n�Wi(Uj,Wj,3,�ction_TagToString("dest")+�ction_TagToString("none")):�Wk(Uj,Wj,1,3):�Wk(Uj,Wj,3,3):�Wl:�Wm:�
�/��UX:�Wn:�:Wo=�ction_PollWimp(Uh,VU):ȎWo �
��0:�Va=1 ��Wp
��Va=2 �Va=3 ��Wq
�
�WY �Wr �
��Ws:�Wt
�	�:�Wu
�1:�Wv(Uh)
�2:�Ww(Uh,Uj,-1,�):Ȏ!Uh �
$�Wx:�Wy(Uj,Wx,Wz)
.�
8�3:�XU(Uj,Uh!0)
B�6:�XV(Uh)
L�7:�XW(Uh)
V�8:�XX(Uh)
`�9:�XY(Uh)
j�17:�XZ(Uh)
t�18:�XZ(Uh)
~�:�VV:�Xa(Vi):�Xb(VY):�
�ݤction_IconbarSprite(Xc):Xc!0=-1:Xc!4=0:Xc!8=0:Xc!12=68:Xc!16=68:Xc!20=2^1+2^3+2^4+2^8+(3<<12):$VX=�(�"a"+VW):Xc!24=VX:Xc!28=Up:Xc!32=2:ș&400C2,,Xc �Xd:Xe=�:=Xd
�R��We:Uj!0=Ub:Uj!4=Vh:ș&400CE,,Uj:$VX=�(�"a"+VW):Uj!8=0:Uj!12=0:ș&400CD,,Uj:�
���Ws:Xf=�-Xe:�Xf>8 �
VW=(VW+1) �16:�We:Xe=�
"�:�
J��Xg:VW=0:�We:�
�*��Vd:�Xh(Up,Uo):Ȏ�ction_SpritesType �
�$�1:�Xi(Up,"<Morph$Dir>.Sprites")
�&�2:�Xi(Up,"<Morph$Dir>.Sprites22")
�&�3:�Xi(Up,"<Morph$Dir>.Sprites23")
��:�
�=��XV(Xj):Xk=Xj!0:Xl=Xj!4:Xm=Xj!8:Xn=Xj!12:Xd=Xj!16:ȎXm �
D�UY:ȎXn �
N�Xo:�Xd=3 �
X�XU(Uj,Xn):�Xp
l�
v�Xq:�Xd=5 �
��XU(Uj,Xn):�Xr(Uj)
��
��Ub:�Xd=Vh �
�� �WY �
��Xs(Uj,Wj)
��:�Xs(Uj,Xt)
��
��
��Wj:ȎXd �
��0:�Vj �
��(-2) �
"Xu=�ction_LaunchObject(Xv$,Xu)
�:�Ww(Uh,Uj,Xw, ��)
 �
*�
4�2:�Vn �
>�(-2) �
H"Xx=�ction_LaunchObject(Xy$,Xx)
R�:�Ww(Uh,Uj,Xz, ��)
f�
p�
z
�7:�YU
�
�8:�YV
�
�9:�YW
��
��YX:ȎXd �
��0:�YY(+1,0)
��1:�YY(-1,0)
��5:�YY(0,+1)
��6:�YY(0,-1)
��
��Xw:ȎWX �
�ɣ:�YZ(Xn,Xk,Xl,�)
�ɹ:�Ya(Xn,Xk,Xl, ��,�)
�,�:�(-2) �Xu=�ction_LaunchObject(Xv$,Xu)
	�Xz:ȎWX �
	ɣ:�YZ(Xn,Xk,Xl,�)
	$ɹ:�Ya(Xn,Xk,Xl, ��,�)
	.,�:�(-2) �Xx=�ction_LaunchObject(Xy$,Xx)
	B�Wz:ȎXd �
	L
�9:�Yb
	V
�5:�Yc
	`
�4:�Yd
	j�3:�Ye("All")
	t�7:�Ye("From")
	~�
	��Wx:ȎXd �
	� �2:�Yf:�XU(Uj,Xn):�XU(Uj,Wz)
	�$�1:�XU(Uj,Xn):�XU(Uj,Wz):�Yg:�Yd
	� �0:�Yh:�XU(Uj,Xn):�XU(Uj,Wz)
	��
�Xt:�Xd=2 �

XYi$=�ction_TagToString("err11"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�):�Yj<>1 ��Yk
(�
2�Yl:�Xd=2 ��Ym( ��)
<�Yn:�Vr ��(-2) �
F"Yo=�ction_LaunchObject(Yp$,Yo)
P�
Z�Yq:�Xd=0 �
d�Uy(Ux):�Yr(Uj,Xn)
x�:�Ys(Xn,Xk,Xl,Ux)
��
��Yt:�Xd=0 �
��Uy(Uz):�Yr(Uj,Xn)
��:�Ys(Xn,Xk,Xl,Uz)
��
��
��UZ:ȎXn �
��Ub:�Xd=Vh �
�Yu(Xk)
�
�Xw:�Yv(Xk,Xl)
"�Xz:�Yw(Xk,Xl)
,�Yn:�Yx(Xk,Xl)
6�Wj:ȎXd �
@
�7:�YU
J
�8:�YV
T�
^�
|�Ua:ȎXn �
��Wj:ȎXd �
�
�7:�YU
�
�8:�YV
��
��Xw:ȎWX �
�ɣ:�YZ(Xn,Xk,Xl, ��)
�ɹ:�Ya(Xn,Xk,Xl,�, ��)
��
��Xz:ȎWX �
�ɣ:�YZ(Xn,Xk,Xl, ��)
�ɹ:�Ya(Xn,Xk,Xl,�, ��)
��
��Wx:ȎXd �

�2:�Yf
�1:�Yg:�Yd
&
�0:�Yh
0�
:�Wz:ȎXd �
D
�4:�Yd
N�3:�Ye("All")
X�7:�Ye("From")
b�
l�Yl:�Xd=2 ��Ym(�)
v�Yn:�Vr ��Yy(Xk,Xl)
��
��64:ȎXn �
��Xw:ȎWX �
�ɣ:Va=2:�Yz(Xn,Xk,Xl)
� ɹ:�WV>0 �Va=3:�ZU(Xn,Xk,Xl)
��
��Xz:ȎWX �
�ɣ:Va=2:�Yz(Xn,Xk,Xl)
� ɹ:�WV>0 �Va=3:�ZU(Xn,Xk,Xl)
��
��Yl:�Xd=Wa �

&Va=4:Yj=�ction_BeginDrag(Uj,Xn,Xd)

�

 �

>�16:ȎXn �

R�Xw:�WV=0 �

\Va=1:�ZV(Xn,Xk,Xl)

f�:ȎWX �

zɣ:Va=2:�Yz(Xn,Xk,Xl)

�ɹ:Va=3:�ZU(Xn,Xk,Xl)

��

��

��Xz:�WV=0 �

�Va=1:�ZV(Xn,Xk,Xl)

��:ȎWX �

�ɣ:Va=2:�Yz(Xn,Xk,Xl)

�ɹ:Va=3:�ZU(Xn,Xk,Xl)

��

��
�Yn:Va=1:�ZV(Xn,Xk,Xl)
�
.�:�
V,��XX(Xj):Xn=Xj!0:Xd=Xj!4:ZW=Xj!24:ȎXn �
��YX:ȎXd �
��2:�ZW=13 �
�dZX=��ction_ReadIconText(Uj,YX,2):ZY=��ction_ReadIconText(Uj,YX,4):�VZ=5 �ZZ$="SOURCE"�ZZ$="DEST"
�B�Wh(ZZ$,ZX,ZY):ZY$=�ction_ReadIconText(Uj,YX,4):�Za(YX,4,�ZY$)
��
��4:�ZW=13 �
�dZX=��ction_ReadIconText(Uj,YX,2):ZY=��ction_ReadIconText(Uj,YX,4):�VZ=5 �ZZ$="SOURCE"�ZZ$="DEST"

�Wh(ZZ$,ZX,ZY):�Zb
�
(�
2�Wj:ȎXd �
<�6:�ZW=13 ��Zb
F�
P�Yl:�Xd=0 �ZW=13 �
Z�Ym( ��)
d�
n�Xw:ȎZW �
xɗ"X"-64:�Zc
��
��Xz:ȎZW �
�ɗ"X"-64:�Zc
��
��Wz:�ZW=13 �
�
ȎXd �
�7�11:Zd$=�ction_ReadIconText(Uj,Xn,8):�Za(Xn,8,�Zd$)
� �8:�Yh:�XU(Uj,Xn):�XU(Uj,Wx)
�9�13:Zd$=�ction_ReadIconText(Uj,Xn,14):�Za(Xn,14,�Zd$)
!�14:�Yh:�XU(Uj,Xn):�XU(Uj,Wx)
"�
,�
6�:�Ze(ZW):�
h��XZ(Xj):ȎXj!16 �
|�0:� �WY �
�VV=�
�Z�:Yi$=�ction_TagToString("err12"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�):VV= �(Yj=1)
��
��2:�Zf(Xj)
��3:�Zg(Xj)
��5:�Xj!40=Uf ��Zg(Xj)
��9:�Zh:�Zi
��&502:�Zj(Xj)
��&400C1:�Zh:�Zi
�:�
:e��Wv(Xj):Xn=Xj!0:ș&400C8,,Xj �Zk:Zl=Xj!4:Zm=Xj!12:Zn=Xj!16:Zo=Xj!8:Zp=Xj!20:Zq=Xj!24:ȕZk:ȎXn �
��Wj:�Zr
��Xw:�Zs
��Xz:�Zt
��Yn:�Zu
��Yq:�Zv(Ux)
��Yt:�Zv(Uz)
��:ș&400CA,,Xj �Zk:�:�
��XW(Xj):ȎVa �
�1
 
�2:�Zw
*
�3:�Zx
4�4:�Zy(Xj)
>�5
H�:�
p���Zy(Xj):ș&400CF,,Xj:Xk=Xj!0:Xl=Xj!4:Xn=Xj!12:Xd=Xj!16:Zz$=�ction_PathnameOnly(�ction_ReadIconText(Uj,Wj,14)):aU$=�ction_LeafnameOnly(�ction_ReadIconText(Uj,Wj,14)):Xj!0=44+((�aU$ �4)*4)+4:Xj!4=0:Xj!8=0:Xj!12=0:Xj!16=1:Xj!20=Xn:Xj!24=Xd:Xj!28=Xk
DXj!32=Xl:Xj!36=64:Xj!40=&FFF:$(Xj+44)=aU$+�0:ș&400E7,17,Xj,Xn:�
`���Zf(Xj):aV=Xj!4:Xj!12=Xj!8:Xj!16=3:Zz$=�ction_ExtractString(Xj+44):ș&400E7,17,Xj,aV:aW$=�ction_ReadIconText(Uj,Yl,0):aW$=�ction_LeafnameOnly(aW$):Zz$=Zz$+aW$:aX$=�ction_ReadIconText(Uj,Yl,Wa):ȎaX$ �
��"directory":�aY(Zz$)
�:�aZ(Zz$)
��:ș&400D4,,-1:�
�ݤction_BeginDrag(Xc,Xn,Xd):�aa,ab,ac,ad:Xc!0=4:Xc!4=5:Xc!8=11:Xc!12=12:Xc!16=-1:ș&31,Xc,Xc+32:aa=(Xc!40+1)* 2^( Xc!32 ):ab=(Xc!44+1)* 2^( Xc!36 ):Xc!0=Xn:ș&400CC,,Xc:ac=Xc!4:ad=Xc!16:Xc!0=Xn:Xc!4=Xd:ș&400CE,,Xc:Xc!8+=ac:Xc!12+=ad
�WXc!16+=ac:Xc!20+=ad:Xc!0=0:Xc!4=5:Xc!24=0:Xc!28=0:Xc!32=aa:Xc!36=ab:ș&400D0,,Xc:=0
���Vb:ae=Un:�af(Uj,"<"+Uc$+"$Dir>.Templates"):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"information"):ag=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"source"):Xw=�ction_MakeTemplateAWindow(Ul)
T�ae=�ction_LoadTemplate(Ul,ae,Un+Um,"xfer_send"):Yl=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"dest"):Xz=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"main"):Wj=�ction_MakeTemplateAWindow(Ul)
��ae=�ction_LoadTemplate(Ul,ae,Un+Um,"magnifier"):YX=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"pref_pane"):Wz=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"pref_main"):Wx=�ction_MakeTemplateAWindow(Ul)
��ae=�ction_LoadTemplate(Ul,ae,Un+Um,"progress"):Xt=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"back"):Yn=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"xfer_send2"):ah=�ction_MakeTemplateAWindow(Ul)
�ae=�ction_LoadTemplate(Ul,ae,Un+Um,"colr"):Yq=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"mvmt"):Yt=�ction_MakeTemplateAWindow(Ul):ae=�ction_LoadTemplate(Ul,ae,Un+Um,"share_1"):Xo=�ction_MakeTemplateAWindow(Ul)
DYae=�ction_LoadTemplate(Ul,ae,Un+Um,"share_2"):Xq=�ction_MakeTemplateAWindow(Ul):�ai:�
����aj(ak$,aa,ab):$(Ur+al)=ak$+�0:?(Ur+al+12)=7:?(Ur+al+13)=2:?(Ur+al+14)=7:?(Ur+al+15)=0:!(Ur+al+16)=aa:!(Ur+al+20)=ab:!(Ur+al+24)=0:al+=28:�
l��am(an$,ao,ap,aq):!(Ur+al+0)=ao:!(Ur+al+4)=ap:!(Ur+al+8)=&07000001+�aq*2^22:$(Ur+al+12)=an$+�0:al+=24:�
\���ar(as$,ao,ap,aq):!(Ur+al+0)=ao:!(Ur+al+4)=ap:!(Ur+al+8)=&07000101+�aq*2^22:at=au+av:$at=as$+�0:av+=�as$+1:!(Ur+al+12)=at:!(Ur+al+16)=-1:!(Ur+al+20)=16:al+=24:�
���Yu(Xk):VZ=1:al=0:�aj(Uc$,160,44):�am("Info",0,ag, ��):�am("Prefs...",0,-1,WY):�am("Quit",128,-1, ��):ș&400D4,,Ur,Xk-80,228:�
V���YU:VZ=2:al=0:au=Ur+1*1024:av=0:�aj("Quality",304,44):�aw=1 �5:aw$=�ction_TagToString("qual"+�"00"+�aw,2)):�ar(aw$,�(aw=!ax),-1,aw>1):�aw:!(Ur+al+0-24)+=128:!Uj=Wj:ș&400CC,,Uj:Zl=Uj!4:Zo=Uj!8:ș&400D4,,Ur,Zl+488,Zo+100:�
���YV:VZ=3:al=0:au=Ur+1*1024:av=0:ay$=�ction_ReadIconText(Uj,Wj,6):�aj("Frames",128,44):�az=1 �5:az$=�ction_TagToString("frms"+�"00"+�az,2)):�ar(az$,�(ay$=az$),-1, ��):�az:!(Ur+al+0-24)+=128:!Uj=Wj:ș&400CC,,Uj:Zl=Uj!4:Zo=Uj!8:ș&400D4,,Ur,Zl+488,Zo+50
��
����Yb:VZ=4:al=0:au=Ur+1*1024:av=0:�aj("Auto",128,44):�bU=1 �5:bU$=�ction_TagToString("auto"+�"00"+�bU,2)):�ar(bU$,0,-1, ��):�bU:!(Ur+al+0-24)=128:!Uj=Wz:ș&400CC,,Uj:Zl=Uj!4:Zo=Uj!8:ș&400D4,,Ur,Zl+448+52,Zo+356-Uj!24:�
^���Yv(Xk,Xl):�bV("file_3e1"):�Wi(Uj,Yl,0,Wb$):�Wi(Uj,YX,2,�bW):�Wi(Uj,YX,4,�bX):�bY(WW):VZ=5:al=0:au=Ur+1*1024:av=0:bZ=Ur+al:�aj("Select",128,44):�ar(�ction_TagToString("delt"),0,-1,WV=0 �WX):�ar(�ction_TagToString("colr"),128,Us,(�WX) �WV=0):ba=Ur+al
���aj("Edit",304,44):�ar(�ction_TagToString("bgrd"),0,-1, ��):�ar(�ction_TagToString("colc"),0,-1, ��):�ar(�ction_TagToString("movc"),2,-1, ��):�ar(�ction_TagToString("rsrc"),0,-1, �Vj):�ar(�ction_TagToString("rdst"),0,-1, �Vn)
0��ar(�ction_TagToString("rbck"),128,-1, �Vr):bb=Ur+al:�aj("Misc",224,44):�ar(�ction_TagToString("acpt"),0,-1,WX):�ar(�ction_TagToString("cntr"),2,-1,(Vv%=0 �Vw%=0)):�ar(�ction_TagToString("rest"),128,-1, ��):bc=Ur+al:�aj("Morph",128,44)
���ar(�ction_TagToString("misc"),0,bb, ��):�ar(�ction_TagToString("save"),0,Yl, ��):�ar(�ction_TagToString("slct"),0,bZ, ��):�ar(�ction_TagToString("edit"),0,ba, ��):�ar(�ction_TagToString("zoom"),128,YX, ��):ș&400D4,,bc,Xk-64,Xl:�
���Yw(Xk,Xl):�bV("file_3e1"):�Wi(Uj,Yl,0,Wb$):�Wi(Uj,YX,2,�bd):�Wi(Uj,YX,4,�be):�bY(WW):VZ=6:al=0:au=Ur+1*1024:av=0:bZ=Ur+al:�aj("Select",128,44):�ar(�ction_TagToString("delt"),0,-1,WV=0 �WX):�ar(�ction_TagToString("colr"),128,Us,(�WX) �WV=0):ba=Ur+al
p��aj("Edit",304,44):�ar(�ction_TagToString("bgrd"),0,-1, ��):�ar(�ction_TagToString("colc"),0,-1, ��):�ar(�ction_TagToString("movc"),2,-1, ��):�ar(�ction_TagToString("rsrc"),0,-1, �Vj):�ar(�ction_TagToString("rdst"),0,-1, �Vn)
���ar(�ction_TagToString("rbck"),128,-1, �Vr):bb=Ur+al:�aj("Misc",224,44):�ar(�ction_TagToString("acpt"),0,-1,WX):�ar(�ction_TagToString("cntr"),2,-1,(Vx%=0 �Vy%=0)):�ar(�ction_TagToString("rest"),128,-1, ��):bc=Ur+al:�aj("Morph",128,44)
���ar(�ction_TagToString("misc"),0,bb, ��):�ar(�ction_TagToString("save"),0,Yl, ��):�ar(�ction_TagToString("slct"),0,bZ, ��):�ar(�ction_TagToString("edit"),0,ba, ��):�ar(�ction_TagToString("zoom"),128,YX, ��):ș&400D4,,bc,Xk-64,Xl:�
V���Yx(Xk,Xl):VZ=8:al=0:au=Ur+1*1024:av=0:bf=Ur+al:�aj(�ction_TagToString("upper"),128,44):�ar(�ction_TagToString("left"),0,-1, �Vr):�ar(�ction_TagToString("middle"),0,-1, �Vr):�ar(�ction_TagToString("right"),128,-1, �Vr):bg=Ur+al
���aj(�ction_TagToString("middle"),128,44):�ar(�ction_TagToString("left"),0,-1, �Vr):�ar(�ction_TagToString("middle"),0,-1, �Vr):�ar(�ction_TagToString("right"),128,-1, �Vr):bh=Ur+al:�aj(�ction_TagToString("lower"),128,44)
��ar(�ction_TagToString("left"),0,-1, �Vr):�ar(�ction_TagToString("middle"),0,-1, �Vr):�ar(�ction_TagToString("right"),128,-1, �Vr):bc=Ur+al:�aj("Align",128,44):�ar(�ction_TagToString("upper"),0,bf, �Vr):�ar(�ction_TagToString("middle"),0,bg, �Vr)
FH�ar(�ction_TagToString("lower"),128,bh, �Vr):ș&400D4,,bc,Xk-64,Xl:�
xz��Yc:VZ=7:�bY(�ction_ColourOfIcon(Uj,Wz,19)):!Uj=Wz:ș&400CC,,Uj:Zl=Uj!4:Zo=Uj!8:ș&400D4,,Us,Zl+448+52,Zo+268-Uj!24:�
����bY(bi):�bj("Colour",96,44):�bk(�(bi=&0),-1,&07000011," 0"):�bk(�(bi=&1),-1,&17000011," 1"):�bk(�(bi=&2),-1,&27000011," 2"):�bk(�(bi=&3),-1,&37000011," 3"):�bk(�(bi=&4),-1,&40000011," 4"):�bk(�(bi=&5),-1,&50000011," 5")
"��bk(�(bi=&6),-1,&60000011," 6"):�bk(�(bi=&7),-1,&70000011," 7"):�bk(�(bi=&8),-1,&80000011," 8"):�bk(�(bi=&9),-1,&97000011," 9"):�bk(�(bi=&A),-1,&A0000011," A"):�bk(�(bi=&B),-1,&B0000011," B"):�bk(�(bi=&C),-1,&C7000011," C")
hi�bk(�(bi=&D),-1,&D0000011," D"):�bk(�(bi=&E),-1,&E7000011," E"):�bk(�(bi=&F)+128,-1,&F7000011," F"):�
����bj(ak$,aa,ab):bl=0:$(Us+bl)=ak$+�0:?(Us+bl+12)=7:?(Us+bl+13)=2:?(Us+bl+14)=7:?(Us+bl+15)=0:!(Us+bl+16)=aa:!(Us+bl+20)=ab:!(Us+bl+24)=0:bl+=28:�
 0���bk(ao,ap,bm,bn$):?(Us+bl+0)=ao:?(Us+bl+1)=0:?(Us+bl+2)=0:?(Us+bl+3)=0:!(Us+bl+4)=ap:!(Us+bl+8)=bm:$(Us+bl+12)=bn$+�0:bl+=24:�
 �+��XY(Xj):bo=Xj!0:bp=Xj!4:bq=Xj!8:ȎVZ �
 �
�1:Ȏbo �
 ��1:�Xs(Uj,Wx):�Wy(Uj,Wx,Wz)
 ��2:� �WY �
!VV=�
!Z�:Yi$=�ction_TagToString("err12"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�):VV= �(Yj=1)
!4�
!>�
!H�2:�Wf(bo+1):!ax=bo+1
!\�3:�Wg(bo+1)
!fY�4:br$=�ction_TagToString("auto"+�"00"+�(bo+1),2)):�Wi(Uj,Wz,11,br$):�Wi(Uj,Wz,8,br$)
!�
�5:Ȏbo �
!�
�0:Ȏbp �
!�
�0:�bs(�)
!�)�1:Vv%=0:!bt=0:Vw%=0:!bu=0:�Yr(Uj,Xw)
!�
�2:�bv
!��
!�
�2:Ȏbp �
!�
�0:�Zc
!��1:�bw(bq)
!��
!�
�3:Ȏbp �
"�0:�Xs(Uj,Yn)
"�1:�Ww(Uh,Uj,Yq, ��)
"�2:�Ww(Uh,Uj,Yt, ��)
"$�3:�bx("Source")
".�4:�bx("Dest")
"8�5:�bx("Back")
"B�
"L�
"`
�6:Ȏbo �
"j
�0:Ȏbp �
"t
�0:�bs(�)
"~)�1:Vx%=0:!by=0:Vy%=0:!bz=0:�Yr(Uj,Xz)
"�
�2:�bv
"��
"�
�2:Ȏbp �
"�
�0:�Zc
"��1:�bw(bq)
"��
"�
�3:Ȏbp �
"��0:�Xs(Uj,Yn)
"��1:�Ww(Uh,Uj,Yq, ��)
"��2:�Ww(Uh,Uj,Yt, ��)
"��3:�bx("Source")
#�4:�bx("Dest")
#
�5:�bx("Back")
#�
#�
#2�7:�cU(Uj,Wz,19,bo)
#F
�8:Ȏbo �
#Z
�0:Ȏbp �
#d�0:�cV("T","L")
#n�1:�cV("T","M")
#x�2:�cV("T","R")
#��
#�
�1:Ȏbp �
#��0:�cV("M","L")
#��1:�cV("M","M")
#��2:�cV("M","R")
#��
#�
�2:Ȏbp �
#��0:�cV("B","L")
#��1:�cV("B","M")
#��2:�cV("B","R")
#��
$�
$"3�:ș&400CF,,Xj:Xk=Xj!0:Xl=Xj!4:Xm=Xj!8:�Xm=Ua �
$^
ȎVZ �
$h�1:�Yu(Xk)
$r
�2:�YU
$|
�3:�YV
$�
�4:�Yb
$��5:�Vj ��Yv(Xk,Xl)
$��6:�Vn ��Yw(Xk,Xl)
$�
�7:�Yc
$��8:�Yx(Xk,Xl)
$��
$��:�VZ<>1 �
$�ș&400D4,,-1:VZ=0
$��
$��:�
%t��Zg(Xj):cW=Xj!40:Zz$=�ction_ExtractString(Xj+44):aV=Xj!4:Xj!16=4:Xj!12=Xj!8:ș&400E7,17,Xj,aV:�cW<>Ue �cW<>Uf �
%lNYi$=�ction_TagToString("err01"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
%��:ȎcW �
%��Ue:�cX(Zz$)
%��Uf:�cY(Zz$)
%��
%��:�
%�8ݤction_FileExists(Zz$):ș&20008,13,Zz$ �cZ:=(cZ<>0)
&Hݤction_SizeOfFile(Zz$):�ca:ș&8,17,Zz$ �cZ,cb,cc,cd,ce,cf:ca=ce:=ca
&RUݤction_TypeOfFile(Zz$):�ca:ș&8,17,Zz$ �cZ,cb,cc,cd,ce,cf:cg=((cc>>8) �&FFF):=cg
&�4��Zj(Xj):ch$="":aV=Xj!4:ci=Xj!32:bm=Xj!36:Ȏci �
&��Ub:�bm=Vh �
&�
�WY �Wr �
&�ch$="spin"
&��:ch$="icon"
'�
'�
'&�Yq:�bm=0 �ch$="colw00"�ch$="colw"
'$&�Yt:�bm=0 �ch$="movw00"�ch$="movw"
'.�Xw:ch$="sour"
'8�Xz:ch$="dstn"
'B�Yn:ch$="back"
'L�Xt:Ȏbm �
'V�1:ch$="prog01"
'`�2:ch$="prog02"
'j�3:ch$="prog03"
't�
'~�Wj:Ȏbm �
'��0:ch$="main00"
'��2:ch$="main02"
'��4:ch$="main04"
'��6:ch$="main06"
'��7:ch$="main07"
'��8:ch$="main08"
'��9:ch$="main09"
'�:ch$="main"
'��
'��Wx:Ȏbm �
'��0:ch$="pman00"
(�1:ch$="pman01"
(
�2:ch$="pman02"
(:ch$="pref"
((�
(2�Wz:Ȏbm �
(<�3:ch$="ppne03"
(F�4:ch$="ppne04"
(P�5:ch$="ppne05"
(Z�7:ch$="ppne07"
(d�8:ch$="ppne08"
(n�9:ch$="ppne09"
(x�11:ch$="ppne11"
(��12:ch$="ppne12"
(��13:ch$="ppne13"
(��14:ch$="ppne14"
(��19:ch$="ppne19"
(�:ch$="pref"
(��
(��:�ch$<>"" �
(�qcj$=�ction_TagToString(ch$):Xj!0=20+((�(cj$) �4)*4)+4:Xj!12=Xj!8:Xj!16=&503:$(Xj+20)=cj$+�0:ș&400E7,17,Xj,aV
)�:�
)@K��Wf(ck):aw$=�ction_TagToString("qual"+�"00"+�ck,2)):�Wi(Uj,Wj,4,aw$):�
)|K��Wg(ck):az$=�ction_TagToString("frms"+�"00"+�ck,2)):�Wi(Uj,Wj,6,az$):�
)����ZV(ci,cl,cm):cn=ci:co=cl+1:cp=cm+0:Uj!0=ci:Uj!4=7:Uj!8=cl:Uj!12=cm:Uj!16=cl:Uj!20=cm:Uj!24=ci:ș&400C8,,Uj+24:cq=Uj!28:cr=Uj!36:cs=Uj!40:ct=Uj!32:Uj!24=cq:Uj!28=ct:Uj!32=cr:Uj!36=cs:ș&400D0,,Uj:�
*l;��Wp:ș&400CF,,Uj:cl=Uj!0:cm=Uj!4:cu=Uj!8:ci=cn:�cu=1 �
*��cl<>co �cm<>cp �
*�
Ȏci �
*��Xw:cv=bW/bX
*��Xz:cv=bd/be
*��Yn:cv=1/1
*�/�:�cw(ci,(cl-co)/cv,(cm-cp)/cv):co=cl:cp=cm
*��
+
�:Va=0
+�:�
+>��cw(ci,cx,cy):Ȏci �
+\^�Xw:Vv%+=((cx>>cz)/dU):Vw%+=((cy>>dV)/dW):!bt+=((cx>>cz)/dU):!bu+=((cy>>dV)/dW):�Yr(Uj,ci)
+�^�Xz:Vx%+=((cx>>cz)/dX):Vy%+=((cy>>dV)/dY):!by+=((cx>>cz)/dX):!bz+=((cy>>dV)/dY):�Yr(Uj,ci)
+�
�Yn:�Vr �
+�ZVz%+=((cx>>cz)/dZ):WU%+=((cy>>dV)/da):!db+=((cx>>cz)/dZ):!dc+=((cy>>dV)/da):�Yy(cl,cm)
,�
,$�:�
,L��dd(ci,cl,cm):Ȏci �
,`�Xw:de=bW/bX:df=dU:dg=dW
,~�Xz:de=bd/be:df=dX:dg=dY
,�H�:�dh(Uj,ci,cl,cm):di%=(dj>>(df*cz) ) / de:dk%=(dl>>(dg*dV) ) / de:�
,����Yz(ci,cl,cm):dm=ci:dn=cl:do=cm:co=cl:cp=cm:Uj!0=ci:Uj!4=7:Uj!8=cl:Uj!12=cm:Uj!16=cl:Uj!20=cm:Uj!24=ci:ș&400CC,,Uj+24:cq=Uj!28:cr=Uj!36:cs=Uj!40:ct=Uj!32:Uj!24=cq:Uj!28=ct:Uj!32=cr:Uj!36=cs:ș&400D0,,Uj:�WX ��dp��dq
-��
-����dp:dr=Uj:!dr=dm:ș&400CC,,dr:dr!(0+4)=dr!(40+4):dr!(4+4)=dr!(44+4):dr!(8+4)=dr!(48+4):dr!(12+4)=dr!(52+4):ș&400C9,,dr �ds:ȕds:ș&400E6,48+14:ȓȐco-4,cp-4,8,8:ș&400CA,,dr �ds:�:�
.6���dq:dr=Uj:!dr=dm:ș&400CC,,dr:dr!(0+4)=dr!(40+4):dr!(4+4)=dr!(44+4):dr!(8+4)=dr!(48+4):dr!(12+4)=dr!(52+4):ș&400C9,,dr �ds:ȕds:ș&400E6,48+14:�dn,do,co,cp:ș&400CA,,dr �ds:�:�
.�D��Wq:ș&400CF,,Uj:cl=Uj!0:cm=Uj!4:cu=Uj!8:ci=Uj!12:�cu=4 �cu=1 �
.��cl<>co �cm<>cp �
/�WX ��dp��dq
/co=cl:cp=cm:�WX ��dp��dq
/0�
/:
�:Va=0
/N�:�
/v��Zw:�WX ��dp��dq
/�Hș&400CF,,Uj:ci=Uj!12:�dd(ci,dn,do):dt=�(cp-do):du=�(co-dn):�du>dt �
/�#� ��ction_GuideExists(dv,dk%) �
/�=dw=�ction_Insert_HorV(dv,dk%):�dx(Xw,dw,dv):�dx(Xz,dw,dv)
/��
/�%�:� ��ction_GuideExists(dy,di%) �
0=dw=�ction_Insert_HorV(dy,di%):�dx(Xw,dw,dy):�dx(Xz,dw,dy)
0*�
04�:�
0\\ݤction_Insert_HorV(dz,eU%):i=0:eV= ��:ȕi<=255 � �eV:eW%=(dz!(i*4) �&7FFFFFFF):�eW%=0 �
0�eV=�
0�
�:i+=1
0��:�:�i>255 �
0�NYi$=�ction_TagToString("err04"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
0��:dz!(i*4) = eU% + 1
0��:=i
1$`ݤction_GuideExists(dz,eU%):i=0:eV= ��:ȕi<=255 � �eV:eW%=(dz!(i*4) �&7FFFFFFF)-1:�eW%=eU% �
1`eV=�
1j
�:i+=1
1~�:�:=eV
1���YZ(ci,cl,cm,eX):�eX �
1�eY=�eZ:ea=�eb:�eY>0 �
1��eY>1 �
1��Yr(Uj,Xw):�Yr(Uj,Xz)
2#�:�dx(Xw,!ec,dv):�dx(Xz,!ec,dv)
2�
2(
�:�ea>0 �
2<�ea>1 �
2F�Yr(Uj,Xw):�Yr(Uj,Xz)
2Z#�:�dx(Xw,!ed,dy):�dx(Xz,!ed,dy)
2x�
2�
�:WV=0
2�j�:�dd(ci,cl,cm):ee=�ction_ClosestGuide(dv,dk%):ef=�ction_ClosestGuide(dy,di%):�ee<>-1 ��eg(dv,ee, �eX)
2��ef<>-1 ��eg(dy,ef, �eX)
2��
2�rݤction_ClosestGuide(dz,eU):i=0:eh=-1:ei=8:ȕi<=255:eW%=(dz!(i*4) �&7FFFFFFF)-1:ej=�(eW%-eU):�ej<ei �eW%<>-1 �
3@eh=i:ei=ej
3T�:i+=1:�:=eh
3�R��eg(dz,ck,ek):eW%=dz!(ck*4):el%=(eW% �&80000000):eW%-=el%:em%=&80000000:�ek �
3�em%=el% �&80000000
3��:�em%<>0 �WV+=1�WV-=1
3�Ddz!(ck*4) = eW% + em%:�ction_WindowIsOpen(Uj,Xw) ��dx(Xw,ck,dz)
3�.�ction_WindowIsOpen(Uj,Xz) ��dx(Xz,ck,dz)
4�
4&0��dx(ci,ck,dz):�ction_WindowIsOpen(Uj,ci) �
4:
Ȏci �
4D�Xw:en=dW* dV:de=bW/bX:a=dU
4b�Xz:en=dY* dV:de=bd/be:a=dX
4�s�:!Uj=ci:ș&400CC,,Uj:Zl=Uj!4:Zn=Uj!16:Zo=Uj!8:Zp=Uj!20:Zq=Uj!24:Zm=Uj!12:eo=Zl-Zp:ep=Zn-Zq:eU=dz!(ck*4):Ȏdz �
4�7�dv:eq=Zl:er=Zm:es=ep+((eU<<en)* de ) - 24:et=es+48
5<�dy:es=Zo:et=Zn:eq=eo+((eU<<(cz*a)) * de ) - 24:er=eq+48
5>�:ș&400D1,-1,eq,es,er,et
5R�:�
5z��Zc:eu=�ev:WV=0:�eu>0 �
5��eu=1 �
5�M!(!ew+(!ex*4) ) = !ey:�dx(Xw,!ex,!ew):�dx(Xz,!ex,!ew):!(!ew+(!ex*4) ) = 0
5�-�:�ction_WindowIsOpen(Uj,Xw) ��Yr(Uj,Xw)
5�+�ction_WindowIsOpen(Uj,Xz) ��Yr(Uj,Xz)
5��
5��:�
6$ ��bs(ez):fU=!fV:fW=!fX:�ez �
6LyYj=�ction_Insert_HorV(dv,0):Yj=�ction_Insert_HorV(dv,fW-1):Yj=�ction_Insert_HorV(dy,0):Yj=�ction_Insert_HorV(dy,fU-1)
6t��:A%=dv:fY%=�fZ:A%=dy:fa%=�fZ:A%=dv:�fb:A%=dy:�fb:�fc:�fd:�y=0 �fY%-1:�x=0 �fa%-1:B%=((dv!(y*4)) �&7FFFFFFF)-1:A%=((dy!(x*4)) �&7FFFFFFF)-1:C%=WW:�fe:�x:�y:WX=�:�ction_WindowIsOpen(Uj,Xw) ��Yr(Uj,Xw)
7+�ction_WindowIsOpen(Uj,Xz) ��Yr(Uj,Xz)
7(�
7Ft��fc:�i=0 �fY%-1:�j=0 �fY%-1:A%=dv!(j*4+0) :ff=(A% �&7FFFFFFF):B%=dv!(j*4+4) :fg=(B% �&7FFFFFFF):�ff<fg �ȔA%,B%
7��dv!(j*4+0) = A%:dv!(j*4+4) = B%:�j:�i:�i=fa%-2 �0�-1:�j=fa%-2 �0�-1:A%=dy!(j*4+0) :ff=(A% �&7FFFFFFF):B%=dy!(j*4+4) :fg=(B% �&7FFFFFFF):�ff>fg �ȔA%,B%
7�+dy!(j*4+0) = A%:dy!(j*4+4) = B%:�j:�i:�
86��Ya(ci,cl,cm,ek,eX):�eX �
8Tfh=�fi:WV=0:�fh>0 �
8r�fh=1 �
8|�fj(Xw,!fk):�fj(Xz,!fk)
8��:�Yr(Uj,Xw):�Yr(Uj,Xz)
8��
8��
8�(�:�dd(ci,cl,cm):A%=di%:B%=dk%:Ȏci �
9�Xw:C%=0
9�Xz:C%=8
9&�:fl=�fm:�fl<>-1 �
9N/A%=fn!(fl*24+16):�ek �A%=(A% �2)�A%=(A% �2)
9b�(A% �2)<>0 �WV+=1�WV-=1
9l,fn!(fl*24+16) = A%:�fj(Xw,fl):�fj(Xz,fl)
9��:�
9�-��fj(ci,fl):�ction_WindowIsOpen(Uj,ci) �
9�
Ȏci �
9�$�Xw:en=dW* dV:de=bW/bX:fo=0:a=dU
:$�Xz:en=dY* dV:de=bd/be:fo=8:a=dX
:*��:!Uj=ci:ș&400CC,,Uj:Zl=Uj!4:Zn=Uj!16:Zo=Uj!8:Zp=Uj!20:Zq=Uj!24:Zm=Uj!12:eo=Zl-Zp:ep=Zn-Zq:fp=fn!(fl*24+fo ):fq=fn!(fl*24+fo+4):eq=eo+((fp<<(cz*a)) * de ) - 8:es=ep+((fq<<en)* de ) - 8:er=eq+16:et=es+16:ș&400D1,-1,eq,es,er,et
:��:�
:����ZU(ci,cl,cm):dm=ci:dn=cl:do=cm:co=cl:cp=cm:Uj!0=ci:Uj!4=7:Uj!8=cl:Uj!12=cm:Uj!16=cl:Uj!20=cm:Uj!24=ci:ș&400CC,,Uj+24:cq=Uj!28:cr=Uj!36:cs=Uj!40:ct=Uj!32:Uj!24=cq:Uj!28=ct:Uj!32=cr:Uj!36=cs:ș&400D0,,Uj:�WX ��dp��dq
;��
;���Zx:�WX ��dp��dq
;�T�dd(dm,dn,do):fr=di%:fs=dk%:�dd(dm,co,cp):ft=di%:fu=dk%:A%=ft-fr:B%=fu-fs:Ȏdm �
<�Xw:C%=0
<
�Xz:C%=8
<1�:!fv=fY%:!fw=fa%:�fx:�Yr(Uj,Xw):�Yr(Uj,Xz):�
<n'��bw(fy):WW=fy:A%=fy:fz=�gU:�fz>0 �
<��Yr(Uj,Xw):�Yr(Uj,Xz)
<��:�
<���YW:� �Vj �
<�NYi$=�ction_TagToString("err06"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
=
�:� �Vn �
=NYi$=�ction_TagToString("err07"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
=,
�:� �WX �
=@NYi$=�ction_TagToString("err05"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
=T��:gV$=�ction_TagToString("war01"):gW$=�ction_ReadIconText(Uj,Wj,4):gX$=�ction_TagToString("war02"):Yj=�ction_ReportError(Uj,99,Uc$,gV$+gW$+gX$,�,�):�Yj=1 �
=�I�bV("directory"):�Wi(Uj,Yl,0,Wc$):ș&400CF,,Uj:ș&400D4,,Yl,Uj!0,Uj!4
=��
=��
=��
=��:�
=���bV(gY$):�Wa<>-1 �
> Uj!0=Yl:Uj!4=Wa:ș&400C4,,Uj
>0y�:!Uj=Yl:Uj!(4+0)=116:Uj!(4+4)=-94:Uj!(4+8)=116+76:Uj!(4+12)=-94+72:Uj!(4+16)=&601A:$(Uj+4+20)=gY$:ș&400C2,,Uj �Wa:�
>���cV(gZ$,ga$):ȎgZ$ �
>��"T":WU%=!gb-!fX
>��"M":WU%=(!gb/2)-(!fX/2)
>��"B":WU%=0
>�
�:Ȏga$ �
>��"L":Vz%=0
>��"M":Vz%=(!gc/2)-(!fV/2)
>��"R":Vz%=!gc-!fV
>�"�:!db=Vz%:!dc=WU%:�Yr(Uj,Yn):�
?>'��aZ(Zz$):Wb$=Zz$:�:gd=-1:���ge:�
?fIgd=�Zz$:�#gd,�"D":�#gd,�"A":�#gd,�"T":�#gd,�"A":�#gd,WX:�#gd,WV:�WX �
?���#gd,!gf:�#gd,fY%:�#gd,fa%:�i=0 �!gf-1:�#gd,fn!(i*24+0):�#gd,fn!(i*24+4):�#gd,fn!(i*24+8):�#gd,fn!(i*24+12):�#gd,fn!(i*24+16):�#gd,fn!(i*24+20):�i
@$��:A%=dv:fY%=�fZ:A%=dy:fa%=�fZ:A%=dv:�fb:A%=dy:�fb:�#gd,fY%:�#gd,fa%:�i=0 �fY%-1:�#gd,dv!(i*4):�i:�i=0 �fa%-1:�#gd,dy!(i*4):�i
@�H�:�i=0 �10:�#gd,Ux?i:�#gd,Uz?i:�i:�#gd:�"SetType "+Zz$+" Morph":��:�
A��cY(Zz$):�:gd=-1:���ge:�
A2Qgd=�Zz$:gg=�#gd:gh=�#gd:gi=�#gd:gj=�#gd:�gg=�"D" �gh=�"A" �gi=�"T" �gj=�"A" �
AZ�#gd,WX:�#gd,WV:�WX �
Ax��#gd,!gf:�#gd,fY%:�#gd,fa%:�i=0 �!gf-1:�#gd,fn!(i*24+0):�#gd,fn!(i*24+4):�#gd,fn!(i*24+8):�#gd,fn!(i*24+12):�#gd,fn!(i*24+16):�#gd,fn!(i*24+20):�i
A�Q�:�#gd,fY%:�#gd,fa%:�i=0 �fY%-1:�#gd,dv!(i*4):�i:�i=0 �fa%-1:�#gd,dy!(i*4):�i
B@%�:�i=0 �10:Ux?i=�#gd:Uz?i=�#gd:�i
BrP�:Yi$=�ction_TagToString("err01"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
B�5�:�#gd:��:�ction_WindowIsOpen(Uj,Xw) ��Yr(Uj,Xw)
B�+�ction_WindowIsOpen(Uj,Xz) ��Yr(Uj,Xz)
B�+�ction_WindowIsOpen(Uj,Yq) ��Yr(Uj,Yq)
B�+�ction_WindowIsOpen(Uj,Yt) ��Yr(Uj,Yt)
B��
B�v��ge:Yi$=�ction_TagToString("err13"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$+�$+" ("+Þ+")", ��,�):�gd<>-1 ��#gd:gd=-1
C�
C:^��Ym(gk):Zz$=�ction_ReadIconText(Uj,Yl,0):gl$=�ction_ReadIconText(Uj,Yl,Wa):�Zz$,".")=0 �
CbNYi$=�ction_TagToString("err14"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
Cv
�:Ȏgl$ �
C�2�"directory":�aY(Zz$):� �gk �VZ=0:ș&400D4,,-1
C�':�aZ(Zz$):� �gk �VZ=0:ș&400D4,,-1
C��
C��:�
C���Wu:ș&90141 �cZ:�cZ=-1 �
D 3ș&90142 �cZ:Zz$=�ction_ExtractString(cZ):�Vj �
DH%�Zz$=�ction_RemoveFSPrefix(Xv$) �
DR4�gm(Xv$):�ction_WindowIsOpen(Uj,Yn) ��Yr(Uj,Yn)
Df�
Dp�:�Vn �
D�%�Zz$=�ction_RemoveFSPrefix(Xy$) �
D��gn(Xy$)
D��
D��:�Vr �
D�%�Zz$=�ction_RemoveFSPrefix(Yp$) �
D��go(Yp$):�Vj ��Yr(Uj,Yn)
D��
D��
E�:�
E8[ݤction_RemoveFSPrefix(gp$):gq= ��:�:gr$=�gp$,1):gq=gr$=":":gp$=�gp$,2,�gp$-1):�gq:=gp$
E�5ݤction_LaunchObject(gs$,gt):gu=gt:�:���gv:= ��
E�� �gt �
E�NYi$=�ction_TagToString("err16"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
E��:�gt ��"Filer_Run "+gs$
E�
��:=gu
F\��gv:gu= ��:Yi$=�ction_TagToString("err15"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�):�
FdY��bv:Yi$=�ction_TagToString("err17"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�):�Yj=1 �
F�)WV=0:WX= ��:�Wl:�Yr(Uj,Xw):�Yr(Uj,Xz)
F��:�
F���Ye(gw$):�gx(Uj,Wz,3,gw$="All"):�gx(Uj,Wz,7,gw$<>"All"):�gy(Uj,Wz,13,gw$="All"):�gy(Uj,Wz,14,gw$="All"):�ction_WindowWithCaret(Uj)=Wz �gw$="All" �
G"�Zb
G,�:�
GT%��Uy(gz):�i=0 �10:gz?i=i* 10:�i:�
G����Zv(gz):ș&400E6,7:�Zl,Zo:�i=0 �10:eU=gz?i:�Zl+(i*10)*4,Zo+eU*2:�i:ș&400E6,10:�i=0 �10:eU=gz?i:ȏȐZl+(i*10)*4,Zo+eU*2,6:�i:�
H0g��Ys(ci,cl,cm,gz):�dh(Uj,ci,cl,cm):hU%=(hV%/400)* 100:hW%=((-hX%)/202)* 100:�hU% �10<2 �hU% �10>8 �
HbAhU%=(hU%+1) �10:hY=gz?hU%:hZ=100-hW%:�hZ<>hY �hU%>0 �hU%<10 �
H�&gz?hU%=100-hW%:�gz?hU%<0 �gz?hU%=0
H��gz?hU%>100 �gz?hU%=100
H��Yr(Uj,ci)
H��
H��:�
H�.ݤction_GetPercentage(ha,gz):�ha=100 �=100
H�[hb=ha �10:hc=gz?hb:hd=hb+1:he=gz?hd:hf=(ha �10)/10:hg=hc* (1-hf):hh=he* hf:=(hg+hh)/100
IHR��UW:Yi$="Fatal Error : "+�$+" ("+Þ+")":�WY �Yi$+=�ction_TagToString("err20")
If7Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�, ��):�WY ��Yk
Iz�
I�#��Wn:�Xs(Uj,Xo):�hi(Uj,Xo):�7:�
I�#��Xp:�Xs(Uj,Xq):�hi(Uj,Xq):�7:�
J����Ve:hj=13:hk=14:hl=15:�hm 37*1024:�hn=0 �2�2:P%=hm:[OPT hn:.dv �ction_ReserveMemory(256 *4):.dy �ction_ReserveMemory(256 *4):.ho LDR r3,[r0],#4:STR r3,[r1],#4:SUBS r2,r2,#4:BNE ho:MOV PC,hk:.fZ STMFD (hj)!,{hk}:MOV r1,#256:MOV r2,#0
L��.hp LDR r3,[r0],#4:CMP r3,#0:ADDNE r2,r2,#1:SUBS r1,r1,#1:BNE hp:MOV r0,r2:LDMFD (hj)!,{PC}:.fb STMFD (hj)!,{hk}:MOV r1,r0:MOV r2,#256:.hq LDR r3,[r1],#4:STR r3,[r0]:CMP r3,#0:ADDNE r0,r0,#4:SUBS r2,r2,#1:BNE hq:LDMFD (hj)!,{PC}:.eZ STMFD (hj)!,{hk}
N�LDR r0,hr:MOV r2,#0:MOV r5,#0:.hs LDR r3,[r0]:MOVS r4,r3,LSR #31:STRNE r2,ec:ADDNE r5,r5,#1:MOV r3,r3,LSL #1:MOV r3,r3,LSR #1:STR r3,[r0],#4:ADD r2,r2,#1:CMP r2,#256:BNE hs:MOV r0,r5:LDMFD (hj)!,{PC}:.eb STMFD (hj)!,{hk}:LDR r0,ht:MOV r2,#0:MOV r5,#0
N�.hu LDR r3,[r0]:MOVS r4,r3,LSR #31:STRNE r2,ed:ADDNE r5,r5,#1:MOV r3,r3,LSL #1:MOV r3,r3,LSR #1:STR r3,[r0],#4:ADD r2,r2,#1:CMP r2,#256:BNE hu:MOV r0,r5:LDMFD (hj)!,{PC}:.hr DCD dv:.ht DCD dy:.ec DCD 0:.ed DCD 0:.ev STMFD (hj)!,{hk}:LDR r0,hv
P
�LDR r1,hw:MOV r2,#0:MOV r6,#0:.hx LDR r3,[r0,r2,ASL #2]:LDR r4,[r1,r2,ASL #2]:MOVS r5,r3,LSR #31:STRNE r3,ey:ADDNE r6,r6,#1:STRNE r2,ex:MOVNE r7,r0:MOVNE r3,#0:MOVS r5,r4,LSR #31:STRNE r4,ey:ADDNE r6,r6,#1:STRNE r2,ex:MOVNE r7,r1:MOVNE r4,#0
P��STR r3,[r0,r2,ASL #2]:STR r4,[r1,r2,ASL #2]:ADD r2,r2,#1:CMP r2,#256:BNE hx:STR r7,ew:MOV r0,r6:LDMFD (hj)!,{PC}:.hv DCD dv:.hw DCD dy:.ex DCD 0:.ew DCD 0:.ey DCD 0:.hy STMFD (hj)!,{hk}:MOV r0,#99:STR r0,hz:LDR r12,iU:LDR r11,iV:LDR r10,iW:LDR r9,iX
Q�LDR r8,iY:LDR r7,iZ:LDR r6,ia:LDR r5,ib:LDR r4,ic:MOV r3,#255:.id LDR r2,[r12],#4:MOVS r0,r2,LSR #31:LDREQ r0,ie:LDRNE r0,if:LDR r1,hz:STR r0,hz:CMP r0,r1:SWINE "Wimp_SetColour":BIC r2,r2,#&80000000:SUBS r2,r2,#1:BLT ig:MOV r1,r2,ASL r9:MUL r1,r8,r1
R��MOV r1,r1,ASR #8:MOV r0,r6,ASL r10:MUL r0,r8,r0:MOV r0,r0,ASR #8:BL ih:.ig LDR r2,[r11],#4:MOVS r0,r2,LSR #31:LDREQ r0,ie:LDRNE r0,if:LDR r1,hz:STR r0,hz:CMP r0,r1:SWINE "Wimp_SetColour":BIC r2,r2,#&80000000:SUBS r2,r2,#1:BLT ii:MOV r1,r2,ASL r10
S*�MUL r1,r8,r1:MOV r1,r1,ASR #8:MOV r0,r7,ASL r9:MUL r0,r8,r0:MOV r0,r0,ASR #8:BL ij:.ii SUBS r3,r3,#1:BGE id:LDMFD (hj)!,{PC}:.ih STMFD (hj)!,{r3,hk}:STR r1,ik:STR r0,il:MOV r0,#4:LDR r1,ib:LDR r2,ic:LDR r3,ik:ADD r2,r2,r3:SWI "OS_Plot":MOV r0,#5
S��LDR r1,ib:LDR r3,il:ADD r1,r1,r3:SWI "OS_Plot":LDMFD (hj)!,{r3,PC}:.ij STMFD (hj)!,{r3,hk}:STR r1,im:STR r0,in:MOV r0,#4:LDR r1,ib:LDR r2,im:ADD r1,r1,r2:LDR r2,ic:SWI "OS_Plot":MOV r0,#5:LDR r2,io:SWI "OS_Plot":LDMFD (hj)!,{r3,PC}:.hz DCD 0:.ie DCD 0
T�.if DCD 0:.ik DCD 0:.il DCD 0:.im DCD 0:.in DCD 0:.iU DCD dv:.iV DCD dy:.iW DCD 0:.iX DCD 0:.iY DCD 0:.iZ DCD 0:.ia DCD 0:.ib DCD 0:.ic DCD 0:.ip DCD 0:.io DCD 0:.fm STMFD (hj)!,{hk}:LDR r3,iq:LDR r4,gf:MOV r5,#0:.ir LDR r6,[r3,#16]: �S r6, r6, #1
V��BEQ is:SUB r4,r4,#1:LDR r7,[r3,r2]: ADD r2,r2,#4:LDR r8,[r3,r2]: SUB r2,r2,#4:SUBS r9,r7,r0 : MVNLT r9,r9 : ADDLT r9,r9,#1:SUBS r10,r8,r1 : MVNLT r10,r10 : ADDLT r10,r10,#1:CMP r9,#1 : BGT is:CMP r10,#1 : BGT is:MOV r0,r5:LDMFD (hj)!,{PC}
W&�.is ADD r3,r3,#24:ADD r5,r5,#1:CMP r4,#0:BNE ir:MVN r0,#0:LDMFD (hj)!,{PC}:.iq DCD fn:.fx STMFD (hj)!,{hk}:MOV r6,r2:LDR r2,it:LDR r3,gf:MOV r7,#1 : LDR r8,fw : ADD r8,r8,#1:MOV r9,#1 : LDR r10,fv:SUB r11,r8,#1:SUB r12,r10,#1:.iu LDR r4,[r2,#16]
X�� �S r5, r4, #1:SUBNE r3,r3,#1: �S r4, r4, #2:BEQ iv:LDR r4,[r2,r6]: ADD r6,r6,#4:LDR r5,[r2,r6]: SUB r6,r6,#4:ADD r4,r4,r0:ADD r5,r5,r1:CMP r7,#1 : CMPNE r7,r11 : SUBEQ r4,r4,r0:CMP r9,#1 : CMPNE r9,r10 : SUBEQ r5,r5,r1:STR r4,[r2,r6]: ADD r6,r6,#4
Y�STR r5,[r2,r6]: SUB r6,r6,#4:.iv ADD r7,r7,#1:CMP r7,r8 : MOVGE r7,#1 : ADDGE r9,r9,#1:ADD r2,r2,#24:CMP r3,#0:BNE iu:LDMFD (hj)!,{PC}:.it DCD fn:.fv DCD 0:.fw DCD 0:.gU STMFD (hj)!,{hk}:LDR r1,iw:LDR r2,gf:MOV r3,r0:MOV r0,#0:.ix LDR r4,[r1,#16]
ZF� � r5, r4, #1:CMP r5,#1:BNE iy:SUB r2,r2,#1: � r5, r4, #2:CMP r5,#2:BNE iy:ADD r0,r0,#1: � r5, r4, #15:ADD r5,r5,r3,LSL #4:STR r5,[r1,#16]:.iy ADD r1,r1,#24:CMP r2,#0:BGT ix:LDMFD (hj)!,{PC}:.iw DCD fn:.fi STMFD (hj)!,{hk}:MOV r0,#0:LDR r1,iz
[r�MOV r2,#32*1024:MOV r5,#0:.jU LDR r3,[r1,#16]: �S r4, r3, #2:SUBNE r3,r3,#2:STRNE r3,[r1,#16]:ADDNE r0,r0,#1:STRNE r5,fk:ADD r5,r5,#1:ADD r1,r1,#24:SUBS r2,r2,#24:BGT jU:LDMFD (hj)!,{PC}:.iz DCD fn:.fk DCD 0:.fe STMFD (hj)!,{hk}:MOV r5,r2:LDR r2,jV
\��MOV r4,#0:.jW LDR r3,[r2,#16]: �S r3, r3, #1:BEQ jX:ADD r2,r2,#24:ADD r4,r4,#1:B jW:.jX STR r0,[r2,#0]:STR r1,[r2,#4]:STR r0,[r2,#8]:STR r1,[r2,#12]:MOV r3,r5,LSL #4:ADD r3,r3,#1:STR r3,[r2,#16]:LDR r0,gf:ADD r0,r0,#1:STR r0,gf:MOV r0,r4
]z�LDMFD (hj)!,{PC}:.jV DCD fn:.jY STMFD (hj)!,{hk}:MOV r0,#11:SWI "Wimp_SetColour":LDR r12,jZ:LDR r1,gf:LDR r2,ja:LDR r3,jb:LDR r4,jc:LDR r5,jd:LDR r6,je:LDR r10,jf:LDR r11,jg:.jh LDR r7,[r12,#16]: �S r8, r7, #1:BEQ ji:.jj LDR r0,jk:LDR r8,[r12,#16]
^�� � r9, r8, #%11110000:MOV r9,r9,LSR #4: �S r8, r8, #%00000010:ADDNE r9,r9,#8: � r9, r9, #15:STR r9,jl:LDR r8,[r12,r0]: ADD r0,r0,#4:LDR r9,[r12,r0]:MOV r8,r8,ASL r3:MOV r9,r9,ASL r4:MUL r8,r2,r8:MUL r9,r2,r9:MOV r8,r8,ASR #8:MOV r9,r9,ASR #8:BL jm
_d�SUB r1,r1,#1:.ji ADD r12,r12,#24:CMP r1,#0:BNE jh:LDMFD (hj)!,{PC}:.jm STMFD (hj)!,{r0-r12,hk}:add r8,r8,r10:add r9,r9,r11:.jn MOV r0,r8,LSL #16:ADD r0,r0,r9:STR r0,[r12,#20]:sub r8,r8,r10:sub r9,r9,r11:.jo LDR r0,jl:ADR r1,jp:ADD r1,r1,r0,ASL #1
`,�LDRB r0,[r1,#0]:SWI "Wimp_SetColour":MOV r0,#4:SUB r1,r8,#6:SUB r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":MOV r0,#96+5:ADD r1,r8,#6:ADD r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":.jq LDR r0,jl:ADR r1,jp:ADD r1,r1,r0,ASL #1
`��LDRB r0,[r1,#1]:SWI "Wimp_SetColour":MOV r0,#4:SUB r1,r8,#6:SUB r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":MOV r0,#5:ADD r1,r8,#6:SUB r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":MOV r0,#5:ADD r1,r8,#6:ADD r2,r9,#6
ab�add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":MOV r0,#5:SUB r1,r8,#6:ADD r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":MOV r0,#5:SUB r1,r8,#6:SUB r2,r9,#6:add r1,r1,r10:add r2,r2,r11:SWI "OS_Plot":LDMFD (hj)!,{r0-r12,PC}:.jZ DCD fn:.ja DCD 0
b�.jb DCD 0:.jc DCD 0:.jd DCD 0:.je DCD 0:.jf DCD 0:.jg DCD 0:.jk DCD 0:.jl DCD 0:.jp DCB 0 : DCB 5:DCB 1 : DCB 6:DCB 2 : DCB 5:DCB 3 : DCB 6:DCB 4 : DCB 1:DCB 5 : DCB 2:DCB 6 : DCB 1:DCB 7 : DCB 2:DCB 8 : DCB 15:DCB 9 : DCB 11:DCB 10 : DCB 0
b�DCB 11 : DCB 14:DCB 12 : DCB 4:DCB 13 : DCB 10:DCB 14 : DCB 11:DCB 15 : DCB 8:.jr STMFD (hj)!,{hk}:LDR r0,js:SWI "Wimp_SetColour":LDR r12,jt:LDR r11,ju:LDR r10,jv:LDR r9,jw:LDR r6,jx:BL jy:LDR r12,jt:BL jz:LDMFD (hj)!,{PC}:.jy STMFD (hj)!,{hk}
c�MOV r7,r10:.kU SUB r8,r11,#1:.kV MOV r0,#4:LDR r1,[r12,#20]: MOV r1,r1,LSR #16:LDR r2,[r12,#20]: � r2,r2,r9:SWI "OS_Plot":ADD r12,r12,#24:MOV r0,#5:LDR r1,[r12,#20]: MOV r1,r1,LSR #16:LDR r2,[r12,#20]: � r2,r2,r9:SWI "OS_Plot":SUBS r8,r8,#1:BNE kV
dn�ADD r12,r12,#24:SUBS r7,r7,#1:BNE kU:LDMFD (hj)!,{PC}:.jz STMFD (hj)!,{hk}:MOV r7,r11:.kW SUB r8,r10,#1:MOV r5,#0:.kX MOV r0,#4:LDR r1,[r12,#20]: MOV r1,r1,LSR #16:LDR r2,[r12,#20]: � r2,r2,r9:SWI "OS_Plot":ADD r12,r12,r6:ADD r5,r5,r6:MOV r0,#5
e�LDR r1,[r12,#20]: MOV r1,r1,LSR #16:LDR r2,[r12,#20]: � r2,r2,r9:SWI "OS_Plot":SUBS r8,r8,#1:BNE kX:SUB r12,r12,r5:ADD r12,r12,#24:SUBS r7,r7,#1:BNE kW:LDMFD (hj)!,{PC}:.jt DCD fn:.ju DCD 0:.jv DCD 0:.jw DCD &0000FFFF:.jx DCD 0:.js DCD 0
e��.fd STMFD (hj)!,{hk}:LDR r0,kY:MOV r1,#32 *1024:MOV r2,#0:.kZ STR r2,[r0,#16]:ADD r0,r0,#24:SUBS r1,r1,#24:BGT kZ:MOV r0,#0:STR r0,gf:LDMFD (hj)!,{PC}:.kY DCD fn:.ka STMFD (hj)!,{hk}:.kb CMP r2,#0:LDMEQFD (hj)!,{PC}:CMP r2,#4:BLT kc:.kd LDR r3,[r0],#4
gH�STR r3,[r1],#4:SUB r2,r2,#4:B kb:.kc LDRB r3,[r0],#1:STRB r3,[r1],#1:SUB r2,r2,#1:B kb:.gf DCD 0:.ke DCD (32*1024)/24:.fn �ction_ReserveMemory(32*1024):]:�hn:�
h�%ݤction_ReserveMemory(kf):�hn=0 �
h�
P%+=kf
h�#�:�i=0 �kf-1�4:P%!i=0:�i:P%+=kf
i�:[OPT hn : ALIGN :]:=hn
i�5��Vc:ș&51 �kg:kh=�ction_ReadSlotSize:ki=0:kj=�:�
j@oݤction_AllocateMemory(kk):�kl,km:�kn,ko,kp:�kq,kr:kl=(kk �kg)+1:km=kl* kg:�ction_ReadSizeOfFreePool>=kk �
j�Pkn=�ction_ReadSlotSize:ko=kn+kk:kp=�ction_SetSlotSize(ko):ki+=kk:kj+=kk:kr=�
j��:kr= ��
j�	�:=kr
j�;ݤction_AlignToPageSize(kk):kl=(kk �kg)+1:km=kl* kg:=km
k:(��ks:kn=�ction_ReadSlotSize:�kn>kh �
kX"Yj=�ction_SetSlotSize(kh):ki=0
kl�:�
k�0��Vg(hn):hj=13:hk=14:hl=15:�hn=0 ��kt 8*1024
l�P%=kt:[OPT hn:.ku DCD ax:.kv STMFD (hj)!,{r12,hk}:LDR r12,ku:LDR r12,[r12]:CMP r12,#1 : BEQ kw:CMP r12,#2 : BEQ kx:CMP r12,#3 : BEQ kx:CMP r12,#4 : BEQ ky:CMP r12,#5 : BEQ kz:.kw BL lU : LDMFD (hj)!,{r12,PC}:.kx BL lV : LDMFD (hj)!,{r12,PC}
l��.ky BL lW : LDMFD (hj)!,{r12,PC}:.kz BL lX : LDMFD (hj)!,{r12,PC}:.lU STMFD (hj)!,{r1-r4,hk}:.lY ADD r3,r3,#7:MOV r3,r3,LSR #3:MOV r3,r3,LSL #2:.lZ MUL r4,r3,r1:ADD r2,r2,r4:.la ADD r2,r2,r0,ASR #1:LDRB r4,[r2]:.lb �S r0, r0, #1
mj� �EQ r0, r4, #%00001111: �NE r0, r4, #%11110000:MOVNE r0,r0,LSR #4:LDMFD (hj)!,{r1-r4,PC}:.lV STMFD (hj)!,{r1-r4,hk}:LDMFD (hj)!,{r1-r4,PC}:.lX STMFD (hj)!,{r1-r4,hk}:LDMFD (hj)!,{r1-r4,PC}:.lW STMFD (hj)!,{r1-r4,hk}:LDMFD (hj)!,{r1-r4,PC}
nP�.lc STMFD (hj)!,{r12,hk}:LDR r12,ku:LDR r12,[r12]:CMP r12,#1 : BEQ ld:CMP r12,#2 : BEQ le:CMP r12,#3 : BEQ le:CMP r12,#4 : BEQ lf:CMP r12,#5 : BEQ lg:.ld BL lh : LDMFD (hj)!,{r12,PC}:.le BL li : LDMFD (hj)!,{r12,PC}:.lf BL lj : LDMFD (hj)!,{r12,PC}
n��.lg BL lk : LDMFD (hj)!,{r12,PC}:.lh STMFD (hj)!,{r0-r5,hk}:.ll ADD r3,r3,#7:MOV r3,r3,LSR #3:MOV r3,r3,LSL #2:.lm MUL r5,r3,r1:ADD r2,r2,r5:.ln ADD r2,r2,r0,ASR #1:LDRB r5,[r2]:.lo �S r0, r0, #1: �NE r5, r5, #%00001111:ADDNE r5,r5,r4,LSL #4
oJ� �EQ r5, r5, #%11110000:ADDEQ r5,r5,r4:STRB r5,[r2]:LDMFD (hj)!,{r0-r5,PC}:.li STMFD (hj)!,{r0-r4,hk}:LDMFD (hj)!,{r0-r4,PC}:.lk STMFD (hj)!,{r0-r4,hk}:LDMFD (hj)!,{r0-r4,PC}:.lj STMFD (hj)!,{r0-r6,hk}:LDMFD (hj)!,{r0-r6,PC}:.lp DCD &0000FFFF
pN�.lq STMFD (hj)!,{hk}:LDR r12,ku:LDR r12,[r12]:CMP r12,#1 : BEQ lr:CMP r12,#2 : BEQ ls:CMP r12,#3 : BEQ lt:CMP r12,#4 : BEQ lu:CMP r12,#5 : BEQ lv:.lr BL lw : LDMFD (hj)!,{PC}:.ls BL lx : LDMFD (hj)!,{PC}:.lt BL ly : LDMFD (hj)!,{PC}
p��.lv BL lz : LDMFD (hj)!,{PC}:.lu BL mU : LDMFD (hj)!,{PC}:.lw STMFD (hj)!,{hk}:BL mV:LDMFD (hj)!,{PC}:.ly STMFD (hj)!,{hk}:LDMFD (hj)!,{PC}:.lx STMFD (hj)!,{r1-r12,hk}:LDMFD (hj)!,{r1-r12,PC}:.mW �ction_Table_For_8bpp:.lz STMFD (hj)!,{r1-r12,hk}
q��LDMFD (hj)!,{r1-r12,PC}:.mU STMFD (hj)!,{r1-r12,hk}:LDMFD (hj)!,{r1-r12,PC}:.mV STMFD (hj)!,{r1-r3,hk}:LDR r2,mX:LDR r3,mY:SUB r3,r3,r2:MUL r3,r0,r3:MUL r2,r1,r2:ADD r0,r2,r3:MOV r0,r0,ASR #8:LDMFD (hj)!,{r1-r3,PC}:.mX DCD 0:.mY DCD (100/100)*256:]:�
r�ݤction_Table_For_8bpp:=hn
s�A��cX(Zz$):ș&400CF,,Uj:ci=Uj!12:bm=Uj!16:dw$="UNKNOWN":Ȏci �
t�Ub:�bm=Vh �
t� �Vj �
tdw$="SOURCE"
t"�:� �Vn �dw$="DESTINATION"
t6�
t@�
tJ�Wj:�bm=0 �dw$="SOURCE"
tT�bm=2 �dw$="DESTINATION"
t^�Xw:dw$="SOURCE"
th�Xz:dw$="DESTINATION"
tr�Yn:dw$="BACKGROUND"
t|�:�dw$="UNKNOWN" �
t�NYi$=�ction_TagToString("err02"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
t�
�:Ȏdw$ �
t��"SOURCE":�gm(Zz$)
t��"DESTINATION":�gn(Zz$)
t��"BACKGROUND":�go(Zz$)
t��
t��:�
u��Zh:�Vj ��mZ(Vk,Ut,Vm)
u�Vn ��mZ(Vo,Uu,Vu)
u&�Vr ��mZ(Vs,Uv,Vq)
u0�
uN��mZ(ma,mb,mc):� �mc �
u��md$=�ction_NameOfNthSprite(ma,1):me=�ction_ModeOfSprite(ma,md$, ��):mf=�ction_SpriteHasPalette(ma,md$):mg=�ction_PointerToSpriteData(ma,md$):ș&35,me,3 �,,mh:mi=mg-mf:mj=(mi/8)-1:�mf<>-1 �
v8mk=Uw:�eW=0 �mj:!(mk+(eW*4) ) = !( mf + (eW*8) ):�eW
v*�:�mh=63 �
v>mk=0
vHE�:mk=Uw:ș&400E5,,mk:�i=0 �15:mk!(i*4) = (mk!(i*4) �&FFFFFF00):�i
v��
v��:�mj<>255 �
v�ș&40740,me,mk,-1,-1,mb
v�;�:�eW=0 �mj:A%=!(mf+eW*8 ):ș&40744,A% �ml:mb?eW=ml:�eW
v��
v�a�:md$=�ction_NameOfNthSprite(ma,1):me=�ction_ModeOfSprite(ma,md$, ��):ș&40740,me,Uw,-1,-1,mb
wj�:�
w�0��Zi:ș&35,-1,4 �,,cz:ș&35,-1,5 �,,dV:�Vj �
w�:ș&35,mm,4 �,,mn:ș&35,mm,5 �,,mo:dU=cz:dU=mn:dW=mo/dV
x�:�Vn �
x:ș&35,mp,4 �,,mn:ș&35,mp,5 �,,mo:dX=cz:dX=mn:dY=mo/dV
xP�:�Vr �
xn:ș&35,mq,4 �,,mn:ș&35,mq,5 �,,mo:dZ=cz:dZ=mn:da=mo/dV
x��:�
x���Zr:�Vj �
x�teo=Zl+12:ep=Zn-190:aa=142:ab=90:mr=Uj:mr!0=aa/cz:mr!4=ab/dV:mr!8=!fV:mr!12=!fX:ș&2E,256+52,Vk,ms$,eo,ep,8,mr,Ut
y"�:�Vn �
y6xeo=Zl+12+352:ep=Zn-190:aa=142:ab=90:mr=Uj:mr!0=aa/cz:mr!4=ab/dV:mr!8=!mt:mr!12=!mu:ș&2E,256+52,Vo,mv$,eo,ep,8,mr,Uu
yr�:�
y����Zs:eo=Zl-Zp+((Vv%<<(dU))* (bW/bX) ):ep=Zn-Zq+((Vw%<<(dW*dV)) * (bW/bX) ):mr=Uj:mr!0=(!fV* bW) * dU :mr!4=(!fX* bW) * dW:mr!8=(!fV* bX) :mr!12=(!fX* bX):ș&2E,256+52,Vk,ms$,eo,ep,8,mr,Ut:� �WX �
y��mw(Vk,bW,bX,!fV,!fX,mm)
y��:�mx(Vk,bW,bX,!fV,!fX,mm)
z�:�
z0���Zt:eo=Zl-Zp+((Vx%<<(dX))* (bd/be) ):ep=Zn-Zq+((Vy%<<(dY*dV)) * (bd/be) ):mr=Uj:mr!0=(!mt* bd) * dX :mr!4=(!mu* bd) * dY:mr!8=(!mt* be) :mr!12=(!mu* be):ș&2E,256+52,Vo,mv$,eo,ep,8,mr,Uu:� �WX �
z��mw(Vo,bd,be,!mt,!mu,mp)
z��:�mx(Vo,bd,be,!mt,!mu,mp)
z��:�
z���Wh(ZZ$,ZX,my):ȎZZ$ �
z�/�"SOURCE":bW=ZX:bX=my:�mz(�, ��):�Yr(Uj,Xw)
{-�"DEST":bd=ZX:be=my:�mz( ��,�):�Yr(Uj,Xz)
{*�:�
{R��mz(nU,nV):�Vj �nU �
{funW=bW/bX:ș&35,mm,4 �,,nX:ș&35,mm,5 �,,nY:�nZ(Uj,Xw,0,(!fV*nW)<<nX,0,(!fX*nW)<<nY):�ction_WindowIsOpen(Uj,Xw) �
{�1!Uj=Xw:ș&400CB,,Uj:ș&400C6,,Uj:ș&400C5,,Uj
{��
{��:�Vn �nV �
{�	�Vj �
{�md$=ms$:aa=!fV:ab=!fX:na=mm
{�!�:md$=mv$:aa=!mt:ab=!mu:na=mp
|u�:nb=bd/be:ș&35,na,4 �,,nX:ș&35,na,5 �,,nY:�nZ(Uj,Xz,0,(aa*nb)<<nX,0,(ab*nb)<<nY):�ction_WindowIsOpen(Uj,Xz) �
|V1!Uj=Xz:ș&400CB,,Uj:ș&400C6,,Uj:ș&400C5,,Uj
|~�
|��:�
|�d��YY(nc,nd):ne=��ction_ReadIconText(Uj,YX,2):nf=��ction_ReadIconText(Uj,YX,4):ne+=nc:�ne<1 �ne=1
|��ne>999 �ne=999
|�nf+=nd:�nf<1 �nf=1
}�nf>999 �nf=999
}
,�Wi(Uj,YX,2,�ne):�Wi(Uj,YX,4,�nf):ȎVZ �
}(�5:bW=ne:bX=nf
}<�6:bd=ne:be=nf
}P�:ȎVZ �
}d�5:�mz(�, ��)
}n�6:�mz( ��,�)
}x&�:�ction_WindowWithCaret(Uj)=YX �
}��Zb
}��:�
}�1��Wl:�i=0 �255:dv!(i*4) = 0:dy!(i*4) = 0:�i:�
~���mw(ng,nh,ni,aa,ab,na):eo=Zl-Zp:ep=Zn-Zq:ș&35,-1,4 �,,nj:ș&35,-1,5 �,,en:ș&35,na,4 �,,mn:ș&35,na,5 �,,mo:en=en-(en-mo):nj=cz* mn:Ȏng �
~r�Vk:en=dW* dV
~|�Vo:en=dY* dV
~���:ș&400E6,14:!iW=nj:!iX=en:!iZ=ab:!ia=aa:!ib=eo:!ic=ep:!ip=Zm:!io=Zn:!iY=(nh/ni)* 256:!ie=?(jp+(nk*2)+0):!if=?(jp+(nk*2)+1):�hy:�
_��mx(ng,nh,ni,aa,ab,na):ș&35,na,4 �,,mn:ș&35,na,5 �,,mo:eo=Zl-Zp:ep=Zn-Zq:nj=cz*mn:Ȏng �
N�Vk:en=dW* dV:!jk=0
b�Vo:en=dY* dV:!jk=8
vl�:!ja=(nh/ni)* 256:!jb=nj:!jc=en:!jd=0:!je=0:!jf=eo:!jg=ep:�jY:!ju=fa%:!jv=fY%:!jx=fa%* 24 :!js=nk:�jr:�
�T��nl:nm=0:�i=1 �nn:no=�ction_Insert_HorV(dv,nm):nm+=((!fX)/(nn)):�nm>!fX �nm=!fX
�*R�i:np=0:�i=1 �nq:no=�ction_Insert_HorV(dy,np):np+=((!fV)/(nq)):�np>!fV �np=!fV
�f�i:�bs( ��):�
����Zu:�Vr �
���eo=Zl:ep=Zo:aa=Zm-Zl:ab=Zn-Zo:mr=Uj:mr!0=(nr/2)/(cz):mr!4=(ns/2)/(dV):mr!8=!gc:mr!12=!gb:ș&2E,256+52,Vs,nt$,eo,ep,8,mr,Uv:�nu
���:ș&400E6,1+128:�
��:�
�8��gm(Zz$):�Vj �
�LFnv=�ction_WindowIsOpen(Uj,Xw):�bx("Source"):�nv ��Ww(Uh,Uj,Xw, ��)
�jf�:Vk=kj:nw=�ction_AlignToPageSize(�ction_SizeOfFile(Zz$)+128):kr=�ction_AllocateMemory(nw):� �kr �
��NYi$=�ction_TagToString("err03"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
����:Vl=nw:Vj=�:Xv$=Zz$:Xu=�:�Xh(Vk,Vl):�Xi(Vk,Zz$):ms$=�ction_NameOfNthSprite(Vk,1):Vm=�ction_SpriteIsOfNewFormat(Vk,ms$):!fV=�ction_WidthOfSprite(Vk,ms$,Vm):!fX=�ction_HeightOfSprite(Vk,ms$,Vm):mm=�ction_ModeOfSprite(Vk,ms$,Vm)
�(�as$=�ction_TagToString("srce"):�Wi(Uj,Wj,1,as$+�!fV+"x"+�!fX):�Wk(Uj,Wj,1,7):�Zh:�Zi:�Yr(Uj,Wj):�Yr(Uj,Yn):�mz(�,�):� �Vn �Vo=Vk:dY=dW
��(Yj=1:�ction_SpriteHasMask(Vk,ms$) �
��LYi$=�ction_TagToString("err18"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�)
��
�:�Yj=1 �
���nx(Vk,ms$):�ny � �WX ��nl
��-� ��ction_WindowIsOpen(Uj,Wj) ��Xs(Uj,Wj)
���:�bx("Source")
���
���:�
�"��gn(Zz$):�Vn �
�6Dnv=�ction_WindowIsOpen(Uj,Xz):�bx("Dest"):�nv ��Ww(Uh,Uj,Xz, ��)
�Tf�:Vo=kj:nw=�ction_AlignToPageSize(�ction_SizeOfFile(Zz$)+128):kr=�ction_AllocateMemory(nw):� �kr �
��NYi$=�ction_TagToString("err03"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
����:Vp=nw:Vn=�:Xy$=Zz$:Xx=�:�Xh(Vo,Vp):�Xi(Vo,Zz$):mv$=�ction_NameOfNthSprite(Vo,1):Vu=�ction_SpriteIsOfNewFormat(Vo,mv$):!mt=�ction_WidthOfSprite(Vo,mv$,Vu):!mu=�ction_HeightOfSprite(Vo,mv$,Vu):mp=�ction_ModeOfSprite(Vo,mv$,Vu)
��as$=�ction_TagToString("dest"):�Wi(Uj,Wj,3,as$+�!mt+"x"+�!mu):�Wk(Uj,Wj,3,7):�Zh:�Zi:�Yr(Uj,Wj):�mz( ��,�):� �Vj �Vk=Vo:dW=dY
�b(Yj=1:�ction_SpriteHasMask(Vo,mv$) �
�vLYi$=�ction_TagToString("err18"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�)
��
�:�Yj=1 �
��9�nx(Vo,mv$):� ��ction_WindowIsOpen(Uj,Wj) ��Xs(Uj,Wj)
���:�bx("Dest")
���
���:�
����go(Zz$):�Vr �
�Dnv=�ction_WindowIsOpen(Uj,Yn):�bx("Back"):�nv ��Ww(Uh,Uj,Yn, ��)
�*f�:Vs=kj:nw=�ction_AlignToPageSize(�ction_SizeOfFile(Zz$)+128):kr=�ction_AllocateMemory(nw):� �kr �
�\NYi$=�ction_TagToString("err03"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
�p��:Vt=nw:Vr=�:Yp$=Zz$:Yo=�:�Xh(Vs,Vt):�Xi(Vs,Zz$):nt$=�ction_NameOfNthSprite(Vs,1):Vq=�ction_SpriteIsOfNewFormat(Vs,nt$):!gc=�ction_WidthOfSprite(Vs,nt$,Vq):!gb=�ction_HeightOfSprite(Vs,nt$,Vq):mq=�ction_ModeOfSprite(Vs,nt$,Vq):�!gc<!fV �!gb<!fX �
��ZYi$=�ction_TagToString("err19"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�):�bx("Back")
�a�:�Zh:�Zi:nr=((260/!gb)* !gc ) ::ns=(260):�nZ(Uj,Yn,0,nr,-ns,0):�ction_WindowIsOpen(Uj,Yn) �
�V�nz(Uj,Yn,nr,ns):�Yr(Uj,Yn)
�j*�:Yj=1:�ction_SpriteHasMask(Vs,nt$) �
��LYi$=�ction_TagToString("err18"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$,�,�)
��
�:�Yj=1 �
���nx(Vs,nt$)
���:�bx("Back")
���
���
���:�
�
��nu:�Vj �
��oU=eo+((Vz%/!gc)* aa ):oV=ep+((WU%/!gb)* ab ):oW=(!fV/!gc)* aa:oX=(!fX/!gb)* ab:ș&400E6,0:ȓȐoU,oV,oW,oX:ș&400E6,7:ȓoU,oV,oW,oX
�n�:�
��]��Yy(Xk,Xl):�dh(Uj,Yn,Xk,Xl):oY%=(dj/nr)* !gc:oZ%=((dl+ns)/ns)* !gb:�oY%<>Vz% �oZ%<>WU% �
��.Vz%=oY%:!db=Vz%:WU%=oZ%:!dc=WU%:�Yr(Uj,Yn)
���:�
���bx(oa$):Ȏoa$ �
�"L�"Source":ob=Vo:oc=Vp:od=Vn:oe=Vs:of=Vt:og=Vr:br=Vl:ng=Vk:�Wk(Uj,Wj,1,3)
�JJ�"Dest":ob=Vk:oc=Vl:od=Vj:oe=Vs:of=Vt:og=Vr:br=Vp:ng=Vo:�Wk(Uj,Wj,3,3)
�r;�"Back":ob=Vk:oc=Vl:od=Vj:oe=Vo:of=Vp:og=Vn:br=Vt:ng=Vs
���:oh=ob>oe:�oh �
��Ȕob,oe:Ȕoc,of:Ȕod,og
���:�od �ob>ng �
��#A%=ob:B%=ob-br:C%=oc:�ho:ob-=br
���:�og �oe>ng �
�#A%=oe:B%=oe-br:C%=of:�ho:oe-=br
�0�:�oh �
�DȔob,oe:Ȕoc,of:Ȕod,og
�b+�:kr=�ction_AllocateMemory(-br):Ȏoa$ �
��I�"Source":Vo=ob:Vs=oe:Vj= ��:�Yr(Uj,Wj):�ction_WindowIsOpen(Uj,Xw) �
���XU(Uj,Xw)
��c�:as$=�ction_TagToString("srce"):oi$=�ction_TagToString("none"):�Wi(Uj,Wj,1,as$+oi$):�Yr(Uj,Yn)
��G�"Dest":Vk=ob:Vs=oe:Vn= ��:�Yr(Uj,Wj):�ction_WindowIsOpen(Uj,Xz) �
��XU(Uj,Xz)
�X�:as$=�ction_TagToString("dest"):oi$=�ction_TagToString("none"):�Wi(Uj,Wj,3,as$+oi$)
�>T�"Back":Vk=ob:Vo=oe:Vr= ��:Vz%=0:!db=0:WU%=0:!dc=0:�ction_WindowIsOpen(Uj,Yn) �
�p�Yr(Uj,Yn)
�z�
���:�
����Wm:�:���oj:�
�
^gd=�"<Morph$Dir>.Prefs":�#gd,ny:�#gd,nq,nn:�#gd,nk:�#gd,Wr:�#gd,ok,ol,om:�#gd:�Yg:�Yd:��:�
��j��oj:�#gd:�on:�Yg:�Yd:Yi$=�ction_TagToString("err09"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�):�Yf:�
����Yf:�:���oo:�
��gd=�"<Morph$Dir>.Prefs":�Yh:�#gd,ny:�#gd,nq,nn:�#gd,nk:�#gd,Wr:�#gd,ok,ol,om:�#gd:�"Stamp   <Morph$Dir>.Prefs     ":�"SetType <Morph$Dir>.Prefs Data":��:�
��Z��oo:�#gd:Yi$=�ction_TagToString("err10"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�):�
��9��on:ny= ��:nq=10:nn=10:nk=14:Wr= ��:ok=�:ol=1:om=1:�
�b���Yg:�gx(Uj,Wz,4,ny):�Wi(Uj,Wz,11,�nq):�Wi(Uj,Wz,8,�nn):�cU(Uj,Wz,19,nk):�gx(Uj,Wz,12,Wr):�Wi(Uj,Wz,13,�ol):�Wi(Uj,Wz,14,�om):�ok �
���Ye("All")
���:�Ye("From")
���:�
����Yh:ny= ��ction_IconIsToggled(Uj,Wz,4):nq=��ction_ReadIconText(Uj,Wz,11):nn=��ction_ReadIconText(Uj,Wz,8):nk=�ction_ColourOfIcon(Uj,Wz,19):Wr= ��ction_IconIsToggled(Uj,Wz,12):ok= ��ction_IconIsToggled(Uj,Wz,3):ol=��ction_ReadIconText(Uj,Wz,13)
�RQom=��ction_ReadIconText(Uj,Wz,14):�Yg:�ction_WindowIsOpen(Uj,Xw) ��Yr(Uj,Xw)
�p+�ction_WindowIsOpen(Uj,Xz) ��Yr(Uj,Xz)
�z�
��m��Yd:ek=�ction_IconIsToggled(Uj,Wz,4):�gy(Uj,Wz,11,ek):�gy(Uj,Wz,18,ek):�gy(Uj,Wz,8,ek):�gy(Uj,Wz,9,ek):�
��,ݤction_WidthOfSprite(op,oq$,mc):� �mc �
��-ș&2E,256+40,op,oq$ �,,,cd,ce,cf,or:os=cd
��v�:ot=�ction_PointerToSpriteControlBlock(op,oq$):os=ot!(4*4) + 1:ou=ot!(10*4) ::ov=((ou>>27) �%11111):�ov=5 �os+=os
�,	�:=os
�T-ݤction_HeightOfSprite(op,oq$,mc):� �mc �
�h-ș&2E,256+40,op,oq$ �,,,cd,ce,cf,or:ow=ce
�|C�:ot=�ction_PointerToSpriteControlBlock(op,oq$):ow=ot!(5*4) + 1
��	�:=ow
��+ݤction_ModeOfSprite(op,oq$,mc):� �mc �
��0ș&2002E,256+40,op,oq$ �,,,cd,ce,cf,or:ou=or
��B�:ot=�ction_PointerToSpriteControlBlock(op,oq$):ou=ot!(10*4) :
�	�:=ou
�0oݤction_SpriteHasMask(op,oq$):ot=�ction_PointerToSpriteControlBlock(op,oq$):ox=ot!(8*4):oy=ot!(9*4):=oy<>ox
�vfݤction_SpriteHasPalette(op,oq$):oz=�ction_PointerToSpriteControlBlock(op,oq$):pU=oz!32:�pU=11*4 �
��	pV=-1
���:pV=oz+11*4
��	�:=pV
��+ݤction_NumberOfSpritesInArea(op):=op!4
�sݤction_NameOfNthSprite(op,n):pW=op+op!8:pX=1:ȕpX<n:pY=pW!0:pW+=pY:pX+=1:�:=��ction_ExtractString(pW+4),12)+�0
��]ݤction_PointerToSpriteData(op,oq$):ș&2E,256+24,op,oq$ �,,cc:pZ=cc:pU=pZ!32:pa=pZ+pU:=pa
��[ݤction_PointerToMaskData(op,oq$):ș&2E,256+24,op,oq$ �,,cc:pZ=cc:pb=pZ!36:pc=pZ+pb:=pc
�.Sݤction_PointerToSpriteControlBlock(op,oq$):ș&2E,256+24,op,oq$ �,,cc:pd=cc:=pd
�j&��pe(op,Zz$):ș&2E,256+12,op,Zz$:�
��&��Xi(op,Zz$):ș&2E,256+10,op,Zz$:�
��0��Xh(op,pf):op!0=pf:op!8=16:ș&2E,256+9,op:�
�bݤction_ReadSpritePixel(op,oq$,x,y):�pg,ph:ș&2E,256+41,op,oq$,x,y �,,,,,cf,or:pg=cf:ph=or:=pg
�d:��pi(op,oq$,x,y,pg,ph):ș&2E,256+42,op,oq$,x,y,pg,ph:�
��.��pj(op,oq$,pk$):ș&2E,256+26,op,oq$,pk$:�
��Gݤction_SpritesType:pl=1:ș&6,161,133 �,,pm:pm=(pm>>2) �3:�(pm=2) �
�pl=3
�0�:ș&35,-1,4 �,,nX:ș&35,-1,5 �,,nY:�nX=nY �
�@pl=2
�J�
�T	�:=pl
�|iݤction_SpriteIsOfNewFormat(op,oq$):ot=�ction_PointerToSpriteControlBlock(op,oq$):na=ot!(10*4):=na>40
��&��nx(op,oq$):ș&2E,256+30,op,oq$:�
��?��pn(op,oq$,aa,ab,na,po):ș&2E,256+15,op,oq$,�po,aa,ab,na:�
��a��aY(Zz$):!pp=!bt:!pq=(!fX-!bu)-!fX:!pr=!by:!ps=(!mu-!bz)-!mu:!pt=!db:!pu=(!gb-!dc)-!fX:�Vr �
��pv=Vs:pw=Vt:!px=!gc:!py=!gb
�-�:pv=Vk:pw=Vl:!px=!fV:!py=!fX:!pt=0:!pu=0
�\8�:Wc$=Zz$:pz=kj:kr=�ction_AllocateMemory(pw):� �kr �
��NYi$=�ction_TagToString("err08"):Yj=�ction_ReportError(Uj,99,Uc$,Yi$, ��,�)
����:�qU:qV$=�ction_NameOfNthSprite(Vk,1):qW$=�ction_NameOfNthSprite(pz,1):qX$=�ction_NameOfNthSprite(Vo,1):!qY=�ction_PointerToSpriteData(Vk,qV$):!qZ=�ction_PointerToSpriteData(pz,qW$):!qa=�ction_PointerToSpriteData(Vo,qX$)
�B+!qb=��ction_ReadIconText(Uj,Wj,6):�ok �
�Vol=2:om=!qb-1
�j�:�ol<1 �ol=1
�~�ol>!qb �ol=!qb
���om<1 �om=1
���om>!qb �om=!qb
��-�Yg:qc=(om-ol)+1:�"CDir "+Zz$:�qd:�qc>0 �
��� �Wr �
���qe
��	�:�qf
�
�
��
�(�:�
�Z��qe:�qc>0 �
�nBș&406C0:�qf:�:qg%=((!qh-ol+1)/(om-ol+1))* 100:�qg%>99 �qg%=99
��#ș&406C4,qg%:�Wt:� �WY:ș&406C1
���:�
����qf:�Wi(Uj,Xt,3,""):WZ=�ction_SetIconWidth(Uj,Xt,WZ,1):�XU(Uj,Yq):�XU(Uj,Yt):�XU(Uj,Wj):�XU(Uj,Yl):�XU(Uj,Xw):�XU(Uj,Xz):�XU(Uj,Yn):�Xs(Uj,Xt):!qh=ol:�!qh=1 �!qh=2
�@qi=-1:qj=0:WY=�:�qk:�ql:�
����Wt:� �qm �
���qn(Wr)
��
�:�qk:�qo
���:�
����qk:qi+=1:�qi>fa%-2 �
�qi=0:qj+=1:�qj>fY%-2 �
�:G�pe(pz,Wc$+".image"+�"000"+�!qh,3)):qj=0:!qh+=1:�ql:�!qh>om �WY= ��
�l�
�v�:�WY �
���qp(qi,qj):�qn(Wr)
���:�XU(Uj,Xt):�qq:�Xg
���:�
����ql:qr$=�ction_TagToString("frme"):ZX$=" "+�(!qh-ol+1)+" ":qs$=�ction_TagToString("of"):ZY$=" "+�(om+1-ol):�Wi(Uj,Xt,3,qr$+ZX$+qs$+ZY$):�
�\b��qo:qt=(fa%-1)* (fY%-1):qu=1+qi+qj*(fa%-1):qv=qu/qt:WZ=�ction_SetIconWidth(Uj,Xt,WZ,464*qv):�
�����qp(qw,qx):�qy(qw,qx,�):!qz=rU%:!rV=rW%:!rX=rY%:!rZ=ra%:!rb=rc%:!rd=re%:!rf=rg%:!rh=ri%:�qy(qw,qx,��):!rj=rU%:!rk=rW%:!rl=rY%:!rm=ra%:!rn=rc%:!ro=re%:!rp=rg%:!rq=ri%:rr=!qh-1:az=!qb:ha=�ction_GetPercentage((!qh-1)/(!qb-1)*100,Uz)
�t�!rs=!qz+((!rj-!qz)* ha ):!rt=!rX+((!rl-!rX)* ha ):!ru=!rb+((!rn-!rb)* ha ):!rv=!rf+((!rp-!rf)* ha ):!rw=!rV+((!rk-!rV)* ha ):!rx=!rZ+((!rm-!rZ)* ha ):!ry=!rd+((!ro-!rd)* ha ):!rz=!rh+((!rq-!rh)* ha ):!sU=�ction_Lowest_Quad_Y
��<!mX=�ction_GetPercentage(((!qh-1)/(!qb-1))*100,Ux)*256:�
����qy(x,y,qV):sV=fa%* 24:sW=fn+((y*sV) + ( x *24) ):sX=fn+((y*sV) + ((x+1)*24) ):sY=fn+(((y+1)*sV) + ( x *24) ):sZ=fn+(((y+1)*sV) + ((x+1)*24) ):fo=�((�qV)*8):rU%=sW!(fo+0):rW%=sW!(fo+4):rY%=sX!(fo+0):ra%=sX!(fo+4):rg%=sY!(fo+0):ri%=sY!(fo+4)
�x!rc%=sZ!(fo+0):re%=sZ!(fo+4):�
��0ݤction_Lowest_Quad_Y:sa=!rw:�!rx<sa �sa=!rx
���!ry<sa �sa=!ry
���!rz<sa �sa=!rz
��=sa
��1ݤction_Highest_Quad_Y:sb=!rw:�!rx>sb �sb=!rx
��!ry>sb �sb=!ry
��!rz>sb �sb=!rz
�"=sb
�@G��qn(sc):!sd=�ction_Highest_Quad_Y:!se=�ction_Lowest_Quad_Y:� �sc �
�h!sf=!sd-!se:�sg:qm=�
���:!sf=4:�sg:qm=!sU>!sd
���:�
��$��Yk:WY= ��:�XU(Uj,Xt):�qq:�Xg:�
�&(��qq:sh=�ction_AllocateMemory(-pw):�
�X��qd:�si:�sj:�
����si:�ok �ol=1 �
��� �Vr �
��9A%=Vk:B%=pz:C%=Vl:�ka:�sk:�pe(pz,Zz$+".image001"):�qU
��!�:�sl:�pe(pz,Zz$+".image001")
��:qc-=1
��:�ol=1 �ol+=1
�*�
�H��sj:�ok �om=!qb �
�\� �Vr �
�fEA%=Vk:B%=pz:C%=Vl:�ka:�sm:�pe(pz,Zz$+".image"+�"000"+�!qb,3)):�qU
��-�:�sn:�pe(pz,Zz$+".image"+�"000"+�!qb,3))
���:qc-=1
���:�om=!qb �om-=1
���
�� ��qU:A%=pv:B%=pz:C%=pw:�ka:�
�L1��Vf(hn):hj=13:hk=14:hl=15:�hn=0 ��so 48*1024
�j�P%=so:[OPT hn:.sp STMFD (hj)!,{hk}:LDR r10,fV:LDR r9,fX:LDR r8,mt:LDR r7,mu:MOV r12,#0:.sq MOV r11,#0:.sr MOV r0,r11:SUB r1,r9,r12:LDR r2,qY:MOV r3,r10:BL kv:MOV r6,r0:MOV r0,r11:SUB r1,r7,r12:LDR r2,qa:MOV r3,r8:BL kv:MOV r5,r0:MOV r0,r11
�P�SUB r1,r9,r12:LDR r2,qY:MOV r3,r10:MOV r4,r5:BL lc:MOV r0,r11:SUB r1,r7,r12:LDR r2,qa:MOV r3,r8:MOV r4,r6:BL lc:ADD r11,r11,#1:CMP r11,r10:BNE sr:ADD r12,r12,#1:CMP r12,r9:BNE sq:LDMFD (hj)!,{PC}:.sl STMFD (hj)!,{hk}:LDR r7,fV:LDR r8,fX:LDR r9,px
�@�LDR r10,py:MOV r5,#0:.ss MOV r6,#0:.st MOV r0,r5:SUB r1,r8,r6 : SUB r1,r1,#1:LDR r2,bt : SUB r0,r0,r2:LDR r2,bu : ADD r1,r1,r2:LDR r2,qY:MOV r3,r7:CMP r0,#0 : MOVLT r4,#0 : BLT su:CMP r1,#0 : MOVLT r4,#0 : BLT su:CMP r0,r7 : MOVGE r4,#0 : BGE su
���CMP r1,r8 : MOVGE r4,#0 : BGE su:BL kv : MOV r4,r0 : .su:.sv MOV r0,r5:SUB r1,r10,r6 : sub r1,r1,#1:LDR r2,qZ:MOV r3,r9:LDR r11,db : ADD r0,r0,r11:LDR r11,dc : SUB r1,r1,r11:CMP r0,#0 : BLT sw:CMP r1,#0 : BLT sw:CMP r0,r9 : BGE sw:CMP r1,r10 : BGE sw
�0�BL lc : .sw:.sx ADD r6,r6,#1:CMP r6,r8:BNE st:.sy ADD r5,r5,#1:CMP r5,r7:BNE ss:LDMFD (hj)!,{PC}:.sn STMFD (hj)!,{hk}:LDR r7,fV:LDR r8,fX:LDR r9,px:LDR r10,py:LDR r12,mt:MOV r5,#0:.sz MOV r6,#0:.tU MOV r0,r5:LDR r1,mu:SUB r1,r1,r6 : SUB r1,r1,#1
��LDR r2,by : SUB r0,r0,r2:LDR r2,bz : ADD r1,r1,r2:LDR r2,qa:MOV r3,r12:CMP r0,#0 : MOVLT r4,#0 : BLT tV:CMP r1,#0 : MOVLT r4,#0 : BLT tV:CMP r0,r7 : MOVGE r4,#0 : BGE tV:LDR r4,mu:CMP r1,r4 : MOVGE r4,#0 : BGE tV:BL kv : MOV r4,r0 : .tV:.tW MOV r0,r5
�p�SUB r1,r10,r6 : sub r1,r1,#1:LDR r2,qZ:MOV r3,r9:LDR r11,db : ADD r0,r0,r11:LDR r11,dc : SUB r1,r1,r11:CMP r0,#0 : BLT tX:CMP r1,#0 : BLT tX:CMP r0,r9 : BGE tX:CMP r1,r10 : BGE tX:BL lc : .tX:.tY ADD r6,r6,#1:CMP r6,r8:BNE tU:.tZ ADD r5,r5,#1
���CMP r5,r7:BNE sz:LDMFD (hj)!,{PC}:.sm STMFD (hj)!,{hk}:LDR r12,fV:LDR r11,fX:MOV r10,#0:.ta MOV r9,#0:.tb MOV r0,r9:LDR r1,mu : SUB r1,r1,r10 : SUB r1,r1,#1:LDR r2,pr : SUB r0,r0,r2:LDR r3,ps : SUB r1,r1,r3:LDR r2,qa:LDR r3,mt
���CMP r0,#0 : MOVLT r0,#0 : BLT tc:CMP r0,r3 : MOVGE r0,#0 : BGE tc:CMP r1,#0 : MOVLT r0,#0 : BLT tc:LDR r4,mu:CMP r1,r4 : MOVGE r0,#0 : BGE tc:BL kv : .tc:MOV r4,r0:MOV r0,r9:LDR r1,fX : SUB r1,r1,r10 : SUB r1,r1,#1:LDR r2,qZ:LDR r3,fV:BL lc
��ADD r9,r9,#1:CMP r9,r12 : BNE tb:ADD r10,r10,#1:CMP r10,r11 : BNE ta:LDMFD (hj)!,{PC}:.sk STMFD (hj)!,{hk}:LDR r12,fV:LDR r11,fX:MOV r10,#0:.td MOV r9,#0:.te MOV r0,r9:LDR r1,fX : SUB r1,r1,r10 : SUB r1,r1,#1:LDR r2,pp : SUB r0,r0,r2
���LDR r3,pq : SUB r1,r1,r3:LDR r2,qY:LDR r3,fV:CMP r0,#0 : MOVLT r0,#0 : BLT tf:CMP r0,r3 : MOVGE r0,#0 : BGE tf:CMP r1,#0 : MOVLT r0,#0 : BLT tf:LDR r4,fX:CMP r1,r4 : MOVGE r0,#0 : BGE tf:BL kv : .tf:MOV r4,r0:MOV r0,r9
�@�LDR r1,fX : SUB r1,r1,r10 : SUB r1,r1,#1:LDR r2,qZ:LDR r3,fV:BL lc:ADD r9,r9,#1:CMP r9,r12 : BNE te:ADD r10,r10,#1:CMP r10,r11 : BNE td:LDMFD (hj)!,{PC}:.qY DCD 0:.qZ DCD 0:.qa DCD 0:.tg DCD 0:.sU DCD 0:.th DCD 0 : .ti DCD 0:.tj DCD 0 : .tk DCD 0
�D�.tl DCD 0 : .tm DCD 0:.tn DCD 0 : .to DCD 0:.tp DCD 0 : .tq DCD 0:.tr DCD 0 : .ts DCD 0:.tt DCD 0 : .tu DCD 0:.tv DCD 0 : .tw DCD 0:.tx DCD 0 : .ty DCD 0:.tz DCD 0 : .uU DCD 0:.uV:.qz DCD 0 : .rV DCD 0:.rX DCD 0 : .rZ DCD 0:.rb DCD 0 : .rd DCD 0
���.rf DCD 0 : .rh DCD 0:.uW:.rj DCD 0 : .rk DCD 0:.rl DCD 0 : .rm DCD 0:.rn DCD 0 : .ro DCD 0:.rp DCD 0 : .rq DCD 0:.uX:.rs DCD 0 : .rw DCD 0:.rt DCD 0 : .rx DCD 0:.ru DCD 0 : .ry DCD 0:.rv DCD 0 : .rz DCD 0:.qb DCD 0:.qh DCD 0:.sd DCD 0:.se DCD 0
��.ax DCD 1:.sf DCD 0:.db DCD 0:.dc DCD 0:.bt DCD 0:.bu DCD 0:.by DCD 0:.bz DCD 0:.fV DCD 0 : .fX DCD 0:.mt DCD 0 : .mu DCD 0:.gc DCD 0 : .gb DCD 0:.px DCD 0 : .py DCD 0:.pp DCD 0:.pq DCD 0:.pr DCD 0:.ps DCD 0:.pt DCD 0:.pu DCD 0:.uY STMFD (hj)!,{hk}
�Z�MVN r0,#0:STR r0,tg:BL uZ:BL ua:LDR r0,rb : LDR r1,rf:SUB r0,r0,r1 : STR r0,th:LDR r0,rd : LDR r1,rh:SUB r0,r0,r1 : STR r0,ti:LDR r0,rX : LDR r1,qz:SUB r0,r0,r1 : STR r0,tl:LDR r0,rZ : LDR r1,rV:SUB r0,r0,r1 : STR r0,tm:LDR r0,rn : LDR r1,rp
���SUB r0,r0,r1 : STR r0,tp:LDR r0,ro : LDR r1,rq:SUB r0,r0,r1 : STR r0,tq:LDR r0,rl : LDR r1,rj:SUB r0,r0,r1 : STR r0,tt:LDR r0,rm : LDR r1,rk:SUB r0,r0,r1 : STR r0,tu:LDMFD (hj)!,{PC}:.sg STMFD (hj)!,{hk}:.ub BL uY:LDR r0,uc:STR r0,tg
���.ud BL ue : LDR r0,uf : CMP r0,#0 : BNE ug:BL uh : LDR r0,ui : CMP r0,#0 : BNE ug:.uj BL uk:LDR r0,tz : ADD r0,r0,#1:LDR r1,uU : ADD r1,r1,#2:LDR r2,fX:SUB r1,r2,r1:LDR r2,pp : SUB r0,r0,r2:LDR r3,pq : SUB r1,r1,r3:LDR r4,fV:LDR r5,fX
��CMP r0,#0 : BLT ul:CMP r0,r4 : BGE ul:CMP r1,#0 : BLT ul:CMP r1,r5 : BGE ul:LDR r2,um:LDR r2,[r2]:LDR r3,fV:BL kv:STR r0,un:B uo:.ul MOV r0,#0:STR r0,un:.uo BL up:LDR r0,tz : ADD r0,r0,#1:LDR r1,uU : ADD r1,r1,#2:LDR r2,mu:SUB r1,r2,r1
���LDR r2,pr : SUB r0,r0,r2:LDR r3,ps : SUB r1,r1,r3:LDR r4,mt:LDR r5,mu:CMP r0,#0 : BLT uq:CMP r0,r4 : BGE uq:CMP r1,#0 : BLT uq:CMP r1,r5 : BGE uq:LDR r2,ur:LDR r2,[r2]:LDR r3,mt:BL kv:STR r0,us:B ut:.uq MOV r0,#0:STR r0,us:.ut LDR r0,un:LDR r1,us
�z�CMP r0,r1:BLNE lq:MOV r4,r0:LDR r0,tg:LDR r1,sU:LDR r2,fV:CMP r0,r2:BGE uu:LDR r2,py : SUB r1,r2,r1 : SUB r1,r1,#1:LDR r2,db : ADD r0,r0,r2:LDR r3,dc : SUB r1,r1,r3:LDR r5,px:LDR r6,py:CMP r0,#0 : BLT uu:CMP r0,r5 : BGE uu:CMP r1,#0 : BLT uu
��CMP r1,r6 : BGE uu:LDR r2,uv:LDR r2,[r2]:LDR r3,px:BL lc:.uu:.ug LDR r0,tg:ADD r0,r0,#1:STR r0,tg:LDR r1,uw:CMP r0,r1:BLE ud:.ux LDR r0,sU:ADD r0,r0,#1:STR r0,sU:LDR r1,sd:CMP r0,r1:LDMGTFD (hj)!,{PC}:LDR r1,sf:SUBS r1,r1,#1:STR r1,sf:BNE ub
��LDMFD (hj)!,{PC}:.um DCD qY:.uv DCD qZ:.ur DCD qa:.un DCD 0:.us DCD 0:.uc DCD 0:.uy DCD 0:.uZ STMFD (hj)!,{hk}:LDR r3,rs:LDR r4,rv:SUBS r5,r3,r4:STREQ r3,uc:LDMEQFD (hj)!,{PC}:LDR r0,rw:LDR r1,rz:SUB r0,r0,r1:MOV r1,r5:mov r0,r0,asl #8:BL uz:STR r0,uy
�h�LDR r0,sU:LDR r1,rz:SUB r0,r0,r1:LDR r1,uy:mov r0,r0,asl #8:BL uz:LDR r1,rv:ADD r0,r0,r1:STR r0,uc:LDMFD (hj)!,{PC}:.uw DCD 0:.vU DCD 0:.ua STMFD (hj)!,{hk}:LDR r3,rt:LDR r4,ru:SUBS r5,r3,r4:STREQ r3,uw:LDMEQFD (hj)!,{PC}:LDR r0,rx:LDR r1,ry
���SUB r0,r0,r1:MOV r1,r5:mov r0,r0,asl #8:BL uz:STR r0,vU:LDR r0,sU:LDR r1,ry:SUB r0,r0,r1:LDR r1,vU:mov r0,r0,asl #8:BL uz:LDR r1,ru:ADD r0,r0,r1:STR r0,uw:LDMFD (hj)!,{PC}:.vV DCD 0:.vW DCD 0:.uf DCD 0:.ue STMFD (hj)!,{hk}:LDR r3,rw:LDR r4,rx
��SUBS r5,r3,r4:STREQ r3,vV:BEQ vX:MOV r0,r5:LDR r1,rs:LDR r2,rt:SUB r1,r1,r2:mov r0,r0,asl #11:BL uz:STR r0,vW:LDR r0,tg:LDR r1,rs:SUB r0,r0,r1:LDR r1,vW:MUL r0,r1,r0:mov r0,r0,asr #11:LDR r1,rw:ADD r0,r0,r1:STR r0,vV:.vX LDR r0,sU:LDR r1,vV:CMP r0,r1
�
�MVNGE r0,#0:MOVLT r0,#0:STR r0,uf:LDMFD (hj)!,{PC}:.vY DCD 0:.vZ DCD 0:.ui DCD 0:.uh STMFD (hj)!,{hk}:LDR r3,rz:LDR r4,ry:SUBS r5,r3,r4:STREQ r3,vY:BEQ va:MOV r0,r5:LDR r1,rv:LDR r2,ru:SUB r1,r1,r2:mov r0,r0,asl #11:BL uz:STR r0,vZ:LDR r0,tg:LDR r1,rv
�T�SUB r0,r0,r1:LDR r1,vZ:MUL r0,r1,r0:mov r0,r0,asr #11:LDR r1,rz:ADD r0,r0,r1:STR r0,vY:.va LDR r0,sU:LDR r1,vY:CMP r0,r1:MVNLT r0,#0:MOVGE r0,#0:STR r0,ui:LDMFD (hj)!,{PC}:.uk STMFD (hj)!,{hk}:LDR r0,tg:LDR r1,uc:SUB r0,r0,r1:LDR r1,uw:LDR r2,uc
���SUB r1,r1,r2:mov r0,r0,asl #8:BL uz:STR r0,ac:LDR r0,sU:LDR r1,vY:SUB r0,r0,r1:LDR r1,vV:LDR r2,vY:SUB r1,r1,r2:mov r0,r0,asl #8:BL uz:STR r0,ad:LDR r0,rf:LDR r1,th:LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tj:LDR r0,rh:LDR r1,ti
�z�LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tk:LDR r0,qz:LDR r1,tl:LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tn:LDR r0,rV:LDR r1,tm:LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,to:LDR r0,tn:LDR r1,tj
�j�SUB r0,r0,r1:STR r0,tx:LDR r0,to:LDR r1,tk:SUB r0,r0,r1:STR r0,ty:LDR r0,tj:LDR r1,tx:LDR r2,ad:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tz:LDR r0,tk:LDR r1,ty:LDR r2,ad:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,uU:LDMFD (hj)!,{PC}
���.up STMFD (hj)!,{hk}:LDR r0,tg:LDR r1,uc:SUB r0,r0,r1:LDR r1,uw:LDR r2,uc:SUB r1,r1,r2:mov r0,r0,asl #8:BL uz:STR r0,ac:LDR r0,sU:LDR r1,vY:SUB r0,r0,r1:LDR r1,vV:LDR r2,vY:SUB r1,r1,r2:mov r0,r0,asl #8:BL uz:STR r0,ad:LDR r0,rp:LDR r1,tp:LDR r2,ac
���MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tr:LDR r0,rq:LDR r1,tq:LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,ts:LDR r0,rj:LDR r1,tt:LDR r2,ac:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tv:LDR r0,rk:LDR r1,tu:LDR r2,ac
���MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tw:LDR r0,tv:LDR r1,tr:SUB r0,r0,r1:STR r0,tx:LDR r0,tw:LDR r1,ts:SUB r0,r0,r1:STR r0,ty:LDR r0,tr:LDR r1,tx:LDR r2,ad:MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,tz:LDR r0,ts:LDR r1,ty:LDR r2,ad
���MUL r3,r1,r2:mov r3,r3,asr #8:ADD r0,r0,r3:STR r0,uU:LDMFD (hj)!,{PC}:.ac DCD 0:.ad DCD 0:.uz ADR r2,vb:cmp r1,#0:addgt r1,r1,#1:suble r1,r1,#1:CMP r1,#0:MVNLT r1,r1:ADDLT r1,r1,#1:LDR r2,[r2,r1,ASL #2]:MUL r0,r2,r0:MVNLT r0,r0:ADDLT r0,r0,#1
��AMOV r0,r0,ASR #16:MOV PC,hk:.vb DCD 1: �ction_Reciprocals:]:�
�nݤction_Reciprocals:�hn<2 �
ÂP%+=8192* 4
Ì)�:�i=1 �8192:!P%=(1/i)* 2^16:P%+=4:�i
þ	�:=hn
��Wݤction_InitialiseTask(vc,vd$):�cZ,cb:ș&400C0,vc,&4B534154,vd$+�0 �cZ,cb:ve=cb:=ve
�8!��Xb(ve):ș&400DD,ve,"TASK":�
�j�ݤction_ReportError(Xc,vf,ak$,Yi$,vg,vh):�ao,cb,vi:$Xc=ak$+�0:Xc!32=vf:$(Xc+36)=Yi$+�0:ao=(�vg*2^0)+(�vh*2^1):ș&400DF,Xc+32,ao,Xc �,cb:vi=cb:=vi
����Ww(Xj,Xc,Xn,vj):� �vj �
�$!Xc=Xn:ș&400CB,,Xc:ș&400C5,,Xc
�5�:!Xc=!Xj:ș&400CB,,Xc:vk=Xc!28:vl=Xj!28:�vl=-1 �
�PȎ!Xj �
�Z/�Wx:!Xc=Wz:ș&400CB,,Xc:�Xc!28=-1 �Xj!28=vk
�x�
Ȃ�:ș&400C5,,Xj
Ȗ�:�
Ⱦ&��XU(Xc,Xn):Xc!0=Xn:ș&400C6,,Xc:�
�S��Xs(Xc,Xn):�aa,ab,vm,vn,vo,vp:Xc!0=Xn:ș&400CC,,Xc:aa=�Xc!52:�aa>1000 �aa=1000
�,ab=�Xc!48:�ab>512 �ab=512
�6�Xc!0=4:Xc!4=5:Xc!8=11:Xc!12=12:Xc!16=-1:ș&31,Xc,Xc+32:vm=Xc!32:vn=Xc!36:vo=Xc!40:vp=Xc!44:x=vo* 2^vm :y=vp* 2^vn:x=(x-aa) �2:y=(y-ab) �2:Xc!(0)=Xn:Xc!(4+0)=x:Xc!(4+4)=y:Xc!(4+8)=Xc!(4+0)+aa:Xc!(4+12)=Xc!(4+4)+ab:Xc!28=-1:ș&400C5,,Xc:�
��M��nZ(Xc,Xn,vq,vr,vs,vt):Xc!0=vq:Xc!4=vs:Xc!8=vr:Xc!12=vt:ș&400D7,Xn,Xc:�
�0[ݤction_WindowIsOpen(Xc,Xn):�vu,vv:Xc!0=Xn:ș&400CB,,Xc:vu=Xc!32:vv=(vu �2^16)=2^16:=vv
ʊ���Yr(Xc,Xn):�aa,ab,vw,vx:�vy,vz,wU,wV:Xc!0=Xn:ș&400CC,,Xc:aa=Xc!12-Uj!4:ab=Xc!16-Xc!8:vw=Xc!20:vx=Xc!24:vy=vw:wV=vx:wU=wV-ab:vz=vy+aa:ș&400D1,Xn,vy,wU,vz,wV:�
�@��wW(Xc,Xn,Xd):Xc!0=Xn:Xc!4=Xd:Xc!8=0:Xc!12=0:ș&400CD,,Xc:�
�f-��Za(Xn,Xd,wX):ș&400D2,Xn,Xd,0,0,-1,wX:�
˘%��Zb:ș&400D2,-1,-1,-1,-1,-1,-1:�
��nݤction_ReadIconText(Xc,Xn,Xd):�ao,wY,as$:Xc!0=Xn:Xc!4=Xd:ș&400CE,,Xc:ao=Xc!(8+16):wY=(ao �2^8)=2^8:�wY �
�'as$=�ction_ExtractString(Xc!(8+20))
�$'�:as$=�ction_ExtractString(Xc+8+20)
�8
�:=as$
�`^��Wi(Xc,Xn,Xd,wZ$):�ao,wY:Xc!0=Xn:Xc!4=Xd:ș&400CE,,Xc:ao=Xc!(8+16):wY=(ao �2^8)=2^8:�wY �
̰$(Xc!(8+20))=wZ$
̺�:$(Xc+8+20)=wZ$
��3�:Xc!0=Xn:Xc!4=Xd:Xc!8=0:Xc!12=0:ș&400CD,,Xc:�
�(��Ze(wa):ș&400DC,wa:�
�ZDݤction_ExtractString(wb):wc$="":ȕ?wb>31:wc$+=�?wb:wb+=1:�:=wc$
ʹ*��af(Xc,Zz$):$Xc=Zz$+�0:ș&400D9,,Xc:�
��ݤction_LoadTemplate(wd,we,wf,wg$):�cc,wh,wi,wj,wk:ș&400DB,,wd,we,wf,-1,wg$,0 �,,cc:wh=wd!84:wi=cc:=cc:wj=0:ȕwj<wh:wk=wd+88+wj*32:�(wk!16 �&103)=&102 �wk!24=Up
�hwj+=1:�:=wi
Κ<ݤction_MakeTemplateAWindow(wd):�Xn:ș&400C1,,wd �Xn:=Xn
����ai:ș&400DA:�
�<ݤction_PollWimp(Xj,wl):�cZ:ș&400C7,wl,Xj �cZ:wm=cZ:=wm
�NFݤction_PollWimpIdle(Xj,wl,wn):�cZ:ș&400E1,wl,Xj,wn �cZ:wm=cZ:=wm
ϔKݤction_SetSlotSize(wo):�cZ,cb,cc,wp:ș&400EC,wo,-1 �cZ,cb,cc:wp=cZ:=wp
��Hݤction_ReadSlotSize:�cZ,cb,cc,wp:ș&400EC,-1,-1 �cZ,cb,cc:wp=cZ:=wp
� Nݤction_ReadSizeOfFreePool:�cZ,cb,cc,wq:ș&400EC,-1,-1 �cZ,cb,cc:wq=cc:=wq
�f���Xr(Xc):�vm,vn,vo,vp:Xc!0=4:Xc!4=5:Xc!8=11:Xc!12=12:Xc!16=-1:ș&31,Xc,Xc+32:vm=Xc!32:vn=Xc!36:vo=Xc!40:vp=Xc!44:ȗȓ0,0,vo*2^vm,vp*2^vn:�
�����hi(Xc,Xn):�aa,ab,vm,vn,vo,vp:!Xc=Xn:ș&400CC,,Xc:aa=�Xc!52:ab=�Xc!48:Xc!0=4:Xc!4=5:Xc!8=11:Xc!12=12:Xc!16=-1:ș&31,Xc,Xc+32:vm=Xc!32:vn=Xc!36:vo=Xc!40:vp=Xc!44:x=vo* 2^vm :y=vp* 2^vn:x=(x-aa)/2:y=(y-ab)/2:Xc!0=Xn:Xc!(0+4+0)=x:Xc!(0+4+4)=y
�j~Xc!(0+4+8)=Xc!(0+4+0)+aa:Xc!(0+4+12)=Xc!(0+4+4)+ab:ș&400C5,,Xc:x=((vo*2^vm)-aa ) / 2:y=((vp*2^vn)-ab) / 2:ȗȓx,y,aa,ab:�
�����wr(Xc,Xn,Xd,ws,wt):!Xc=Xn:ș&400CC,,Xc:wu=Xc!4:wv=Xc!8:ww=Xc!12:wx=Xc!16:Xc!0=Xn:Xc!4=Xd:ș&400CE,,Xc:wy=Xc!8:wz=Xc!12:xU=Xc!16:xV=Xc!20:xW=xU-wy:xX=xV-wz:Zl=wu+wy:Zo=wx+wz:ȗȓZl+ws,Zo+wt,xW-ws*2,xX-wt*2:�
�dd��dh(Xc,Xn,Xk,Xl):!Xc=Xn:ș&400CC,,Xc:dj=Xc!4-Xc!20:dl=Xl-(Xc!16-Xc!24):dj=Xk-dj:hV%=dj:hX%=dl:�
�Ҷ��Wy(Xc,Xn,xY):Xc!0=Xn:ș&400CC,,Xc:xZ=Xc!4:ft=Xc!12:xa=Xc!8:fu=Xc!16:xb=Xc!28:Xc!0=xY:ș&400CC,,Xc:Xc!4=xZ+8:Xc!12=ft-16:Xc!8=xa+8:Xc!16=Xc!8+424:Xc!20=0:Xc!28=xb:ș&400C5,,Xc:�
�T)ݤction_WordAlign(eU):=((eU+3) �(�3))
�|[ݤction_InstallHelp:ș&1E,6,,,16 �,,cc:Vi=cc:ș&41501,Vi,"<"+Uc$+"$Dir>.Messages",0:=Vi
��&��Xa(xc):ș&41504,xc:ș&1E,7,,xc:�
�Xݤction_TagToString(ch$):ș&41502,Vi,ch$,0,0,0,0,0,0 �,,cc:=�ction_ExtractString(cc)
�0Z��xd(xe,xf,xg):xh=xe:xi=xf:xj=xg:Va=4:�wr(Uj,xh,xj,16,0):ș&1C �cl,cm,cu:xk=cl-1:�xl:�
Բ��xl:Ȏxh �
���xm:Ȏxj �
��M�4:xn=�ction_DragABar(xn,6):s=�(127*(xo/100)):�Wi(Uj,xm,30,�s):ș&90083,s
��
��:�
�43ݤction_DragABar(xf,xg):ș&1C �cl,cm,cu:�cu=0 �
ՄVa=0:�Xr(Uj)
բ�:�cl<>xk �
��!Uj=xh:ș&400CC,,Uj:wu=Uj!4:xp=cl-wu:Uj!0=xh:Uj!4=xf:ș&400CE,,Uj:wy=Uj!(8+0):wz=Uj!(8+4):xU=Uj!(8+8):xV=Uj!(8+12):Uj!(100+0)=xh:Uj!(100+4)=xf:ș&400C4,,Uj+100:ș&400D1,xh,wy,wz,xU,xV:Uj!(8+8)=xp:Uj!4=xh:ș&400C2,,Uj+4 �xf:�wW(Uj,xh,xf):Uj!0=xh
��?Uj!4=xj:ș&400CE,,Uj:xq=Uj!(8+8)-16:xk=cl:xo=�((xp/xq)*100)
�(�
�<	�:=xf
�nR��xr(Xc,Xn,xs$):�ao,wY:!Xc=Xn:ș&400CC,,Xc:ao=Xc!(4+56):wY=(ao �2^8)=2^8:�wY �
״$dz=!(Xc+4+72):$!(Xc+4+72)=xs$+�0
���:$(Xc+4+72)=wZ$+�0
���:�
�O��gx(Xc,Xn,Xd,xt):Xc!0=Xn:Xc!4=Xd:Xc!8=(�xt)<<21:Xc!12=1<<21:ș&400CD,,Xc:�
�^O��gy(Xc,Xn,Xd,xu):Xc!0=Xn:Xc!4=Xd:Xc!8=(�xu)<<22:Xc!12=1<<22:ș&400CD,,Xc:�
ظaݤction_IconIsToggled(Xc,Xn,Xd):Xc!0=Xn:Xc!4=Xd:ș&400CE,,Xc:xv=(Xc!(8+16)) �2^21:=�(xv=2^21)
�A��xw(Xc,Xn,Xd):�gx(Xc,Xn,Xd,�ction_IconIsToggled(Xc,Xn,Xd)):�
�:2ݤction_WindowWithCaret(Xc):ș&400D3,,Xc:=Xc!0
�l0ݤction_IconWithCaret(Xc):ș&400D3,,Xc:=Xc!4
ٞ7ݤction_PathnameOnly(Zz$):�Zz$="" ��Zz$,".")=0 �=""
ٲ0�i:i=�Zz$:ȕ�Zz$,i,1)<>".":i-=1:�:=�Zz$,i-1)
�*ݤction_LeafnameOnly(Zz$):�Zz$="" �=""
�:�i:i=�Zz$:ȕ�Zz$,i,1)<>"." �i>0:i-=1:�:=�Zz$,i+1,�Zz$)
�fM��cU(Xc,ci,bm,pg):Xc!0=ci:Xc!4=bm:Xc!8=pg<<28:Xc!12=15<<28:ș&400CD,,Xc:�
�M��Wk(Xc,ci,bm,pg):Xc!0=ci:Xc!4=bm:Xc!8=pg<<24:Xc!12=15<<24:ș&400CD,,Xc:�
�hݤction_ColourOfIcon(Xc,ci,bm):Xc!0=ci:Xc!4=bm:ș&400CE,,Xc:pg=((Xc!(8+16)) �(15<<28))>>28:=(pg �15)
�j�ݤction_SetIconWidth(Xc,ci,bm,xx):!Xc=ci:ș&400CC,,Xc:wu=Xc!4:xp=wu+xx:Xc!0=ci:Xc!4=bm:ș&400CE,,Xc:wy=Xc!(8+0):wz=Xc!(8+4):xU=Xc!(8+8):xV=Xc!(8+12):Xc!(100+0)=ci:Xc!(100+4)=bm:ș&400C4,,Xc+100:�wy+xx<xU �
�(ș&400D1,ci,wy,wz,xU,xV
�2S�:Xc!(8+8)=wy+xx:Xc!4=ci:ș&400C2,,Xc+4 �xf:ș&400D1,ci,xU-4,wz,Xc!(8+8),xV:=xf
ܪ�ݤction_IdentifyOS(Xc):�"Set Version NEW":�"RmEnsure UtilityModule 3.50 Set Version OLD":ș&23,"Version",Xc,16,0,0 �cZ,cb,cc,cd,ce:�"Unset Version":=��ction_ExtractString(Xc),3)
�T��nz(Xc,ci,xy,xz):!Xc=ci:ș&400CC,,Xc:Xc!12=Xc!4+xy:Xc!16=Xc!8+xz:ș&400C5,,Xc:�
�

00000000  0d 00 50 2d ee 85 eb eb  3a f1 22 46 61 74 61 6c  |..P-....:."Fatal|
00000010  20 45 72 72 6f 72 20 3a  20 22 3b f6 24 3b 22 20  | Error : ";.$;" |
00000020  61 74 20 4c 69 6e 65 20  22 3b 9e 3a e0 0d 00 5a  |at Line ";.:...Z|
00000030  0d f2 55 56 3a ee 85 f2  55 57 0d 00 78 09 f2 55  |..UV:...UW..x..U|
00000040  58 3a e0 0d 00 aa ff dd  f2 55 56 3a 55 59 3d 34  |X:.......UV:UY=4|
00000050  3a 55 5a 3d 32 3a 55 61  3d 31 3a 55 62 3d 2d 32  |:UZ=2:Ua=1:Ub=-2|
00000060  3a 55 63 24 3d 22 4d 6f  72 70 68 22 3a 55 64 24  |:Uc$="Morph":Ud$|
00000070  3d 22 4d 6f 72 70 68 22  3a 55 65 3d 26 46 46 39  |="Morph":Ue=&FF9|
00000080  3a 55 66 3d 26 33 45 31  3a 55 67 3d 36 2a 31 30  |:Uf=&3E1:Ug=6*10|
00000090  32 34 20 3a de 55 68 20  55 67 3a 55 69 3d 36 2a  |24 :.Uh Ug:Ui=6*|
000000a0  31 30 32 34 20 3a de 55  6a 20 55 69 3a 55 6b 3d  |1024 :.Uj Ui:Uk=|
000000b0  36 2a 31 30 32 34 20 3a  de 55 6c 20 55 6b 3a 55  |6*1024 :.Ul Uk:U|
000000c0  6d 3d 36 2a 31 30 32 34  20 3a de 55 6e 20 55 6d  |m=6*1024 :.Un Um|
000000d0  3a 55 6f 3d 32 34 2a 31  30 32 34 20 3a de 55 70  |:Uo=24*1024 :.Up|
000000e0  20 55 6f 3a 55 71 3d 36  2a 31 30 32 34 20 3a de  | Uo:Uq=6*1024 :.|
000000f0  55 72 20 55 71 3a de 55  73 20 31 30 32 34 2a 32  |Ur Uq:.Us 1024*2|
00000100  3a de 55 74 20 31 30 32  34 3a de 55 75 20 31 30  |:.Ut 1024:.Uu 10|
00000110  32 34 3a de 55 76 20 31  30 32 34 3a de 55 77 20  |24:.Uv 1024:.Uw |
00000120  31 30 32 34 3a de 55 78  20 31 30 3a f2 55 79 28  |1024:.Ux 10:.Uy(|
00000130  55 78 29 3a de 55 7a 20  31 30 3a f2 55 79 28 55  |Ux):.Uz 10:.Uy(U|
00000140  7a 29 0d 01 90 fb 56 55  3d 30 3a 56 56 3d 20 ac  |z)....VU=0:VV= .|
00000150  b9 3a 56 57 3d 30 3a de  56 58 20 33 32 3a 56 59  |.:VW=0:.VX 32:VY|
00000160  3d a4 63 74 69 6f 6e 5f  49 6e 69 74 69 61 6c 69  |=.ction_Initiali|
00000170  73 65 54 61 73 6b 28 32  2a 31 30 30 2c 55 64 24  |seTask(2*100,Ud$|
00000180  29 3a 56 5a 3d 30 3a 56  61 3d 30 3a f2 56 62 3a  |):VZ=0:Va=0:.Vb:|
00000190  f2 56 63 3a f2 56 64 3a  f2 56 65 3a f2 56 66 28  |.Vc:.Vd:.Ve:.Vf(|
000001a0  30 29 3a f2 56 67 28 30  29 3a f2 56 66 28 32 29  |0):.Vg(0):.Vf(2)|
000001b0  3a f2 56 67 28 32 29 3a  56 68 3d a4 63 74 69 6f  |:.Vg(2):Vh=.ctio|
000001c0  6e 5f 49 63 6f 6e 62 61  72 53 70 72 69 74 65 28  |n_IconbarSprite(|
000001d0  55 6a 29 3a 56 69 3d a4  63 74 69 6f 6e 5f 49 6e  |Uj):Vi=.ction_In|
000001e0  73 74 61 6c 6c 48 65 6c  70 3a 56 6a 3d 20 ac b9  |stallHelp:Vj= ..|
000001f0  3a 56 6b 3d 30 3a 56 6c  3d 30 3a 56 6d 3d 20 ac  |:Vk=0:Vl=0:Vm= .|
00000200  b9 3a 56 6e 3d 20 ac b9  3a 56 6f 3d 30 3a 56 70  |.:Vn= ..:Vo=0:Vp|
00000210  3d 30 3a 56 71 3d 20 ac  b9 3a 56 72 3d 20 ac b9  |=0:Vq= ..:Vr= ..|
00000220  3a 56 73 3d 30 3a 56 74  3d 30 3a 56 75 3d 20 ac  |:Vs=0:Vt=0:Vu= .|
00000230  b9 3a 56 76 25 3d 30 3a  56 77 25 3d 30 0d 02 58  |.:Vv%=0:Vw%=0..X|
00000240  d9 56 78 25 3d 30 3a 56  79 25 3d 30 3a 56 7a 25  |.Vx%=0:Vy%=0:Vz%|
00000250  3d 30 3a 57 55 25 3d 30  3a 57 56 3d 30 3a 57 57  |=0:WU%=0:WV=0:WW|
00000260  3d 31 35 3a 57 58 3d 20  ac b9 3a 57 59 3d 20 ac  |=15:WX= ..:WY= .|
00000270  b9 3a 57 5a 3d 31 3a 57  61 3d 2d 31 3a 57 62 24  |.:WZ=1:Wa=-1:Wb$|
00000280  3d 22 4d 6f 72 70 68 2d  44 61 74 61 22 3a 57 63  |="Morph-Data":Wc|
00000290  24 3d 22 46 72 61 6d 65  73 22 3a 57 64 3d 30 3a  |$="Frames":Wd=0:|
000002a0  f2 57 65 3a f2 57 66 28  31 29 3a f2 57 67 28 31  |.We:.Wf(1):.Wg(1|
000002b0  29 3a f2 57 68 28 22 53  4f 55 52 43 45 22 2c 31  |):.Wh("SOURCE",1|
000002c0  2c 31 29 3a f2 57 68 28  22 44 45 53 54 22 2c 31  |,1):.Wh("DEST",1|
000002d0  2c 31 29 3a f2 57 69 28  55 6a 2c 57 6a 2c 31 2c  |,1):.Wi(Uj,Wj,1,|
000002e0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
000002f0  6e 67 28 22 73 72 63 65  22 29 2b a4 63 74 69 6f  |ng("srce")+.ctio|
00000300  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 6e  |n_TagToString("n|
00000310  6f 6e 65 22 29 29 0d 03  2a 6e f2 57 69 28 55 6a  |one"))..*n.Wi(Uj|
00000320  2c 57 6a 2c 33 2c a4 63  74 69 6f 6e 5f 54 61 67  |,Wj,3,.ction_Tag|
00000330  54 6f 53 74 72 69 6e 67  28 22 64 65 73 74 22 29  |ToString("dest")|
00000340  2b a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |+.ction_TagToStr|
00000350  69 6e 67 28 22 6e 6f 6e  65 22 29 29 3a f2 57 6b  |ing("none")):.Wk|
00000360  28 55 6a 2c 57 6a 2c 31  2c 33 29 3a f2 57 6b 28  |(Uj,Wj,1,3):.Wk(|
00000370  55 6a 2c 57 6a 2c 33 2c  33 29 3a f2 57 6c 3a f2  |Uj,Wj,3,3):.Wl:.|
00000380  57 6d 3a e1 0d 03 8e 2f  dd f2 55 58 3a f2 57 6e  |Wm:..../..UX:.Wn|
00000390  3a f5 3a 57 6f 3d a4 63  74 69 6f 6e 5f 50 6f 6c  |:.:Wo=.ction_Pol|
000003a0  6c 57 69 6d 70 28 55 68  2c 56 55 29 3a c8 8e 57  |lWimp(Uh,VU):..W|
000003b0  6f 20 ca 0d 03 c0 11 c9  30 3a e7 56 61 3d 31 20  |o ......0:.Va=1 |
000003c0  8c f2 57 70 0d 03 ca 14  e7 56 61 3d 32 20 84 56  |..Wp.....Va=2 .V|
000003d0  61 3d 33 20 8c f2 57 71  0d 03 d4 0d e7 57 59 20  |a=3 ..Wq.....WY |
000003e0  80 57 72 20 8c 0d 03 de  0b f2 57 73 3a f2 57 74  |.Wr ......Ws:.Wt|
000003f0  0d 03 f2 09 cd 3a f2 57  75 0d 04 06 0e c9 31 3a  |.....:.Wu.....1:|
00000400  f2 57 76 28 55 68 29 0d  04 10 1e c9 32 3a f2 57  |.Wv(Uh).....2:.W|
00000410  77 28 55 68 2c 55 6a 2c  2d 31 2c b9 29 3a c8 8e  |w(Uh,Uj,-1,.):..|
00000420  21 55 68 20 ca 0d 04 24  15 c9 57 78 3a f2 57 79  |!Uh ...$..Wx:.Wy|
00000430  28 55 6a 2c 57 78 2c 57  7a 29 0d 04 2e 05 cb 0d  |(Uj,Wx,Wz)......|
00000440  04 38 13 c9 33 3a f2 58  55 28 55 6a 2c 55 68 21  |.8..3:.XU(Uj,Uh!|
00000450  30 29 0d 04 42 0e c9 36  3a f2 58 56 28 55 68 29  |0)..B..6:.XV(Uh)|
00000460  0d 04 4c 0e c9 37 3a f2  58 57 28 55 68 29 0d 04  |..L..7:.XW(Uh)..|
00000470  56 0e c9 38 3a f2 58 58  28 55 68 29 0d 04 60 0e  |V..8:.XX(Uh)..`.|
00000480  c9 39 3a f2 58 59 28 55  68 29 0d 04 6a 0f c9 31  |.9:.XY(Uh)..j..1|
00000490  37 3a f2 58 5a 28 55 68  29 0d 04 74 0f c9 31 38  |7:.XZ(Uh)..t..18|
000004a0  3a f2 58 5a 28 55 68 29  0d 04 7e 1b cb 3a fd 56  |:.XZ(Uh)..~..:.V|
000004b0  56 3a f2 58 61 28 56 69  29 3a f2 58 62 28 56 59  |V:.Xa(Vi):.Xb(VY|
000004c0  29 3a e1 0d 04 e2 a6 dd  a4 63 74 69 6f 6e 5f 49  |):.......ction_I|
000004d0  63 6f 6e 62 61 72 53 70  72 69 74 65 28 58 63 29  |conbarSprite(Xc)|
000004e0  3a 58 63 21 30 3d 2d 31  3a 58 63 21 34 3d 30 3a  |:Xc!0=-1:Xc!4=0:|
000004f0  58 63 21 38 3d 30 3a 58  63 21 31 32 3d 36 38 3a  |Xc!8=0:Xc!12=68:|
00000500  58 63 21 31 36 3d 36 38  3a 58 63 21 32 30 3d 32  |Xc!16=68:Xc!20=2|
00000510  5e 31 2b 32 5e 33 2b 32  5e 34 2b 32 5e 38 2b 28  |^1+2^3+2^4+2^8+(|
00000520  33 3c 3c 31 32 29 3a 24  56 58 3d bd 28 97 22 61  |3<<12):$VX=.(."a|
00000530  22 2b 56 57 29 3a 58 63  21 32 34 3d 56 58 3a 58  |"+VW):Xc!24=VX:X|
00000540  63 21 32 38 3d 55 70 3a  58 63 21 33 32 3d 32 3a  |c!28=Up:Xc!32=2:|
00000550  c8 99 26 34 30 30 43 32  2c 2c 58 63 20 b8 58 64  |..&400C2,,Xc .Xd|
00000560  3a 58 65 3d 91 3a 3d 58  64 0d 05 82 52 dd f2 57  |:Xe=.:=Xd...R..W|
00000570  65 3a 55 6a 21 30 3d 55  62 3a 55 6a 21 34 3d 56  |e:Uj!0=Ub:Uj!4=V|
00000580  68 3a c8 99 26 34 30 30  43 45 2c 2c 55 6a 3a 24  |h:..&400CE,,Uj:$|
00000590  56 58 3d bd 28 97 22 61  22 2b 56 57 29 3a 55 6a  |VX=.(."a"+VW):Uj|
000005a0  21 38 3d 30 3a 55 6a 21  31 32 3d 30 3a c8 99 26  |!8=0:Uj!12=0:..&|
000005b0  34 30 30 43 44 2c 2c 55  6a 3a e1 0d 05 e6 18 dd  |400CD,,Uj:......|
000005c0  f2 57 73 3a 58 66 3d 91  2d 58 65 3a e7 58 66 3e  |.Ws:Xf=.-Xe:.Xf>|
000005d0  38 20 8c 0d 06 04 1a 56  57 3d 28 56 57 2b 31 29  |8 .....VW=(VW+1)|
000005e0  20 83 31 36 3a f2 57 65  3a 58 65 3d 91 0d 06 22  | .16:.We:Xe=..."|
000005f0  07 cd 3a e1 0d 06 4a 13  dd f2 58 67 3a 56 57 3d  |..:...J...Xg:VW=|
00000600  30 3a f2 57 65 3a e1 0d  06 86 2a dd f2 56 64 3a  |0:.We:....*..Vd:|
00000610  f2 58 68 28 55 70 2c 55  6f 29 3a c8 8e a4 63 74  |.Xh(Up,Uo):...ct|
00000620  69 6f 6e 5f 53 70 72 69  74 65 73 54 79 70 65 20  |ion_SpritesType |
00000630  ca 0d 06 a4 24 c9 31 3a  f2 58 69 28 55 70 2c 22  |....$.1:.Xi(Up,"|
00000640  3c 4d 6f 72 70 68 24 44  69 72 3e 2e 53 70 72 69  |<Morph$Dir>.Spri|
00000650  74 65 73 22 29 0d 06 ae  26 c9 32 3a f2 58 69 28  |tes")...&.2:.Xi(|
00000660  55 70 2c 22 3c 4d 6f 72  70 68 24 44 69 72 3e 2e  |Up,"<Morph$Dir>.|
00000670  53 70 72 69 74 65 73 32  32 22 29 0d 06 b8 26 c9  |Sprites22")...&.|
00000680  33 3a f2 58 69 28 55 70  2c 22 3c 4d 6f 72 70 68  |3:.Xi(Up,"<Morph|
00000690  24 44 69 72 3e 2e 53 70  72 69 74 65 73 32 33 22  |$Dir>.Sprites23"|
000006a0  29 0d 06 c2 07 cb 3a e1  0d 06 ea 3d dd f2 58 56  |).....:....=..XV|
000006b0  28 58 6a 29 3a 58 6b 3d  58 6a 21 30 3a 58 6c 3d  |(Xj):Xk=Xj!0:Xl=|
000006c0  58 6a 21 34 3a 58 6d 3d  58 6a 21 38 3a 58 6e 3d  |Xj!4:Xm=Xj!8:Xn=|
000006d0  58 6a 21 31 32 3a 58 64  3d 58 6a 21 31 36 3a c8  |Xj!12:Xd=Xj!16:.|
000006e0  8e 58 6d 20 ca 0d 07 44  0e c9 55 59 3a c8 8e 58  |.Xm ...D..UY:..X|
000006f0  6e 20 ca 0d 07 4e 0f c9  58 6f 3a e7 58 64 3d 33  |n ...N..Xo:.Xd=3|
00000700  20 8c 0d 07 58 12 f2 58  55 28 55 6a 2c 58 6e 29  | ...X..XU(Uj,Xn)|
00000710  3a f2 58 70 0d 07 6c 05  cd 0d 07 76 0f c9 58 71  |:.Xp..l....v..Xq|
00000720  3a e7 58 64 3d 35 20 8c  0d 07 80 16 f2 58 55 28  |:.Xd=5 ......XU(|
00000730  55 6a 2c 58 6e 29 3a f2  58 72 28 55 6a 29 0d 07  |Uj,Xn):.Xr(Uj)..|
00000740  94 05 cd 0d 07 9e 10 c9  55 62 3a e7 58 64 3d 56  |........Ub:.Xd=V|
00000750  68 20 8c 0d 07 a8 0b e7  20 ac 57 59 20 8c 0d 07  |h ...... .WY ...|
00000760  b2 0e f2 58 73 28 55 6a  2c 57 6a 29 0d 07 bc 10  |...Xs(Uj,Wj)....|
00000770  cc 3a f2 58 73 28 55 6a  2c 58 74 29 0d 07 d0 05  |.:.Xs(Uj,Xt)....|
00000780  cd 0d 07 da 05 cd 0d 07  e4 0e c9 57 6a 3a c8 8e  |...........Wj:..|
00000790  58 64 20 ca 0d 07 ee 0c  c9 30 3a e7 56 6a 20 8c  |Xd ......0:.Vj .|
000007a0  0d 07 f8 0c e7 a6 28 2d  32 29 20 8c 0d 08 02 22  |......(-2) ...."|
000007b0  58 75 3d a4 63 74 69 6f  6e 5f 4c 61 75 6e 63 68  |Xu=.ction_Launch|
000007c0  4f 62 6a 65 63 74 28 58  76 24 2c 58 75 29 0d 08  |Object(Xv$,Xu)..|
000007d0  0c 17 cc 3a f2 57 77 28  55 68 2c 55 6a 2c 58 77  |...:.Ww(Uh,Uj,Xw|
000007e0  2c 20 ac b9 29 0d 08 20  05 cd 0d 08 2a 05 cd 0d  |, ..).. ....*...|
000007f0  08 34 0c c9 32 3a e7 56  6e 20 8c 0d 08 3e 0c e7  |.4..2:.Vn ...>..|
00000800  a6 28 2d 32 29 20 8c 0d  08 48 22 58 78 3d a4 63  |.(-2) ...H"Xx=.c|
00000810  74 69 6f 6e 5f 4c 61 75  6e 63 68 4f 62 6a 65 63  |tion_LaunchObjec|
00000820  74 28 58 79 24 2c 58 78  29 0d 08 52 17 cc 3a f2  |t(Xy$,Xx)..R..:.|
00000830  57 77 28 55 68 2c 55 6a  2c 58 7a 2c 20 ac b9 29  |Ww(Uh,Uj,Xz, ..)|
00000840  0d 08 66 05 cd 0d 08 70  05 cd 0d 08 7a 0a c9 37  |..f....p....z..7|
00000850  3a f2 59 55 0d 08 84 0a  c9 38 3a f2 59 56 0d 08  |:.YU.....8:.YV..|
00000860  8e 0a c9 39 3a f2 59 57  0d 08 98 05 cb 0d 08 a2  |...9:.YW........|
00000870  0e c9 59 58 3a c8 8e 58  64 20 ca 0d 08 ac 10 c9  |..YX:..Xd ......|
00000880  30 3a f2 59 59 28 2b 31  2c 30 29 0d 08 b6 10 c9  |0:.YY(+1,0).....|
00000890  31 3a f2 59 59 28 2d 31  2c 30 29 0d 08 c0 10 c9  |1:.YY(-1,0).....|
000008a0  35 3a f2 59 59 28 30 2c  2b 31 29 0d 08 ca 10 c9  |5:.YY(0,+1).....|
000008b0  36 3a f2 59 59 28 30 2c  2d 31 29 0d 08 d4 05 cb  |6:.YY(0,-1).....|
000008c0  0d 08 de 0e c9 58 77 3a  c8 8e 57 58 20 ca 0d 08  |.....Xw:..WX ...|
000008d0  e8 16 c9 a3 3a f2 59 5a  28 58 6e 2c 58 6b 2c 58  |....:.YZ(Xn,Xk,X|
000008e0  6c 2c b9 29 0d 08 f2 1a  c9 b9 3a f2 59 61 28 58  |l,.)......:.Ya(X|
000008f0  6e 2c 58 6b 2c 58 6c 2c  20 ac b9 2c b9 29 0d 08  |n,Xk,Xl, ..,.)..|
00000900  fc 2c cb 3a e7 a6 28 2d  32 29 20 8c 58 75 3d a4  |.,.:..(-2) .Xu=.|
00000910  63 74 69 6f 6e 5f 4c 61  75 6e 63 68 4f 62 6a 65  |ction_LaunchObje|
00000920  63 74 28 58 76 24 2c 58  75 29 0d 09 10 0e c9 58  |ct(Xv$,Xu).....X|
00000930  7a 3a c8 8e 57 58 20 ca  0d 09 1a 16 c9 a3 3a f2  |z:..WX .......:.|
00000940  59 5a 28 58 6e 2c 58 6b  2c 58 6c 2c b9 29 0d 09  |YZ(Xn,Xk,Xl,.)..|
00000950  24 1a c9 b9 3a f2 59 61  28 58 6e 2c 58 6b 2c 58  |$...:.Ya(Xn,Xk,X|
00000960  6c 2c 20 ac b9 2c b9 29  0d 09 2e 2c cb 3a e7 a6  |l, ..,.)...,.:..|
00000970  28 2d 32 29 20 8c 58 78  3d a4 63 74 69 6f 6e 5f  |(-2) .Xx=.ction_|
00000980  4c 61 75 6e 63 68 4f 62  6a 65 63 74 28 58 79 24  |LaunchObject(Xy$|
00000990  2c 58 78 29 0d 09 42 0e  c9 57 7a 3a c8 8e 58 64  |,Xx)..B..Wz:..Xd|
000009a0  20 ca 0d 09 4c 0a c9 39  3a f2 59 62 0d 09 56 0a  | ...L..9:.Yb..V.|
000009b0  c9 35 3a f2 59 63 0d 09  60 0a c9 34 3a f2 59 64  |.5:.Yc..`..4:.Yd|
000009c0  0d 09 6a 11 c9 33 3a f2  59 65 28 22 41 6c 6c 22  |..j..3:.Ye("All"|
000009d0  29 0d 09 74 12 c9 37 3a  f2 59 65 28 22 46 72 6f  |)..t..7:.Ye("Fro|
000009e0  6d 22 29 0d 09 7e 05 cb  0d 09 88 0e c9 57 78 3a  |m")..~.......Wx:|
000009f0  c8 8e 58 64 20 ca 0d 09  92 20 c9 32 3a f2 59 66  |..Xd .... .2:.Yf|
00000a00  3a f2 58 55 28 55 6a 2c  58 6e 29 3a f2 58 55 28  |:.XU(Uj,Xn):.XU(|
00000a10  55 6a 2c 57 7a 29 0d 09  b0 24 c9 31 3a f2 58 55  |Uj,Wz)...$.1:.XU|
00000a20  28 55 6a 2c 58 6e 29 3a  f2 58 55 28 55 6a 2c 57  |(Uj,Xn):.XU(Uj,W|
00000a30  7a 29 3a f2 59 67 3a f2  59 64 0d 09 d8 20 c9 30  |z):.Yg:.Yd... .0|
00000a40  3a f2 59 68 3a f2 58 55  28 55 6a 2c 58 6e 29 3a  |:.Yh:.XU(Uj,Xn):|
00000a50  f2 58 55 28 55 6a 2c 57  7a 29 0d 09 f6 05 cb 0d  |.XU(Uj,Wz)......|
00000a60  0a 00 0f c9 58 74 3a e7  58 64 3d 32 20 8c 0d 0a  |....Xt:.Xd=2 ...|
00000a70  0a 58 59 69 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |.XYi$=.ction_Tag|
00000a80  54 6f 53 74 72 69 6e 67  28 22 65 72 72 31 31 22  |ToString("err11"|
00000a90  29 3a 59 6a 3d a4 63 74  69 6f 6e 5f 52 65 70 6f  |):Yj=.ction_Repo|
00000aa0  72 74 45 72 72 6f 72 28  55 6a 2c 39 39 2c 55 63  |rtError(Uj,99,Uc|
00000ab0  24 2c 59 69 24 2c b9 2c  b9 29 3a e7 59 6a 3c 3e  |$,Yi$,.,.):.Yj<>|
00000ac0  31 20 8c f2 59 6b 0d 0a  28 05 cd 0d 0a 32 17 c9  |1 ..Yk..(....2..|
00000ad0  59 6c 3a e7 58 64 3d 32  20 8c f2 59 6d 28 20 ac  |Yl:.Xd=2 ..Ym( .|
00000ae0  b9 29 0d 0a 3c 14 c9 59  6e 3a e7 56 72 20 80 a6  |.)..<..Yn:.Vr ..|
00000af0  28 2d 32 29 20 8c 0d 0a  46 22 59 6f 3d a4 63 74  |(-2) ...F"Yo=.ct|
00000b00  69 6f 6e 5f 4c 61 75 6e  63 68 4f 62 6a 65 63 74  |ion_LaunchObject|
00000b10  28 59 70 24 2c 59 6f 29  0d 0a 50 05 cd 0d 0a 5a  |(Yp$,Yo)..P....Z|
00000b20  0f c9 59 71 3a e7 58 64  3d 30 20 8c 0d 0a 64 16  |..Yq:.Xd=0 ...d.|
00000b30  f2 55 79 28 55 78 29 3a  f2 59 72 28 55 6a 2c 58  |.Uy(Ux):.Yr(Uj,X|
00000b40  6e 29 0d 0a 78 16 cc 3a  f2 59 73 28 58 6e 2c 58  |n)..x..:.Ys(Xn,X|
00000b50  6b 2c 58 6c 2c 55 78 29  0d 0a 8c 05 cd 0d 0a 96  |k,Xl,Ux)........|
00000b60  0f c9 59 74 3a e7 58 64  3d 30 20 8c 0d 0a a0 16  |..Yt:.Xd=0 .....|
00000b70  f2 55 79 28 55 7a 29 3a  f2 59 72 28 55 6a 2c 58  |.Uy(Uz):.Yr(Uj,X|
00000b80  6e 29 0d 0a b4 16 cc 3a  f2 59 73 28 58 6e 2c 58  |n).....:.Ys(Xn,X|
00000b90  6b 2c 58 6c 2c 55 7a 29  0d 0a c8 05 cd 0d 0a d2  |k,Xl,Uz)........|
00000ba0  05 cb 0d 0a f0 0e c9 55  5a 3a c8 8e 58 6e 20 ca  |.......UZ:..Xn .|
00000bb0  0d 0a fa 10 c9 55 62 3a  e7 58 64 3d 56 68 20 8c  |.....Ub:.Xd=Vh .|
00000bc0  0d 0b 04 0b f2 59 75 28  58 6b 29 0d 0b 0e 05 cd  |.....Yu(Xk).....|
00000bd0  0d 0b 18 12 c9 58 77 3a  f2 59 76 28 58 6b 2c 58  |.....Xw:.Yv(Xk,X|
00000be0  6c 29 0d 0b 22 12 c9 58  7a 3a f2 59 77 28 58 6b  |l).."..Xz:.Yw(Xk|
00000bf0  2c 58 6c 29 0d 0b 2c 12  c9 59 6e 3a f2 59 78 28  |,Xl)..,..Yn:.Yx(|
00000c00  58 6b 2c 58 6c 29 0d 0b  36 0e c9 57 6a 3a c8 8e  |Xk,Xl)..6..Wj:..|
00000c10  58 64 20 ca 0d 0b 40 0a  c9 37 3a f2 59 55 0d 0b  |Xd ...@..7:.YU..|
00000c20  4a 0a c9 38 3a f2 59 56  0d 0b 54 05 cb 0d 0b 5e  |J..8:.YV..T....^|
00000c30  05 cb 0d 0b 7c 0e c9 55  61 3a c8 8e 58 6e 20 ca  |....|..Ua:..Xn .|
00000c40  0d 0b 86 0e c9 57 6a 3a  c8 8e 58 64 20 ca 0d 0b  |.....Wj:..Xd ...|
00000c50  90 0a c9 37 3a f2 59 55  0d 0b 9a 0a c9 38 3a f2  |...7:.YU.....8:.|
00000c60  59 56 0d 0b a4 05 cb 0d  0b ae 0e c9 58 77 3a c8  |YV..........Xw:.|
00000c70  8e 57 58 20 ca 0d 0b b8  18 c9 a3 3a f2 59 5a 28  |.WX .......:.YZ(|
00000c80  58 6e 2c 58 6b 2c 58 6c  2c 20 ac b9 29 0d 0b c2  |Xn,Xk,Xl, ..)...|
00000c90  1a c9 b9 3a f2 59 61 28  58 6e 2c 58 6b 2c 58 6c  |...:.Ya(Xn,Xk,Xl|
00000ca0  2c b9 2c 20 ac b9 29 0d  0b cc 05 cb 0d 0b d6 0e  |,., ..).........|
00000cb0  c9 58 7a 3a c8 8e 57 58  20 ca 0d 0b e0 18 c9 a3  |.Xz:..WX .......|
00000cc0  3a f2 59 5a 28 58 6e 2c  58 6b 2c 58 6c 2c 20 ac  |:.YZ(Xn,Xk,Xl, .|
00000cd0  b9 29 0d 0b ea 1a c9 b9  3a f2 59 61 28 58 6e 2c  |.)......:.Ya(Xn,|
00000ce0  58 6b 2c 58 6c 2c b9 2c  20 ac b9 29 0d 0b f4 05  |Xk,Xl,., ..)....|
00000cf0  cb 0d 0b fe 0e c9 57 78  3a c8 8e 58 64 20 ca 0d  |......Wx:..Xd ..|
00000d00  0c 08 0a c9 32 3a f2 59  66 0d 0c 12 0e c9 31 3a  |....2:.Yf.....1:|
00000d10  f2 59 67 3a f2 59 64 0d  0c 26 0a c9 30 3a f2 59  |.Yg:.Yd..&..0:.Y|
00000d20  68 0d 0c 30 05 cb 0d 0c  3a 0e c9 57 7a 3a c8 8e  |h..0....:..Wz:..|
00000d30  58 64 20 ca 0d 0c 44 0a  c9 34 3a f2 59 64 0d 0c  |Xd ...D..4:.Yd..|
00000d40  4e 11 c9 33 3a f2 59 65  28 22 41 6c 6c 22 29 0d  |N..3:.Ye("All").|
00000d50  0c 58 12 c9 37 3a f2 59  65 28 22 46 72 6f 6d 22  |.X..7:.Ye("From"|
00000d60  29 0d 0c 62 05 cb 0d 0c  6c 15 c9 59 6c 3a e7 58  |)..b....l..Yl:.X|
00000d70  64 3d 32 20 8c f2 59 6d  28 b9 29 0d 0c 76 17 c9  |d=2 ..Ym(.)..v..|
00000d80  59 6e 3a e7 56 72 20 8c  f2 59 79 28 58 6b 2c 58  |Yn:.Vr ..Yy(Xk,X|
00000d90  6c 29 0d 0c 80 05 cb 0d  0c 9e 0e c9 36 34 3a c8  |l)..........64:.|
00000da0  8e 58 6e 20 ca 0d 0c a8  0e c9 58 77 3a c8 8e 57  |.Xn ......Xw:..W|
00000db0  58 20 ca 0d 0c b2 19 c9  a3 3a 56 61 3d 32 3a f2  |X .......:Va=2:.|
00000dc0  59 7a 28 58 6e 2c 58 6b  2c 58 6c 29 0d 0c bc 20  |Yz(Xn,Xk,Xl)... |
00000dd0  c9 b9 3a e7 57 56 3e 30  20 8c 56 61 3d 33 3a f2  |..:.WV>0 .Va=3:.|
00000de0  5a 55 28 58 6e 2c 58 6b  2c 58 6c 29 0d 0c c6 05  |ZU(Xn,Xk,Xl)....|
00000df0  cb 0d 0c d0 0e c9 58 7a  3a c8 8e 57 58 20 ca 0d  |......Xz:..WX ..|
00000e00  0c da 19 c9 a3 3a 56 61  3d 32 3a f2 59 7a 28 58  |.....:Va=2:.Yz(X|
00000e10  6e 2c 58 6b 2c 58 6c 29  0d 0c e4 20 c9 b9 3a e7  |n,Xk,Xl)... ..:.|
00000e20  57 56 3e 30 20 8c 56 61  3d 33 3a f2 5a 55 28 58  |WV>0 .Va=3:.ZU(X|
00000e30  6e 2c 58 6b 2c 58 6c 29  0d 0c ee 05 cb 0d 0c f8  |n,Xk,Xl)........|
00000e40  10 c9 59 6c 3a e7 58 64  3d 57 61 20 8c 0d 0d 02  |..Yl:.Xd=Wa ....|
00000e50  26 56 61 3d 34 3a 59 6a  3d a4 63 74 69 6f 6e 5f  |&Va=4:Yj=.ction_|
00000e60  42 65 67 69 6e 44 72 61  67 28 55 6a 2c 58 6e 2c  |BeginDrag(Uj,Xn,|
00000e70  58 64 29 0d 0d 16 05 cd  0d 0d 20 05 cb 0d 0d 3e  |Xd)....... ....>|
00000e80  0e c9 31 36 3a c8 8e 58  6e 20 ca 0d 0d 52 0f c9  |..16:..Xn ...R..|
00000e90  58 77 3a e7 57 56 3d 30  20 8c 0d 0d 5c 16 56 61  |Xw:.WV=0 ...\.Va|
00000ea0  3d 31 3a f2 5a 56 28 58  6e 2c 58 6b 2c 58 6c 29  |=1:.ZV(Xn,Xk,Xl)|
00000eb0  0d 0d 66 0c cc 3a c8 8e  57 58 20 ca 0d 0d 7a 19  |..f..:..WX ...z.|
00000ec0  c9 a3 3a 56 61 3d 32 3a  f2 59 7a 28 58 6e 2c 58  |..:Va=2:.Yz(Xn,X|
00000ed0  6b 2c 58 6c 29 0d 0d 84  19 c9 b9 3a 56 61 3d 33  |k,Xl)......:Va=3|
00000ee0  3a f2 5a 55 28 58 6e 2c  58 6b 2c 58 6c 29 0d 0d  |:.ZU(Xn,Xk,Xl)..|
00000ef0  8e 05 cb 0d 0d 98 05 cd  0d 0d ac 0f c9 58 7a 3a  |.............Xz:|
00000f00  e7 57 56 3d 30 20 8c 0d  0d b6 16 56 61 3d 31 3a  |.WV=0 .....Va=1:|
00000f10  f2 5a 56 28 58 6e 2c 58  6b 2c 58 6c 29 0d 0d c0  |.ZV(Xn,Xk,Xl)...|
00000f20  0c cc 3a c8 8e 57 58 20  ca 0d 0d d4 19 c9 a3 3a  |..:..WX .......:|
00000f30  56 61 3d 32 3a f2 59 7a  28 58 6e 2c 58 6b 2c 58  |Va=2:.Yz(Xn,Xk,X|
00000f40  6c 29 0d 0d de 19 c9 b9  3a 56 61 3d 33 3a f2 5a  |l)......:Va=3:.Z|
00000f50  55 28 58 6e 2c 58 6b 2c  58 6c 29 0d 0d e8 05 cb  |U(Xn,Xk,Xl).....|
00000f60  0d 0d f2 05 cd 0d 0e 06  1a c9 59 6e 3a 56 61 3d  |..........Yn:Va=|
00000f70  31 3a f2 5a 56 28 58 6e  2c 58 6b 2c 58 6c 29 0d  |1:.ZV(Xn,Xk,Xl).|
00000f80  0e 10 05 cb 0d 0e 2e 07  cb 3a e1 0d 0e 56 2c dd  |.........:...V,.|
00000f90  f2 58 58 28 58 6a 29 3a  58 6e 3d 58 6a 21 30 3a  |.XX(Xj):Xn=Xj!0:|
00000fa0  58 64 3d 58 6a 21 34 3a  5a 57 3d 58 6a 21 32 34  |Xd=Xj!4:ZW=Xj!24|
00000fb0  3a c8 8e 58 6e 20 ca 0d  0e 88 0e c9 59 58 3a c8  |:..Xn ......YX:.|
00000fc0  8e 58 64 20 ca 0d 0e 92  0f c9 32 3a e7 5a 57 3d  |.Xd ......2:.ZW=|
00000fd0  31 33 20 8c 0d 0e 9c 64  5a 58 3d bb a4 63 74 69  |13 ....dZX=..cti|
00000fe0  6f 6e 5f 52 65 61 64 49  63 6f 6e 54 65 78 74 28  |on_ReadIconText(|
00000ff0  55 6a 2c 59 58 2c 32 29  3a 5a 59 3d bb a4 63 74  |Uj,YX,2):ZY=..ct|
00001000  69 6f 6e 5f 52 65 61 64  49 63 6f 6e 54 65 78 74  |ion_ReadIconText|
00001010  28 55 6a 2c 59 58 2c 34  29 3a e7 56 5a 3d 35 20  |(Uj,YX,4):.VZ=5 |
00001020  8c 5a 5a 24 3d 22 53 4f  55 52 43 45 22 8b 5a 5a  |.ZZ$="SOURCE".ZZ|
00001030  24 3d 22 44 45 53 54 22  0d 0e ba 42 f2 57 68 28  |$="DEST"...B.Wh(|
00001040  5a 5a 24 2c 5a 58 2c 5a  59 29 3a 5a 59 24 3d a4  |ZZ$,ZX,ZY):ZY$=.|
00001050  63 74 69 6f 6e 5f 52 65  61 64 49 63 6f 6e 54 65  |ction_ReadIconTe|
00001060  78 74 28 55 6a 2c 59 58  2c 34 29 3a f2 5a 61 28  |xt(Uj,YX,4):.Za(|
00001070  59 58 2c 34 2c a9 5a 59  24 29 0d 0e d8 05 cd 0d  |YX,4,.ZY$)......|
00001080  0e e2 0f c9 34 3a e7 5a  57 3d 31 33 20 8c 0d 0e  |....4:.ZW=13 ...|
00001090  ec 64 5a 58 3d bb a4 63  74 69 6f 6e 5f 52 65 61  |.dZX=..ction_Rea|
000010a0  64 49 63 6f 6e 54 65 78  74 28 55 6a 2c 59 58 2c  |dIconText(Uj,YX,|
000010b0  32 29 3a 5a 59 3d bb a4  63 74 69 6f 6e 5f 52 65  |2):ZY=..ction_Re|
000010c0  61 64 49 63 6f 6e 54 65  78 74 28 55 6a 2c 59 58  |adIconText(Uj,YX|
000010d0  2c 34 29 3a e7 56 5a 3d  35 20 8c 5a 5a 24 3d 22  |,4):.VZ=5 .ZZ$="|
000010e0  53 4f 55 52 43 45 22 8b  5a 5a 24 3d 22 44 45 53  |SOURCE".ZZ$="DES|
000010f0  54 22 0d 0f 0a 16 f2 57  68 28 5a 5a 24 2c 5a 58  |T".....Wh(ZZ$,ZX|
00001100  2c 5a 59 29 3a f2 5a 62  0d 0f 1e 05 cd 0d 0f 28  |,ZY):.Zb.......(|
00001110  05 cb 0d 0f 32 0e c9 57  6a 3a c8 8e 58 64 20 ca  |....2..Wj:..Xd .|
00001120  0d 0f 3c 12 c9 36 3a e7  5a 57 3d 31 33 20 8c f2  |..<..6:.ZW=13 ..|
00001130  5a 62 0d 0f 46 05 cb 0d  0f 50 16 c9 59 6c 3a e7  |Zb..F....P..Yl:.|
00001140  58 64 3d 30 20 80 5a 57  3d 31 33 20 8c 0d 0f 5a  |Xd=0 .ZW=13 ...Z|
00001150  0c f2 59 6d 28 20 ac b9  29 0d 0f 64 05 cd 0d 0f  |..Ym( ..)..d....|
00001160  6e 0e c9 58 77 3a c8 8e  5a 57 20 ca 0d 0f 78 10  |n..Xw:..ZW ...x.|
00001170  c9 97 22 58 22 2d 36 34  3a f2 5a 63 0d 0f 82 05  |.."X"-64:.Zc....|
00001180  cb 0d 0f 8c 0e c9 58 7a  3a c8 8e 5a 57 20 ca 0d  |......Xz:..ZW ..|
00001190  0f 96 10 c9 97 22 58 22  2d 36 34 3a f2 5a 63 0d  |....."X"-64:.Zc.|
000011a0  0f a0 05 cb 0d 0f aa 10  c9 57 7a 3a e7 5a 57 3d  |.........Wz:.ZW=|
000011b0  31 33 20 8c 0d 0f b4 0a  c8 8e 58 64 20 ca 0d 0f  |13 .......Xd ...|
000011c0  be 37 c9 31 31 3a 5a 64  24 3d a4 63 74 69 6f 6e  |.7.11:Zd$=.ction|
000011d0  5f 52 65 61 64 49 63 6f  6e 54 65 78 74 28 55 6a  |_ReadIconText(Uj|
000011e0  2c 58 6e 2c 38 29 3a f2  5a 61 28 58 6e 2c 38 2c  |,Xn,8):.Za(Xn,8,|
000011f0  a9 5a 64 24 29 0d 0f d2  20 c9 38 3a f2 59 68 3a  |.Zd$)... .8:.Yh:|
00001200  f2 58 55 28 55 6a 2c 58  6e 29 3a f2 58 55 28 55  |.XU(Uj,Xn):.XU(U|
00001210  6a 2c 57 78 29 0d 0f f0  39 c9 31 33 3a 5a 64 24  |j,Wx)...9.13:Zd$|
00001220  3d a4 63 74 69 6f 6e 5f  52 65 61 64 49 63 6f 6e  |=.ction_ReadIcon|
00001230  54 65 78 74 28 55 6a 2c  58 6e 2c 31 34 29 3a f2  |Text(Uj,Xn,14):.|
00001240  5a 61 28 58 6e 2c 31 34  2c a9 5a 64 24 29 0d 10  |Za(Xn,14,.Zd$)..|
00001250  04 21 c9 31 34 3a f2 59  68 3a f2 58 55 28 55 6a  |.!.14:.Yh:.XU(Uj|
00001260  2c 58 6e 29 3a f2 58 55  28 55 6a 2c 57 78 29 0d  |,Xn):.XU(Uj,Wx).|
00001270  10 22 05 cb 0d 10 2c 05  cd 0d 10 36 0f cb 3a f2  |."....,....6..:.|
00001280  5a 65 28 5a 57 29 3a e1  0d 10 68 16 dd f2 58 5a  |Ze(ZW):...h...XZ|
00001290  28 58 6a 29 3a c8 8e 58  6a 21 31 36 20 ca 0d 10  |(Xj):..Xj!16 ...|
000012a0  7c 0e c9 30 3a e7 20 ac  57 59 20 8c 0d 10 86 08  ||..0:. .WY .....|
000012b0  56 56 3d b9 0d 10 90 5a  cc 3a 59 69 24 3d a4 63  |VV=....Z.:Yi$=.c|
000012c0  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
000012d0  28 22 65 72 72 31 32 22  29 3a 59 6a 3d a4 63 74  |("err12"):Yj=.ct|
000012e0  69 6f 6e 5f 52 65 70 6f  72 74 45 72 72 6f 72 28  |ion_ReportError(|
000012f0  55 6a 2c 39 39 2c 55 63  24 2c 59 69 24 2c b9 2c  |Uj,99,Uc$,Yi$,.,|
00001300  b9 29 3a 56 56 3d 20 ac  28 59 6a 3d 31 29 0d 10  |.):VV= .(Yj=1)..|
00001310  b8 05 cd 0d 10 c2 0e c9  32 3a f2 5a 66 28 58 6a  |........2:.Zf(Xj|
00001320  29 0d 10 cc 0e c9 33 3a  f2 5a 67 28 58 6a 29 0d  |).....3:.Zg(Xj).|
00001330  10 d6 19 c9 35 3a e7 58  6a 21 34 30 3d 55 66 20  |....5:.Xj!40=Uf |
00001340  8c f2 5a 67 28 58 6a 29  0d 10 e0 0e c9 39 3a f2  |..Zg(Xj).....9:.|
00001350  5a 68 3a f2 5a 69 0d 10  f4 11 c9 26 35 30 32 3a  |Zh:.Zi.....&502:|
00001360  f2 5a 6a 28 58 6a 29 0d  10 fe 13 c9 26 34 30 30  |.Zj(Xj).....&400|
00001370  43 31 3a f2 5a 68 3a f2  5a 69 0d 11 12 07 cb 3a  |C1:.Zh:.Zi.....:|
00001380  e1 0d 11 3a 65 dd f2 57  76 28 58 6a 29 3a 58 6e  |...:e..Wv(Xj):Xn|
00001390  3d 58 6a 21 30 3a c8 99  26 34 30 30 43 38 2c 2c  |=Xj!0:..&400C8,,|
000013a0  58 6a 20 b8 5a 6b 3a 5a  6c 3d 58 6a 21 34 3a 5a  |Xj .Zk:Zl=Xj!4:Z|
000013b0  6d 3d 58 6a 21 31 32 3a  5a 6e 3d 58 6a 21 31 36  |m=Xj!12:Zn=Xj!16|
000013c0  3a 5a 6f 3d 58 6a 21 38  3a 5a 70 3d 58 6a 21 32  |:Zo=Xj!8:Zp=Xj!2|
000013d0  30 3a 5a 71 3d 58 6a 21  32 34 3a c8 95 5a 6b 3a  |0:Zq=Xj!24:..Zk:|
000013e0  c8 8e 58 6e 20 ca 0d 11  8a 0b c9 57 6a 3a f2 5a  |..Xn ......Wj:.Z|
000013f0  72 0d 11 94 0b c9 58 77  3a f2 5a 73 0d 11 9e 0b  |r.....Xw:.Zs....|
00001400  c9 58 7a 3a f2 5a 74 0d  11 a8 0b c9 59 6e 3a f2  |.Xz:.Zt.....Yn:.|
00001410  5a 75 0d 11 b2 0f c9 59  71 3a f2 5a 76 28 55 78  |Zu.....Yq:.Zv(Ux|
00001420  29 0d 11 bc 0f c9 59 74  3a f2 5a 76 28 55 7a 29  |).....Yt:.Zv(Uz)|
00001430  0d 11 c6 1a cb 3a c8 99  26 34 30 30 43 41 2c 2c  |.....:..&400CA,,|
00001440  58 6a 20 b8 5a 6b 3a ce  3a e1 0d 12 02 13 dd f2  |Xj .Zk:.:.......|
00001450  58 57 28 58 6a 29 3a c8  8e 56 61 20 ca 0d 12 16  |XW(Xj):..Va ....|
00001460  06 c9 31 0d 12 20 0a c9  32 3a f2 5a 77 0d 12 2a  |..1.. ..2:.Zw..*|
00001470  0a c9 33 3a f2 5a 78 0d  12 34 0e c9 34 3a f2 5a  |..3:.Zx..4..4:.Z|
00001480  79 28 58 6a 29 0d 12 3e  06 c9 35 0d 12 48 07 cb  |y(Xj)..>..5..H..|
00001490  3a e1 0d 12 70 fa dd f2  5a 79 28 58 6a 29 3a c8  |:...p...Zy(Xj):.|
000014a0  99 26 34 30 30 43 46 2c  2c 58 6a 3a 58 6b 3d 58  |.&400CF,,Xj:Xk=X|
000014b0  6a 21 30 3a 58 6c 3d 58  6a 21 34 3a 58 6e 3d 58  |j!0:Xl=Xj!4:Xn=X|
000014c0  6a 21 31 32 3a 58 64 3d  58 6a 21 31 36 3a 5a 7a  |j!12:Xd=Xj!16:Zz|
000014d0  24 3d a4 63 74 69 6f 6e  5f 50 61 74 68 6e 61 6d  |$=.ction_Pathnam|
000014e0  65 4f 6e 6c 79 28 a4 63  74 69 6f 6e 5f 52 65 61  |eOnly(.ction_Rea|
000014f0  64 49 63 6f 6e 54 65 78  74 28 55 6a 2c 57 6a 2c  |dIconText(Uj,Wj,|
00001500  31 34 29 29 3a 61 55 24  3d a4 63 74 69 6f 6e 5f  |14)):aU$=.ction_|
00001510  4c 65 61 66 6e 61 6d 65  4f 6e 6c 79 28 a4 63 74  |LeafnameOnly(.ct|
00001520  69 6f 6e 5f 52 65 61 64  49 63 6f 6e 54 65 78 74  |ion_ReadIconText|
00001530  28 55 6a 2c 57 6a 2c 31  34 29 29 3a 58 6a 21 30  |(Uj,Wj,14)):Xj!0|
00001540  3d 34 34 2b 28 28 a9 61  55 24 20 81 34 29 2a 34  |=44+((.aU$ .4)*4|
00001550  29 2b 34 3a 58 6a 21 34  3d 30 3a 58 6a 21 38 3d  |)+4:Xj!4=0:Xj!8=|
00001560  30 3a 58 6a 21 31 32 3d  30 3a 58 6a 21 31 36 3d  |0:Xj!12=0:Xj!16=|
00001570  31 3a 58 6a 21 32 30 3d  58 6e 3a 58 6a 21 32 34  |1:Xj!20=Xn:Xj!24|
00001580  3d 58 64 3a 58 6a 21 32  38 3d 58 6b 0d 13 10 44  |=Xd:Xj!28=Xk...D|
00001590  58 6a 21 33 32 3d 58 6c  3a 58 6a 21 33 36 3d 36  |Xj!32=Xl:Xj!36=6|
000015a0  34 3a 58 6a 21 34 30 3d  26 46 46 46 3a 24 28 58  |4:Xj!40=&FFF:$(X|
000015b0  6a 2b 34 34 29 3d 61 55  24 2b bd 30 3a c8 99 26  |j+44)=aU$+.0:..&|
000015c0  34 30 30 45 37 2c 31 37  2c 58 6a 2c 58 6e 3a e1  |400E7,17,Xj,Xn:.|
000015d0  0d 13 60 cd dd f2 5a 66  28 58 6a 29 3a 61 56 3d  |..`...Zf(Xj):aV=|
000015e0  58 6a 21 34 3a 58 6a 21  31 32 3d 58 6a 21 38 3a  |Xj!4:Xj!12=Xj!8:|
000015f0  58 6a 21 31 36 3d 33 3a  5a 7a 24 3d a4 63 74 69  |Xj!16=3:Zz$=.cti|
00001600  6f 6e 5f 45 78 74 72 61  63 74 53 74 72 69 6e 67  |on_ExtractString|
00001610  28 58 6a 2b 34 34 29 3a  c8 99 26 34 30 30 45 37  |(Xj+44):..&400E7|
00001620  2c 31 37 2c 58 6a 2c 61  56 3a 61 57 24 3d a4 63  |,17,Xj,aV:aW$=.c|
00001630  74 69 6f 6e 5f 52 65 61  64 49 63 6f 6e 54 65 78  |tion_ReadIconTex|
00001640  74 28 55 6a 2c 59 6c 2c  30 29 3a 61 57 24 3d a4  |t(Uj,Yl,0):aW$=.|
00001650  63 74 69 6f 6e 5f 4c 65  61 66 6e 61 6d 65 4f 6e  |ction_LeafnameOn|
00001660  6c 79 28 61 57 24 29 3a  5a 7a 24 3d 5a 7a 24 2b  |ly(aW$):Zz$=Zz$+|
00001670  61 57 24 3a 61 58 24 3d  a4 63 74 69 6f 6e 5f 52  |aW$:aX$=.ction_R|
00001680  65 61 64 49 63 6f 6e 54  65 78 74 28 55 6a 2c 59  |eadIconText(Uj,Y|
00001690  6c 2c 57 61 29 3a c8 8e  61 58 24 20 ca 0d 13 ce  |l,Wa):..aX$ ....|
000016a0  19 c9 22 64 69 72 65 63  74 6f 72 79 22 3a f2 61  |.."directory":.a|
000016b0  59 28 5a 7a 24 29 0d 13  d8 0e 7f 3a f2 61 5a 28  |Y(Zz$).....:.aZ(|
000016c0  5a 7a 24 29 0d 13 ec 14  cb 3a c8 99 26 34 30 30  |Zz$).....:..&400|
000016d0  44 34 2c 2c 2d 31 3a e1  0d 14 1e ed dd a4 63 74  |D4,,-1:.......ct|
000016e0  69 6f 6e 5f 42 65 67 69  6e 44 72 61 67 28 58 63  |ion_BeginDrag(Xc|
000016f0  2c 58 6e 2c 58 64 29 3a  ea 61 61 2c 61 62 2c 61  |,Xn,Xd):.aa,ab,a|
00001700  63 2c 61 64 3a 58 63 21  30 3d 34 3a 58 63 21 34  |c,ad:Xc!0=4:Xc!4|
00001710  3d 35 3a 58 63 21 38 3d  31 31 3a 58 63 21 31 32  |=5:Xc!8=11:Xc!12|
00001720  3d 31 32 3a 58 63 21 31  36 3d 2d 31 3a c8 99 26  |=12:Xc!16=-1:..&|
00001730  33 31 2c 58 63 2c 58 63  2b 33 32 3a 61 61 3d 28  |31,Xc,Xc+32:aa=(|
00001740  58 63 21 34 30 2b 31 29  2a 20 32 5e 28 20 58 63  |Xc!40+1)* 2^( Xc|
00001750  21 33 32 20 29 3a 61 62  3d 28 58 63 21 34 34 2b  |!32 ):ab=(Xc!44+|
00001760  31 29 2a 20 32 5e 28 20  58 63 21 33 36 20 29 3a  |1)* 2^( Xc!36 ):|
00001770  58 63 21 30 3d 58 6e 3a  c8 99 26 34 30 30 43 43  |Xc!0=Xn:..&400CC|
00001780  2c 2c 58 63 3a 61 63 3d  58 63 21 34 3a 61 64 3d  |,,Xc:ac=Xc!4:ad=|
00001790  58 63 21 31 36 3a 58 63  21 30 3d 58 6e 3a 58 63  |Xc!16:Xc!0=Xn:Xc|
000017a0  21 34 3d 58 64 3a c8 99  26 34 30 30 43 45 2c 2c  |!4=Xd:..&400CE,,|
000017b0  58 63 3a 58 63 21 38 2b  3d 61 63 3a 58 63 21 31  |Xc:Xc!8+=ac:Xc!1|
000017c0  32 2b 3d 61 64 0d 14 be  57 58 63 21 31 36 2b 3d  |2+=ad...WXc!16+=|
000017d0  61 63 3a 58 63 21 32 30  2b 3d 61 64 3a 58 63 21  |ac:Xc!20+=ad:Xc!|
000017e0  30 3d 30 3a 58 63 21 34  3d 35 3a 58 63 21 32 34  |0=0:Xc!4=5:Xc!24|
000017f0  3d 30 3a 58 63 21 32 38  3d 30 3a 58 63 21 33 32  |=0:Xc!28=0:Xc!32|
00001800  3d 61 61 3a 58 63 21 33  36 3d 61 62 3a c8 99 26  |=aa:Xc!36=ab:..&|
00001810  34 30 30 44 30 2c 2c 58  63 3a 3d 30 0d 15 0e d3  |400D0,,Xc:=0....|
00001820  dd f2 56 62 3a 61 65 3d  55 6e 3a f2 61 66 28 55  |..Vb:ae=Un:.af(U|
00001830  6a 2c 22 3c 22 2b 55 63  24 2b 22 24 44 69 72 3e  |j,"<"+Uc$+"$Dir>|
00001840  2e 54 65 6d 70 6c 61 74  65 73 22 29 3a 61 65 3d  |.Templates"):ae=|
00001850  a4 63 74 69 6f 6e 5f 4c  6f 61 64 54 65 6d 70 6c  |.ction_LoadTempl|
00001860  61 74 65 28 55 6c 2c 61  65 2c 55 6e 2b 55 6d 2c  |ate(Ul,ae,Un+Um,|
00001870  22 69 6e 66 6f 72 6d 61  74 69 6f 6e 22 29 3a 61  |"information"):a|
00001880  67 3d a4 63 74 69 6f 6e  5f 4d 61 6b 65 54 65 6d  |g=.ction_MakeTem|
00001890  70 6c 61 74 65 41 57 69  6e 64 6f 77 28 55 6c 29  |plateAWindow(Ul)|
000018a0  3a 61 65 3d a4 63 74 69  6f 6e 5f 4c 6f 61 64 54  |:ae=.ction_LoadT|
000018b0  65 6d 70 6c 61 74 65 28  55 6c 2c 61 65 2c 55 6e  |emplate(Ul,ae,Un|
000018c0  2b 55 6d 2c 22 73 6f 75  72 63 65 22 29 3a 58 77  |+Um,"source"):Xw|
000018d0  3d a4 63 74 69 6f 6e 5f  4d 61 6b 65 54 65 6d 70  |=.ction_MakeTemp|
000018e0  6c 61 74 65 41 57 69 6e  64 6f 77 28 55 6c 29 0d  |lateAWindow(Ul).|
000018f0  15 54 ef 61 65 3d a4 63  74 69 6f 6e 5f 4c 6f 61  |.T.ae=.ction_Loa|
00001900  64 54 65 6d 70 6c 61 74  65 28 55 6c 2c 61 65 2c  |dTemplate(Ul,ae,|
00001910  55 6e 2b 55 6d 2c 22 78  66 65 72 5f 73 65 6e 64  |Un+Um,"xfer_send|
00001920  22 29 3a 59 6c 3d a4 63  74 69 6f 6e 5f 4d 61 6b  |"):Yl=.ction_Mak|
00001930  65 54 65 6d 70 6c 61 74  65 41 57 69 6e 64 6f 77  |eTemplateAWindow|
00001940  28 55 6c 29 3a 61 65 3d  a4 63 74 69 6f 6e 5f 4c  |(Ul):ae=.ction_L|
00001950  6f 61 64 54 65 6d 70 6c  61 74 65 28 55 6c 2c 61  |oadTemplate(Ul,a|
00001960  65 2c 55 6e 2b 55 6d 2c  22 64 65 73 74 22 29 3a  |e,Un+Um,"dest"):|
00001970  58 7a 3d a4 63 74 69 6f  6e 5f 4d 61 6b 65 54 65  |Xz=.ction_MakeTe|
00001980  6d 70 6c 61 74 65 41 57  69 6e 64 6f 77 28 55 6c  |mplateAWindow(Ul|
00001990  29 3a 61 65 3d a4 63 74  69 6f 6e 5f 4c 6f 61 64  |):ae=.ction_Load|
000019a0  54 65 6d 70 6c 61 74 65  28 55 6c 2c 61 65 2c 55  |Template(Ul,ae,U|
000019b0  6e 2b 55 6d 2c 22 6d 61  69 6e 22 29 3a 57 6a 3d  |n+Um,"main"):Wj=|
000019c0  a4 63 74 69 6f 6e 5f 4d  61 6b 65 54 65 6d 70 6c  |.ction_MakeTempl|
000019d0  61 74 65 41 57 69 6e 64  6f 77 28 55 6c 29 0d 15  |ateAWindow(Ul)..|
000019e0  90 f9 61 65 3d a4 63 74  69 6f 6e 5f 4c 6f 61 64  |..ae=.ction_Load|
000019f0  54 65 6d 70 6c 61 74 65  28 55 6c 2c 61 65 2c 55  |Template(Ul,ae,U|
00001a00  6e 2b 55 6d 2c 22 6d 61  67 6e 69 66 69 65 72 22  |n+Um,"magnifier"|
00001a10  29 3a 59 58 3d a4 63 74  69 6f 6e 5f 4d 61 6b 65  |):YX=.ction_Make|
00001a20  54 65 6d 70 6c 61 74 65  41 57 69 6e 64 6f 77 28  |TemplateAWindow(|
00001a30  55 6c 29 3a 61 65 3d a4  63 74 69 6f 6e 5f 4c 6f  |Ul):ae=.ction_Lo|
00001a40  61 64 54 65 6d 70 6c 61  74 65 28 55 6c 2c 61 65  |adTemplate(Ul,ae|
00001a50  2c 55 6e 2b 55 6d 2c 22  70 72 65 66 5f 70 61 6e  |,Un+Um,"pref_pan|
00001a60  65 22 29 3a 57 7a 3d a4  63 74 69 6f 6e 5f 4d 61  |e"):Wz=.ction_Ma|
00001a70  6b 65 54 65 6d 70 6c 61  74 65 41 57 69 6e 64 6f  |keTemplateAWindo|
00001a80  77 28 55 6c 29 3a 61 65  3d a4 63 74 69 6f 6e 5f  |w(Ul):ae=.ction_|
00001a90  4c 6f 61 64 54 65 6d 70  6c 61 74 65 28 55 6c 2c  |LoadTemplate(Ul,|
00001aa0  61 65 2c 55 6e 2b 55 6d  2c 22 70 72 65 66 5f 6d  |ae,Un+Um,"pref_m|
00001ab0  61 69 6e 22 29 3a 57 78  3d a4 63 74 69 6f 6e 5f  |ain"):Wx=.ction_|
00001ac0  4d 61 6b 65 54 65 6d 70  6c 61 74 65 41 57 69 6e  |MakeTemplateAWin|
00001ad0  64 6f 77 28 55 6c 29 0d  15 cc f4 61 65 3d a4 63  |dow(Ul)....ae=.c|
00001ae0  74 69 6f 6e 5f 4c 6f 61  64 54 65 6d 70 6c 61 74  |tion_LoadTemplat|
00001af0  65 28 55 6c 2c 61 65 2c  55 6e 2b 55 6d 2c 22 70  |e(Ul,ae,Un+Um,"p|
00001b00  72 6f 67 72 65 73 73 22  29 3a 58 74 3d a4 63 74  |rogress"):Xt=.ct|
00001b10  69 6f 6e 5f 4d 61 6b 65  54 65 6d 70 6c 61 74 65  |ion_MakeTemplate|
00001b20  41 57 69 6e 64 6f 77 28  55 6c 29 3a 61 65 3d a4  |AWindow(Ul):ae=.|
00001b30  63 74 69 6f 6e 5f 4c 6f  61 64 54 65 6d 70 6c 61  |ction_LoadTempla|
00001b40  74 65 28 55 6c 2c 61 65  2c 55 6e 2b 55 6d 2c 22  |te(Ul,ae,Un+Um,"|
00001b50  62 61 63 6b 22 29 3a 59  6e 3d a4 63 74 69 6f 6e  |back"):Yn=.ction|
00001b60  5f 4d 61 6b 65 54 65 6d  70 6c 61 74 65 41 57 69  |_MakeTemplateAWi|
00001b70  6e 64 6f 77 28 55 6c 29  3a 61 65 3d a4 63 74 69  |ndow(Ul):ae=.cti|
00001b80  6f 6e 5f 4c 6f 61 64 54  65 6d 70 6c 61 74 65 28  |on_LoadTemplate(|
00001b90  55 6c 2c 61 65 2c 55 6e  2b 55 6d 2c 22 78 66 65  |Ul,ae,Un+Um,"xfe|
00001ba0  72 5f 73 65 6e 64 32 22  29 3a 61 68 3d a4 63 74  |r_send2"):ah=.ct|
00001bb0  69 6f 6e 5f 4d 61 6b 65  54 65 6d 70 6c 61 74 65  |ion_MakeTemplate|
00001bc0  41 57 69 6e 64 6f 77 28  55 6c 29 0d 16 08 ed 61  |AWindow(Ul)....a|
00001bd0  65 3d a4 63 74 69 6f 6e  5f 4c 6f 61 64 54 65 6d  |e=.ction_LoadTem|
00001be0  70 6c 61 74 65 28 55 6c  2c 61 65 2c 55 6e 2b 55  |plate(Ul,ae,Un+U|
00001bf0  6d 2c 22 63 6f 6c 72 22  29 3a 59 71 3d a4 63 74  |m,"colr"):Yq=.ct|
00001c00  69 6f 6e 5f 4d 61 6b 65  54 65 6d 70 6c 61 74 65  |ion_MakeTemplate|
00001c10  41 57 69 6e 64 6f 77 28  55 6c 29 3a 61 65 3d a4  |AWindow(Ul):ae=.|
00001c20  63 74 69 6f 6e 5f 4c 6f  61 64 54 65 6d 70 6c 61  |ction_LoadTempla|
00001c30  74 65 28 55 6c 2c 61 65  2c 55 6e 2b 55 6d 2c 22  |te(Ul,ae,Un+Um,"|
00001c40  6d 76 6d 74 22 29 3a 59  74 3d a4 63 74 69 6f 6e  |mvmt"):Yt=.ction|
00001c50  5f 4d 61 6b 65 54 65 6d  70 6c 61 74 65 41 57 69  |_MakeTemplateAWi|
00001c60  6e 64 6f 77 28 55 6c 29  3a 61 65 3d a4 63 74 69  |ndow(Ul):ae=.cti|
00001c70  6f 6e 5f 4c 6f 61 64 54  65 6d 70 6c 61 74 65 28  |on_LoadTemplate(|
00001c80  55 6c 2c 61 65 2c 55 6e  2b 55 6d 2c 22 73 68 61  |Ul,ae,Un+Um,"sha|
00001c90  72 65 5f 31 22 29 3a 58  6f 3d a4 63 74 69 6f 6e  |re_1"):Xo=.ction|
00001ca0  5f 4d 61 6b 65 54 65 6d  70 6c 61 74 65 41 57 69  |_MakeTemplateAWi|
00001cb0  6e 64 6f 77 28 55 6c 29  0d 16 44 59 61 65 3d a4  |ndow(Ul)..DYae=.|
00001cc0  63 74 69 6f 6e 5f 4c 6f  61 64 54 65 6d 70 6c 61  |ction_LoadTempla|
00001cd0  74 65 28 55 6c 2c 61 65  2c 55 6e 2b 55 6d 2c 22  |te(Ul,ae,Un+Um,"|
00001ce0  73 68 61 72 65 5f 32 22  29 3a 58 71 3d a4 63 74  |share_2"):Xq=.ct|
00001cf0  69 6f 6e 5f 4d 61 6b 65  54 65 6d 70 6c 61 74 65  |ion_MakeTemplate|
00001d00  41 57 69 6e 64 6f 77 28  55 6c 29 3a f2 61 69 3a  |AWindow(Ul):.ai:|
00001d10  e1 0d 16 80 90 dd f2 61  6a 28 61 6b 24 2c 61 61  |.......aj(ak$,aa|
00001d20  2c 61 62 29 3a 24 28 55  72 2b 61 6c 29 3d 61 6b  |,ab):$(Ur+al)=ak|
00001d30  24 2b bd 30 3a 3f 28 55  72 2b 61 6c 2b 31 32 29  |$+.0:?(Ur+al+12)|
00001d40  3d 37 3a 3f 28 55 72 2b  61 6c 2b 31 33 29 3d 32  |=7:?(Ur+al+13)=2|
00001d50  3a 3f 28 55 72 2b 61 6c  2b 31 34 29 3d 37 3a 3f  |:?(Ur+al+14)=7:?|
00001d60  28 55 72 2b 61 6c 2b 31  35 29 3d 30 3a 21 28 55  |(Ur+al+15)=0:!(U|
00001d70  72 2b 61 6c 2b 31 36 29  3d 61 61 3a 21 28 55 72  |r+al+16)=aa:!(Ur|
00001d80  2b 61 6c 2b 32 30 29 3d  61 62 3a 21 28 55 72 2b  |+al+20)=ab:!(Ur+|
00001d90  61 6c 2b 32 34 29 3d 30  3a 61 6c 2b 3d 32 38 3a  |al+24)=0:al+=28:|
00001da0  e1 0d 17 02 6c dd f2 61  6d 28 61 6e 24 2c 61 6f  |....l..am(an$,ao|
00001db0  2c 61 70 2c 61 71 29 3a  21 28 55 72 2b 61 6c 2b  |,ap,aq):!(Ur+al+|
00001dc0  30 29 3d 61 6f 3a 21 28  55 72 2b 61 6c 2b 34 29  |0)=ao:!(Ur+al+4)|
00001dd0  3d 61 70 3a 21 28 55 72  2b 61 6c 2b 38 29 3d 26  |=ap:!(Ur+al+8)=&|
00001de0  30 37 30 30 30 30 30 31  2b 94 61 71 2a 32 5e 32  |07000001+.aq*2^2|
00001df0  32 3a 24 28 55 72 2b 61  6c 2b 31 32 29 3d 61 6e  |2:$(Ur+al+12)=an|
00001e00  24 2b bd 30 3a 61 6c 2b  3d 32 34 3a e1 0d 17 5c  |$+.0:al+=24:...\|
00001e10  a5 dd f2 61 72 28 61 73  24 2c 61 6f 2c 61 70 2c  |...ar(as$,ao,ap,|
00001e20  61 71 29 3a 21 28 55 72  2b 61 6c 2b 30 29 3d 61  |aq):!(Ur+al+0)=a|
00001e30  6f 3a 21 28 55 72 2b 61  6c 2b 34 29 3d 61 70 3a  |o:!(Ur+al+4)=ap:|
00001e40  21 28 55 72 2b 61 6c 2b  38 29 3d 26 30 37 30 30  |!(Ur+al+8)=&0700|
00001e50  30 31 30 31 2b 94 61 71  2a 32 5e 32 32 3a 61 74  |0101+.aq*2^22:at|
00001e60  3d 61 75 2b 61 76 3a 24  61 74 3d 61 73 24 2b bd  |=au+av:$at=as$+.|
00001e70  30 3a 61 76 2b 3d a9 61  73 24 2b 31 3a 21 28 55  |0:av+=.as$+1:!(U|
00001e80  72 2b 61 6c 2b 31 32 29  3d 61 74 3a 21 28 55 72  |r+al+12)=at:!(Ur|
00001e90  2b 61 6c 2b 31 36 29 3d  2d 31 3a 21 28 55 72 2b  |+al+16)=-1:!(Ur+|
00001ea0  61 6c 2b 32 30 29 3d 31  36 3a 61 6c 2b 3d 32 34  |al+20)=16:al+=24|
00001eb0  3a e1 0d 17 e8 83 dd f2  59 75 28 58 6b 29 3a 56  |:.......Yu(Xk):V|
00001ec0  5a 3d 31 3a 61 6c 3d 30  3a f2 61 6a 28 55 63 24  |Z=1:al=0:.aj(Uc$|
00001ed0  2c 31 36 30 2c 34 34 29  3a f2 61 6d 28 22 49 6e  |,160,44):.am("In|
00001ee0  66 6f 22 2c 30 2c 61 67  2c 20 ac b9 29 3a f2 61  |fo",0,ag, ..):.a|
00001ef0  6d 28 22 50 72 65 66 73  2e 2e 2e 22 2c 30 2c 2d  |m("Prefs...",0,-|
00001f00  31 2c 57 59 29 3a f2 61  6d 28 22 51 75 69 74 22  |1,WY):.am("Quit"|
00001f10  2c 31 32 38 2c 2d 31 2c  20 ac b9 29 3a c8 99 26  |,128,-1, ..):..&|
00001f20  34 30 30 44 34 2c 2c 55  72 2c 58 6b 2d 38 30 2c  |400D4,,Ur,Xk-80,|
00001f30  32 32 38 3a e1 0d 18 56  e2 dd f2 59 55 3a 56 5a  |228:...V...YU:VZ|
00001f40  3d 32 3a 61 6c 3d 30 3a  61 75 3d 55 72 2b 31 2a  |=2:al=0:au=Ur+1*|
00001f50  31 30 32 34 3a 61 76 3d  30 3a f2 61 6a 28 22 51  |1024:av=0:.aj("Q|
00001f60  75 61 6c 69 74 79 22 2c  33 30 34 2c 34 34 29 3a  |uality",304,44):|
00001f70  e3 61 77 3d 31 20 b8 35  3a 61 77 24 3d a4 63 74  |.aw=1 .5:aw$=.ct|
00001f80  69 6f 6e 5f 54 61 67 54  6f 53 74 72 69 6e 67 28  |ion_TagToString(|
00001f90  22 71 75 61 6c 22 2b c2  22 30 30 22 2b c3 61 77  |"qual"+."00"+.aw|
00001fa0  2c 32 29 29 3a f2 61 72  28 61 77 24 2c 94 28 61  |,2)):.ar(aw$,.(a|
00001fb0  77 3d 21 61 78 29 2c 2d  31 2c 61 77 3e 31 29 3a  |w=!ax),-1,aw>1):|
00001fc0  ed 61 77 3a 21 28 55 72  2b 61 6c 2b 30 2d 32 34  |.aw:!(Ur+al+0-24|
00001fd0  29 2b 3d 31 32 38 3a 21  55 6a 3d 57 6a 3a c8 99  |)+=128:!Uj=Wj:..|
00001fe0  26 34 30 30 43 43 2c 2c  55 6a 3a 5a 6c 3d 55 6a  |&400CC,,Uj:Zl=Uj|
00001ff0  21 34 3a 5a 6f 3d 55 6a  21 38 3a c8 99 26 34 30  |!4:Zo=Uj!8:..&40|
00002000  30 44 34 2c 2c 55 72 2c  5a 6c 2b 34 38 38 2c 5a  |0D4,,Ur,Zl+488,Z|
00002010  6f 2b 31 30 30 3a e1 0d  19 00 ff dd f2 59 56 3a  |o+100:.......YV:|
00002020  56 5a 3d 33 3a 61 6c 3d  30 3a 61 75 3d 55 72 2b  |VZ=3:al=0:au=Ur+|
00002030  31 2a 31 30 32 34 3a 61  76 3d 30 3a 61 79 24 3d  |1*1024:av=0:ay$=|
00002040  a4 63 74 69 6f 6e 5f 52  65 61 64 49 63 6f 6e 54  |.ction_ReadIconT|
00002050  65 78 74 28 55 6a 2c 57  6a 2c 36 29 3a f2 61 6a  |ext(Uj,Wj,6):.aj|
00002060  28 22 46 72 61 6d 65 73  22 2c 31 32 38 2c 34 34  |("Frames",128,44|
00002070  29 3a e3 61 7a 3d 31 20  b8 35 3a 61 7a 24 3d a4  |):.az=1 .5:az$=.|
00002080  63 74 69 6f 6e 5f 54 61  67 54 6f 53 74 72 69 6e  |ction_TagToStrin|
00002090  67 28 22 66 72 6d 73 22  2b c2 22 30 30 22 2b c3  |g("frms"+."00"+.|
000020a0  61 7a 2c 32 29 29 3a f2  61 72 28 61 7a 24 2c 94  |az,2)):.ar(az$,.|
000020b0  28 61 79 24 3d 61 7a 24  29 2c 2d 31 2c 20 ac b9  |(ay$=az$),-1, ..|
000020c0  29 3a ed 61 7a 3a 21 28  55 72 2b 61 6c 2b 30 2d  |):.az:!(Ur+al+0-|
000020d0  32 34 29 2b 3d 31 32 38  3a 21 55 6a 3d 57 6a 3a  |24)+=128:!Uj=Wj:|
000020e0  c8 99 26 34 30 30 43 43  2c 2c 55 6a 3a 5a 6c 3d  |..&400CC,,Uj:Zl=|
000020f0  55 6a 21 34 3a 5a 6f 3d  55 6a 21 38 3a c8 99 26  |Uj!4:Zo=Uj!8:..&|
00002100  34 30 30 44 34 2c 2c 55  72 2c 5a 6c 2b 34 38 38  |400D4,,Ur,Zl+488|
00002110  2c 5a 6f 2b 35 30 0d 19  96 05 e1 0d 19 b4 de dd  |,Zo+50..........|
00002120  f2 59 62 3a 56 5a 3d 34  3a 61 6c 3d 30 3a 61 75  |.Yb:VZ=4:al=0:au|
00002130  3d 55 72 2b 31 2a 31 30  32 34 3a 61 76 3d 30 3a  |=Ur+1*1024:av=0:|
00002140  f2 61 6a 28 22 41 75 74  6f 22 2c 31 32 38 2c 34  |.aj("Auto",128,4|
00002150  34 29 3a e3 62 55 3d 31  20 b8 35 3a 62 55 24 3d  |4):.bU=1 .5:bU$=|
00002160  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00002170  6e 67 28 22 61 75 74 6f  22 2b c2 22 30 30 22 2b  |ng("auto"+."00"+|
00002180  c3 62 55 2c 32 29 29 3a  f2 61 72 28 62 55 24 2c  |.bU,2)):.ar(bU$,|
00002190  30 2c 2d 31 2c 20 ac b9  29 3a ed 62 55 3a 21 28  |0,-1, ..):.bU:!(|
000021a0  55 72 2b 61 6c 2b 30 2d  32 34 29 3d 31 32 38 3a  |Ur+al+0-24)=128:|
000021b0  21 55 6a 3d 57 7a 3a c8  99 26 34 30 30 43 43 2c  |!Uj=Wz:..&400CC,|
000021c0  2c 55 6a 3a 5a 6c 3d 55  6a 21 34 3a 5a 6f 3d 55  |,Uj:Zl=Uj!4:Zo=U|
000021d0  6a 21 38 3a c8 99 26 34  30 30 44 34 2c 2c 55 72  |j!8:..&400D4,,Ur|
000021e0  2c 5a 6c 2b 34 34 38 2b  35 32 2c 5a 6f 2b 33 35  |,Zl+448+52,Zo+35|
000021f0  36 2d 55 6a 21 32 34 3a  e1 0d 1a 5e fe dd f2 59  |6-Uj!24:...^...Y|
00002200  76 28 58 6b 2c 58 6c 29  3a f2 62 56 28 22 66 69  |v(Xk,Xl):.bV("fi|
00002210  6c 65 5f 33 65 31 22 29  3a f2 57 69 28 55 6a 2c  |le_3e1"):.Wi(Uj,|
00002220  59 6c 2c 30 2c 57 62 24  29 3a f2 57 69 28 55 6a  |Yl,0,Wb$):.Wi(Uj|
00002230  2c 59 58 2c 32 2c c3 62  57 29 3a f2 57 69 28 55  |,YX,2,.bW):.Wi(U|
00002240  6a 2c 59 58 2c 34 2c c3  62 58 29 3a f2 62 59 28  |j,YX,4,.bX):.bY(|
00002250  57 57 29 3a 56 5a 3d 35  3a 61 6c 3d 30 3a 61 75  |WW):VZ=5:al=0:au|
00002260  3d 55 72 2b 31 2a 31 30  32 34 3a 61 76 3d 30 3a  |=Ur+1*1024:av=0:|
00002270  62 5a 3d 55 72 2b 61 6c  3a f2 61 6a 28 22 53 65  |bZ=Ur+al:.aj("Se|
00002280  6c 65 63 74 22 2c 31 32  38 2c 34 34 29 3a f2 61  |lect",128,44):.a|
00002290  72 28 a4 63 74 69 6f 6e  5f 54 61 67 54 6f 53 74  |r(.ction_TagToSt|
000022a0  72 69 6e 67 28 22 64 65  6c 74 22 29 2c 30 2c 2d  |ring("delt"),0,-|
000022b0  31 2c 57 56 3d 30 20 84  57 58 29 3a f2 61 72 28  |1,WV=0 .WX):.ar(|
000022c0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
000022d0  6e 67 28 22 63 6f 6c 72  22 29 2c 31 32 38 2c 55  |ng("colr"),128,U|
000022e0  73 2c 28 ac 57 58 29 20  84 57 56 3d 30 29 3a 62  |s,(.WX) .WV=0):b|
000022f0  61 3d 55 72 2b 61 6c 0d  1a f4 e5 f2 61 6a 28 22  |a=Ur+al.....aj("|
00002300  45 64 69 74 22 2c 33 30  34 2c 34 34 29 3a f2 61  |Edit",304,44):.a|
00002310  72 28 a4 63 74 69 6f 6e  5f 54 61 67 54 6f 53 74  |r(.ction_TagToSt|
00002320  72 69 6e 67 28 22 62 67  72 64 22 29 2c 30 2c 2d  |ring("bgrd"),0,-|
00002330  31 2c 20 ac b9 29 3a f2  61 72 28 a4 63 74 69 6f  |1, ..):.ar(.ctio|
00002340  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 63  |n_TagToString("c|
00002350  6f 6c 63 22 29 2c 30 2c  2d 31 2c 20 ac b9 29 3a  |olc"),0,-1, ..):|
00002360  f2 61 72 28 a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |.ar(.ction_TagTo|
00002370  53 74 72 69 6e 67 28 22  6d 6f 76 63 22 29 2c 32  |String("movc"),2|
00002380  2c 2d 31 2c 20 ac b9 29  3a f2 61 72 28 a4 63 74  |,-1, ..):.ar(.ct|
00002390  69 6f 6e 5f 54 61 67 54  6f 53 74 72 69 6e 67 28  |ion_TagToString(|
000023a0  22 72 73 72 63 22 29 2c  30 2c 2d 31 2c 20 ac 56  |"rsrc"),0,-1, .V|
000023b0  6a 29 3a f2 61 72 28 a4  63 74 69 6f 6e 5f 54 61  |j):.ar(.ction_Ta|
000023c0  67 54 6f 53 74 72 69 6e  67 28 22 72 64 73 74 22  |gToString("rdst"|
000023d0  29 2c 30 2c 2d 31 2c 20  ac 56 6e 29 0d 1b 30 ef  |),0,-1, .Vn)..0.|
000023e0  f2 61 72 28 a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |.ar(.ction_TagTo|
000023f0  53 74 72 69 6e 67 28 22  72 62 63 6b 22 29 2c 31  |String("rbck"),1|
00002400  32 38 2c 2d 31 2c 20 ac  56 72 29 3a 62 62 3d 55  |28,-1, .Vr):bb=U|
00002410  72 2b 61 6c 3a f2 61 6a  28 22 4d 69 73 63 22 2c  |r+al:.aj("Misc",|
00002420  32 32 34 2c 34 34 29 3a  f2 61 72 28 a4 63 74 69  |224,44):.ar(.cti|
00002430  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
00002440  61 63 70 74 22 29 2c 30  2c 2d 31 2c 57 58 29 3a  |acpt"),0,-1,WX):|
00002450  f2 61 72 28 a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |.ar(.ction_TagTo|
00002460  53 74 72 69 6e 67 28 22  63 6e 74 72 22 29 2c 32  |String("cntr"),2|
00002470  2c 2d 31 2c 28 56 76 25  3d 30 20 80 56 77 25 3d  |,-1,(Vv%=0 .Vw%=|
00002480  30 29 29 3a f2 61 72 28  a4 63 74 69 6f 6e 5f 54  |0)):.ar(.ction_T|
00002490  61 67 54 6f 53 74 72 69  6e 67 28 22 72 65 73 74  |agToString("rest|
000024a0  22 29 2c 31 32 38 2c 2d  31 2c 20 ac b9 29 3a 62  |"),128,-1, ..):b|
000024b0  63 3d 55 72 2b 61 6c 3a  f2 61 6a 28 22 4d 6f 72  |c=Ur+al:.aj("Mor|
000024c0  70 68 22 2c 31 32 38 2c  34 34 29 0d 1b 80 ea f2  |ph",128,44).....|
000024d0  61 72 28 a4 63 74 69 6f  6e 5f 54 61 67 54 6f 53  |ar(.ction_TagToS|
000024e0  74 72 69 6e 67 28 22 6d  69 73 63 22 29 2c 30 2c  |tring("misc"),0,|
000024f0  62 62 2c 20 ac b9 29 3a  f2 61 72 28 a4 63 74 69  |bb, ..):.ar(.cti|
00002500  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
00002510  73 61 76 65 22 29 2c 30  2c 59 6c 2c 20 ac b9 29  |save"),0,Yl, ..)|
00002520  3a f2 61 72 28 a4 63 74  69 6f 6e 5f 54 61 67 54  |:.ar(.ction_TagT|
00002530  6f 53 74 72 69 6e 67 28  22 73 6c 63 74 22 29 2c  |oString("slct"),|
00002540  30 2c 62 5a 2c 20 ac b9  29 3a f2 61 72 28 a4 63  |0,bZ, ..):.ar(.c|
00002550  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
00002560  28 22 65 64 69 74 22 29  2c 30 2c 62 61 2c 20 ac  |("edit"),0,ba, .|
00002570  b9 29 3a f2 61 72 28 a4  63 74 69 6f 6e 5f 54 61  |.):.ar(.ction_Ta|
00002580  67 54 6f 53 74 72 69 6e  67 28 22 7a 6f 6f 6d 22  |gToString("zoom"|
00002590  29 2c 31 32 38 2c 59 58  2c 20 ac b9 29 3a c8 99  |),128,YX, ..):..|
000025a0  26 34 30 30 44 34 2c 2c  62 63 2c 58 6b 2d 36 34  |&400D4,,bc,Xk-64|
000025b0  2c 58 6c 3a e1 0d 1b da  fe dd f2 59 77 28 58 6b  |,Xl:.......Yw(Xk|
000025c0  2c 58 6c 29 3a f2 62 56  28 22 66 69 6c 65 5f 33  |,Xl):.bV("file_3|
000025d0  65 31 22 29 3a f2 57 69  28 55 6a 2c 59 6c 2c 30  |e1"):.Wi(Uj,Yl,0|
000025e0  2c 57 62 24 29 3a f2 57  69 28 55 6a 2c 59 58 2c  |,Wb$):.Wi(Uj,YX,|
000025f0  32 2c c3 62 64 29 3a f2  57 69 28 55 6a 2c 59 58  |2,.bd):.Wi(Uj,YX|
00002600  2c 34 2c c3 62 65 29 3a  f2 62 59 28 57 57 29 3a  |,4,.be):.bY(WW):|
00002610  56 5a 3d 36 3a 61 6c 3d  30 3a 61 75 3d 55 72 2b  |VZ=6:al=0:au=Ur+|
00002620  31 2a 31 30 32 34 3a 61  76 3d 30 3a 62 5a 3d 55  |1*1024:av=0:bZ=U|
00002630  72 2b 61 6c 3a f2 61 6a  28 22 53 65 6c 65 63 74  |r+al:.aj("Select|
00002640  22 2c 31 32 38 2c 34 34  29 3a f2 61 72 28 a4 63  |",128,44):.ar(.c|
00002650  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
00002660  28 22 64 65 6c 74 22 29  2c 30 2c 2d 31 2c 57 56  |("delt"),0,-1,WV|
00002670  3d 30 20 84 57 58 29 3a  f2 61 72 28 a4 63 74 69  |=0 .WX):.ar(.cti|
00002680  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
00002690  63 6f 6c 72 22 29 2c 31  32 38 2c 55 73 2c 28 ac  |colr"),128,Us,(.|
000026a0  57 58 29 20 84 57 56 3d  30 29 3a 62 61 3d 55 72  |WX) .WV=0):ba=Ur|
000026b0  2b 61 6c 0d 1c 70 e5 f2  61 6a 28 22 45 64 69 74  |+al..p..aj("Edit|
000026c0  22 2c 33 30 34 2c 34 34  29 3a f2 61 72 28 a4 63  |",304,44):.ar(.c|
000026d0  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
000026e0  28 22 62 67 72 64 22 29  2c 30 2c 2d 31 2c 20 ac  |("bgrd"),0,-1, .|
000026f0  b9 29 3a f2 61 72 28 a4  63 74 69 6f 6e 5f 54 61  |.):.ar(.ction_Ta|
00002700  67 54 6f 53 74 72 69 6e  67 28 22 63 6f 6c 63 22  |gToString("colc"|
00002710  29 2c 30 2c 2d 31 2c 20  ac b9 29 3a f2 61 72 28  |),0,-1, ..):.ar(|
00002720  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00002730  6e 67 28 22 6d 6f 76 63  22 29 2c 32 2c 2d 31 2c  |ng("movc"),2,-1,|
00002740  20 ac b9 29 3a f2 61 72  28 a4 63 74 69 6f 6e 5f  | ..):.ar(.ction_|
00002750  54 61 67 54 6f 53 74 72  69 6e 67 28 22 72 73 72  |TagToString("rsr|
00002760  63 22 29 2c 30 2c 2d 31  2c 20 ac 56 6a 29 3a f2  |c"),0,-1, .Vj):.|
00002770  61 72 28 a4 63 74 69 6f  6e 5f 54 61 67 54 6f 53  |ar(.ction_TagToS|
00002780  74 72 69 6e 67 28 22 72  64 73 74 22 29 2c 30 2c  |tring("rdst"),0,|
00002790  2d 31 2c 20 ac 56 6e 29  0d 1c ac ef f2 61 72 28  |-1, .Vn).....ar(|
000027a0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
000027b0  6e 67 28 22 72 62 63 6b  22 29 2c 31 32 38 2c 2d  |ng("rbck"),128,-|
000027c0  31 2c 20 ac 56 72 29 3a  62 62 3d 55 72 2b 61 6c  |1, .Vr):bb=Ur+al|
000027d0  3a f2 61 6a 28 22 4d 69  73 63 22 2c 32 32 34 2c  |:.aj("Misc",224,|
000027e0  34 34 29 3a f2 61 72 28  a4 63 74 69 6f 6e 5f 54  |44):.ar(.ction_T|
000027f0  61 67 54 6f 53 74 72 69  6e 67 28 22 61 63 70 74  |agToString("acpt|
00002800  22 29 2c 30 2c 2d 31 2c  57 58 29 3a f2 61 72 28  |"),0,-1,WX):.ar(|
00002810  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00002820  6e 67 28 22 63 6e 74 72  22 29 2c 32 2c 2d 31 2c  |ng("cntr"),2,-1,|
00002830  28 56 78 25 3d 30 20 80  56 79 25 3d 30 29 29 3a  |(Vx%=0 .Vy%=0)):|
00002840  f2 61 72 28 a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |.ar(.ction_TagTo|
00002850  53 74 72 69 6e 67 28 22  72 65 73 74 22 29 2c 31  |String("rest"),1|
00002860  32 38 2c 2d 31 2c 20 ac  b9 29 3a 62 63 3d 55 72  |28,-1, ..):bc=Ur|
00002870  2b 61 6c 3a f2 61 6a 28  22 4d 6f 72 70 68 22 2c  |+al:.aj("Morph",|
00002880  31 32 38 2c 34 34 29 0d  1c fc ea f2 61 72 28 a4  |128,44).....ar(.|
00002890  63 74 69 6f 6e 5f 54 61  67 54 6f 53 74 72 69 6e  |ction_TagToStrin|
000028a0  67 28 22 6d 69 73 63 22  29 2c 30 2c 62 62 2c 20  |g("misc"),0,bb, |
000028b0  ac b9 29 3a f2 61 72 28  a4 63 74 69 6f 6e 5f 54  |..):.ar(.ction_T|
000028c0  61 67 54 6f 53 74 72 69  6e 67 28 22 73 61 76 65  |agToString("save|
000028d0  22 29 2c 30 2c 59 6c 2c  20 ac b9 29 3a f2 61 72  |"),0,Yl, ..):.ar|
000028e0  28 a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |(.ction_TagToStr|
000028f0  69 6e 67 28 22 73 6c 63  74 22 29 2c 30 2c 62 5a  |ing("slct"),0,bZ|
00002900  2c 20 ac b9 29 3a f2 61  72 28 a4 63 74 69 6f 6e  |, ..):.ar(.ction|
00002910  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 65 64  |_TagToString("ed|
00002920  69 74 22 29 2c 30 2c 62  61 2c 20 ac b9 29 3a f2  |it"),0,ba, ..):.|
00002930  61 72 28 a4 63 74 69 6f  6e 5f 54 61 67 54 6f 53  |ar(.ction_TagToS|
00002940  74 72 69 6e 67 28 22 7a  6f 6f 6d 22 29 2c 31 32  |tring("zoom"),12|
00002950  38 2c 59 58 2c 20 ac b9  29 3a c8 99 26 34 30 30  |8,YX, ..):..&400|
00002960  44 34 2c 2c 62 63 2c 58  6b 2d 36 34 2c 58 6c 3a  |D4,,bc,Xk-64,Xl:|
00002970  e1 0d 1d 56 e8 dd f2 59  78 28 58 6b 2c 58 6c 29  |...V...Yx(Xk,Xl)|
00002980  3a 56 5a 3d 38 3a 61 6c  3d 30 3a 61 75 3d 55 72  |:VZ=8:al=0:au=Ur|
00002990  2b 31 2a 31 30 32 34 3a  61 76 3d 30 3a 62 66 3d  |+1*1024:av=0:bf=|
000029a0  55 72 2b 61 6c 3a f2 61  6a 28 a4 63 74 69 6f 6e  |Ur+al:.aj(.ction|
000029b0  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 75 70  |_TagToString("up|
000029c0  70 65 72 22 29 2c 31 32  38 2c 34 34 29 3a f2 61  |per"),128,44):.a|
000029d0  72 28 a4 63 74 69 6f 6e  5f 54 61 67 54 6f 53 74  |r(.ction_TagToSt|
000029e0  72 69 6e 67 28 22 6c 65  66 74 22 29 2c 30 2c 2d  |ring("left"),0,-|
000029f0  31 2c 20 ac 56 72 29 3a  f2 61 72 28 a4 63 74 69  |1, .Vr):.ar(.cti|
00002a00  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
00002a10  6d 69 64 64 6c 65 22 29  2c 30 2c 2d 31 2c 20 ac  |middle"),0,-1, .|
00002a20  56 72 29 3a f2 61 72 28  a4 63 74 69 6f 6e 5f 54  |Vr):.ar(.ction_T|
00002a30  61 67 54 6f 53 74 72 69  6e 67 28 22 72 69 67 68  |agToString("righ|
00002a40  74 22 29 2c 31 32 38 2c  2d 31 2c 20 ac 56 72 29  |t"),128,-1, .Vr)|
00002a50  3a 62 67 3d 55 72 2b 61  6c 0d 1d c4 e0 f2 61 6a  |:bg=Ur+al.....aj|
00002a60  28 a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |(.ction_TagToStr|
00002a70  69 6e 67 28 22 6d 69 64  64 6c 65 22 29 2c 31 32  |ing("middle"),12|
00002a80  38 2c 34 34 29 3a f2 61  72 28 a4 63 74 69 6f 6e  |8,44):.ar(.ction|
00002a90  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 6c 65  |_TagToString("le|
00002aa0  66 74 22 29 2c 30 2c 2d  31 2c 20 ac 56 72 29 3a  |ft"),0,-1, .Vr):|
00002ab0  f2 61 72 28 a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |.ar(.ction_TagTo|
00002ac0  53 74 72 69 6e 67 28 22  6d 69 64 64 6c 65 22 29  |String("middle")|
00002ad0  2c 30 2c 2d 31 2c 20 ac  56 72 29 3a f2 61 72 28  |,0,-1, .Vr):.ar(|
00002ae0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00002af0  6e 67 28 22 72 69 67 68  74 22 29 2c 31 32 38 2c  |ng("right"),128,|
00002b00  2d 31 2c 20 ac 56 72 29  3a 62 68 3d 55 72 2b 61  |-1, .Vr):bh=Ur+a|
00002b10  6c 3a f2 61 6a 28 a4 63  74 69 6f 6e 5f 54 61 67  |l:.aj(.ction_Tag|
00002b20  54 6f 53 74 72 69 6e 67  28 22 6c 6f 77 65 72 22  |ToString("lower"|
00002b30  29 2c 31 32 38 2c 34 34  29 0d 1e 00 fa f2 61 72  |),128,44).....ar|
00002b40  28 a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |(.ction_TagToStr|
00002b50  69 6e 67 28 22 6c 65 66  74 22 29 2c 30 2c 2d 31  |ing("left"),0,-1|
00002b60  2c 20 ac 56 72 29 3a f2  61 72 28 a4 63 74 69 6f  |, .Vr):.ar(.ctio|
00002b70  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 6d  |n_TagToString("m|
00002b80  69 64 64 6c 65 22 29 2c  30 2c 2d 31 2c 20 ac 56  |iddle"),0,-1, .V|
00002b90  72 29 3a f2 61 72 28 a4  63 74 69 6f 6e 5f 54 61  |r):.ar(.ction_Ta|
00002ba0  67 54 6f 53 74 72 69 6e  67 28 22 72 69 67 68 74  |gToString("right|
00002bb0  22 29 2c 31 32 38 2c 2d  31 2c 20 ac 56 72 29 3a  |"),128,-1, .Vr):|
00002bc0  62 63 3d 55 72 2b 61 6c  3a f2 61 6a 28 22 41 6c  |bc=Ur+al:.aj("Al|
00002bd0  69 67 6e 22 2c 31 32 38  2c 34 34 29 3a f2 61 72  |ign",128,44):.ar|
00002be0  28 a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |(.ction_TagToStr|
00002bf0  69 6e 67 28 22 75 70 70  65 72 22 29 2c 30 2c 62  |ing("upper"),0,b|
00002c00  66 2c 20 ac 56 72 29 3a  f2 61 72 28 a4 63 74 69  |f, .Vr):.ar(.cti|
00002c10  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
00002c20  6d 69 64 64 6c 65 22 29  2c 30 2c 62 67 2c 20 ac  |middle"),0,bg, .|
00002c30  56 72 29 0d 1e 46 48 f2  61 72 28 a4 63 74 69 6f  |Vr)..FH.ar(.ctio|
00002c40  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 6c  |n_TagToString("l|
00002c50  6f 77 65 72 22 29 2c 31  32 38 2c 62 68 2c 20 ac  |ower"),128,bh, .|
00002c60  56 72 29 3a c8 99 26 34  30 30 44 34 2c 2c 62 63  |Vr):..&400D4,,bc|
00002c70  2c 58 6b 2d 36 34 2c 58  6c 3a e1 0d 1e 78 7a dd  |,Xk-64,Xl:...xz.|
00002c80  f2 59 63 3a 56 5a 3d 37  3a f2 62 59 28 a4 63 74  |.Yc:VZ=7:.bY(.ct|
00002c90  69 6f 6e 5f 43 6f 6c 6f  75 72 4f 66 49 63 6f 6e  |ion_ColourOfIcon|
00002ca0  28 55 6a 2c 57 7a 2c 31  39 29 29 3a 21 55 6a 3d  |(Uj,Wz,19)):!Uj=|
00002cb0  57 7a 3a c8 99 26 34 30  30 43 43 2c 2c 55 6a 3a  |Wz:..&400CC,,Uj:|
00002cc0  5a 6c 3d 55 6a 21 34 3a  5a 6f 3d 55 6a 21 38 3a  |Zl=Uj!4:Zo=Uj!8:|
00002cd0  c8 99 26 34 30 30 44 34  2c 2c 55 73 2c 5a 6c 2b  |..&400D4,,Us,Zl+|
00002ce0  34 34 38 2b 35 32 2c 5a  6f 2b 32 36 38 2d 55 6a  |448+52,Zo+268-Uj|
00002cf0  21 32 34 3a e1 0d 1e d2  e0 dd f2 62 59 28 62 69  |!24:.......bY(bi|
00002d00  29 3a f2 62 6a 28 22 43  6f 6c 6f 75 72 22 2c 39  |):.bj("Colour",9|
00002d10  36 2c 34 34 29 3a f2 62  6b 28 94 28 62 69 3d 26  |6,44):.bk(.(bi=&|
00002d20  30 29 2c 2d 31 2c 26 30  37 30 30 30 30 31 31 2c  |0),-1,&07000011,|
00002d30  22 20 30 22 29 3a f2 62  6b 28 94 28 62 69 3d 26  |" 0"):.bk(.(bi=&|
00002d40  31 29 2c 2d 31 2c 26 31  37 30 30 30 30 31 31 2c  |1),-1,&17000011,|
00002d50  22 20 31 22 29 3a f2 62  6b 28 94 28 62 69 3d 26  |" 1"):.bk(.(bi=&|
00002d60  32 29 2c 2d 31 2c 26 32  37 30 30 30 30 31 31 2c  |2),-1,&27000011,|
00002d70  22 20 32 22 29 3a f2 62  6b 28 94 28 62 69 3d 26  |" 2"):.bk(.(bi=&|
00002d80  33 29 2c 2d 31 2c 26 33  37 30 30 30 30 31 31 2c  |3),-1,&37000011,|
00002d90  22 20 33 22 29 3a f2 62  6b 28 94 28 62 69 3d 26  |" 3"):.bk(.(bi=&|
00002da0  34 29 2c 2d 31 2c 26 34  30 30 30 30 30 31 31 2c  |4),-1,&40000011,|
00002db0  22 20 34 22 29 3a f2 62  6b 28 94 28 62 69 3d 26  |" 4"):.bk(.(bi=&|
00002dc0  35 29 2c 2d 31 2c 26 35  30 30 30 30 30 31 31 2c  |5),-1,&50000011,|
00002dd0  22 20 35 22 29 0d 1f 22  e3 f2 62 6b 28 94 28 62  |" 5").."..bk(.(b|
00002de0  69 3d 26 36 29 2c 2d 31  2c 26 36 30 30 30 30 30  |i=&6),-1,&600000|
00002df0  31 31 2c 22 20 36 22 29  3a f2 62 6b 28 94 28 62  |11," 6"):.bk(.(b|
00002e00  69 3d 26 37 29 2c 2d 31  2c 26 37 30 30 30 30 30  |i=&7),-1,&700000|
00002e10  31 31 2c 22 20 37 22 29  3a f2 62 6b 28 94 28 62  |11," 7"):.bk(.(b|
00002e20  69 3d 26 38 29 2c 2d 31  2c 26 38 30 30 30 30 30  |i=&8),-1,&800000|
00002e30  31 31 2c 22 20 38 22 29  3a f2 62 6b 28 94 28 62  |11," 8"):.bk(.(b|
00002e40  69 3d 26 39 29 2c 2d 31  2c 26 39 37 30 30 30 30  |i=&9),-1,&970000|
00002e50  31 31 2c 22 20 39 22 29  3a f2 62 6b 28 94 28 62  |11," 9"):.bk(.(b|
00002e60  69 3d 26 41 29 2c 2d 31  2c 26 41 30 30 30 30 30  |i=&A),-1,&A00000|
00002e70  31 31 2c 22 20 41 22 29  3a f2 62 6b 28 94 28 62  |11," A"):.bk(.(b|
00002e80  69 3d 26 42 29 2c 2d 31  2c 26 42 30 30 30 30 30  |i=&B),-1,&B00000|
00002e90  31 31 2c 22 20 42 22 29  3a f2 62 6b 28 94 28 62  |11," B"):.bk(.(b|
00002ea0  69 3d 26 43 29 2c 2d 31  2c 26 43 37 30 30 30 30  |i=&C),-1,&C70000|
00002eb0  31 31 2c 22 20 43 22 29  0d 1f 68 69 f2 62 6b 28  |11," C")..hi.bk(|
00002ec0  94 28 62 69 3d 26 44 29  2c 2d 31 2c 26 44 30 30  |.(bi=&D),-1,&D00|
00002ed0  30 30 30 31 31 2c 22 20  44 22 29 3a f2 62 6b 28  |00011," D"):.bk(|
00002ee0  94 28 62 69 3d 26 45 29  2c 2d 31 2c 26 45 37 30  |.(bi=&E),-1,&E70|
00002ef0  30 30 30 31 31 2c 22 20  45 22 29 3a f2 62 6b 28  |00011," E"):.bk(|
00002f00  94 28 62 69 3d 26 46 29  2b 31 32 38 2c 2d 31 2c  |.(bi=&F)+128,-1,|
00002f10  26 46 37 30 30 30 30 31  31 2c 22 20 46 22 29 3a  |&F7000011," F"):|
00002f20  e1 0d 1f a4 95 dd f2 62  6a 28 61 6b 24 2c 61 61  |.......bj(ak$,aa|
00002f30  2c 61 62 29 3a 62 6c 3d  30 3a 24 28 55 73 2b 62  |,ab):bl=0:$(Us+b|
00002f40  6c 29 3d 61 6b 24 2b bd  30 3a 3f 28 55 73 2b 62  |l)=ak$+.0:?(Us+b|
00002f50  6c 2b 31 32 29 3d 37 3a  3f 28 55 73 2b 62 6c 2b  |l+12)=7:?(Us+bl+|
00002f60  31 33 29 3d 32 3a 3f 28  55 73 2b 62 6c 2b 31 34  |13)=2:?(Us+bl+14|
00002f70  29 3d 37 3a 3f 28 55 73  2b 62 6c 2b 31 35 29 3d  |)=7:?(Us+bl+15)=|
00002f80  30 3a 21 28 55 73 2b 62  6c 2b 31 36 29 3d 61 61  |0:!(Us+bl+16)=aa|
00002f90  3a 21 28 55 73 2b 62 6c  2b 32 30 29 3d 61 62 3a  |:!(Us+bl+20)=ab:|
00002fa0  21 28 55 73 2b 62 6c 2b  32 34 29 3d 30 3a 62 6c  |!(Us+bl+24)=0:bl|
00002fb0  2b 3d 32 38 3a e1 0d 20  30 83 dd f2 62 6b 28 61  |+=28:.. 0...bk(a|
00002fc0  6f 2c 61 70 2c 62 6d 2c  62 6e 24 29 3a 3f 28 55  |o,ap,bm,bn$):?(U|
00002fd0  73 2b 62 6c 2b 30 29 3d  61 6f 3a 3f 28 55 73 2b  |s+bl+0)=ao:?(Us+|
00002fe0  62 6c 2b 31 29 3d 30 3a  3f 28 55 73 2b 62 6c 2b  |bl+1)=0:?(Us+bl+|
00002ff0  32 29 3d 30 3a 3f 28 55  73 2b 62 6c 2b 33 29 3d  |2)=0:?(Us+bl+3)=|
00003000  30 3a 21 28 55 73 2b 62  6c 2b 34 29 3d 61 70 3a  |0:!(Us+bl+4)=ap:|
00003010  21 28 55 73 2b 62 6c 2b  38 29 3d 62 6d 3a 24 28  |!(Us+bl+8)=bm:$(|
00003020  55 73 2b 62 6c 2b 31 32  29 3d 62 6e 24 2b bd 30  |Us+bl+12)=bn$+.0|
00003030  3a 62 6c 2b 3d 32 34 3a  e1 0d 20 a8 2b dd f2 58  |:bl+=24:.. .+..X|
00003040  59 28 58 6a 29 3a 62 6f  3d 58 6a 21 30 3a 62 70  |Y(Xj):bo=Xj!0:bp|
00003050  3d 58 6a 21 34 3a 62 71  3d 58 6a 21 38 3a c8 8e  |=Xj!4:bq=Xj!8:..|
00003060  56 5a 20 ca 0d 20 da 0d  c9 31 3a c8 8e 62 6f 20  |VZ .. ...1:..bo |
00003070  ca 0d 20 e4 1f c9 31 3a  f2 58 73 28 55 6a 2c 57  |.. ...1:.Xs(Uj,W|
00003080  78 29 3a f2 57 79 28 55  6a 2c 57 78 2c 57 7a 29  |x):.Wy(Uj,Wx,Wz)|
00003090  0d 20 f8 0e c9 32 3a e7  20 ac 57 59 20 8c 0d 21  |. ...2:. .WY ..!|
000030a0  02 08 56 56 3d b9 0d 21  0c 5a cc 3a 59 69 24 3d  |..VV=..!.Z.:Yi$=|
000030b0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
000030c0  6e 67 28 22 65 72 72 31  32 22 29 3a 59 6a 3d a4  |ng("err12"):Yj=.|
000030d0  63 74 69 6f 6e 5f 52 65  70 6f 72 74 45 72 72 6f  |ction_ReportErro|
000030e0  72 28 55 6a 2c 39 39 2c  55 63 24 2c 59 69 24 2c  |r(Uj,99,Uc$,Yi$,|
000030f0  b9 2c b9 29 3a 56 56 3d  20 ac 28 59 6a 3d 31 29  |.,.):VV= .(Yj=1)|
00003100  0d 21 34 05 cd 0d 21 3e  05 cb 0d 21 48 19 c9 32  |.!4...!>...!H..2|
00003110  3a f2 57 66 28 62 6f 2b  31 29 3a 21 61 78 3d 62  |:.Wf(bo+1):!ax=b|
00003120  6f 2b 31 0d 21 5c 10 c9  33 3a f2 57 67 28 62 6f  |o+1.!\..3:.Wg(bo|
00003130  2b 31 29 0d 21 66 59 c9  34 3a 62 72 24 3d a4 63  |+1).!fY.4:br$=.c|
00003140  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
00003150  28 22 61 75 74 6f 22 2b  c2 22 30 30 22 2b c3 28  |("auto"+."00"+.(|
00003160  62 6f 2b 31 29 2c 32 29  29 3a f2 57 69 28 55 6a  |bo+1),2)):.Wi(Uj|
00003170  2c 57 7a 2c 31 31 2c 62  72 24 29 3a f2 57 69 28  |,Wz,11,br$):.Wi(|
00003180  55 6a 2c 57 7a 2c 38 2c  62 72 24 29 0d 21 8e 0d  |Uj,Wz,8,br$).!..|
00003190  c9 35 3a c8 8e 62 6f 20  ca 0d 21 98 0d c9 30 3a  |.5:..bo ..!...0:|
000031a0  c8 8e 62 70 20 ca 0d 21  a2 0d c9 30 3a f2 62 73  |..bp ..!...0:.bs|
000031b0  28 b9 29 0d 21 ac 29 c9  31 3a 56 76 25 3d 30 3a  |(.).!.).1:Vv%=0:|
000031c0  21 62 74 3d 30 3a 56 77  25 3d 30 3a 21 62 75 3d  |!bt=0:Vw%=0:!bu=|
000031d0  30 3a f2 59 72 28 55 6a  2c 58 77 29 0d 21 c0 0a  |0:.Yr(Uj,Xw).!..|
000031e0  c9 32 3a f2 62 76 0d 21  ca 05 cb 0d 21 d4 0d c9  |.2:.bv.!....!...|
000031f0  32 3a c8 8e 62 70 20 ca  0d 21 de 0a c9 30 3a f2  |2:..bp ..!...0:.|
00003200  5a 63 0d 21 e8 0e c9 31  3a f2 62 77 28 62 71 29  |Zc.!...1:.bw(bq)|
00003210  0d 21 f2 05 cb 0d 21 fc  0d c9 33 3a c8 8e 62 70  |.!....!...3:..bp|
00003220  20 ca 0d 22 06 11 c9 30  3a f2 58 73 28 55 6a 2c  | .."...0:.Xs(Uj,|
00003230  59 6e 29 0d 22 10 18 c9  31 3a f2 57 77 28 55 68  |Yn)."...1:.Ww(Uh|
00003240  2c 55 6a 2c 59 71 2c 20  ac b9 29 0d 22 1a 18 c9  |,Uj,Yq, ..)."...|
00003250  32 3a f2 57 77 28 55 68  2c 55 6a 2c 59 74 2c 20  |2:.Ww(Uh,Uj,Yt, |
00003260  ac b9 29 0d 22 24 14 c9  33 3a f2 62 78 28 22 53  |..)."$..3:.bx("S|
00003270  6f 75 72 63 65 22 29 0d  22 2e 12 c9 34 3a f2 62  |ource")."...4:.b|
00003280  78 28 22 44 65 73 74 22  29 0d 22 38 12 c9 35 3a  |x("Dest")."8..5:|
00003290  f2 62 78 28 22 42 61 63  6b 22 29 0d 22 42 05 cb  |.bx("Back")."B..|
000032a0  0d 22 4c 05 cb 0d 22 60  0d c9 36 3a c8 8e 62 6f  |."L..."`..6:..bo|
000032b0  20 ca 0d 22 6a 0d c9 30  3a c8 8e 62 70 20 ca 0d  | .."j..0:..bp ..|
000032c0  22 74 0d c9 30 3a f2 62  73 28 b9 29 0d 22 7e 29  |"t..0:.bs(.)."~)|
000032d0  c9 31 3a 56 78 25 3d 30  3a 21 62 79 3d 30 3a 56  |.1:Vx%=0:!by=0:V|
000032e0  79 25 3d 30 3a 21 62 7a  3d 30 3a f2 59 72 28 55  |y%=0:!bz=0:.Yr(U|
000032f0  6a 2c 58 7a 29 0d 22 92  0a c9 32 3a f2 62 76 0d  |j,Xz)."...2:.bv.|
00003300  22 9c 05 cb 0d 22 a6 0d  c9 32 3a c8 8e 62 70 20  |"...."...2:..bp |
00003310  ca 0d 22 b0 0a c9 30 3a  f2 5a 63 0d 22 ba 0e c9  |.."...0:.Zc."...|
00003320  31 3a f2 62 77 28 62 71  29 0d 22 c4 05 cb 0d 22  |1:.bw(bq)."...."|
00003330  ce 0d c9 33 3a c8 8e 62  70 20 ca 0d 22 d8 11 c9  |...3:..bp .."...|
00003340  30 3a f2 58 73 28 55 6a  2c 59 6e 29 0d 22 e2 18  |0:.Xs(Uj,Yn)."..|
00003350  c9 31 3a f2 57 77 28 55  68 2c 55 6a 2c 59 71 2c  |.1:.Ww(Uh,Uj,Yq,|
00003360  20 ac b9 29 0d 22 ec 18  c9 32 3a f2 57 77 28 55  | ..)."...2:.Ww(U|
00003370  68 2c 55 6a 2c 59 74 2c  20 ac b9 29 0d 22 f6 14  |h,Uj,Yt, ..)."..|
00003380  c9 33 3a f2 62 78 28 22  53 6f 75 72 63 65 22 29  |.3:.bx("Source")|
00003390  0d 23 00 12 c9 34 3a f2  62 78 28 22 44 65 73 74  |.#...4:.bx("Dest|
000033a0  22 29 0d 23 0a 12 c9 35  3a f2 62 78 28 22 42 61  |").#...5:.bx("Ba|
000033b0  63 6b 22 29 0d 23 14 05  cb 0d 23 1e 05 cb 0d 23  |ck").#....#....#|
000033c0  32 17 c9 37 3a f2 63 55  28 55 6a 2c 57 7a 2c 31  |2..7:.cU(Uj,Wz,1|
000033d0  39 2c 62 6f 29 0d 23 46  0d c9 38 3a c8 8e 62 6f  |9,bo).#F..8:..bo|
000033e0  20 ca 0d 23 5a 0d c9 30  3a c8 8e 62 70 20 ca 0d  | ..#Z..0:..bp ..|
000033f0  23 64 13 c9 30 3a f2 63  56 28 22 54 22 2c 22 4c  |#d..0:.cV("T","L|
00003400  22 29 0d 23 6e 13 c9 31  3a f2 63 56 28 22 54 22  |").#n..1:.cV("T"|
00003410  2c 22 4d 22 29 0d 23 78  13 c9 32 3a f2 63 56 28  |,"M").#x..2:.cV(|
00003420  22 54 22 2c 22 52 22 29  0d 23 82 05 cb 0d 23 96  |"T","R").#....#.|
00003430  0d c9 31 3a c8 8e 62 70  20 ca 0d 23 a0 13 c9 30  |..1:..bp ..#...0|
00003440  3a f2 63 56 28 22 4d 22  2c 22 4c 22 29 0d 23 aa  |:.cV("M","L").#.|
00003450  13 c9 31 3a f2 63 56 28  22 4d 22 2c 22 4d 22 29  |..1:.cV("M","M")|
00003460  0d 23 b4 13 c9 32 3a f2  63 56 28 22 4d 22 2c 22  |.#...2:.cV("M","|
00003470  52 22 29 0d 23 be 05 cb  0d 23 d2 0d c9 32 3a c8  |R").#....#...2:.|
00003480  8e 62 70 20 ca 0d 23 dc  13 c9 30 3a f2 63 56 28  |.bp ..#...0:.cV(|
00003490  22 42 22 2c 22 4c 22 29  0d 23 e6 13 c9 31 3a f2  |"B","L").#...1:.|
000034a0  63 56 28 22 42 22 2c 22  4d 22 29 0d 23 f0 13 c9  |cV("B","M").#...|
000034b0  32 3a f2 63 56 28 22 42  22 2c 22 52 22 29 0d 23  |2:.cV("B","R").#|
000034c0  fa 05 cb 0d 24 0e 05 cb  0d 24 22 33 cb 3a c8 99  |....$....$"3.:..|
000034d0  26 34 30 30 43 46 2c 2c  58 6a 3a 58 6b 3d 58 6a  |&400CF,,Xj:Xk=Xj|
000034e0  21 30 3a 58 6c 3d 58 6a  21 34 3a 58 6d 3d 58 6a  |!0:Xl=Xj!4:Xm=Xj|
000034f0  21 38 3a e7 58 6d 3d 55  61 20 8c 0d 24 5e 0a c8  |!8:.Xm=Ua ..$^..|
00003500  8e 56 5a 20 ca 0d 24 68  0e c9 31 3a f2 59 75 28  |.VZ ..$h..1:.Yu(|
00003510  58 6b 29 0d 24 72 0a c9  32 3a f2 59 55 0d 24 7c  |Xk).$r..2:.YU.$||
00003520  0a c9 33 3a f2 59 56 0d  24 86 0a c9 34 3a f2 59  |..3:.YV.$...4:.Y|
00003530  62 0d 24 90 16 c9 35 3a  e7 56 6a 20 8c f2 59 76  |b.$...5:.Vj ..Yv|
00003540  28 58 6b 2c 58 6c 29 0d  24 9a 16 c9 36 3a e7 56  |(Xk,Xl).$...6:.V|
00003550  6e 20 8c f2 59 77 28 58  6b 2c 58 6c 29 0d 24 a4  |n ..Yw(Xk,Xl).$.|
00003560  0a c9 37 3a f2 59 63 0d  24 ae 11 c9 38 3a f2 59  |..7:.Yc.$...8:.Y|
00003570  78 28 58 6b 2c 58 6c 29  0d 24 b8 05 cb 0d 24 c2  |x(Xk,Xl).$....$.|
00003580  0e cc 3a e7 56 5a 3c 3e  31 20 8c 0d 24 d6 15 c8  |..:.VZ<>1 ..$...|
00003590  99 26 34 30 30 44 34 2c  2c 2d 31 3a 56 5a 3d 30  |.&400D4,,-1:VZ=0|
000035a0  0d 24 ea 05 cd 0d 24 f4  07 cd 3a e1 0d 25 1c 74  |.$....$...:..%.t|
000035b0  dd f2 5a 67 28 58 6a 29  3a 63 57 3d 58 6a 21 34  |..Zg(Xj):cW=Xj!4|
000035c0  30 3a 5a 7a 24 3d a4 63  74 69 6f 6e 5f 45 78 74  |0:Zz$=.ction_Ext|
000035d0  72 61 63 74 53 74 72 69  6e 67 28 58 6a 2b 34 34  |ractString(Xj+44|
000035e0  29 3a 61 56 3d 58 6a 21  34 3a 58 6a 21 31 36 3d  |):aV=Xj!4:Xj!16=|
000035f0  34 3a 58 6a 21 31 32 3d  58 6a 21 38 3a c8 99 26  |4:Xj!12=Xj!8:..&|
00003600  34 30 30 45 37 2c 31 37  2c 58 6a 2c 61 56 3a e7  |400E7,17,Xj,aV:.|
00003610  63 57 3c 3e 55 65 20 80  63 57 3c 3e 55 66 20 8c  |cW<>Ue .cW<>Uf .|
00003620  0d 25 6c 4e 59 69 24 3d  a4 63 74 69 6f 6e 5f 54  |.%lNYi$=.ction_T|
00003630  61 67 54 6f 53 74 72 69  6e 67 28 22 65 72 72 30  |agToString("err0|
00003640  31 22 29 3a 59 6a 3d a4  63 74 69 6f 6e 5f 52 65  |1"):Yj=.ction_Re|
00003650  70 6f 72 74 45 72 72 6f  72 28 55 6a 2c 39 39 2c  |portError(Uj,99,|
00003660  55 63 24 2c 59 69 24 2c  20 ac b9 2c b9 29 0d 25  |Uc$,Yi$, ..,.).%|
00003670  80 0c cc 3a c8 8e 63 57  20 ca 0d 25 94 10 c9 55  |...:..cW ..%...U|
00003680  65 3a f2 63 58 28 5a 7a  24 29 0d 25 9e 10 c9 55  |e:.cX(Zz$).%...U|
00003690  66 3a f2 63 59 28 5a 7a  24 29 0d 25 a8 05 cb 0d  |f:.cY(Zz$).%....|
000036a0  25 b2 07 cd 3a e1 0d 25  da 38 dd a4 63 74 69 6f  |%...:..%.8..ctio|
000036b0  6e 5f 46 69 6c 65 45 78  69 73 74 73 28 5a 7a 24  |n_FileExists(Zz$|
000036c0  29 3a c8 99 26 32 30 30  30 38 2c 31 33 2c 5a 7a  |):..&20008,13,Zz|
000036d0  24 20 b8 63 5a 3a 3d 28  63 5a 3c 3e 30 29 0d 26  |$ .cZ:=(cZ<>0).&|
000036e0  0c 48 dd a4 63 74 69 6f  6e 5f 53 69 7a 65 4f 66  |.H..ction_SizeOf|
000036f0  46 69 6c 65 28 5a 7a 24  29 3a ea 63 61 3a c8 99  |File(Zz$):.ca:..|
00003700  26 38 2c 31 37 2c 5a 7a  24 20 b8 63 5a 2c 63 62  |&8,17,Zz$ .cZ,cb|
00003710  2c 63 63 2c 63 64 2c 63  65 2c 63 66 3a 63 61 3d  |,cc,cd,ce,cf:ca=|
00003720  63 65 3a 3d 63 61 0d 26  52 55 dd a4 63 74 69 6f  |ce:=ca.&RU..ctio|
00003730  6e 5f 54 79 70 65 4f 66  46 69 6c 65 28 5a 7a 24  |n_TypeOfFile(Zz$|
00003740  29 3a ea 63 61 3a c8 99  26 38 2c 31 37 2c 5a 7a  |):.ca:..&8,17,Zz|
00003750  24 20 b8 63 5a 2c 63 62  2c 63 63 2c 63 64 2c 63  |$ .cZ,cb,cc,cd,c|
00003760  65 2c 63 66 3a 63 67 3d  28 28 63 63 3e 3e 38 29  |e,cf:cg=((cc>>8)|
00003770  20 80 26 46 46 46 29 3a  3d 63 67 0d 26 98 34 dd  | .&FFF):=cg.&.4.|
00003780  f2 5a 6a 28 58 6a 29 3a  63 68 24 3d 22 22 3a 61  |.Zj(Xj):ch$="":a|
00003790  56 3d 58 6a 21 34 3a 63  69 3d 58 6a 21 33 32 3a  |V=Xj!4:ci=Xj!32:|
000037a0  62 6d 3d 58 6a 21 33 36  3a c8 8e 63 69 20 ca 0d  |bm=Xj!36:..ci ..|
000037b0  26 d4 10 c9 55 62 3a e7  62 6d 3d 56 68 20 8c 0d  |&...Ub:.bm=Vh ..|
000037c0  26 de 0d e7 57 59 20 80  57 72 20 8c 0d 26 e8 0e  |&...WY .Wr ..&..|
000037d0  63 68 24 3d 22 73 70 69  6e 22 0d 26 f2 10 cc 3a  |ch$="spin".&...:|
000037e0  63 68 24 3d 22 69 63 6f  6e 22 0d 27 06 05 cd 0d  |ch$="icon".'....|
000037f0  27 10 05 cd 0d 27 1a 26  c9 59 71 3a e7 62 6d 3d  |'....'.&.Yq:.bm=|
00003800  30 20 8c 63 68 24 3d 22  63 6f 6c 77 30 30 22 8b  |0 .ch$="colw00".|
00003810  63 68 24 3d 22 63 6f 6c  77 22 0d 27 24 26 c9 59  |ch$="colw".'$&.Y|
00003820  74 3a e7 62 6d 3d 30 20  8c 63 68 24 3d 22 6d 6f  |t:.bm=0 .ch$="mo|
00003830  76 77 30 30 22 8b 63 68  24 3d 22 6d 6f 76 77 22  |vw00".ch$="movw"|
00003840  0d 27 2e 12 c9 58 77 3a  63 68 24 3d 22 73 6f 75  |.'...Xw:ch$="sou|
00003850  72 22 0d 27 38 12 c9 58  7a 3a 63 68 24 3d 22 64  |r".'8..Xz:ch$="d|
00003860  73 74 6e 22 0d 27 42 12  c9 59 6e 3a 63 68 24 3d  |stn".'B..Yn:ch$=|
00003870  22 62 61 63 6b 22 0d 27  4c 0e c9 58 74 3a c8 8e  |"back".'L..Xt:..|
00003880  62 6d 20 ca 0d 27 56 13  c9 31 3a 63 68 24 3d 22  |bm ..'V..1:ch$="|
00003890  70 72 6f 67 30 31 22 0d  27 60 13 c9 32 3a 63 68  |prog01".'`..2:ch|
000038a0  24 3d 22 70 72 6f 67 30  32 22 0d 27 6a 13 c9 33  |$="prog02".'j..3|
000038b0  3a 63 68 24 3d 22 70 72  6f 67 30 33 22 0d 27 74  |:ch$="prog03".'t|
000038c0  05 cb 0d 27 7e 0e c9 57  6a 3a c8 8e 62 6d 20 ca  |...'~..Wj:..bm .|
000038d0  0d 27 88 13 c9 30 3a 63  68 24 3d 22 6d 61 69 6e  |.'...0:ch$="main|
000038e0  30 30 22 0d 27 92 13 c9  32 3a 63 68 24 3d 22 6d  |00".'...2:ch$="m|
000038f0  61 69 6e 30 32 22 0d 27  9c 13 c9 34 3a 63 68 24  |ain02".'...4:ch$|
00003900  3d 22 6d 61 69 6e 30 34  22 0d 27 a6 13 c9 36 3a  |="main04".'...6:|
00003910  63 68 24 3d 22 6d 61 69  6e 30 36 22 0d 27 b0 13  |ch$="main06".'..|
00003920  c9 37 3a 63 68 24 3d 22  6d 61 69 6e 30 37 22 0d  |.7:ch$="main07".|
00003930  27 ba 13 c9 38 3a 63 68  24 3d 22 6d 61 69 6e 30  |'...8:ch$="main0|
00003940  38 22 0d 27 c4 13 c9 39  3a 63 68 24 3d 22 6d 61  |8".'...9:ch$="ma|
00003950  69 6e 30 39 22 0d 27 ce  10 7f 3a 63 68 24 3d 22  |in09".'...:ch$="|
00003960  6d 61 69 6e 22 0d 27 e2  05 cb 0d 27 ec 0e c9 57  |main".'....'...W|
00003970  78 3a c8 8e 62 6d 20 ca  0d 27 f6 13 c9 30 3a 63  |x:..bm ..'...0:c|
00003980  68 24 3d 22 70 6d 61 6e  30 30 22 0d 28 00 13 c9  |h$="pman00".(...|
00003990  31 3a 63 68 24 3d 22 70  6d 61 6e 30 31 22 0d 28  |1:ch$="pman01".(|
000039a0  0a 13 c9 32 3a 63 68 24  3d 22 70 6d 61 6e 30 32  |...2:ch$="pman02|
000039b0  22 0d 28 14 10 7f 3a 63  68 24 3d 22 70 72 65 66  |".(...:ch$="pref|
000039c0  22 0d 28 28 05 cb 0d 28  32 0e c9 57 7a 3a c8 8e  |".((...(2..Wz:..|
000039d0  62 6d 20 ca 0d 28 3c 13  c9 33 3a 63 68 24 3d 22  |bm ..(<..3:ch$="|
000039e0  70 70 6e 65 30 33 22 0d  28 46 13 c9 34 3a 63 68  |ppne03".(F..4:ch|
000039f0  24 3d 22 70 70 6e 65 30  34 22 0d 28 50 13 c9 35  |$="ppne04".(P..5|
00003a00  3a 63 68 24 3d 22 70 70  6e 65 30 35 22 0d 28 5a  |:ch$="ppne05".(Z|
00003a10  13 c9 37 3a 63 68 24 3d  22 70 70 6e 65 30 37 22  |..7:ch$="ppne07"|
00003a20  0d 28 64 13 c9 38 3a 63  68 24 3d 22 70 70 6e 65  |.(d..8:ch$="ppne|
00003a30  30 38 22 0d 28 6e 13 c9  39 3a 63 68 24 3d 22 70  |08".(n..9:ch$="p|
00003a40  70 6e 65 30 39 22 0d 28  78 14 c9 31 31 3a 63 68  |pne09".(x..11:ch|
00003a50  24 3d 22 70 70 6e 65 31  31 22 0d 28 82 14 c9 31  |$="ppne11".(...1|
00003a60  32 3a 63 68 24 3d 22 70  70 6e 65 31 32 22 0d 28  |2:ch$="ppne12".(|
00003a70  8c 14 c9 31 33 3a 63 68  24 3d 22 70 70 6e 65 31  |...13:ch$="ppne1|
00003a80  33 22 0d 28 96 14 c9 31  34 3a 63 68 24 3d 22 70  |3".(...14:ch$="p|
00003a90  70 6e 65 31 34 22 0d 28  a0 14 c9 31 39 3a 63 68  |pne14".(...19:ch|
00003aa0  24 3d 22 70 70 6e 65 31  39 22 0d 28 aa 10 7f 3a  |$="ppne19".(...:|
00003ab0  63 68 24 3d 22 70 72 65  66 22 0d 28 be 05 cb 0d  |ch$="pref".(....|
00003ac0  28 c8 10 cb 3a e7 63 68  24 3c 3e 22 22 20 8c 0d  |(...:.ch$<>"" ..|
00003ad0  28 dc 71 63 6a 24 3d a4  63 74 69 6f 6e 5f 54 61  |(.qcj$=.ction_Ta|
00003ae0  67 54 6f 53 74 72 69 6e  67 28 63 68 24 29 3a 58  |gToString(ch$):X|
00003af0  6a 21 30 3d 32 30 2b 28  28 a9 28 63 6a 24 29 20  |j!0=20+((.(cj$) |
00003b00  81 34 29 2a 34 29 2b 34  3a 58 6a 21 31 32 3d 58  |.4)*4)+4:Xj!12=X|
00003b10  6a 21 38 3a 58 6a 21 31  36 3d 26 35 30 33 3a 24  |j!8:Xj!16=&503:$|
00003b20  28 58 6a 2b 32 30 29 3d  63 6a 24 2b bd 30 3a c8  |(Xj+20)=cj$+.0:.|
00003b30  99 26 34 30 30 45 37 2c  31 37 2c 58 6a 2c 61 56  |.&400E7,17,Xj,aV|
00003b40  0d 29 18 07 cd 3a e1 0d  29 40 4b dd f2 57 66 28  |.)...:..)@K..Wf(|
00003b50  63 6b 29 3a 61 77 24 3d  a4 63 74 69 6f 6e 5f 54  |ck):aw$=.ction_T|
00003b60  61 67 54 6f 53 74 72 69  6e 67 28 22 71 75 61 6c  |agToString("qual|
00003b70  22 2b c2 22 30 30 22 2b  c3 63 6b 2c 32 29 29 3a  |"+."00"+.ck,2)):|
00003b80  f2 57 69 28 55 6a 2c 57  6a 2c 34 2c 61 77 24 29  |.Wi(Uj,Wj,4,aw$)|
00003b90  3a e1 0d 29 7c 4b dd f2  57 67 28 63 6b 29 3a 61  |:..)|K..Wg(ck):a|
00003ba0  7a 24 3d a4 63 74 69 6f  6e 5f 54 61 67 54 6f 53  |z$=.ction_TagToS|
00003bb0  74 72 69 6e 67 28 22 66  72 6d 73 22 2b c2 22 30  |tring("frms"+."0|
00003bc0  30 22 2b c3 63 6b 2c 32  29 29 3a f2 57 69 28 55  |0"+.ck,2)):.Wi(U|
00003bd0  6a 2c 57 6a 2c 36 2c 61  7a 24 29 3a e1 0d 29 b8  |j,Wj,6,az$):..).|
00003be0  ca dd f2 5a 56 28 63 69  2c 63 6c 2c 63 6d 29 3a  |...ZV(ci,cl,cm):|
00003bf0  63 6e 3d 63 69 3a 63 6f  3d 63 6c 2b 31 3a 63 70  |cn=ci:co=cl+1:cp|
00003c00  3d 63 6d 2b 30 3a 55 6a  21 30 3d 63 69 3a 55 6a  |=cm+0:Uj!0=ci:Uj|
00003c10  21 34 3d 37 3a 55 6a 21  38 3d 63 6c 3a 55 6a 21  |!4=7:Uj!8=cl:Uj!|
00003c20  31 32 3d 63 6d 3a 55 6a  21 31 36 3d 63 6c 3a 55  |12=cm:Uj!16=cl:U|
00003c30  6a 21 32 30 3d 63 6d 3a  55 6a 21 32 34 3d 63 69  |j!20=cm:Uj!24=ci|
00003c40  3a c8 99 26 34 30 30 43  38 2c 2c 55 6a 2b 32 34  |:..&400C8,,Uj+24|
00003c50  3a 63 71 3d 55 6a 21 32  38 3a 63 72 3d 55 6a 21  |:cq=Uj!28:cr=Uj!|
00003c60  33 36 3a 63 73 3d 55 6a  21 34 30 3a 63 74 3d 55  |36:cs=Uj!40:ct=U|
00003c70  6a 21 33 32 3a 55 6a 21  32 34 3d 63 71 3a 55 6a  |j!32:Uj!24=cq:Uj|
00003c80  21 32 38 3d 63 74 3a 55  6a 21 33 32 3d 63 72 3a  |!28=ct:Uj!32=cr:|
00003c90  55 6a 21 33 36 3d 63 73  3a c8 99 26 34 30 30 44  |Uj!36=cs:..&400D|
00003ca0  30 2c 2c 55 6a 3a e1 0d  2a 6c 3b dd f2 57 70 3a  |0,,Uj:..*l;..Wp:|
00003cb0  c8 99 26 34 30 30 43 46  2c 2c 55 6a 3a 63 6c 3d  |..&400CF,,Uj:cl=|
00003cc0  55 6a 21 30 3a 63 6d 3d  55 6a 21 34 3a 63 75 3d  |Uj!0:cm=Uj!4:cu=|
00003cd0  55 6a 21 38 3a 63 69 3d  63 6e 3a e7 63 75 3d 31  |Uj!8:ci=cn:.cu=1|
00003ce0  20 8c 0d 2a 9e 15 e7 63  6c 3c 3e 63 6f 20 84 63  | ..*...cl<>co .c|
00003cf0  6d 3c 3e 63 70 20 8c 0d  2a a8 0a c8 8e 63 69 20  |m<>cp ..*....ci |
00003d00  ca 0d 2a b2 10 c9 58 77  3a 63 76 3d 62 57 2f 62  |..*...Xw:cv=bW/b|
00003d10  58 0d 2a bc 10 c9 58 7a  3a 63 76 3d 62 64 2f 62  |X.*...Xz:cv=bd/b|
00003d20  65 0d 2a c6 0e c9 59 6e  3a 63 76 3d 31 2f 31 0d  |e.*...Yn:cv=1/1.|
00003d30  2a d0 2f cb 3a f2 63 77  28 63 69 2c 28 63 6c 2d  |*./.:.cw(ci,(cl-|
00003d40  63 6f 29 2f 63 76 2c 28  63 6d 2d 63 70 29 2f 63  |co)/cv,(cm-cp)/c|
00003d50  76 29 3a 63 6f 3d 63 6c  3a 63 70 3d 63 6d 0d 2a  |v):co=cl:cp=cm.*|
00003d60  f8 05 cd 0d 2b 02 0a cc  3a 56 61 3d 30 0d 2b 16  |....+...:Va=0.+.|
00003d70  07 cd 3a e1 0d 2b 3e 19  dd f2 63 77 28 63 69 2c  |..:..+>...cw(ci,|
00003d80  63 78 2c 63 79 29 3a c8  8e 63 69 20 ca 0d 2b 5c  |cx,cy):..ci ..+\|
00003d90  5e c9 58 77 3a 56 76 25  2b 3d 28 28 63 78 3e 3e  |^.Xw:Vv%+=((cx>>|
00003da0  63 7a 29 2f 64 55 29 3a  56 77 25 2b 3d 28 28 63  |cz)/dU):Vw%+=((c|
00003db0  79 3e 3e 64 56 29 2f 64  57 29 3a 21 62 74 2b 3d  |y>>dV)/dW):!bt+=|
00003dc0  28 28 63 78 3e 3e 63 7a  29 2f 64 55 29 3a 21 62  |((cx>>cz)/dU):!b|
00003dd0  75 2b 3d 28 28 63 79 3e  3e 64 56 29 2f 64 57 29  |u+=((cy>>dV)/dW)|
00003de0  3a f2 59 72 28 55 6a 2c  63 69 29 0d 2b 98 5e c9  |:.Yr(Uj,ci).+.^.|
00003df0  58 7a 3a 56 78 25 2b 3d  28 28 63 78 3e 3e 63 7a  |Xz:Vx%+=((cx>>cz|
00003e00  29 2f 64 58 29 3a 56 79  25 2b 3d 28 28 63 79 3e  |)/dX):Vy%+=((cy>|
00003e10  3e 64 56 29 2f 64 59 29  3a 21 62 79 2b 3d 28 28  |>dV)/dY):!by+=((|
00003e20  63 78 3e 3e 63 7a 29 2f  64 58 29 3a 21 62 7a 2b  |cx>>cz)/dX):!bz+|
00003e30  3d 28 28 63 79 3e 3e 64  56 29 2f 64 59 29 3a f2  |=((cy>>dV)/dY):.|
00003e40  59 72 28 55 6a 2c 63 69  29 0d 2b d4 0d c9 59 6e  |Yr(Uj,ci).+...Yn|
00003e50  3a e7 56 72 20 8c 0d 2b  de 5a 56 7a 25 2b 3d 28  |:.Vr ..+.ZVz%+=(|
00003e60  28 63 78 3e 3e 63 7a 29  2f 64 5a 29 3a 57 55 25  |(cx>>cz)/dZ):WU%|
00003e70  2b 3d 28 28 63 79 3e 3e  64 56 29 2f 64 61 29 3a  |+=((cy>>dV)/da):|
00003e80  21 64 62 2b 3d 28 28 63  78 3e 3e 63 7a 29 2f 64  |!db+=((cx>>cz)/d|
00003e90  5a 29 3a 21 64 63 2b 3d  28 28 63 79 3e 3e 64 56  |Z):!dc+=((cy>>dV|
00003ea0  29 2f 64 61 29 3a f2 59  79 28 63 6c 2c 63 6d 29  |)/da):.Yy(cl,cm)|
00003eb0  0d 2c 10 05 cd 0d 2c 24  07 cb 3a e1 0d 2c 4c 19  |.,....,$..:..,L.|
00003ec0  dd f2 64 64 28 63 69 2c  63 6c 2c 63 6d 29 3a c8  |..dd(ci,cl,cm):.|
00003ed0  8e 63 69 20 ca 0d 2c 60  1c c9 58 77 3a 64 65 3d  |.ci ..,`..Xw:de=|
00003ee0  62 57 2f 62 58 3a 64 66  3d 64 55 3a 64 67 3d 64  |bW/bX:df=dU:dg=d|
00003ef0  57 0d 2c 7e 1c c9 58 7a  3a 64 65 3d 62 64 2f 62  |W.,~..Xz:de=bd/b|
00003f00  65 3a 64 66 3d 64 58 3a  64 67 3d 64 59 0d 2c 9c  |e:df=dX:dg=dY.,.|
00003f10  48 cb 3a f2 64 68 28 55  6a 2c 63 69 2c 63 6c 2c  |H.:.dh(Uj,ci,cl,|
00003f20  63 6d 29 3a 64 69 25 3d  28 64 6a 3e 3e 28 64 66  |cm):di%=(dj>>(df|
00003f30  2a 63 7a 29 20 29 20 2f  20 64 65 3a 64 6b 25 3d  |*cz) ) / de:dk%=|
00003f40  28 64 6c 3e 3e 28 64 67  2a 64 56 29 20 29 20 2f  |(dl>>(dg*dV) ) /|
00003f50  20 64 65 3a e1 0d 2c e2  dd dd f2 59 7a 28 63 69  | de:..,....Yz(ci|
00003f60  2c 63 6c 2c 63 6d 29 3a  64 6d 3d 63 69 3a 64 6e  |,cl,cm):dm=ci:dn|
00003f70  3d 63 6c 3a 64 6f 3d 63  6d 3a 63 6f 3d 63 6c 3a  |=cl:do=cm:co=cl:|
00003f80  63 70 3d 63 6d 3a 55 6a  21 30 3d 63 69 3a 55 6a  |cp=cm:Uj!0=ci:Uj|
00003f90  21 34 3d 37 3a 55 6a 21  38 3d 63 6c 3a 55 6a 21  |!4=7:Uj!8=cl:Uj!|
00003fa0  31 32 3d 63 6d 3a 55 6a  21 31 36 3d 63 6c 3a 55  |12=cm:Uj!16=cl:U|
00003fb0  6a 21 32 30 3d 63 6d 3a  55 6a 21 32 34 3d 63 69  |j!20=cm:Uj!24=ci|
00003fc0  3a c8 99 26 34 30 30 43  43 2c 2c 55 6a 2b 32 34  |:..&400CC,,Uj+24|
00003fd0  3a 63 71 3d 55 6a 21 32  38 3a 63 72 3d 55 6a 21  |:cq=Uj!28:cr=Uj!|
00003fe0  33 36 3a 63 73 3d 55 6a  21 34 30 3a 63 74 3d 55  |36:cs=Uj!40:ct=U|
00003ff0  6a 21 33 32 3a 55 6a 21  32 34 3d 63 71 3a 55 6a  |j!32:Uj!24=cq:Uj|
00004000  21 32 38 3d 63 74 3a 55  6a 21 33 32 3d 63 72 3a  |!28=ct:Uj!32=cr:|
00004010  55 6a 21 33 36 3d 63 73  3a c8 99 26 34 30 30 44  |Uj!36=cs:..&400D|
00004020  30 2c 2c 55 6a 3a e7 57  58 20 8c f2 64 70 8b f2  |0,,Uj:.WX ..dp..|
00004030  64 71 0d 2d 82 05 e1 0d  2d a0 bb dd f2 64 70 3a  |dq.-....-....dp:|
00004040  64 72 3d 55 6a 3a 21 64  72 3d 64 6d 3a c8 99 26  |dr=Uj:!dr=dm:..&|
00004050  34 30 30 43 43 2c 2c 64  72 3a 64 72 21 28 30 2b  |400CC,,dr:dr!(0+|
00004060  34 29 3d 64 72 21 28 34  30 2b 34 29 3a 64 72 21  |4)=dr!(40+4):dr!|
00004070  28 34 2b 34 29 3d 64 72  21 28 34 34 2b 34 29 3a  |(4+4)=dr!(44+4):|
00004080  64 72 21 28 38 2b 34 29  3d 64 72 21 28 34 38 2b  |dr!(8+4)=dr!(48+|
00004090  34 29 3a 64 72 21 28 31  32 2b 34 29 3d 64 72 21  |4):dr!(12+4)=dr!|
000040a0  28 35 32 2b 34 29 3a c8  99 26 34 30 30 43 39 2c  |(52+4):..&400C9,|
000040b0  2c 64 72 20 b8 64 73 3a  c8 95 64 73 3a c8 99 26  |,dr .ds:..ds:..&|
000040c0  34 30 30 45 36 2c 34 38  2b 31 34 3a c8 93 c8 90  |400E6,48+14:....|
000040d0  63 6f 2d 34 2c 63 70 2d  34 2c 38 2c 38 3a c8 99  |co-4,cp-4,8,8:..|
000040e0  26 34 30 30 43 41 2c 2c  64 72 20 b8 64 73 3a ce  |&400CA,,dr .ds:.|
000040f0  3a e1 0d 2e 36 b6 dd f2  64 71 3a 64 72 3d 55 6a  |:...6...dq:dr=Uj|
00004100  3a 21 64 72 3d 64 6d 3a  c8 99 26 34 30 30 43 43  |:!dr=dm:..&400CC|
00004110  2c 2c 64 72 3a 64 72 21  28 30 2b 34 29 3d 64 72  |,,dr:dr!(0+4)=dr|
00004120  21 28 34 30 2b 34 29 3a  64 72 21 28 34 2b 34 29  |!(40+4):dr!(4+4)|
00004130  3d 64 72 21 28 34 34 2b  34 29 3a 64 72 21 28 38  |=dr!(44+4):dr!(8|
00004140  2b 34 29 3d 64 72 21 28  34 38 2b 34 29 3a 64 72  |+4)=dr!(48+4):dr|
00004150  21 28 31 32 2b 34 29 3d  64 72 21 28 35 32 2b 34  |!(12+4)=dr!(52+4|
00004160  29 3a c8 99 26 34 30 30  43 39 2c 2c 64 72 20 b8  |):..&400C9,,dr .|
00004170  64 73 3a c8 95 64 73 3a  c8 99 26 34 30 30 45 36  |ds:..ds:..&400E6|
00004180  2c 34 38 2b 31 34 3a 86  64 6e 2c 64 6f 2c 63 6f  |,48+14:.dn,do,co|
00004190  2c 63 70 3a c8 99 26 34  30 30 43 41 2c 2c 64 72  |,cp:..&400CA,,dr|
000041a0  20 b8 64 73 3a ce 3a e1  0d 2e cc 44 dd f2 57 71  | .ds:.:....D..Wq|
000041b0  3a c8 99 26 34 30 30 43  46 2c 2c 55 6a 3a 63 6c  |:..&400CF,,Uj:cl|
000041c0  3d 55 6a 21 30 3a 63 6d  3d 55 6a 21 34 3a 63 75  |=Uj!0:cm=Uj!4:cu|
000041d0  3d 55 6a 21 38 3a 63 69  3d 55 6a 21 31 32 3a e7  |=Uj!8:ci=Uj!12:.|
000041e0  63 75 3d 34 20 84 63 75  3d 31 20 8c 0d 2e fe 15  |cu=4 .cu=1 .....|
000041f0  e7 63 6c 3c 3e 63 6f 20  84 63 6d 3c 3e 63 70 20  |.cl<>co .cm<>cp |
00004200  8c 0d 2f 08 10 e7 57 58  20 8c f2 64 70 8b f2 64  |../...WX ..dp..d|
00004210  71 0d 2f 12 1c 63 6f 3d  63 6c 3a 63 70 3d 63 6d  |q./..co=cl:cp=cm|
00004220  3a e7 57 58 20 8c f2 64  70 8b f2 64 71 0d 2f 30  |:.WX ..dp..dq./0|
00004230  05 cd 0d 2f 3a 0a cc 3a  56 61 3d 30 0d 2f 4e 07  |.../:..:Va=0./N.|
00004240  cd 3a e1 0d 2f 76 15 dd  f2 5a 77 3a e7 57 58 20  |.:../v...Zw:.WX |
00004250  8c f2 64 70 8b f2 64 71  0d 2f 8a 48 c8 99 26 34  |..dp..dq./.H..&4|
00004260  30 30 43 46 2c 2c 55 6a  3a 63 69 3d 55 6a 21 31  |00CF,,Uj:ci=Uj!1|
00004270  32 3a f2 64 64 28 63 69  2c 64 6e 2c 64 6f 29 3a  |2:.dd(ci,dn,do):|
00004280  64 74 3d 94 28 63 70 2d  64 6f 29 3a 64 75 3d 94  |dt=.(cp-do):du=.|
00004290  28 63 6f 2d 64 6e 29 3a  e7 64 75 3e 64 74 20 8c  |(co-dn):.du>dt .|
000042a0  0d 2f c6 23 e7 20 ac a4  63 74 69 6f 6e 5f 47 75  |./.#. ..ction_Gu|
000042b0  69 64 65 45 78 69 73 74  73 28 64 76 2c 64 6b 25  |ideExists(dv,dk%|
000042c0  29 20 8c 0d 2f d0 3d 64  77 3d a4 63 74 69 6f 6e  |) ../.=dw=.ction|
000042d0  5f 49 6e 73 65 72 74 5f  48 6f 72 56 28 64 76 2c  |_Insert_HorV(dv,|
000042e0  64 6b 25 29 3a f2 64 78  28 58 77 2c 64 77 2c 64  |dk%):.dx(Xw,dw,d|
000042f0  76 29 3a f2 64 78 28 58  7a 2c 64 77 2c 64 76 29  |v):.dx(Xz,dw,dv)|
00004300  0d 2f ee 05 cd 0d 2f f8  25 cc 3a e7 20 ac a4 63  |./..../.%.:. ..c|
00004310  74 69 6f 6e 5f 47 75 69  64 65 45 78 69 73 74 73  |tion_GuideExists|
00004320  28 64 79 2c 64 69 25 29  20 8c 0d 30 0c 3d 64 77  |(dy,di%) ..0.=dw|
00004330  3d a4 63 74 69 6f 6e 5f  49 6e 73 65 72 74 5f 48  |=.ction_Insert_H|
00004340  6f 72 56 28 64 79 2c 64  69 25 29 3a f2 64 78 28  |orV(dy,di%):.dx(|
00004350  58 77 2c 64 77 2c 64 79  29 3a f2 64 78 28 58 7a  |Xw,dw,dy):.dx(Xz|
00004360  2c 64 77 2c 64 79 29 0d  30 2a 05 cd 0d 30 34 07  |,dw,dy).0*...04.|
00004370  cd 3a e1 0d 30 5c 5c dd  a4 63 74 69 6f 6e 5f 49  |.:..0\\..ction_I|
00004380  6e 73 65 72 74 5f 48 6f  72 56 28 64 7a 2c 65 55  |nsert_HorV(dz,eU|
00004390  25 29 3a 69 3d 30 3a 65  56 3d 20 ac b9 3a c8 95  |%):i=0:eV= ..:..|
000043a0  69 3c 3d 32 35 35 20 80  20 ac 65 56 3a 65 57 25  |i<=255 . .eV:eW%|
000043b0  3d 28 64 7a 21 28 69 2a  34 29 20 80 26 37 46 46  |=(dz!(i*4) .&7FF|
000043c0  46 46 46 46 46 29 3a e7  65 57 25 3d 30 20 8c 0d  |FFFFF):.eW%=0 ..|
000043d0  30 98 08 65 56 3d b9 0d  30 a2 0a cc 3a 69 2b 3d  |0..eV=..0...:i+=|
000043e0  31 0d 30 b6 10 cd 3a ce  3a e7 69 3e 32 35 35 20  |1.0...:.:.i>255 |
000043f0  8c 0d 30 d4 4e 59 69 24  3d a4 63 74 69 6f 6e 5f  |..0.NYi$=.ction_|
00004400  54 61 67 54 6f 53 74 72  69 6e 67 28 22 65 72 72  |TagToString("err|
00004410  30 34 22 29 3a 59 6a 3d  a4 63 74 69 6f 6e 5f 52  |04"):Yj=.ction_R|
00004420  65 70 6f 72 74 45 72 72  6f 72 28 55 6a 2c 39 39  |eportError(Uj,99|
00004430  2c 55 63 24 2c 59 69 24  2c 20 ac b9 2c b9 29 0d  |,Uc$,Yi$, ..,.).|
00004440  30 e8 18 cc 3a 64 7a 21  28 69 2a 34 29 20 3d 20  |0...:dz!(i*4) = |
00004450  65 55 25 20 2b 20 31 0d  30 fc 08 cd 3a 3d 69 0d  |eU% + 1.0...:=i.|
00004460  31 24 60 dd a4 63 74 69  6f 6e 5f 47 75 69 64 65  |1$`..ction_Guide|
00004470  45 78 69 73 74 73 28 64  7a 2c 65 55 25 29 3a 69  |Exists(dz,eU%):i|
00004480  3d 30 3a 65 56 3d 20 ac  b9 3a c8 95 69 3c 3d 32  |=0:eV= ..:..i<=2|
00004490  35 35 20 80 20 ac 65 56  3a 65 57 25 3d 28 64 7a  |55 . .eV:eW%=(dz|
000044a0  21 28 69 2a 34 29 20 80  26 37 46 46 46 46 46 46  |!(i*4) .&7FFFFFF|
000044b0  46 29 2d 31 3a e7 65 57  25 3d 65 55 25 20 8c 0d  |F)-1:.eW%=eU% ..|
000044c0  31 60 08 65 56 3d b9 0d  31 6a 0a cc 3a 69 2b 3d  |1`.eV=..1j..:i+=|
000044d0  31 0d 31 7e 0b cd 3a ce  3a 3d 65 56 0d 31 b0 1b  |1.1~..:.:=eV.1..|
000044e0  dd f2 59 5a 28 63 69 2c  63 6c 2c 63 6d 2c 65 58  |..YZ(ci,cl,cm,eX|
000044f0  29 3a e7 65 58 20 8c 0d  31 c4 19 65 59 3d ba 65  |):.eX ..1..eY=.e|
00004500  5a 3a 65 61 3d ba 65 62  3a e7 65 59 3e 30 20 8c  |Z:ea=.eb:.eY>0 .|
00004510  0d 31 e2 0b e7 65 59 3e  31 20 8c 0d 31 ec 19 f2  |.1...eY>1 ..1...|
00004520  59 72 28 55 6a 2c 58 77  29 3a f2 59 72 28 55 6a  |Yr(Uj,Xw):.Yr(Uj|
00004530  2c 58 7a 29 0d 32 00 23  cc 3a f2 64 78 28 58 77  |,Xz).2.#.:.dx(Xw|
00004540  2c 21 65 63 2c 64 76 29  3a f2 64 78 28 58 7a 2c  |,!ec,dv):.dx(Xz,|
00004550  21 65 63 2c 64 76 29 0d  32 1e 05 cd 0d 32 28 0d  |!ec,dv).2....2(.|
00004560  cd 3a e7 65 61 3e 30 20  8c 0d 32 3c 0b e7 65 61  |.:.ea>0 ..2<..ea|
00004570  3e 31 20 8c 0d 32 46 19  f2 59 72 28 55 6a 2c 58  |>1 ..2F..Yr(Uj,X|
00004580  77 29 3a f2 59 72 28 55  6a 2c 58 7a 29 0d 32 5a  |w):.Yr(Uj,Xz).2Z|
00004590  23 cc 3a f2 64 78 28 58  77 2c 21 65 64 2c 64 79  |#.:.dx(Xw,!ed,dy|
000045a0  29 3a f2 64 78 28 58 7a  2c 21 65 64 2c 64 79 29  |):.dx(Xz,!ed,dy)|
000045b0  0d 32 78 05 cd 0d 32 82  0a cd 3a 57 56 3d 30 0d  |.2x...2...:WV=0.|
000045c0  32 96 6a cd 3a f2 64 64  28 63 69 2c 63 6c 2c 63  |2.j.:.dd(ci,cl,c|
000045d0  6d 29 3a 65 65 3d a4 63  74 69 6f 6e 5f 43 6c 6f  |m):ee=.ction_Clo|
000045e0  73 65 73 74 47 75 69 64  65 28 64 76 2c 64 6b 25  |sestGuide(dv,dk%|
000045f0  29 3a 65 66 3d a4 63 74  69 6f 6e 5f 43 6c 6f 73  |):ef=.ction_Clos|
00004600  65 73 74 47 75 69 64 65  28 64 79 2c 64 69 25 29  |estGuide(dy,di%)|
00004610  3a e7 65 65 3c 3e 2d 31  20 8c f2 65 67 28 64 76  |:.ee<>-1 ..eg(dv|
00004620  2c 65 65 2c 20 ac 65 58  29 0d 32 c8 1c e7 65 66  |,ee, .eX).2...ef|
00004630  3c 3e 2d 31 20 8c f2 65  67 28 64 79 2c 65 66 2c  |<>-1 ..eg(dy,ef,|
00004640  20 ac 65 58 29 0d 32 d2  05 e1 0d 32 f0 72 dd a4  | .eX).2....2.r..|
00004650  63 74 69 6f 6e 5f 43 6c  6f 73 65 73 74 47 75 69  |ction_ClosestGui|
00004660  64 65 28 64 7a 2c 65 55  29 3a 69 3d 30 3a 65 68  |de(dz,eU):i=0:eh|
00004670  3d 2d 31 3a 65 69 3d 38  3a c8 95 69 3c 3d 32 35  |=-1:ei=8:..i<=25|
00004680  35 3a 65 57 25 3d 28 64  7a 21 28 69 2a 34 29 20  |5:eW%=(dz!(i*4) |
00004690  80 26 37 46 46 46 46 46  46 46 29 2d 31 3a 65 6a  |.&7FFFFFFF)-1:ej|
000046a0  3d 94 28 65 57 25 2d 65  55 29 3a e7 65 6a 3c 65  |=.(eW%-eU):.ej<e|
000046b0  69 20 80 65 57 25 3c 3e  2d 31 20 8c 0d 33 40 0e  |i .eW%<>-1 ..3@.|
000046c0  65 68 3d 69 3a 65 69 3d  65 6a 0d 33 54 10 cd 3a  |eh=i:ei=ej.3T..:|
000046d0  69 2b 3d 31 3a ce 3a 3d  65 68 0d 33 90 52 dd f2  |i+=1:.:=eh.3.R..|
000046e0  65 67 28 64 7a 2c 63 6b  2c 65 6b 29 3a 65 57 25  |eg(dz,ck,ek):eW%|
000046f0  3d 64 7a 21 28 63 6b 2a  34 29 3a 65 6c 25 3d 28  |=dz!(ck*4):el%=(|
00004700  65 57 25 20 80 26 38 30  30 30 30 30 30 30 29 3a  |eW% .&80000000):|
00004710  65 57 25 2d 3d 65 6c 25  3a 65 6d 25 3d 26 38 30  |eW%-=el%:em%=&80|
00004720  30 30 30 30 30 30 3a e7  65 6b 20 8c 0d 33 cc 16  |000000:.ek ..3..|
00004730  65 6d 25 3d 65 6c 25 20  82 26 38 30 30 30 30 30  |em%=el% .&800000|
00004740  30 30 0d 33 d6 1a cd 3a  e7 65 6d 25 3c 3e 30 20  |00.3...:.em%<>0 |
00004750  8c 57 56 2b 3d 31 8b 57  56 2d 3d 31 0d 33 ea 44  |.WV+=1.WV-=1.3.D|
00004760  64 7a 21 28 63 6b 2a 34  29 20 3d 20 65 57 25 20  |dz!(ck*4) = eW% |
00004770  2b 20 65 6d 25 3a e7 a4  63 74 69 6f 6e 5f 57 69  |+ em%:..ction_Wi|
00004780  6e 64 6f 77 49 73 4f 70  65 6e 28 55 6a 2c 58 77  |ndowIsOpen(Uj,Xw|
00004790  29 20 8c f2 64 78 28 58  77 2c 63 6b 2c 64 7a 29  |) ..dx(Xw,ck,dz)|
000047a0  0d 33 fe 2e e7 a4 63 74  69 6f 6e 5f 57 69 6e 64  |.3....ction_Wind|
000047b0  6f 77 49 73 4f 70 65 6e  28 55 6a 2c 58 7a 29 20  |owIsOpen(Uj,Xz) |
000047c0  8c f2 64 78 28 58 7a 2c  63 6b 2c 64 7a 29 0d 34  |..dx(Xz,ck,dz).4|
000047d0  08 05 e1 0d 34 26 30 dd  f2 64 78 28 63 69 2c 63  |....4&0..dx(ci,c|
000047e0  6b 2c 64 7a 29 3a e7 a4  63 74 69 6f 6e 5f 57 69  |k,dz):..ction_Wi|
000047f0  6e 64 6f 77 49 73 4f 70  65 6e 28 55 6a 2c 63 69  |ndowIsOpen(Uj,ci|
00004800  29 20 8c 0d 34 3a 0a c8  8e 63 69 20 ca 0d 34 44  |) ..4:...ci ..4D|
00004810  1f c9 58 77 3a 65 6e 3d  64 57 2a 20 64 56 3a 64  |..Xw:en=dW* dV:d|
00004820  65 3d 62 57 2f 62 58 3a  61 3d 64 55 0d 34 62 1f  |e=bW/bX:a=dU.4b.|
00004830  c9 58 7a 3a 65 6e 3d 64  59 2a 20 64 56 3a 64 65  |.Xz:en=dY* dV:de|
00004840  3d 62 64 2f 62 65 3a 61  3d 64 58 0d 34 80 73 cb  |=bd/be:a=dX.4.s.|
00004850  3a 21 55 6a 3d 63 69 3a  c8 99 26 34 30 30 43 43  |:!Uj=ci:..&400CC|
00004860  2c 2c 55 6a 3a 5a 6c 3d  55 6a 21 34 3a 5a 6e 3d  |,,Uj:Zl=Uj!4:Zn=|
00004870  55 6a 21 31 36 3a 5a 6f  3d 55 6a 21 38 3a 5a 70  |Uj!16:Zo=Uj!8:Zp|
00004880  3d 55 6a 21 32 30 3a 5a  71 3d 55 6a 21 32 34 3a  |=Uj!20:Zq=Uj!24:|
00004890  5a 6d 3d 55 6a 21 31 32  3a 65 6f 3d 5a 6c 2d 5a  |Zm=Uj!12:eo=Zl-Z|
000048a0  70 3a 65 70 3d 5a 6e 2d  5a 71 3a 65 55 3d 64 7a  |p:ep=Zn-Zq:eU=dz|
000048b0  21 28 63 6b 2a 34 29 3a  c8 8e 64 7a 20 ca 0d 34  |!(ck*4):..dz ..4|
000048c0  e4 37 c9 64 76 3a 65 71  3d 5a 6c 3a 65 72 3d 5a  |.7.dv:eq=Zl:er=Z|
000048d0  6d 3a 65 73 3d 65 70 2b  28 28 65 55 3c 3c 65 6e  |m:es=ep+((eU<<en|
000048e0  29 2a 20 64 65 20 29 20  2d 20 32 34 3a 65 74 3d  |)* de ) - 24:et=|
000048f0  65 73 2b 34 38 0d 35 0c  3c c9 64 79 3a 65 73 3d  |es+48.5.<.dy:es=|
00004900  5a 6f 3a 65 74 3d 5a 6e  3a 65 71 3d 65 6f 2b 28  |Zo:et=Zn:eq=eo+(|
00004910  28 65 55 3c 3c 28 63 7a  2a 61 29 29 20 2a 20 64  |(eU<<(cz*a)) * d|
00004920  65 20 29 20 2d 20 32 34  3a 65 72 3d 65 71 2b 34  |e ) - 24:er=eq+4|
00004930  38 0d 35 3e 1d cb 3a c8  99 26 34 30 30 44 31 2c  |8.5>..:..&400D1,|
00004940  2d 31 2c 65 71 2c 65 73  2c 65 72 2c 65 74 0d 35  |-1,eq,es,er,et.5|
00004950  52 07 cd 3a e1 0d 35 7a  1c dd f2 5a 63 3a 65 75  |R..:..5z...Zc:eu|
00004960  3d ba 65 76 3a 57 56 3d  30 3a e7 65 75 3e 30 20  |=.ev:WV=0:.eu>0 |
00004970  8c 0d 35 a2 0b e7 65 75  3d 31 20 8c 0d 35 ac 4d  |..5...eu=1 ..5.M|
00004980  21 28 21 65 77 2b 28 21  65 78 2a 34 29 20 29 20  |!(!ew+(!ex*4) ) |
00004990  3d 20 21 65 79 3a f2 64  78 28 58 77 2c 21 65 78  |= !ey:.dx(Xw,!ex|
000049a0  2c 21 65 77 29 3a f2 64  78 28 58 7a 2c 21 65 78  |,!ew):.dx(Xz,!ex|
000049b0  2c 21 65 77 29 3a 21 28  21 65 77 2b 28 21 65 78  |,!ew):!(!ew+(!ex|
000049c0  2a 34 29 20 29 20 3d 20  30 0d 35 d4 2d cc 3a e7  |*4) ) = 0.5.-.:.|
000049d0  a4 63 74 69 6f 6e 5f 57  69 6e 64 6f 77 49 73 4f  |.ction_WindowIsO|
000049e0  70 65 6e 28 55 6a 2c 58  77 29 20 8c f2 59 72 28  |pen(Uj,Xw) ..Yr(|
000049f0  55 6a 2c 58 77 29 0d 35  e8 2b e7 a4 63 74 69 6f  |Uj,Xw).5.+..ctio|
00004a00  6e 5f 57 69 6e 64 6f 77  49 73 4f 70 65 6e 28 55  |n_WindowIsOpen(U|
00004a10  6a 2c 58 7a 29 20 8c f2  59 72 28 55 6a 2c 58 7a  |j,Xz) ..Yr(Uj,Xz|
00004a20  29 0d 35 f2 05 cd 0d 35  fc 07 cd 3a e1 0d 36 24  |).5....5...:..6$|
00004a30  20 dd f2 62 73 28 65 7a  29 3a 66 55 3d 21 66 56  | ..bs(ez):fU=!fV|
00004a40  3a 66 57 3d 21 66 58 3a  e7 65 7a 20 8c 0d 36 4c  |:fW=!fX:.ez ..6L|
00004a50  79 59 6a 3d a4 63 74 69  6f 6e 5f 49 6e 73 65 72  |yYj=.ction_Inser|
00004a60  74 5f 48 6f 72 56 28 64  76 2c 30 29 3a 59 6a 3d  |t_HorV(dv,0):Yj=|
00004a70  a4 63 74 69 6f 6e 5f 49  6e 73 65 72 74 5f 48 6f  |.ction_Insert_Ho|
00004a80  72 56 28 64 76 2c 66 57  2d 31 29 3a 59 6a 3d a4  |rV(dv,fW-1):Yj=.|
00004a90  63 74 69 6f 6e 5f 49 6e  73 65 72 74 5f 48 6f 72  |ction_Insert_Hor|
00004aa0  56 28 64 79 2c 30 29 3a  59 6a 3d a4 63 74 69 6f  |V(dy,0):Yj=.ctio|
00004ab0  6e 5f 49 6e 73 65 72 74  5f 48 6f 72 56 28 64 79  |n_Insert_HorV(dy|
00004ac0  2c 66 55 2d 31 29 0d 36  74 cc cd 3a 41 25 3d 64  |,fU-1).6t..:A%=d|
00004ad0  76 3a 66 59 25 3d ba 66  5a 3a 41 25 3d 64 79 3a  |v:fY%=.fZ:A%=dy:|
00004ae0  66 61 25 3d ba 66 5a 3a  41 25 3d 64 76 3a d6 66  |fa%=.fZ:A%=dv:.f|
00004af0  62 3a 41 25 3d 64 79 3a  d6 66 62 3a f2 66 63 3a  |b:A%=dy:.fb:.fc:|
00004b00  d6 66 64 3a e3 79 3d 30  20 b8 66 59 25 2d 31 3a  |.fd:.y=0 .fY%-1:|
00004b10  e3 78 3d 30 20 b8 66 61  25 2d 31 3a 42 25 3d 28  |.x=0 .fa%-1:B%=(|
00004b20  28 64 76 21 28 79 2a 34  29 29 20 80 26 37 46 46  |(dv!(y*4)) .&7FF|
00004b30  46 46 46 46 46 29 2d 31  3a 41 25 3d 28 28 64 79  |FFFFF)-1:A%=((dy|
00004b40  21 28 78 2a 34 29 29 20  80 26 37 46 46 46 46 46  |!(x*4)) .&7FFFFF|
00004b50  46 46 29 2d 31 3a 43 25  3d 57 57 3a d6 66 65 3a  |FF)-1:C%=WW:.fe:|
00004b60  ed 78 3a ed 79 3a 57 58  3d b9 3a e7 a4 63 74 69  |.x:.y:WX=.:..cti|
00004b70  6f 6e 5f 57 69 6e 64 6f  77 49 73 4f 70 65 6e 28  |on_WindowIsOpen(|
00004b80  55 6a 2c 58 77 29 20 8c  f2 59 72 28 55 6a 2c 58  |Uj,Xw) ..Yr(Uj,X|
00004b90  77 29 0d 37 1e 2b e7 a4  63 74 69 6f 6e 5f 57 69  |w).7.+..ction_Wi|
00004ba0  6e 64 6f 77 49 73 4f 70  65 6e 28 55 6a 2c 58 7a  |ndowIsOpen(Uj,Xz|
00004bb0  29 20 8c f2 59 72 28 55  6a 2c 58 7a 29 0d 37 28  |) ..Yr(Uj,Xz).7(|
00004bc0  05 e1 0d 37 46 74 dd f2  66 63 3a e3 69 3d 30 20  |...7Ft..fc:.i=0 |
00004bd0  b8 66 59 25 2d 31 3a e3  6a 3d 30 20 b8 66 59 25  |.fY%-1:.j=0 .fY%|
00004be0  2d 31 3a 41 25 3d 64 76  21 28 6a 2a 34 2b 30 29  |-1:A%=dv!(j*4+0)|
00004bf0  20 3a 66 66 3d 28 41 25  20 80 26 37 46 46 46 46  | :ff=(A% .&7FFFF|
00004c00  46 46 46 29 3a 42 25 3d  64 76 21 28 6a 2a 34 2b  |FFF):B%=dv!(j*4+|
00004c10  34 29 20 3a 66 67 3d 28  42 25 20 80 26 37 46 46  |4) :fg=(B% .&7FF|
00004c20  46 46 46 46 46 29 3a e7  66 66 3c 66 67 20 8c c8  |FFFFF):.ff<fg ..|
00004c30  94 41 25 2c 42 25 0d 37  8c 9b 64 76 21 28 6a 2a  |.A%,B%.7..dv!(j*|
00004c40  34 2b 30 29 20 3d 20 41  25 3a 64 76 21 28 6a 2a  |4+0) = A%:dv!(j*|
00004c50  34 2b 34 29 20 3d 20 42  25 3a ed 6a 3a ed 69 3a  |4+4) = B%:.j:.i:|
00004c60  e3 69 3d 66 61 25 2d 32  20 b8 30 88 2d 31 3a e3  |.i=fa%-2 .0.-1:.|
00004c70  6a 3d 66 61 25 2d 32 20  b8 30 88 2d 31 3a 41 25  |j=fa%-2 .0.-1:A%|
00004c80  3d 64 79 21 28 6a 2a 34  2b 30 29 20 3a 66 66 3d  |=dy!(j*4+0) :ff=|
00004c90  28 41 25 20 80 26 37 46  46 46 46 46 46 46 29 3a  |(A% .&7FFFFFFF):|
00004ca0  42 25 3d 64 79 21 28 6a  2a 34 2b 34 29 20 3a 66  |B%=dy!(j*4+4) :f|
00004cb0  67 3d 28 42 25 20 80 26  37 46 46 46 46 46 46 46  |g=(B% .&7FFFFFFF|
00004cc0  29 3a e7 66 66 3e 66 67  20 8c c8 94 41 25 2c 42  |):.ff>fg ...A%,B|
00004cd0  25 0d 37 f0 2b 64 79 21  28 6a 2a 34 2b 30 29 20  |%.7.+dy!(j*4+0) |
00004ce0  3d 20 41 25 3a 64 79 21  28 6a 2a 34 2b 34 29 20  |= A%:dy!(j*4+4) |
00004cf0  3d 20 42 25 3a ed 6a 3a  ed 69 3a e1 0d 38 36 1e  |= B%:.j:.i:..86.|
00004d00  dd f2 59 61 28 63 69 2c  63 6c 2c 63 6d 2c 65 6b  |..Ya(ci,cl,cm,ek|
00004d10  2c 65 58 29 3a e7 65 58  20 8c 0d 38 54 17 66 68  |,eX):.eX ..8T.fh|
00004d20  3d ba 66 69 3a 57 56 3d  30 3a e7 66 68 3e 30 20  |=.fi:WV=0:.fh>0 |
00004d30  8c 0d 38 72 0b e7 66 68  3d 31 20 8c 0d 38 7c 1b  |..8r..fh=1 ..8|.|
00004d40  f2 66 6a 28 58 77 2c 21  66 6b 29 3a f2 66 6a 28  |.fj(Xw,!fk):.fj(|
00004d50  58 7a 2c 21 66 6b 29 0d  38 90 1b cc 3a f2 59 72  |Xz,!fk).8...:.Yr|
00004d60  28 55 6a 2c 58 77 29 3a  f2 59 72 28 55 6a 2c 58  |(Uj,Xw):.Yr(Uj,X|
00004d70  7a 29 0d 38 ae 05 cd 0d  38 b8 05 cd 0d 38 c2 28  |z).8....8....8.(|
00004d80  cd 3a f2 64 64 28 63 69  2c 63 6c 2c 63 6d 29 3a  |.:.dd(ci,cl,cm):|
00004d90  41 25 3d 64 69 25 3a 42  25 3d 64 6b 25 3a c8 8e  |A%=di%:B%=dk%:..|
00004da0  63 69 20 ca 0d 39 12 0c  c9 58 77 3a 43 25 3d 30  |ci ..9...Xw:C%=0|
00004db0  0d 39 1c 0c c9 58 7a 3a  43 25 3d 38 0d 39 26 16  |.9...Xz:C%=8.9&.|
00004dc0  cb 3a 66 6c 3d ba 66 6d  3a e7 66 6c 3c 3e 2d 31  |.:fl=.fm:.fl<>-1|
00004dd0  20 8c 0d 39 4e 2f 41 25  3d 66 6e 21 28 66 6c 2a  | ..9N/A%=fn!(fl*|
00004de0  32 34 2b 31 36 29 3a e7  65 6b 20 8c 41 25 3d 28  |24+16):.ek .A%=(|
00004df0  41 25 20 82 32 29 8b 41  25 3d 28 41 25 20 84 32  |A% .2).A%=(A% .2|
00004e00  29 0d 39 62 1c e7 28 41  25 20 80 32 29 3c 3e 30  |).9b..(A% .2)<>0|
00004e10  20 8c 57 56 2b 3d 31 8b  57 56 2d 3d 31 0d 39 6c  | .WV+=1.WV-=1.9l|
00004e20  2c 66 6e 21 28 66 6c 2a  32 34 2b 31 36 29 20 3d  |,fn!(fl*24+16) =|
00004e30  20 41 25 3a f2 66 6a 28  58 77 2c 66 6c 29 3a f2  | A%:.fj(Xw,fl):.|
00004e40  66 6a 28 58 7a 2c 66 6c  29 0d 39 8a 07 cd 3a e1  |fj(Xz,fl).9...:.|
00004e50  0d 39 bc 2d dd f2 66 6a  28 63 69 2c 66 6c 29 3a  |.9.-..fj(ci,fl):|
00004e60  e7 a4 63 74 69 6f 6e 5f  57 69 6e 64 6f 77 49 73  |..ction_WindowIs|
00004e70  4f 70 65 6e 28 55 6a 2c  63 69 29 20 8c 0d 39 d0  |Open(Uj,ci) ..9.|
00004e80  0a c8 8e 63 69 20 ca 0d  39 da 24 c9 58 77 3a 65  |...ci ..9.$.Xw:e|
00004e90  6e 3d 64 57 2a 20 64 56  3a 64 65 3d 62 57 2f 62  |n=dW* dV:de=bW/b|
00004ea0  58 3a 66 6f 3d 30 3a 61  3d 64 55 0d 3a 02 24 c9  |X:fo=0:a=dU.:.$.|
00004eb0  58 7a 3a 65 6e 3d 64 59  2a 20 64 56 3a 64 65 3d  |Xz:en=dY* dV:de=|
00004ec0  62 64 2f 62 65 3a 66 6f  3d 38 3a 61 3d 64 58 0d  |bd/be:fo=8:a=dX.|
00004ed0  3a 2a e7 cb 3a 21 55 6a  3d 63 69 3a c8 99 26 34  |:*..:!Uj=ci:..&4|
00004ee0  30 30 43 43 2c 2c 55 6a  3a 5a 6c 3d 55 6a 21 34  |00CC,,Uj:Zl=Uj!4|
00004ef0  3a 5a 6e 3d 55 6a 21 31  36 3a 5a 6f 3d 55 6a 21  |:Zn=Uj!16:Zo=Uj!|
00004f00  38 3a 5a 70 3d 55 6a 21  32 30 3a 5a 71 3d 55 6a  |8:Zp=Uj!20:Zq=Uj|
00004f10  21 32 34 3a 5a 6d 3d 55  6a 21 31 32 3a 65 6f 3d  |!24:Zm=Uj!12:eo=|
00004f20  5a 6c 2d 5a 70 3a 65 70  3d 5a 6e 2d 5a 71 3a 66  |Zl-Zp:ep=Zn-Zq:f|
00004f30  70 3d 66 6e 21 28 66 6c  2a 32 34 2b 66 6f 20 29  |p=fn!(fl*24+fo )|
00004f40  3a 66 71 3d 66 6e 21 28  66 6c 2a 32 34 2b 66 6f  |:fq=fn!(fl*24+fo|
00004f50  2b 34 29 3a 65 71 3d 65  6f 2b 28 28 66 70 3c 3c  |+4):eq=eo+((fp<<|
00004f60  28 63 7a 2a 61 29 29 20  2a 20 64 65 20 29 20 2d  |(cz*a)) * de ) -|
00004f70  20 38 3a 65 73 3d 65 70  2b 28 28 66 71 3c 3c 65  | 8:es=ep+((fq<<e|
00004f80  6e 29 2a 20 64 65 20 29  20 2d 20 38 3a 65 72 3d  |n)* de ) - 8:er=|
00004f90  65 71 2b 31 36 3a 65 74  3d 65 73 2b 31 36 3a c8  |eq+16:et=es+16:.|
00004fa0  99 26 34 30 30 44 31 2c  2d 31 2c 65 71 2c 65 73  |.&400D1,-1,eq,es|
00004fb0  2c 65 72 2c 65 74 0d 3a  c0 07 cd 3a e1 0d 3a e8  |,er,et.:...:..:.|
00004fc0  dd dd f2 5a 55 28 63 69  2c 63 6c 2c 63 6d 29 3a  |...ZU(ci,cl,cm):|
00004fd0  64 6d 3d 63 69 3a 64 6e  3d 63 6c 3a 64 6f 3d 63  |dm=ci:dn=cl:do=c|
00004fe0  6d 3a 63 6f 3d 63 6c 3a  63 70 3d 63 6d 3a 55 6a  |m:co=cl:cp=cm:Uj|
00004ff0  21 30 3d 63 69 3a 55 6a  21 34 3d 37 3a 55 6a 21  |!0=ci:Uj!4=7:Uj!|
00005000  38 3d 63 6c 3a 55 6a 21  31 32 3d 63 6d 3a 55 6a  |8=cl:Uj!12=cm:Uj|
00005010  21 31 36 3d 63 6c 3a 55  6a 21 32 30 3d 63 6d 3a  |!16=cl:Uj!20=cm:|
00005020  55 6a 21 32 34 3d 63 69  3a c8 99 26 34 30 30 43  |Uj!24=ci:..&400C|
00005030  43 2c 2c 55 6a 2b 32 34  3a 63 71 3d 55 6a 21 32  |C,,Uj+24:cq=Uj!2|
00005040  38 3a 63 72 3d 55 6a 21  33 36 3a 63 73 3d 55 6a  |8:cr=Uj!36:cs=Uj|
00005050  21 34 30 3a 63 74 3d 55  6a 21 33 32 3a 55 6a 21  |!40:ct=Uj!32:Uj!|
00005060  32 34 3d 63 71 3a 55 6a  21 32 38 3d 63 74 3a 55  |24=cq:Uj!28=ct:U|
00005070  6a 21 33 32 3d 63 72 3a  55 6a 21 33 36 3d 63 73  |j!32=cr:Uj!36=cs|
00005080  3a c8 99 26 34 30 30 44  30 2c 2c 55 6a 3a e7 57  |:..&400D0,,Uj:.W|
00005090  58 20 8c f2 64 70 8b f2  64 71 0d 3b 88 05 e1 0d  |X ..dp..dq.;....|
000050a0  3b a6 15 dd f2 5a 78 3a  e7 57 58 20 8c f2 64 70  |;....Zx:.WX ..dp|
000050b0  8b f2 64 71 0d 3b ba 54  f2 64 64 28 64 6d 2c 64  |..dq.;.T.dd(dm,d|
000050c0  6e 2c 64 6f 29 3a 66 72  3d 64 69 25 3a 66 73 3d  |n,do):fr=di%:fs=|
000050d0  64 6b 25 3a f2 64 64 28  64 6d 2c 63 6f 2c 63 70  |dk%:.dd(dm,co,cp|
000050e0  29 3a 66 74 3d 64 69 25  3a 66 75 3d 64 6b 25 3a  |):ft=di%:fu=dk%:|
000050f0  41 25 3d 66 74 2d 66 72  3a 42 25 3d 66 75 2d 66  |A%=ft-fr:B%=fu-f|
00005100  73 3a c8 8e 64 6d 20 ca  0d 3c 00 0c c9 58 77 3a  |s:..dm ..<...Xw:|
00005110  43 25 3d 30 0d 3c 0a 0c  c9 58 7a 3a 43 25 3d 38  |C%=0.<...Xz:C%=8|
00005120  0d 3c 14 31 cb 3a 21 66  76 3d 66 59 25 3a 21 66  |.<.1.:!fv=fY%:!f|
00005130  77 3d 66 61 25 3a d6 66  78 3a f2 59 72 28 55 6a  |w=fa%:.fx:.Yr(Uj|
00005140  2c 58 77 29 3a f2 59 72  28 55 6a 2c 58 7a 29 3a  |,Xw):.Yr(Uj,Xz):|
00005150  e1 0d 3c 6e 27 dd f2 62  77 28 66 79 29 3a 57 57  |..<n'..bw(fy):WW|
00005160  3d 66 79 3a 41 25 3d 66  79 3a 66 7a 3d ba 67 55  |=fy:A%=fy:fz=.gU|
00005170  3a e7 66 7a 3e 30 20 8c  0d 3c a0 19 f2 59 72 28  |:.fz>0 ..<...Yr(|
00005180  55 6a 2c 58 77 29 3a f2  59 72 28 55 6a 2c 58 7a  |Uj,Xw):.Yr(Uj,Xz|
00005190  29 0d 3c b4 07 cd 3a e1  0d 3c dc 10 dd f2 59 57  |).<...:..<....YW|
000051a0  3a e7 20 ac 56 6a 20 8c  0d 3c f0 4e 59 69 24 3d  |:. .Vj ..<.NYi$=|
000051b0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
000051c0  6e 67 28 22 65 72 72 30  36 22 29 3a 59 6a 3d a4  |ng("err06"):Yj=.|
000051d0  63 74 69 6f 6e 5f 52 65  70 6f 72 74 45 72 72 6f  |ction_ReportErro|
000051e0  72 28 55 6a 2c 39 39 2c  55 63 24 2c 59 69 24 2c  |r(Uj,99,Uc$,Yi$,|
000051f0  20 ac b9 2c b9 29 0d 3d  04 0d cc 3a e7 20 ac 56  | ..,.).=...:. .V|
00005200  6e 20 8c 0d 3d 18 4e 59  69 24 3d a4 63 74 69 6f  |n ..=.NYi$=.ctio|
00005210  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 65  |n_TagToString("e|
00005220  72 72 30 37 22 29 3a 59  6a 3d a4 63 74 69 6f 6e  |rr07"):Yj=.ction|
00005230  5f 52 65 70 6f 72 74 45  72 72 6f 72 28 55 6a 2c  |_ReportError(Uj,|
00005240  39 39 2c 55 63 24 2c 59  69 24 2c 20 ac b9 2c b9  |99,Uc$,Yi$, ..,.|
00005250  29 0d 3d 2c 0d cc 3a e7  20 ac 57 58 20 8c 0d 3d  |).=,..:. .WX ..=|
00005260  40 4e 59 69 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |@NYi$=.ction_Tag|
00005270  54 6f 53 74 72 69 6e 67  28 22 65 72 72 30 35 22  |ToString("err05"|
00005280  29 3a 59 6a 3d a4 63 74  69 6f 6e 5f 52 65 70 6f  |):Yj=.ction_Repo|
00005290  72 74 45 72 72 6f 72 28  55 6a 2c 39 39 2c 55 63  |rtError(Uj,99,Uc|
000052a0  24 2c 59 69 24 2c 20 ac  b9 2c b9 29 0d 3d 54 9f  |$,Yi$, ..,.).=T.|
000052b0  cc 3a 67 56 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |.:gV$=.ction_Tag|
000052c0  54 6f 53 74 72 69 6e 67  28 22 77 61 72 30 31 22  |ToString("war01"|
000052d0  29 3a 67 57 24 3d a4 63  74 69 6f 6e 5f 52 65 61  |):gW$=.ction_Rea|
000052e0  64 49 63 6f 6e 54 65 78  74 28 55 6a 2c 57 6a 2c  |dIconText(Uj,Wj,|
000052f0  34 29 3a 67 58 24 3d a4  63 74 69 6f 6e 5f 54 61  |4):gX$=.ction_Ta|
00005300  67 54 6f 53 74 72 69 6e  67 28 22 77 61 72 30 32  |gToString("war02|
00005310  22 29 3a 59 6a 3d a4 63  74 69 6f 6e 5f 52 65 70  |"):Yj=.ction_Rep|
00005320  6f 72 74 45 72 72 6f 72  28 55 6a 2c 39 39 2c 55  |ortError(Uj,99,U|
00005330  63 24 2c 67 56 24 2b 67  57 24 2b 67 58 24 2c b9  |c$,gV$+gW$+gX$,.|
00005340  2c b9 29 3a e7 59 6a 3d  31 20 8c 0d 3d 90 49 f2  |,.):.Yj=1 ..=.I.|
00005350  62 56 28 22 64 69 72 65  63 74 6f 72 79 22 29 3a  |bV("directory"):|
00005360  f2 57 69 28 55 6a 2c 59  6c 2c 30 2c 57 63 24 29  |.Wi(Uj,Yl,0,Wc$)|
00005370  3a c8 99 26 34 30 30 43  46 2c 2c 55 6a 3a c8 99  |:..&400CF,,Uj:..|
00005380  26 34 30 30 44 34 2c 2c  59 6c 2c 55 6a 21 30 2c  |&400D4,,Yl,Uj!0,|
00005390  55 6a 21 34 0d 3d b8 05  cd 0d 3d c2 05 cd 0d 3d  |Uj!4.=....=....=|
000053a0  cc 05 cd 0d 3d d6 07 cd  3a e1 0d 3d fe 17 dd f2  |....=...:..=....|
000053b0  62 56 28 67 59 24 29 3a  e7 57 61 3c 3e 2d 31 20  |bV(gY$):.Wa<>-1 |
000053c0  8c 0d 3e 12 20 55 6a 21  30 3d 59 6c 3a 55 6a 21  |..>. Uj!0=Yl:Uj!|
000053d0  34 3d 57 61 3a c8 99 26  34 30 30 43 34 2c 2c 55  |4=Wa:..&400C4,,U|
000053e0  6a 0d 3e 30 79 cd 3a 21  55 6a 3d 59 6c 3a 55 6a  |j.>0y.:!Uj=Yl:Uj|
000053f0  21 28 34 2b 30 29 3d 31  31 36 3a 55 6a 21 28 34  |!(4+0)=116:Uj!(4|
00005400  2b 34 29 3d 2d 39 34 3a  55 6a 21 28 34 2b 38 29  |+4)=-94:Uj!(4+8)|
00005410  3d 31 31 36 2b 37 36 3a  55 6a 21 28 34 2b 31 32  |=116+76:Uj!(4+12|
00005420  29 3d 2d 39 34 2b 37 32  3a 55 6a 21 28 34 2b 31  |)=-94+72:Uj!(4+1|
00005430  36 29 3d 26 36 30 31 41  3a 24 28 55 6a 2b 34 2b  |6)=&601A:$(Uj+4+|
00005440  32 30 29 3d 67 59 24 3a  c8 99 26 34 30 30 43 32  |20)=gY$:..&400C2|
00005450  2c 2c 55 6a 20 b8 57 61  3a e1 0d 3e 94 19 dd f2  |,,Uj .Wa:..>....|
00005460  63 56 28 67 5a 24 2c 67  61 24 29 3a c8 8e 67 5a  |cV(gZ$,ga$):..gZ|
00005470  24 20 ca 0d 3e a8 14 c9  22 54 22 3a 57 55 25 3d  |$ ..>..."T":WU%=|
00005480  21 67 62 2d 21 66 58 0d  3e b2 1c c9 22 4d 22 3a  |!gb-!fX.>..."M":|
00005490  57 55 25 3d 28 21 67 62  2f 32 29 2d 28 21 66 58  |WU%=(!gb/2)-(!fX|
000054a0  2f 32 29 0d 3e bc 0e c9  22 42 22 3a 57 55 25 3d  |/2).>..."B":WU%=|
000054b0  30 0d 3e c6 0d cb 3a c8  8e 67 61 24 20 ca 0d 3e  |0.>...:..ga$ ..>|
000054c0  da 0e c9 22 4c 22 3a 56  7a 25 3d 30 0d 3e e4 1c  |..."L":Vz%=0.>..|
000054d0  c9 22 4d 22 3a 56 7a 25  3d 28 21 67 63 2f 32 29  |."M":Vz%=(!gc/2)|
000054e0  2d 28 21 66 56 2f 32 29  0d 3e ee 14 c9 22 52 22  |-(!fV/2).>..."R"|
000054f0  3a 56 7a 25 3d 21 67 63  2d 21 66 56 0d 3e f8 22  |:Vz%=!gc-!fV.>."|
00005500  cb 3a 21 64 62 3d 56 7a  25 3a 21 64 63 3d 57 55  |.:!db=Vz%:!dc=WU|
00005510  25 3a f2 59 72 28 55 6a  2c 59 6e 29 3a e1 0d 3f  |%:.Yr(Uj,Yn):..?|
00005520  3e 27 dd f2 61 5a 28 5a  7a 24 29 3a 57 62 24 3d  |>'..aZ(Zz$):Wb$=|
00005530  5a 7a 24 3a ea 85 3a 67  64 3d 2d 31 3a ee 85 ea  |Zz$:..:gd=-1:...|
00005540  f2 67 65 3a e1 0d 3f 66  49 67 64 3d ae 5a 7a 24  |.ge:..?fIgd=.Zz$|
00005550  3a d5 23 67 64 2c 97 22  44 22 3a d5 23 67 64 2c  |:.#gd,."D":.#gd,|
00005560  97 22 41 22 3a d5 23 67  64 2c 97 22 54 22 3a d5  |."A":.#gd,."T":.|
00005570  23 67 64 2c 97 22 41 22  3a f1 23 67 64 2c 57 58  |#gd,."A":.#gd,WX|
00005580  3a f1 23 67 64 2c 57 56  3a e7 57 58 20 8c 0d 3f  |:.#gd,WV:.WX ..?|
00005590  b6 96 f1 23 67 64 2c 21  67 66 3a f1 23 67 64 2c  |...#gd,!gf:.#gd,|
000055a0  66 59 25 3a f1 23 67 64  2c 66 61 25 3a e3 69 3d  |fY%:.#gd,fa%:.i=|
000055b0  30 20 b8 21 67 66 2d 31  3a f1 23 67 64 2c 66 6e  |0 .!gf-1:.#gd,fn|
000055c0  21 28 69 2a 32 34 2b 30  29 3a f1 23 67 64 2c 66  |!(i*24+0):.#gd,f|
000055d0  6e 21 28 69 2a 32 34 2b  34 29 3a f1 23 67 64 2c  |n!(i*24+4):.#gd,|
000055e0  66 6e 21 28 69 2a 32 34  2b 38 29 3a f1 23 67 64  |fn!(i*24+8):.#gd|
000055f0  2c 66 6e 21 28 69 2a 32  34 2b 31 32 29 3a f1 23  |,fn!(i*24+12):.#|
00005600  67 64 2c 66 6e 21 28 69  2a 32 34 2b 31 36 29 3a  |gd,fn!(i*24+16):|
00005610  f1 23 67 64 2c 66 6e 21  28 69 2a 32 34 2b 32 30  |.#gd,fn!(i*24+20|
00005620  29 3a ed 69 0d 40 24 81  cc 3a 41 25 3d 64 76 3a  |):.i.@$..:A%=dv:|
00005630  66 59 25 3d ba 66 5a 3a  41 25 3d 64 79 3a 66 61  |fY%=.fZ:A%=dy:fa|
00005640  25 3d ba 66 5a 3a 41 25  3d 64 76 3a d6 66 62 3a  |%=.fZ:A%=dv:.fb:|
00005650  41 25 3d 64 79 3a d6 66  62 3a f1 23 67 64 2c 66  |A%=dy:.fb:.#gd,f|
00005660  59 25 3a f1 23 67 64 2c  66 61 25 3a e3 69 3d 30  |Y%:.#gd,fa%:.i=0|
00005670  20 b8 66 59 25 2d 31 3a  f1 23 67 64 2c 64 76 21  | .fY%-1:.#gd,dv!|
00005680  28 69 2a 34 29 3a ed 69  3a e3 69 3d 30 20 b8 66  |(i*4):.i:.i=0 .f|
00005690  61 25 2d 31 3a f1 23 67  64 2c 64 79 21 28 69 2a  |a%-1:.#gd,dy!(i*|
000056a0  34 29 3a ed 69 0d 40 a6  48 cd 3a e3 69 3d 30 20  |4):.i.@.H.:.i=0 |
000056b0  b8 31 30 3a d5 23 67 64  2c 55 78 3f 69 3a d5 23  |.10:.#gd,Ux?i:.#|
000056c0  67 64 2c 55 7a 3f 69 3a  ed 69 3a d9 23 67 64 3a  |gd,Uz?i:.i:.#gd:|
000056d0  ff 22 53 65 74 54 79 70  65 20 22 2b 5a 7a 24 2b  |."SetType "+Zz$+|
000056e0  22 20 4d 6f 72 70 68 22  3a f7 85 3a e1 0d 41 14  |" Morph":..:..A.|
000056f0  1f dd f2 63 59 28 5a 7a  24 29 3a ea 85 3a 67 64  |...cY(Zz$):..:gd|
00005700  3d 2d 31 3a ee 85 ea f2  67 65 3a e1 0d 41 32 51  |=-1:....ge:..A2Q|
00005710  67 64 3d 8e 5a 7a 24 3a  67 67 3d 9a 23 67 64 3a  |gd=.Zz$:gg=.#gd:|
00005720  67 68 3d 9a 23 67 64 3a  67 69 3d 9a 23 67 64 3a  |gh=.#gd:gi=.#gd:|
00005730  67 6a 3d 9a 23 67 64 3a  e7 67 67 3d 97 22 44 22  |gj=.#gd:.gg=."D"|
00005740  20 80 67 68 3d 97 22 41  22 20 80 67 69 3d 97 22  | .gh=."A" .gi=."|
00005750  54 22 20 80 67 6a 3d 97  22 41 22 20 8c 0d 41 5a  |T" .gj=."A" ..AZ|
00005760  19 e8 23 67 64 2c 57 58  3a e8 23 67 64 2c 57 56  |..#gd,WX:.#gd,WV|
00005770  3a e7 57 58 20 8c 0d 41  78 96 e8 23 67 64 2c 21  |:.WX ..Ax..#gd,!|
00005780  67 66 3a e8 23 67 64 2c  66 59 25 3a e8 23 67 64  |gf:.#gd,fY%:.#gd|
00005790  2c 66 61 25 3a e3 69 3d  30 20 b8 21 67 66 2d 31  |,fa%:.i=0 .!gf-1|
000057a0  3a e8 23 67 64 2c 66 6e  21 28 69 2a 32 34 2b 30  |:.#gd,fn!(i*24+0|
000057b0  29 3a e8 23 67 64 2c 66  6e 21 28 69 2a 32 34 2b  |):.#gd,fn!(i*24+|
000057c0  34 29 3a e8 23 67 64 2c  66 6e 21 28 69 2a 32 34  |4):.#gd,fn!(i*24|
000057d0  2b 38 29 3a e8 23 67 64  2c 66 6e 21 28 69 2a 32  |+8):.#gd,fn!(i*2|
000057e0  34 2b 31 32 29 3a e8 23  67 64 2c 66 6e 21 28 69  |4+12):.#gd,fn!(i|
000057f0  2a 32 34 2b 31 36 29 3a  e8 23 67 64 2c 66 6e 21  |*24+16):.#gd,fn!|
00005800  28 69 2a 32 34 2b 32 30  29 3a ed 69 0d 41 e6 51  |(i*24+20):.i.A.Q|
00005810  cc 3a e8 23 67 64 2c 66  59 25 3a e8 23 67 64 2c  |.:.#gd,fY%:.#gd,|
00005820  66 61 25 3a e3 69 3d 30  20 b8 66 59 25 2d 31 3a  |fa%:.i=0 .fY%-1:|
00005830  e8 23 67 64 2c 64 76 21  28 69 2a 34 29 3a ed 69  |.#gd,dv!(i*4):.i|
00005840  3a e3 69 3d 30 20 b8 66  61 25 2d 31 3a e8 23 67  |:.i=0 .fa%-1:.#g|
00005850  64 2c 64 79 21 28 69 2a  34 29 3a ed 69 0d 42 40  |d,dy!(i*4):.i.B@|
00005860  25 cd 3a e3 69 3d 30 20  b8 31 30 3a 55 78 3f 69  |%.:.i=0 .10:Ux?i|
00005870  3d 9a 23 67 64 3a 55 7a  3f 69 3d 9a 23 67 64 3a  |=.#gd:Uz?i=.#gd:|
00005880  ed 69 0d 42 72 50 cc 3a  59 69 24 3d a4 63 74 69  |.i.BrP.:Yi$=.cti|
00005890  6f 6e 5f 54 61 67 54 6f  53 74 72 69 6e 67 28 22  |on_TagToString("|
000058a0  65 72 72 30 31 22 29 3a  59 6a 3d a4 63 74 69 6f  |err01"):Yj=.ctio|
000058b0  6e 5f 52 65 70 6f 72 74  45 72 72 6f 72 28 55 6a  |n_ReportError(Uj|
000058c0  2c 39 39 2c 55 63 24 2c  59 69 24 2c 20 ac b9 2c  |,99,Uc$,Yi$, ..,|
000058d0  b9 29 0d 42 90 35 cd 3a  d9 23 67 64 3a f7 85 3a  |.).B.5.:.#gd:..:|
000058e0  e7 a4 63 74 69 6f 6e 5f  57 69 6e 64 6f 77 49 73  |..ction_WindowIs|
000058f0  4f 70 65 6e 28 55 6a 2c  58 77 29 20 8c f2 59 72  |Open(Uj,Xw) ..Yr|
00005900  28 55 6a 2c 58 77 29 0d  42 b8 2b e7 a4 63 74 69  |(Uj,Xw).B.+..cti|
00005910  6f 6e 5f 57 69 6e 64 6f  77 49 73 4f 70 65 6e 28  |on_WindowIsOpen(|
00005920  55 6a 2c 58 7a 29 20 8c  f2 59 72 28 55 6a 2c 58  |Uj,Xz) ..Yr(Uj,X|
00005930  7a 29 0d 42 c2 2b e7 a4  63 74 69 6f 6e 5f 57 69  |z).B.+..ction_Wi|
00005940  6e 64 6f 77 49 73 4f 70  65 6e 28 55 6a 2c 59 71  |ndowIsOpen(Uj,Yq|
00005950  29 20 8c f2 59 72 28 55  6a 2c 59 71 29 0d 42 cc  |) ..Yr(Uj,Yq).B.|
00005960  2b e7 a4 63 74 69 6f 6e  5f 57 69 6e 64 6f 77 49  |+..ction_WindowI|
00005970  73 4f 70 65 6e 28 55 6a  2c 59 74 29 20 8c f2 59  |sOpen(Uj,Yt) ..Y|
00005980  72 28 55 6a 2c 59 74 29  0d 42 d6 05 e1 0d 42 f4  |r(Uj,Yt).B....B.|
00005990  76 dd f2 67 65 3a 59 69  24 3d a4 63 74 69 6f 6e  |v..ge:Yi$=.ction|
000059a0  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 65 72  |_TagToString("er|
000059b0  72 31 33 22 29 3a 59 6a  3d a4 63 74 69 6f 6e 5f  |r13"):Yj=.ction_|
000059c0  52 65 70 6f 72 74 45 72  72 6f 72 28 55 6a 2c 39  |ReportError(Uj,9|
000059d0  39 2c 55 63 24 2c 59 69  24 2b f6 24 2b 22 20 28  |9,Uc$,Yi$+.$+" (|
000059e0  22 2b c3 9e 2b 22 29 22  2c 20 ac b9 2c b9 29 3a  |"+..+")", ..,.):|
000059f0  e7 67 64 3c 3e 2d 31 20  8c d9 23 67 64 3a 67 64  |.gd<>-1 ..#gd:gd|
00005a00  3d 2d 31 0d 43 1c 05 e1  0d 43 3a 5e dd f2 59 6d  |=-1.C....C:^..Ym|
00005a10  28 67 6b 29 3a 5a 7a 24  3d a4 63 74 69 6f 6e 5f  |(gk):Zz$=.ction_|
00005a20  52 65 61 64 49 63 6f 6e  54 65 78 74 28 55 6a 2c  |ReadIconText(Uj,|
00005a30  59 6c 2c 30 29 3a 67 6c  24 3d a4 63 74 69 6f 6e  |Yl,0):gl$=.ction|
00005a40  5f 52 65 61 64 49 63 6f  6e 54 65 78 74 28 55 6a  |_ReadIconText(Uj|
00005a50  2c 59 6c 2c 57 61 29 3a  e7 a7 5a 7a 24 2c 22 2e  |,Yl,Wa):..Zz$,".|
00005a60  22 29 3d 30 20 8c 0d 43  62 4e 59 69 24 3d a4 63  |")=0 ..CbNYi$=.c|
00005a70  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
00005a80  28 22 65 72 72 31 34 22  29 3a 59 6a 3d a4 63 74  |("err14"):Yj=.ct|
00005a90  69 6f 6e 5f 52 65 70 6f  72 74 45 72 72 6f 72 28  |ion_ReportError(|
00005aa0  55 6a 2c 39 39 2c 55 63  24 2c 59 69 24 2c 20 ac  |Uj,99,Uc$,Yi$, .|
00005ab0  b9 2c b9 29 0d 43 76 0d  cc 3a c8 8e 67 6c 24 20  |.,.).Cv..:..gl$ |
00005ac0  ca 0d 43 8a 32 c9 22 64  69 72 65 63 74 6f 72 79  |..C.2."directory|
00005ad0  22 3a f2 61 59 28 5a 7a  24 29 3a e7 20 ac 67 6b  |":.aY(Zz$):. .gk|
00005ae0  20 8c 56 5a 3d 30 3a c8  99 26 34 30 30 44 34 2c  | .VZ=0:..&400D4,|
00005af0  2c 2d 31 0d 43 9e 27 7f  3a f2 61 5a 28 5a 7a 24  |,-1.C.'.:.aZ(Zz$|
00005b00  29 3a e7 20 ac 67 6b 20  8c 56 5a 3d 30 3a c8 99  |):. .gk .VZ=0:..|
00005b10  26 34 30 30 44 34 2c 2c  2d 31 0d 43 bc 05 cb 0d  |&400D4,,-1.C....|
00005b20  43 c6 07 cd 3a e1 0d 43  ee 1e dd f2 57 75 3a c8  |C...:..C....Wu:.|
00005b30  99 26 39 30 31 34 31 20  b8 63 5a 3a e7 63 5a 3d  |.&90141 .cZ:.cZ=|
00005b40  2d 31 20 8c 0d 44 20 33  c8 99 26 39 30 31 34 32  |-1 ..D 3..&90142|
00005b50  20 b8 63 5a 3a 5a 7a 24  3d a4 63 74 69 6f 6e 5f  | .cZ:Zz$=.ction_|
00005b60  45 78 74 72 61 63 74 53  74 72 69 6e 67 28 63 5a  |ExtractString(cZ|
00005b70  29 3a e7 56 6a 20 8c 0d  44 48 25 e7 5a 7a 24 3d  |):.Vj ..DH%.Zz$=|
00005b80  a4 63 74 69 6f 6e 5f 52  65 6d 6f 76 65 46 53 50  |.ction_RemoveFSP|
00005b90  72 65 66 69 78 28 58 76  24 29 20 8c 0d 44 52 34  |refix(Xv$) ..DR4|
00005ba0  f2 67 6d 28 58 76 24 29  3a e7 a4 63 74 69 6f 6e  |.gm(Xv$):..ction|
00005bb0  5f 57 69 6e 64 6f 77 49  73 4f 70 65 6e 28 55 6a  |_WindowIsOpen(Uj|
00005bc0  2c 59 6e 29 20 8c f2 59  72 28 55 6a 2c 59 6e 29  |,Yn) ..Yr(Uj,Yn)|
00005bd0  0d 44 66 05 cd 0d 44 70  0b cd 3a e7 56 6e 20 8c  |.Df...Dp..:.Vn .|
00005be0  0d 44 8e 25 e7 5a 7a 24  3d a4 63 74 69 6f 6e 5f  |.D.%.Zz$=.ction_|
00005bf0  52 65 6d 6f 76 65 46 53  50 72 65 66 69 78 28 58  |RemoveFSPrefix(X|
00005c00  79 24 29 20 8c 0d 44 98  0c f2 67 6e 28 58 79 24  |y$) ..D...gn(Xy$|
00005c10  29 0d 44 a2 05 cd 0d 44  ac 0b cd 3a e7 56 72 20  |).D....D...:.Vr |
00005c20  8c 0d 44 ca 25 e7 5a 7a  24 3d a4 63 74 69 6f 6e  |..D.%.Zz$=.ction|
00005c30  5f 52 65 6d 6f 76 65 46  53 50 72 65 66 69 78 28  |_RemoveFSPrefix(|
00005c40  59 70 24 29 20 8c 0d 44  d4 1c f2 67 6f 28 59 70  |Yp$) ..D...go(Yp|
00005c50  24 29 3a e7 56 6a 20 8c  f2 59 72 28 55 6a 2c 59  |$):.Vj ..Yr(Uj,Y|
00005c60  6e 29 0d 44 e8 05 cd 0d  44 f2 05 cd 0d 45 06 07  |n).D....D....E..|
00005c70  cd 3a e1 0d 45 38 5b dd  a4 63 74 69 6f 6e 5f 52  |.:..E8[..ction_R|
00005c80  65 6d 6f 76 65 46 53 50  72 65 66 69 78 28 67 70  |emoveFSPrefix(gp|
00005c90  24 29 3a 67 71 3d 20 ac  b9 3a f5 3a 67 72 24 3d  |$):gq= ..:.:gr$=|
00005ca0  c0 67 70 24 2c 31 29 3a  67 71 3d 67 72 24 3d 22  |.gp$,1):gq=gr$="|
00005cb0  3a 22 3a 67 70 24 3d c1  67 70 24 2c 32 2c a9 67  |:":gp$=.gp$,2,.g|
00005cc0  70 24 2d 31 29 3a fd 67  71 3a 3d 67 70 24 0d 45  |p$-1):.gq:=gp$.E|
00005cd0  9c 35 dd a4 63 74 69 6f  6e 5f 4c 61 75 6e 63 68  |.5..ction_Launch|
00005ce0  4f 62 6a 65 63 74 28 67  73 24 2c 67 74 29 3a 67  |Object(gs$,gt):g|
00005cf0  75 3d 67 74 3a ea 85 3a  ee 85 ea f2 67 76 3a 3d  |u=gt:..:....gv:=|
00005d00  20 ac b9 0d 45 c4 0b e7  20 ac 67 74 20 8c 0d 45  | ...E... .gt ..E|
00005d10  ce 4e 59 69 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |.NYi$=.ction_Tag|
00005d20  54 6f 53 74 72 69 6e 67  28 22 65 72 72 31 36 22  |ToString("err16"|
00005d30  29 3a 59 6a 3d a4 63 74  69 6f 6e 5f 52 65 70 6f  |):Yj=.ction_Repo|
00005d40  72 74 45 72 72 6f 72 28  55 6a 2c 39 39 2c 55 63  |rtError(Uj,99,Uc|
00005d50  24 2c 59 69 24 2c 20 ac  b9 2c b9 29 0d 45 e2 1c  |$,Yi$, ..,.).E..|
00005d60  cd 3a e7 67 74 20 8c ff  22 46 69 6c 65 72 5f 52  |.:.gt .."Filer_R|
00005d70  75 6e 20 22 2b 67 73 24  0d 45 f6 0a f7 85 3a 3d  |un "+gs$.E....:=|
00005d80  67 75 0d 46 1e 5c dd f2  67 76 3a 67 75 3d 20 ac  |gu.F.\..gv:gu= .|
00005d90  b9 3a 59 69 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |.:Yi$=.ction_Tag|
00005da0  54 6f 53 74 72 69 6e 67  28 22 65 72 72 31 35 22  |ToString("err15"|
00005db0  29 3a 59 6a 3d a4 63 74  69 6f 6e 5f 52 65 70 6f  |):Yj=.ction_Repo|
00005dc0  72 74 45 72 72 6f 72 28  55 6a 2c 39 39 2c 55 63  |rtError(Uj,99,Uc|
00005dd0  24 2c 59 69 24 2c 20 ac  b9 2c b9 29 3a e1 0d 46  |$,Yi$, ..,.):..F|
00005de0  64 59 dd f2 62 76 3a 59  69 24 3d a4 63 74 69 6f  |dY..bv:Yi$=.ctio|
00005df0  6e 5f 54 61 67 54 6f 53  74 72 69 6e 67 28 22 65  |n_TagToString("e|
00005e00  72 72 31 37 22 29 3a 59  6a 3d a4 63 74 69 6f 6e  |rr17"):Yj=.ction|
00005e10  5f 52 65 70 6f 72 74 45  72 72 6f 72 28 55 6a 2c  |_ReportError(Uj,|
00005e20  39 39 2c 55 63 24 2c 59  69 24 2c b9 2c b9 29 3a  |99,Uc$,Yi$,.,.):|
00005e30  e7 59 6a 3d 31 20 8c 0d  46 8c 29 57 56 3d 30 3a  |.Yj=1 ..F.)WV=0:|
00005e40  57 58 3d 20 ac b9 3a f2  57 6c 3a f2 59 72 28 55  |WX= ..:.Wl:.Yr(U|
00005e50  6a 2c 58 77 29 3a f2 59  72 28 55 6a 2c 58 7a 29  |j,Xw):.Yr(Uj,Xz)|
00005e60  0d 46 be 07 cd 3a e1 0d  46 e6 98 dd f2 59 65 28  |.F...:..F....Ye(|
00005e70  67 77 24 29 3a f2 67 78  28 55 6a 2c 57 7a 2c 33  |gw$):.gx(Uj,Wz,3|
00005e80  2c 67 77 24 3d 22 41 6c  6c 22 29 3a f2 67 78 28  |,gw$="All"):.gx(|
00005e90  55 6a 2c 57 7a 2c 37 2c  67 77 24 3c 3e 22 41 6c  |Uj,Wz,7,gw$<>"Al|
00005ea0  6c 22 29 3a f2 67 79 28  55 6a 2c 57 7a 2c 31 33  |l"):.gy(Uj,Wz,13|
00005eb0  2c 67 77 24 3d 22 41 6c  6c 22 29 3a f2 67 79 28  |,gw$="All"):.gy(|
00005ec0  55 6a 2c 57 7a 2c 31 34  2c 67 77 24 3d 22 41 6c  |Uj,Wz,14,gw$="Al|
00005ed0  6c 22 29 3a e7 a4 63 74  69 6f 6e 5f 57 69 6e 64  |l"):..ction_Wind|
00005ee0  6f 77 57 69 74 68 43 61  72 65 74 28 55 6a 29 3d  |owWithCaret(Uj)=|
00005ef0  57 7a 20 80 67 77 24 3d  22 41 6c 6c 22 20 8c 0d  |Wz .gw$="All" ..|
00005f00  47 22 07 f2 5a 62 0d 47  2c 07 cd 3a e1 0d 47 54  |G"..Zb.G,..:..GT|
00005f10  25 dd f2 55 79 28 67 7a  29 3a e3 69 3d 30 20 b8  |%..Uy(gz):.i=0 .|
00005f20  31 30 3a 67 7a 3f 69 3d  69 2a 20 31 30 3a ed 69  |10:gz?i=i* 10:.i|
00005f30  3a e1 0d 47 9a 83 dd f2  5a 76 28 67 7a 29 3a c8  |:..G....Zv(gz):.|
00005f40  99 26 34 30 30 45 36 2c  37 3a ec 5a 6c 2c 5a 6f  |.&400E6,7:.Zl,Zo|
00005f50  3a e3 69 3d 30 20 b8 31  30 3a 65 55 3d 67 7a 3f  |:.i=0 .10:eU=gz?|
00005f60  69 3a df 5a 6c 2b 28 69  2a 31 30 29 2a 34 2c 5a  |i:.Zl+(i*10)*4,Z|
00005f70  6f 2b 65 55 2a 32 3a ed  69 3a c8 99 26 34 30 30  |o+eU*2:.i:..&400|
00005f80  45 36 2c 31 30 3a e3 69  3d 30 20 b8 31 30 3a 65  |E6,10:.i=0 .10:e|
00005f90  55 3d 67 7a 3f 69 3a c8  8f c8 90 5a 6c 2b 28 69  |U=gz?i:....Zl+(i|
00005fa0  2a 31 30 29 2a 34 2c 5a  6f 2b 65 55 2a 32 2c 36  |*10)*4,Zo+eU*2,6|
00005fb0  3a ed 69 3a e1 0d 48 30  67 dd f2 59 73 28 63 69  |:.i:..H0g..Ys(ci|
00005fc0  2c 63 6c 2c 63 6d 2c 67  7a 29 3a f2 64 68 28 55  |,cl,cm,gz):.dh(U|
00005fd0  6a 2c 63 69 2c 63 6c 2c  63 6d 29 3a 68 55 25 3d  |j,ci,cl,cm):hU%=|
00005fe0  28 68 56 25 2f 34 30 30  29 2a 20 31 30 30 3a 68  |(hV%/400)* 100:h|
00005ff0  57 25 3d 28 28 2d 68 58  25 29 2f 32 30 32 29 2a  |W%=((-hX%)/202)*|
00006000  20 31 30 30 3a e7 68 55  25 20 83 31 30 3c 32 20  | 100:.hU% .10<2 |
00006010  84 68 55 25 20 83 31 30  3e 38 20 8c 0d 48 62 41  |.hU% .10>8 ..HbA|
00006020  68 55 25 3d 28 68 55 25  2b 31 29 20 81 31 30 3a  |hU%=(hU%+1) .10:|
00006030  68 59 3d 67 7a 3f 68 55  25 3a 68 5a 3d 31 30 30  |hY=gz?hU%:hZ=100|
00006040  2d 68 57 25 3a e7 68 5a  3c 3e 68 59 20 80 68 55  |-hW%:.hZ<>hY .hU|
00006050  25 3e 30 20 80 68 55 25  3c 31 30 20 8c 0d 48 8a  |%>0 .hU%<10 ..H.|
00006060  26 67 7a 3f 68 55 25 3d  31 30 30 2d 68 57 25 3a  |&gz?hU%=100-hW%:|
00006070  e7 67 7a 3f 68 55 25 3c  30 20 8c 67 7a 3f 68 55  |.gz?hU%<0 .gz?hU|
00006080  25 3d 30 0d 48 9e 1b e7  67 7a 3f 68 55 25 3e 31  |%=0.H...gz?hU%>1|
00006090  30 30 20 8c 67 7a 3f 68  55 25 3d 31 30 30 0d 48  |00 .gz?hU%=100.H|
000060a0  a8 0e f2 59 72 28 55 6a  2c 63 69 29 0d 48 b2 05  |...Yr(Uj,ci).H..|
000060b0  cd 0d 48 bc 07 cd 3a e1  0d 48 e4 2e dd a4 63 74  |..H...:..H....ct|
000060c0  69 6f 6e 5f 47 65 74 50  65 72 63 65 6e 74 61 67  |ion_GetPercentag|
000060d0  65 28 68 61 2c 67 7a 29  3a e7 68 61 3d 31 30 30  |e(ha,gz):.ha=100|
000060e0  20 8c 3d 31 30 30 0d 48  f8 5b 68 62 3d 68 61 20  | .=100.H.[hb=ha |
000060f0  81 31 30 3a 68 63 3d 67  7a 3f 68 62 3a 68 64 3d  |.10:hc=gz?hb:hd=|
00006100  68 62 2b 31 3a 68 65 3d  67 7a 3f 68 64 3a 68 66  |hb+1:he=gz?hd:hf|
00006110  3d 28 68 61 20 83 31 30  29 2f 31 30 3a 68 67 3d  |=(ha .10)/10:hg=|
00006120  68 63 2a 20 28 31 2d 68  66 29 3a 68 68 3d 68 65  |hc* (1-hf):hh=he|
00006130  2a 20 68 66 3a 3d 28 68  67 2b 68 68 29 2f 31 30  |* hf:=(hg+hh)/10|
00006140  30 0d 49 48 52 dd f2 55  57 3a 59 69 24 3d 22 46  |0.IHR..UW:Yi$="F|
00006150  61 74 61 6c 20 45 72 72  6f 72 20 3a 20 22 2b f6  |atal Error : "+.|
00006160  24 2b 22 20 28 22 2b c3  9e 2b 22 29 22 3a e7 57  |$+" ("+..+")":.W|
00006170  59 20 8c 59 69 24 2b 3d  a4 63 74 69 6f 6e 5f 54  |Y .Yi$+=.ction_T|
00006180  61 67 54 6f 53 74 72 69  6e 67 28 22 65 72 72 32  |agToString("err2|
00006190  30 22 29 0d 49 66 37 59  6a 3d a4 63 74 69 6f 6e  |0").If7Yj=.ction|
000061a0  5f 52 65 70 6f 72 74 45  72 72 6f 72 28 55 6a 2c  |_ReportError(Uj,|
000061b0  39 39 2c 55 63 24 2c 59  69 24 2c b9 2c 20 ac b9  |99,Uc$,Yi$,., ..|
000061c0  29 3a e7 57 59 20 8c f2  59 6b 0d 49 7a 05 e1 0d  |):.WY ..Yk.Iz...|
000061d0  49 b6 23 dd f2 57 6e 3a  f2 58 73 28 55 6a 2c 58  |I.#..Wn:.Xs(Uj,X|
000061e0  6f 29 3a f2 68 69 28 55  6a 2c 58 6f 29 3a ef 37  |o):.hi(Uj,Xo):.7|
000061f0  3a e1 0d 49 fc 23 dd f2  58 70 3a f2 58 73 28 55  |:..I.#..Xp:.Xs(U|
00006200  6a 2c 58 71 29 3a f2 68  69 28 55 6a 2c 58 71 29  |j,Xq):.hi(Uj,Xq)|
00006210  3a ef 37 3a e1 0d 4a a6  ed dd f2 56 65 3a 68 6a  |:.7:..J....Ve:hj|
00006220  3d 31 33 3a 68 6b 3d 31  34 3a 68 6c 3d 31 35 3a  |=13:hk=14:hl=15:|
00006230  de 68 6d 20 33 37 2a 31  30 32 34 3a e3 68 6e 3d  |.hm 37*1024:.hn=|
00006240  30 20 b8 32 88 32 3a 50  25 3d 68 6d 3a 5b 4f 50  |0 .2.2:P%=hm:[OP|
00006250  54 20 68 6e 3a 2e 64 76  20 a4 63 74 69 6f 6e 5f  |T hn:.dv .ction_|
00006260  52 65 73 65 72 76 65 4d  65 6d 6f 72 79 28 32 35  |ReserveMemory(25|
00006270  36 20 2a 34 29 3a 2e 64  79 20 a4 63 74 69 6f 6e  |6 *4):.dy .ction|
00006280  5f 52 65 73 65 72 76 65  4d 65 6d 6f 72 79 28 32  |_ReserveMemory(2|
00006290  35 36 20 2a 34 29 3a 2e  68 6f 20 4c 44 52 20 72  |56 *4):.ho LDR r|
000062a0  33 2c 5b 72 30 5d 2c 23  34 3a 53 54 52 20 72 33  |3,[r0],#4:STR r3|
000062b0  2c 5b 72 31 5d 2c 23 34  3a 53 55 42 53 20 72 32  |,[r1],#4:SUBS r2|
000062c0  2c 72 32 2c 23 34 3a 42  4e 45 20 68 6f 3a 4d 4f  |,r2,#4:BNE ho:MO|
000062d0  56 20 50 43 2c 68 6b 3a  2e 66 5a 20 53 54 4d 46  |V PC,hk:.fZ STMF|
000062e0  44 20 28 68 6a 29 21 2c  7b 68 6b 7d 3a 4d 4f 56  |D (hj)!,{hk}:MOV|
000062f0  20 72 31 2c 23 32 35 36  3a 4d 4f 56 20 72 32 2c  | r1,#256:MOV r2,|
00006300  23 30 0d 4c b8 fd 2e 68  70 20 4c 44 52 20 72 33  |#0.L...hp LDR r3|
00006310  2c 5b 72 30 5d 2c 23 34  3a 43 4d 50 20 72 33 2c  |,[r0],#4:CMP r3,|
00006320  23 30 3a 41 44 44 4e 45  20 72 32 2c 72 32 2c 23  |#0:ADDNE r2,r2,#|
00006330  31 3a 53 55 42 53 20 72  31 2c 72 31 2c 23 31 3a  |1:SUBS r1,r1,#1:|
00006340  42 4e 45 20 68 70 3a 4d  4f 56 20 72 30 2c 72 32  |BNE hp:MOV r0,r2|
00006350  3a 4c 44 4d 46 44 20 28  68 6a 29 21 2c 7b 50 43  |:LDMFD (hj)!,{PC|
00006360  7d 3a 2e 66 62 20 53 54  4d 46 44 20 28 68 6a 29  |}:.fb STMFD (hj)|
00006370  21 2c 7b 68 6b 7d 3a 4d  4f 56 20 72 31 2c 72 30  |!,{hk}:MOV r1,r0|
00006380  3a 4d 4f 56 20 72 32 2c  23 32 35 36 3a 2e 68 71  |:MOV r2,#256:.hq|
00006390  20 4c 44 52 20 72 33 2c  5b 72 31 5d 2c 23 34 3a  | LDR r3,[r1],#4:|
000063a0  53 54 52 20 72 33 2c 5b  72 30 5d 3a 43 4d 50 20  |STR r3,[r0]:CMP |
000063b0  72 33 2c 23 30 3a 41 44  44 4e 45 20 72 30 2c 72  |r3,#0:ADDNE r0,r|
000063c0  30 2c 23 34 3a 53 55 42  53 20 72 32 2c 72 32 2c  |0,#4:SUBS r2,r2,|
000063d0  23 31 3a 42 4e 45 20 68  71 3a 4c 44 4d 46 44 20  |#1:BNE hq:LDMFD |
000063e0  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 65 5a 20 53  |(hj)!,{PC}:.eZ S|
000063f0  54 4d 46 44 20 28 68 6a  29 21 2c 7b 68 6b 7d 0d  |TMFD (hj)!,{hk}.|
00006400  4e 16 fe 4c 44 52 20 72  30 2c 68 72 3a 4d 4f 56  |N..LDR r0,hr:MOV|
00006410  20 72 32 2c 23 30 3a 4d  4f 56 20 72 35 2c 23 30  | r2,#0:MOV r5,#0|
00006420  3a 2e 68 73 20 4c 44 52  20 72 33 2c 5b 72 30 5d  |:.hs LDR r3,[r0]|
00006430  3a 4d 4f 56 53 20 72 34  2c 72 33 2c 4c 53 52 20  |:MOVS r4,r3,LSR |
00006440  23 33 31 3a 53 54 52 4e  45 20 72 32 2c 65 63 3a  |#31:STRNE r2,ec:|
00006450  41 44 44 4e 45 20 72 35  2c 72 35 2c 23 31 3a 4d  |ADDNE r5,r5,#1:M|
00006460  4f 56 20 72 33 2c 72 33  2c 4c 53 4c 20 23 31 3a  |OV r3,r3,LSL #1:|
00006470  4d 4f 56 20 72 33 2c 72  33 2c 4c 53 52 20 23 31  |MOV r3,r3,LSR #1|
00006480  3a 53 54 52 20 72 33 2c  5b 72 30 5d 2c 23 34 3a  |:STR r3,[r0],#4:|
00006490  41 44 44 20 72 32 2c 72  32 2c 23 31 3a 43 4d 50  |ADD r2,r2,#1:CMP|
000064a0  20 72 32 2c 23 32 35 36  3a 42 4e 45 20 68 73 3a  | r2,#256:BNE hs:|
000064b0  4d 4f 56 20 72 30 2c 72  35 3a 4c 44 4d 46 44 20  |MOV r0,r5:LDMFD |
000064c0  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 65 62 20 53  |(hj)!,{PC}:.eb S|
000064d0  54 4d 46 44 20 28 68 6a  29 21 2c 7b 68 6b 7d 3a  |TMFD (hj)!,{hk}:|
000064e0  4c 44 52 20 72 30 2c 68  74 3a 4d 4f 56 20 72 32  |LDR r0,ht:MOV r2|
000064f0  2c 23 30 3a 4d 4f 56 20  72 35 2c 23 30 0d 4e e8  |,#0:MOV r5,#0.N.|
00006500  f6 2e 68 75 20 4c 44 52  20 72 33 2c 5b 72 30 5d  |..hu LDR r3,[r0]|
00006510  3a 4d 4f 56 53 20 72 34  2c 72 33 2c 4c 53 52 20  |:MOVS r4,r3,LSR |
00006520  23 33 31 3a 53 54 52 4e  45 20 72 32 2c 65 64 3a  |#31:STRNE r2,ed:|
00006530  41 44 44 4e 45 20 72 35  2c 72 35 2c 23 31 3a 4d  |ADDNE r5,r5,#1:M|
00006540  4f 56 20 72 33 2c 72 33  2c 4c 53 4c 20 23 31 3a  |OV r3,r3,LSL #1:|
00006550  4d 4f 56 20 72 33 2c 72  33 2c 4c 53 52 20 23 31  |MOV r3,r3,LSR #1|
00006560  3a 53 54 52 20 72 33 2c  5b 72 30 5d 2c 23 34 3a  |:STR r3,[r0],#4:|
00006570  41 44 44 20 72 32 2c 72  32 2c 23 31 3a 43 4d 50  |ADD r2,r2,#1:CMP|
00006580  20 72 32 2c 23 32 35 36  3a 42 4e 45 20 68 75 3a  | r2,#256:BNE hu:|
00006590  4d 4f 56 20 72 30 2c 72  35 3a 4c 44 4d 46 44 20  |MOV r0,r5:LDMFD |
000065a0  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 68 72 20 44  |(hj)!,{PC}:.hr D|
000065b0  43 44 20 64 76 3a 2e 68  74 20 44 43 44 20 64 79  |CD dv:.ht DCD dy|
000065c0  3a 2e 65 63 20 44 43 44  20 30 3a 2e 65 64 20 44  |:.ec DCD 0:.ed D|
000065d0  43 44 20 30 3a 2e 65 76  20 53 54 4d 46 44 20 28  |CD 0:.ev STMFD (|
000065e0  68 6a 29 21 2c 7b 68 6b  7d 3a 4c 44 52 20 72 30  |hj)!,{hk}:LDR r0|
000065f0  2c 68 76 0d 50 0a f5 4c  44 52 20 72 31 2c 68 77  |,hv.P..LDR r1,hw|
00006600  3a 4d 4f 56 20 72 32 2c  23 30 3a 4d 4f 56 20 72  |:MOV r2,#0:MOV r|
00006610  36 2c 23 30 3a 2e 68 78  20 4c 44 52 20 72 33 2c  |6,#0:.hx LDR r3,|
00006620  5b 72 30 2c 72 32 2c 41  53 4c 20 23 32 5d 3a 4c  |[r0,r2,ASL #2]:L|
00006630  44 52 20 72 34 2c 5b 72  31 2c 72 32 2c 41 53 4c  |DR r4,[r1,r2,ASL|
00006640  20 23 32 5d 3a 4d 4f 56  53 20 72 35 2c 72 33 2c  | #2]:MOVS r5,r3,|
00006650  4c 53 52 20 23 33 31 3a  53 54 52 4e 45 20 72 33  |LSR #31:STRNE r3|
00006660  2c 65 79 3a 41 44 44 4e  45 20 72 36 2c 72 36 2c  |,ey:ADDNE r6,r6,|
00006670  23 31 3a 53 54 52 4e 45  20 72 32 2c 65 78 3a 4d  |#1:STRNE r2,ex:M|
00006680  4f 56 4e 45 20 72 37 2c  72 30 3a 4d 4f 56 4e 45  |OVNE r7,r0:MOVNE|
00006690  20 72 33 2c 23 30 3a 4d  4f 56 53 20 72 35 2c 72  | r3,#0:MOVS r5,r|
000066a0  34 2c 4c 53 52 20 23 33  31 3a 53 54 52 4e 45 20  |4,LSR #31:STRNE |
000066b0  72 34 2c 65 79 3a 41 44  44 4e 45 20 72 36 2c 72  |r4,ey:ADDNE r6,r|
000066c0  36 2c 23 31 3a 53 54 52  4e 45 20 72 32 2c 65 78  |6,#1:STRNE r2,ex|
000066d0  3a 4d 4f 56 4e 45 20 72  37 2c 72 31 3a 4d 4f 56  |:MOVNE r7,r1:MOV|
000066e0  4e 45 20 72 34 2c 23 30  0d 50 b4 fd 53 54 52 20  |NE r4,#0.P..STR |
000066f0  72 33 2c 5b 72 30 2c 72  32 2c 41 53 4c 20 23 32  |r3,[r0,r2,ASL #2|
00006700  5d 3a 53 54 52 20 72 34  2c 5b 72 31 2c 72 32 2c  |]:STR r4,[r1,r2,|
00006710  41 53 4c 20 23 32 5d 3a  41 44 44 20 72 32 2c 72  |ASL #2]:ADD r2,r|
00006720  32 2c 23 31 3a 43 4d 50  20 72 32 2c 23 32 35 36  |2,#1:CMP r2,#256|
00006730  3a 42 4e 45 20 68 78 3a  53 54 52 20 72 37 2c 65  |:BNE hx:STR r7,e|
00006740  77 3a 4d 4f 56 20 72 30  2c 72 36 3a 4c 44 4d 46  |w:MOV r0,r6:LDMF|
00006750  44 20 28 68 6a 29 21 2c  7b 50 43 7d 3a 2e 68 76  |D (hj)!,{PC}:.hv|
00006760  20 44 43 44 20 64 76 3a  2e 68 77 20 44 43 44 20  | DCD dv:.hw DCD |
00006770  64 79 3a 2e 65 78 20 44  43 44 20 30 3a 2e 65 77  |dy:.ex DCD 0:.ew|
00006780  20 44 43 44 20 30 3a 2e  65 79 20 44 43 44 20 30  | DCD 0:.ey DCD 0|
00006790  3a 2e 68 79 20 53 54 4d  46 44 20 28 68 6a 29 21  |:.hy STMFD (hj)!|
000067a0  2c 7b 68 6b 7d 3a 4d 4f  56 20 72 30 2c 23 39 39  |,{hk}:MOV r0,#99|
000067b0  3a 53 54 52 20 72 30 2c  68 7a 3a 4c 44 52 20 72  |:STR r0,hz:LDR r|
000067c0  31 32 2c 69 55 3a 4c 44  52 20 72 31 31 2c 69 56  |12,iU:LDR r11,iV|
000067d0  3a 4c 44 52 20 72 31 30  2c 69 57 3a 4c 44 52 20  |:LDR r10,iW:LDR |
000067e0  72 39 2c 69 58 0d 51 c2  fd 4c 44 52 20 72 38 2c  |r9,iX.Q..LDR r8,|
000067f0  69 59 3a 4c 44 52 20 72  37 2c 69 5a 3a 4c 44 52  |iY:LDR r7,iZ:LDR|
00006800  20 72 36 2c 69 61 3a 4c  44 52 20 72 35 2c 69 62  | r6,ia:LDR r5,ib|
00006810  3a 4c 44 52 20 72 34 2c  69 63 3a 4d 4f 56 20 72  |:LDR r4,ic:MOV r|
00006820  33 2c 23 32 35 35 3a 2e  69 64 20 4c 44 52 20 72  |3,#255:.id LDR r|
00006830  32 2c 5b 72 31 32 5d 2c  23 34 3a 4d 4f 56 53 20  |2,[r12],#4:MOVS |
00006840  72 30 2c 72 32 2c 4c 53  52 20 23 33 31 3a 4c 44  |r0,r2,LSR #31:LD|
00006850  52 45 51 20 72 30 2c 69  65 3a 4c 44 52 4e 45 20  |REQ r0,ie:LDRNE |
00006860  72 30 2c 69 66 3a 4c 44  52 20 72 31 2c 68 7a 3a  |r0,if:LDR r1,hz:|
00006870  53 54 52 20 72 30 2c 68  7a 3a 43 4d 50 20 72 30  |STR r0,hz:CMP r0|
00006880  2c 72 31 3a 53 57 49 4e  45 20 22 57 69 6d 70 5f  |,r1:SWINE "Wimp_|
00006890  53 65 74 43 6f 6c 6f 75  72 22 3a 42 49 43 20 72  |SetColour":BIC r|
000068a0  32 2c 72 32 2c 23 26 38  30 30 30 30 30 30 30 3a  |2,r2,#&80000000:|
000068b0  53 55 42 53 20 72 32 2c  72 32 2c 23 31 3a 42 4c  |SUBS r2,r2,#1:BL|
000068c0  54 20 69 67 3a 4d 4f 56  20 72 31 2c 72 32 2c 41  |T ig:MOV r1,r2,A|
000068d0  53 4c 20 72 39 3a 4d 55  4c 20 72 31 2c 72 38 2c  |SL r9:MUL r1,r8,|
000068e0  72 31 0d 52 80 fa 4d 4f  56 20 72 31 2c 72 31 2c  |r1.R..MOV r1,r1,|
000068f0  41 53 52 20 23 38 3a 4d  4f 56 20 72 30 2c 72 36  |ASR #8:MOV r0,r6|
00006900  2c 41 53 4c 20 72 31 30  3a 4d 55 4c 20 72 30 2c  |,ASL r10:MUL r0,|
00006910  72 38 2c 72 30 3a 4d 4f  56 20 72 30 2c 72 30 2c  |r8,r0:MOV r0,r0,|
00006920  41 53 52 20 23 38 3a 42  4c 20 69 68 3a 2e 69 67  |ASR #8:BL ih:.ig|
00006930  20 4c 44 52 20 72 32 2c  5b 72 31 31 5d 2c 23 34  | LDR r2,[r11],#4|
00006940  3a 4d 4f 56 53 20 72 30  2c 72 32 2c 4c 53 52 20  |:MOVS r0,r2,LSR |
00006950  23 33 31 3a 4c 44 52 45  51 20 72 30 2c 69 65 3a  |#31:LDREQ r0,ie:|
00006960  4c 44 52 4e 45 20 72 30  2c 69 66 3a 4c 44 52 20  |LDRNE r0,if:LDR |
00006970  72 31 2c 68 7a 3a 53 54  52 20 72 30 2c 68 7a 3a  |r1,hz:STR r0,hz:|
00006980  43 4d 50 20 72 30 2c 72  31 3a 53 57 49 4e 45 20  |CMP r0,r1:SWINE |
00006990  22 57 69 6d 70 5f 53 65  74 43 6f 6c 6f 75 72 22  |"Wimp_SetColour"|
000069a0  3a 42 49 43 20 72 32 2c  72 32 2c 23 26 38 30 30  |:BIC r2,r2,#&800|
000069b0  30 30 30 30 30 3a 53 55  42 53 20 72 32 2c 72 32  |00000:SUBS r2,r2|
000069c0  2c 23 31 3a 42 4c 54 20  69 69 3a 4d 4f 56 20 72  |,#1:BLT ii:MOV r|
000069d0  31 2c 72 32 2c 41 53 4c  20 72 31 30 0d 53 2a f9  |1,r2,ASL r10.S*.|
000069e0  4d 55 4c 20 72 31 2c 72  38 2c 72 31 3a 4d 4f 56  |MUL r1,r8,r1:MOV|
000069f0  20 72 31 2c 72 31 2c 41  53 52 20 23 38 3a 4d 4f  | r1,r1,ASR #8:MO|
00006a00  56 20 72 30 2c 72 37 2c  41 53 4c 20 72 39 3a 4d  |V r0,r7,ASL r9:M|
00006a10  55 4c 20 72 30 2c 72 38  2c 72 30 3a 4d 4f 56 20  |UL r0,r8,r0:MOV |
00006a20  72 30 2c 72 30 2c 41 53  52 20 23 38 3a 42 4c 20  |r0,r0,ASR #8:BL |
00006a30  69 6a 3a 2e 69 69 20 53  55 42 53 20 72 33 2c 72  |ij:.ii SUBS r3,r|
00006a40  33 2c 23 31 3a 42 47 45  20 69 64 3a 4c 44 4d 46  |3,#1:BGE id:LDMF|
00006a50  44 20 28 68 6a 29 21 2c  7b 50 43 7d 3a 2e 69 68  |D (hj)!,{PC}:.ih|
00006a60  20 53 54 4d 46 44 20 28  68 6a 29 21 2c 7b 72 33  | STMFD (hj)!,{r3|
00006a70  2c 68 6b 7d 3a 53 54 52  20 72 31 2c 69 6b 3a 53  |,hk}:STR r1,ik:S|
00006a80  54 52 20 72 30 2c 69 6c  3a 4d 4f 56 20 72 30 2c  |TR r0,il:MOV r0,|
00006a90  23 34 3a 4c 44 52 20 72  31 2c 69 62 3a 4c 44 52  |#4:LDR r1,ib:LDR|
00006aa0  20 72 32 2c 69 63 3a 4c  44 52 20 72 33 2c 69 6b  | r2,ic:LDR r3,ik|
00006ab0  3a 41 44 44 20 72 32 2c  72 32 2c 72 33 3a 53 57  |:ADD r2,r2,r3:SW|
00006ac0  49 20 22 4f 53 5f 50 6c  6f 74 22 3a 4d 4f 56 20  |I "OS_Plot":MOV |
00006ad0  72 30 2c 23 35 0d 53 fc  ff 4c 44 52 20 72 31 2c  |r0,#5.S..LDR r1,|
00006ae0  69 62 3a 4c 44 52 20 72  33 2c 69 6c 3a 41 44 44  |ib:LDR r3,il:ADD|
00006af0  20 72 31 2c 72 31 2c 72  33 3a 53 57 49 20 22 4f  | r1,r1,r3:SWI "O|
00006b00  53 5f 50 6c 6f 74 22 3a  4c 44 4d 46 44 20 28 68  |S_Plot":LDMFD (h|
00006b10  6a 29 21 2c 7b 72 33 2c  50 43 7d 3a 2e 69 6a 20  |j)!,{r3,PC}:.ij |
00006b20  53 54 4d 46 44 20 28 68  6a 29 21 2c 7b 72 33 2c  |STMFD (hj)!,{r3,|
00006b30  68 6b 7d 3a 53 54 52 20  72 31 2c 69 6d 3a 53 54  |hk}:STR r1,im:ST|
00006b40  52 20 72 30 2c 69 6e 3a  4d 4f 56 20 72 30 2c 23  |R r0,in:MOV r0,#|
00006b50  34 3a 4c 44 52 20 72 31  2c 69 62 3a 4c 44 52 20  |4:LDR r1,ib:LDR |
00006b60  72 32 2c 69 6d 3a 41 44  44 20 72 31 2c 72 31 2c  |r2,im:ADD r1,r1,|
00006b70  72 32 3a 4c 44 52 20 72  32 2c 69 63 3a 53 57 49  |r2:LDR r2,ic:SWI|
00006b80  20 22 4f 53 5f 50 6c 6f  74 22 3a 4d 4f 56 20 72  | "OS_Plot":MOV r|
00006b90  30 2c 23 35 3a 4c 44 52  20 72 32 2c 69 6f 3a 53  |0,#5:LDR r2,io:S|
00006ba0  57 49 20 22 4f 53 5f 50  6c 6f 74 22 3a 4c 44 4d  |WI "OS_Plot":LDM|
00006bb0  46 44 20 28 68 6a 29 21  2c 7b 72 33 2c 50 43 7d  |FD (hj)!,{r3,PC}|
00006bc0  3a 2e 68 7a 20 44 43 44  20 30 3a 2e 69 65 20 44  |:.hz DCD 0:.ie D|
00006bd0  43 44 20 30 0d 54 ec fb  2e 69 66 20 44 43 44 20  |CD 0.T...if DCD |
00006be0  30 3a 2e 69 6b 20 44 43  44 20 30 3a 2e 69 6c 20  |0:.ik DCD 0:.il |
00006bf0  44 43 44 20 30 3a 2e 69  6d 20 44 43 44 20 30 3a  |DCD 0:.im DCD 0:|
00006c00  2e 69 6e 20 44 43 44 20  30 3a 2e 69 55 20 44 43  |.in DCD 0:.iU DC|
00006c10  44 20 64 76 3a 2e 69 56  20 44 43 44 20 64 79 3a  |D dv:.iV DCD dy:|
00006c20  2e 69 57 20 44 43 44 20  30 3a 2e 69 58 20 44 43  |.iW DCD 0:.iX DC|
00006c30  44 20 30 3a 2e 69 59 20  44 43 44 20 30 3a 2e 69  |D 0:.iY DCD 0:.i|
00006c40  5a 20 44 43 44 20 30 3a  2e 69 61 20 44 43 44 20  |Z DCD 0:.ia DCD |
00006c50  30 3a 2e 69 62 20 44 43  44 20 30 3a 2e 69 63 20  |0:.ib DCD 0:.ic |
00006c60  44 43 44 20 30 3a 2e 69  70 20 44 43 44 20 30 3a  |DCD 0:.ip DCD 0:|
00006c70  2e 69 6f 20 44 43 44 20  30 3a 2e 66 6d 20 53 54  |.io DCD 0:.fm ST|
00006c80  4d 46 44 20 28 68 6a 29  21 2c 7b 68 6b 7d 3a 4c  |MFD (hj)!,{hk}:L|
00006c90  44 52 20 72 33 2c 69 71  3a 4c 44 52 20 72 34 2c  |DR r3,iq:LDR r4,|
00006ca0  67 66 3a 4d 4f 56 20 72  35 2c 23 30 3a 2e 69 72  |gf:MOV r5,#0:.ir|
00006cb0  20 4c 44 52 20 72 36 2c  5b 72 33 2c 23 31 36 5d  | LDR r6,[r3,#16]|
00006cc0  3a 20 80 53 20 72 36 2c  20 72 36 2c 20 23 31 0d  |: .S r6, r6, #1.|
00006cd0  56 90 f2 42 45 51 20 69  73 3a 53 55 42 20 72 34  |V..BEQ is:SUB r4|
00006ce0  2c 72 34 2c 23 31 3a 4c  44 52 20 72 37 2c 5b 72  |,r4,#1:LDR r7,[r|
00006cf0  33 2c 72 32 5d 3a 20 41  44 44 20 72 32 2c 72 32  |3,r2]: ADD r2,r2|
00006d00  2c 23 34 3a 4c 44 52 20  72 38 2c 5b 72 33 2c 72  |,#4:LDR r8,[r3,r|
00006d10  32 5d 3a 20 53 55 42 20  72 32 2c 72 32 2c 23 34  |2]: SUB r2,r2,#4|
00006d20  3a 53 55 42 53 20 72 39  2c 72 37 2c 72 30 20 3a  |:SUBS r9,r7,r0 :|
00006d30  20 4d 56 4e 4c 54 20 72  39 2c 72 39 20 3a 20 41  | MVNLT r9,r9 : A|
00006d40  44 44 4c 54 20 72 39 2c  72 39 2c 23 31 3a 53 55  |DDLT r9,r9,#1:SU|
00006d50  42 53 20 72 31 30 2c 72  38 2c 72 31 20 3a 20 4d  |BS r10,r8,r1 : M|
00006d60  56 4e 4c 54 20 72 31 30  2c 72 31 30 20 3a 20 41  |VNLT r10,r10 : A|
00006d70  44 44 4c 54 20 72 31 30  2c 72 31 30 2c 23 31 3a  |DDLT r10,r10,#1:|
00006d80  43 4d 50 20 72 39 2c 23  31 20 3a 20 42 47 54 20  |CMP r9,#1 : BGT |
00006d90  69 73 3a 43 4d 50 20 72  31 30 2c 23 31 20 3a 20  |is:CMP r10,#1 : |
00006da0  42 47 54 20 69 73 3a 4d  4f 56 20 72 30 2c 72 35  |BGT is:MOV r0,r5|
00006db0  3a 4c 44 4d 46 44 20 28  68 6a 29 21 2c 7b 50 43  |:LDMFD (hj)!,{PC|
00006dc0  7d 0d 57 26 f9 2e 69 73  20 41 44 44 20 72 33 2c  |}.W&..is ADD r3,|
00006dd0  72 33 2c 23 32 34 3a 41  44 44 20 72 35 2c 72 35  |r3,#24:ADD r5,r5|
00006de0  2c 23 31 3a 43 4d 50 20  72 34 2c 23 30 3a 42 4e  |,#1:CMP r4,#0:BN|
00006df0  45 20 69 72 3a 4d 56 4e  20 72 30 2c 23 30 3a 4c  |E ir:MVN r0,#0:L|
00006e00  44 4d 46 44 20 28 68 6a  29 21 2c 7b 50 43 7d 3a  |DMFD (hj)!,{PC}:|
00006e10  2e 69 71 20 44 43 44 20  66 6e 3a 2e 66 78 20 53  |.iq DCD fn:.fx S|
00006e20  54 4d 46 44 20 28 68 6a  29 21 2c 7b 68 6b 7d 3a  |TMFD (hj)!,{hk}:|
00006e30  4d 4f 56 20 72 36 2c 72  32 3a 4c 44 52 20 72 32  |MOV r6,r2:LDR r2|
00006e40  2c 69 74 3a 4c 44 52 20  72 33 2c 67 66 3a 4d 4f  |,it:LDR r3,gf:MO|
00006e50  56 20 72 37 2c 23 31 20  3a 20 4c 44 52 20 72 38  |V r7,#1 : LDR r8|
00006e60  2c 66 77 20 3a 20 41 44  44 20 72 38 2c 72 38 2c  |,fw : ADD r8,r8,|
00006e70  23 31 3a 4d 4f 56 20 72  39 2c 23 31 20 3a 20 4c  |#1:MOV r9,#1 : L|
00006e80  44 52 20 72 31 30 2c 66  76 3a 53 55 42 20 72 31  |DR r10,fv:SUB r1|
00006e90  31 2c 72 38 2c 23 31 3a  53 55 42 20 72 31 32 2c  |1,r8,#1:SUB r12,|
00006ea0  72 31 30 2c 23 31 3a 2e  69 75 20 4c 44 52 20 72  |r10,#1:.iu LDR r|
00006eb0  34 2c 5b 72 32 2c 23 31  36 5d 0d 58 84 fc 20 80  |4,[r2,#16].X.. .|
00006ec0  53 20 72 35 2c 20 72 34  2c 20 23 31 3a 53 55 42  |S r5, r4, #1:SUB|
00006ed0  4e 45 20 72 33 2c 72 33  2c 23 31 3a 20 80 53 20  |NE r3,r3,#1: .S |
00006ee0  72 34 2c 20 72 34 2c 20  23 32 3a 42 45 51 20 69  |r4, r4, #2:BEQ i|
00006ef0  76 3a 4c 44 52 20 72 34  2c 5b 72 32 2c 72 36 5d  |v:LDR r4,[r2,r6]|
00006f00  3a 20 41 44 44 20 72 36  2c 72 36 2c 23 34 3a 4c  |: ADD r6,r6,#4:L|
00006f10  44 52 20 72 35 2c 5b 72  32 2c 72 36 5d 3a 20 53  |DR r5,[r2,r6]: S|
00006f20  55 42 20 72 36 2c 72 36  2c 23 34 3a 41 44 44 20  |UB r6,r6,#4:ADD |
00006f30  72 34 2c 72 34 2c 72 30  3a 41 44 44 20 72 35 2c  |r4,r4,r0:ADD r5,|
00006f40  72 35 2c 72 31 3a 43 4d  50 20 72 37 2c 23 31 20  |r5,r1:CMP r7,#1 |
00006f50  3a 20 43 4d 50 4e 45 20  72 37 2c 72 31 31 20 3a  |: CMPNE r7,r11 :|
00006f60  20 53 55 42 45 51 20 72  34 2c 72 34 2c 72 30 3a  | SUBEQ r4,r4,r0:|
00006f70  43 4d 50 20 72 39 2c 23  31 20 3a 20 43 4d 50 4e  |CMP r9,#1 : CMPN|
00006f80  45 20 72 39 2c 72 31 30  20 3a 20 53 55 42 45 51  |E r9,r10 : SUBEQ|
00006f90  20 72 35 2c 72 35 2c 72  31 3a 53 54 52 20 72 34  | r5,r5,r1:STR r4|
00006fa0  2c 5b 72 32 2c 72 36 5d  3a 20 41 44 44 20 72 36  |,[r2,r6]: ADD r6|
00006fb0  2c 72 36 2c 23 34 0d 59  06 fa 53 54 52 20 72 35  |,r6,#4.Y..STR r5|
00006fc0  2c 5b 72 32 2c 72 36 5d  3a 20 53 55 42 20 72 36  |,[r2,r6]: SUB r6|
00006fd0  2c 72 36 2c 23 34 3a 2e  69 76 20 41 44 44 20 72  |,r6,#4:.iv ADD r|
00006fe0  37 2c 72 37 2c 23 31 3a  43 4d 50 20 72 37 2c 72  |7,r7,#1:CMP r7,r|
00006ff0  38 20 3a 20 4d 4f 56 47  45 20 72 37 2c 23 31 20  |8 : MOVGE r7,#1 |
00007000  3a 20 41 44 44 47 45 20  72 39 2c 72 39 2c 23 31  |: ADDGE r9,r9,#1|
00007010  3a 41 44 44 20 72 32 2c  72 32 2c 23 32 34 3a 43  |:ADD r2,r2,#24:C|
00007020  4d 50 20 72 33 2c 23 30  3a 42 4e 45 20 69 75 3a  |MP r3,#0:BNE iu:|
00007030  4c 44 4d 46 44 20 28 68  6a 29 21 2c 7b 50 43 7d  |LDMFD (hj)!,{PC}|
00007040  3a 2e 69 74 20 44 43 44  20 66 6e 3a 2e 66 76 20  |:.it DCD fn:.fv |
00007050  44 43 44 20 30 3a 2e 66  77 20 44 43 44 20 30 3a  |DCD 0:.fw DCD 0:|
00007060  2e 67 55 20 53 54 4d 46  44 20 28 68 6a 29 21 2c  |.gU STMFD (hj)!,|
00007070  7b 68 6b 7d 3a 4c 44 52  20 72 31 2c 69 77 3a 4c  |{hk}:LDR r1,iw:L|
00007080  44 52 20 72 32 2c 67 66  3a 4d 4f 56 20 72 33 2c  |DR r2,gf:MOV r3,|
00007090  72 30 3a 4d 4f 56 20 72  30 2c 23 30 3a 2e 69 78  |r0:MOV r0,#0:.ix|
000070a0  20 4c 44 52 20 72 34 2c  5b 72 31 2c 23 31 36 5d  | LDR r4,[r1,#16]|
000070b0  0d 5a 46 f6 20 80 20 72  35 2c 20 72 34 2c 20 23  |.ZF. . r5, r4, #|
000070c0  31 3a 43 4d 50 20 72 35  2c 23 31 3a 42 4e 45 20  |1:CMP r5,#1:BNE |
000070d0  69 79 3a 53 55 42 20 72  32 2c 72 32 2c 23 31 3a  |iy:SUB r2,r2,#1:|
000070e0  20 80 20 72 35 2c 20 72  34 2c 20 23 32 3a 43 4d  | . r5, r4, #2:CM|
000070f0  50 20 72 35 2c 23 32 3a  42 4e 45 20 69 79 3a 41  |P r5,#2:BNE iy:A|
00007100  44 44 20 72 30 2c 72 30  2c 23 31 3a 20 80 20 72  |DD r0,r0,#1: . r|
00007110  35 2c 20 72 34 2c 20 23  31 35 3a 41 44 44 20 72  |5, r4, #15:ADD r|
00007120  35 2c 72 35 2c 72 33 2c  4c 53 4c 20 23 34 3a 53  |5,r5,r3,LSL #4:S|
00007130  54 52 20 72 35 2c 5b 72  31 2c 23 31 36 5d 3a 2e  |TR r5,[r1,#16]:.|
00007140  69 79 20 41 44 44 20 72  31 2c 72 31 2c 23 32 34  |iy ADD r1,r1,#24|
00007150  3a 43 4d 50 20 72 32 2c  23 30 3a 42 47 54 20 69  |:CMP r2,#0:BGT i|
00007160  78 3a 4c 44 4d 46 44 20  28 68 6a 29 21 2c 7b 50  |x:LDMFD (hj)!,{P|
00007170  43 7d 3a 2e 69 77 20 44  43 44 20 66 6e 3a 2e 66  |C}:.iw DCD fn:.f|
00007180  69 20 53 54 4d 46 44 20  28 68 6a 29 21 2c 7b 68  |i STMFD (hj)!,{h|
00007190  6b 7d 3a 4d 4f 56 20 72  30 2c 23 30 3a 4c 44 52  |k}:MOV r0,#0:LDR|
000071a0  20 72 31 2c 69 7a 0d 5b  72 fc 4d 4f 56 20 72 32  | r1,iz.[r.MOV r2|
000071b0  2c 23 33 32 2a 31 30 32  34 3a 4d 4f 56 20 72 35  |,#32*1024:MOV r5|
000071c0  2c 23 30 3a 2e 6a 55 20  4c 44 52 20 72 33 2c 5b  |,#0:.jU LDR r3,[|
000071d0  72 31 2c 23 31 36 5d 3a  20 80 53 20 72 34 2c 20  |r1,#16]: .S r4, |
000071e0  72 33 2c 20 23 32 3a 53  55 42 4e 45 20 72 33 2c  |r3, #2:SUBNE r3,|
000071f0  72 33 2c 23 32 3a 53 54  52 4e 45 20 72 33 2c 5b  |r3,#2:STRNE r3,[|
00007200  72 31 2c 23 31 36 5d 3a  41 44 44 4e 45 20 72 30  |r1,#16]:ADDNE r0|
00007210  2c 72 30 2c 23 31 3a 53  54 52 4e 45 20 72 35 2c  |,r0,#1:STRNE r5,|
00007220  66 6b 3a 41 44 44 20 72  35 2c 72 35 2c 23 31 3a  |fk:ADD r5,r5,#1:|
00007230  41 44 44 20 72 31 2c 72  31 2c 23 32 34 3a 53 55  |ADD r1,r1,#24:SU|
00007240  42 53 20 72 32 2c 72 32  2c 23 32 34 3a 42 47 54  |BS r2,r2,#24:BGT|
00007250  20 6a 55 3a 4c 44 4d 46  44 20 28 68 6a 29 21 2c  | jU:LDMFD (hj)!,|
00007260  7b 50 43 7d 3a 2e 69 7a  20 44 43 44 20 66 6e 3a  |{PC}:.iz DCD fn:|
00007270  2e 66 6b 20 44 43 44 20  30 3a 2e 66 65 20 53 54  |.fk DCD 0:.fe ST|
00007280  4d 46 44 20 28 68 6a 29  21 2c 7b 68 6b 7d 3a 4d  |MFD (hj)!,{hk}:M|
00007290  4f 56 20 72 35 2c 72 32  3a 4c 44 52 20 72 32 2c  |OV r5,r2:LDR r2,|
000072a0  6a 56 0d 5c c6 f1 4d 4f  56 20 72 34 2c 23 30 3a  |jV.\..MOV r4,#0:|
000072b0  2e 6a 57 20 4c 44 52 20  72 33 2c 5b 72 32 2c 23  |.jW LDR r3,[r2,#|
000072c0  31 36 5d 3a 20 80 53 20  72 33 2c 20 72 33 2c 20  |16]: .S r3, r3, |
000072d0  23 31 3a 42 45 51 20 6a  58 3a 41 44 44 20 72 32  |#1:BEQ jX:ADD r2|
000072e0  2c 72 32 2c 23 32 34 3a  41 44 44 20 72 34 2c 72  |,r2,#24:ADD r4,r|
000072f0  34 2c 23 31 3a 42 20 6a  57 3a 2e 6a 58 20 53 54  |4,#1:B jW:.jX ST|
00007300  52 20 72 30 2c 5b 72 32  2c 23 30 5d 3a 53 54 52  |R r0,[r2,#0]:STR|
00007310  20 72 31 2c 5b 72 32 2c  23 34 5d 3a 53 54 52 20  | r1,[r2,#4]:STR |
00007320  72 30 2c 5b 72 32 2c 23  38 5d 3a 53 54 52 20 72  |r0,[r2,#8]:STR r|
00007330  31 2c 5b 72 32 2c 23 31  32 5d 3a 4d 4f 56 20 72  |1,[r2,#12]:MOV r|
00007340  33 2c 72 35 2c 4c 53 4c  20 23 34 3a 41 44 44 20  |3,r5,LSL #4:ADD |
00007350  72 33 2c 72 33 2c 23 31  3a 53 54 52 20 72 33 2c  |r3,r3,#1:STR r3,|
00007360  5b 72 32 2c 23 31 36 5d  3a 4c 44 52 20 72 30 2c  |[r2,#16]:LDR r0,|
00007370  67 66 3a 41 44 44 20 72  30 2c 72 30 2c 23 31 3a  |gf:ADD r0,r0,#1:|
00007380  53 54 52 20 72 30 2c 67  66 3a 4d 4f 56 20 72 30  |STR r0,gf:MOV r0|
00007390  2c 72 34 0d 5d 7a fb 4c  44 4d 46 44 20 28 68 6a  |,r4.]z.LDMFD (hj|
000073a0  29 21 2c 7b 50 43 7d 3a  2e 6a 56 20 44 43 44 20  |)!,{PC}:.jV DCD |
000073b0  66 6e 3a 2e 6a 59 20 53  54 4d 46 44 20 28 68 6a  |fn:.jY STMFD (hj|
000073c0  29 21 2c 7b 68 6b 7d 3a  4d 4f 56 20 72 30 2c 23  |)!,{hk}:MOV r0,#|
000073d0  31 31 3a 53 57 49 20 22  57 69 6d 70 5f 53 65 74  |11:SWI "Wimp_Set|
000073e0  43 6f 6c 6f 75 72 22 3a  4c 44 52 20 72 31 32 2c  |Colour":LDR r12,|
000073f0  6a 5a 3a 4c 44 52 20 72  31 2c 67 66 3a 4c 44 52  |jZ:LDR r1,gf:LDR|
00007400  20 72 32 2c 6a 61 3a 4c  44 52 20 72 33 2c 6a 62  | r2,ja:LDR r3,jb|
00007410  3a 4c 44 52 20 72 34 2c  6a 63 3a 4c 44 52 20 72  |:LDR r4,jc:LDR r|
00007420  35 2c 6a 64 3a 4c 44 52  20 72 36 2c 6a 65 3a 4c  |5,jd:LDR r6,je:L|
00007430  44 52 20 72 31 30 2c 6a  66 3a 4c 44 52 20 72 31  |DR r10,jf:LDR r1|
00007440  31 2c 6a 67 3a 2e 6a 68  20 4c 44 52 20 72 37 2c  |1,jg:.jh LDR r7,|
00007450  5b 72 31 32 2c 23 31 36  5d 3a 20 80 53 20 72 38  |[r12,#16]: .S r8|
00007460  2c 20 72 37 2c 20 23 31  3a 42 45 51 20 6a 69 3a  |, r7, #1:BEQ ji:|
00007470  2e 6a 6a 20 4c 44 52 20  72 30 2c 6a 6b 3a 4c 44  |.jj LDR r0,jk:LD|
00007480  52 20 72 38 2c 5b 72 31  32 2c 23 31 36 5d 0d 5e  |R r8,[r12,#16].^|
00007490  b0 fb 20 80 20 72 39 2c  20 72 38 2c 20 23 25 31  |.. . r9, r8, #%1|
000074a0  31 31 31 30 30 30 30 3a  4d 4f 56 20 72 39 2c 72  |1110000:MOV r9,r|
000074b0  39 2c 4c 53 52 20 23 34  3a 20 80 53 20 72 38 2c  |9,LSR #4: .S r8,|
000074c0  20 72 38 2c 20 23 25 30  30 30 30 30 30 31 30 3a  | r8, #%00000010:|
000074d0  41 44 44 4e 45 20 72 39  2c 72 39 2c 23 38 3a 20  |ADDNE r9,r9,#8: |
000074e0  80 20 72 39 2c 20 72 39  2c 20 23 31 35 3a 53 54  |. r9, r9, #15:ST|
000074f0  52 20 72 39 2c 6a 6c 3a  4c 44 52 20 72 38 2c 5b  |R r9,jl:LDR r8,[|
00007500  72 31 32 2c 72 30 5d 3a  20 41 44 44 20 72 30 2c  |r12,r0]: ADD r0,|
00007510  72 30 2c 23 34 3a 4c 44  52 20 72 39 2c 5b 72 31  |r0,#4:LDR r9,[r1|
00007520  32 2c 72 30 5d 3a 4d 4f  56 20 72 38 2c 72 38 2c  |2,r0]:MOV r8,r8,|
00007530  41 53 4c 20 72 33 3a 4d  4f 56 20 72 39 2c 72 39  |ASL r3:MOV r9,r9|
00007540  2c 41 53 4c 20 72 34 3a  4d 55 4c 20 72 38 2c 72  |,ASL r4:MUL r8,r|
00007550  32 2c 72 38 3a 4d 55 4c  20 72 39 2c 72 32 2c 72  |2,r8:MUL r9,r2,r|
00007560  39 3a 4d 4f 56 20 72 38  2c 72 38 2c 41 53 52 20  |9:MOV r8,r8,ASR |
00007570  23 38 3a 4d 4f 56 20 72  39 2c 72 39 2c 41 53 52  |#8:MOV r9,r9,ASR|
00007580  20 23 38 3a 42 4c 20 6a  6d 0d 5f 64 fa 53 55 42  | #8:BL jm._d.SUB|
00007590  20 72 31 2c 72 31 2c 23  31 3a 2e 6a 69 20 41 44  | r1,r1,#1:.ji AD|
000075a0  44 20 72 31 32 2c 72 31  32 2c 23 32 34 3a 43 4d  |D r12,r12,#24:CM|
000075b0  50 20 72 31 2c 23 30 3a  42 4e 45 20 6a 68 3a 4c  |P r1,#0:BNE jh:L|
000075c0  44 4d 46 44 20 28 68 6a  29 21 2c 7b 50 43 7d 3a  |DMFD (hj)!,{PC}:|
000075d0  2e 6a 6d 20 53 54 4d 46  44 20 28 68 6a 29 21 2c  |.jm STMFD (hj)!,|
000075e0  7b 72 30 2d 72 31 32 2c  68 6b 7d 3a 61 64 64 20  |{r0-r12,hk}:add |
000075f0  72 38 2c 72 38 2c 72 31  30 3a 61 64 64 20 72 39  |r8,r8,r10:add r9|
00007600  2c 72 39 2c 72 31 31 3a  2e 6a 6e 20 4d 4f 56 20  |,r9,r11:.jn MOV |
00007610  72 30 2c 72 38 2c 4c 53  4c 20 23 31 36 3a 41 44  |r0,r8,LSL #16:AD|
00007620  44 20 72 30 2c 72 30 2c  72 39 3a 53 54 52 20 72  |D r0,r0,r9:STR r|
00007630  30 2c 5b 72 31 32 2c 23  32 30 5d 3a 73 75 62 20  |0,[r12,#20]:sub |
00007640  72 38 2c 72 38 2c 72 31  30 3a 73 75 62 20 72 39  |r8,r8,r10:sub r9|
00007650  2c 72 39 2c 72 31 31 3a  2e 6a 6f 20 4c 44 52 20  |,r9,r11:.jo LDR |
00007660  72 30 2c 6a 6c 3a 41 44  52 20 72 31 2c 6a 70 3a  |r0,jl:ADR r1,jp:|
00007670  41 44 44 20 72 31 2c 72  31 2c 72 30 2c 41 53 4c  |ADD r1,r1,r0,ASL|
00007680  20 23 31 0d 60 2c f3 4c  44 52 42 20 72 30 2c 5b  | #1.`,.LDRB r0,[|
00007690  72 31 2c 23 30 5d 3a 53  57 49 20 22 57 69 6d 70  |r1,#0]:SWI "Wimp|
000076a0  5f 53 65 74 43 6f 6c 6f  75 72 22 3a 4d 4f 56 20  |_SetColour":MOV |
000076b0  72 30 2c 23 34 3a 53 55  42 20 72 31 2c 72 38 2c  |r0,#4:SUB r1,r8,|
000076c0  23 36 3a 53 55 42 20 72  32 2c 72 39 2c 23 36 3a  |#6:SUB r2,r9,#6:|
000076d0  61 64 64 20 72 31 2c 72  31 2c 72 31 30 3a 61 64  |add r1,r1,r10:ad|
000076e0  64 20 72 32 2c 72 32 2c  72 31 31 3a 53 57 49 20  |d r2,r2,r11:SWI |
000076f0  22 4f 53 5f 50 6c 6f 74  22 3a 4d 4f 56 20 72 30  |"OS_Plot":MOV r0|
00007700  2c 23 39 36 2b 35 3a 41  44 44 20 72 31 2c 72 38  |,#96+5:ADD r1,r8|
00007710  2c 23 36 3a 41 44 44 20  72 32 2c 72 39 2c 23 36  |,#6:ADD r2,r9,#6|
00007720  3a 61 64 64 20 72 31 2c  72 31 2c 72 31 30 3a 61  |:add r1,r1,r10:a|
00007730  64 64 20 72 32 2c 72 32  2c 72 31 31 3a 53 57 49  |dd r2,r2,r11:SWI|
00007740  20 22 4f 53 5f 50 6c 6f  74 22 3a 2e 6a 71 20 4c  | "OS_Plot":.jq L|
00007750  44 52 20 72 30 2c 6a 6c  3a 41 44 52 20 72 31 2c  |DR r0,jl:ADR r1,|
00007760  6a 70 3a 41 44 44 20 72  31 2c 72 31 2c 72 30 2c  |jp:ADD r1,r1,r0,|
00007770  41 53 4c 20 23 31 0d 60  cc e8 4c 44 52 42 20 72  |ASL #1.`..LDRB r|
00007780  30 2c 5b 72 31 2c 23 31  5d 3a 53 57 49 20 22 57  |0,[r1,#1]:SWI "W|
00007790  69 6d 70 5f 53 65 74 43  6f 6c 6f 75 72 22 3a 4d  |imp_SetColour":M|
000077a0  4f 56 20 72 30 2c 23 34  3a 53 55 42 20 72 31 2c  |OV r0,#4:SUB r1,|
000077b0  72 38 2c 23 36 3a 53 55  42 20 72 32 2c 72 39 2c  |r8,#6:SUB r2,r9,|
000077c0  23 36 3a 61 64 64 20 72  31 2c 72 31 2c 72 31 30  |#6:add r1,r1,r10|
000077d0  3a 61 64 64 20 72 32 2c  72 32 2c 72 31 31 3a 53  |:add r2,r2,r11:S|
000077e0  57 49 20 22 4f 53 5f 50  6c 6f 74 22 3a 4d 4f 56  |WI "OS_Plot":MOV|
000077f0  20 72 30 2c 23 35 3a 41  44 44 20 72 31 2c 72 38  | r0,#5:ADD r1,r8|
00007800  2c 23 36 3a 53 55 42 20  72 32 2c 72 39 2c 23 36  |,#6:SUB r2,r9,#6|
00007810  3a 61 64 64 20 72 31 2c  72 31 2c 72 31 30 3a 61  |:add r1,r1,r10:a|
00007820  64 64 20 72 32 2c 72 32  2c 72 31 31 3a 53 57 49  |dd r2,r2,r11:SWI|
00007830  20 22 4f 53 5f 50 6c 6f  74 22 3a 4d 4f 56 20 72  | "OS_Plot":MOV r|
00007840  30 2c 23 35 3a 41 44 44  20 72 31 2c 72 38 2c 23  |0,#5:ADD r1,r8,#|
00007850  36 3a 41 44 44 20 72 32  2c 72 39 2c 23 36 0d 61  |6:ADD r2,r9,#6.a|
00007860  62 f6 61 64 64 20 72 31  2c 72 31 2c 72 31 30 3a  |b.add r1,r1,r10:|
00007870  61 64 64 20 72 32 2c 72  32 2c 72 31 31 3a 53 57  |add r2,r2,r11:SW|
00007880  49 20 22 4f 53 5f 50 6c  6f 74 22 3a 4d 4f 56 20  |I "OS_Plot":MOV |
00007890  72 30 2c 23 35 3a 53 55  42 20 72 31 2c 72 38 2c  |r0,#5:SUB r1,r8,|
000078a0  23 36 3a 41 44 44 20 72  32 2c 72 39 2c 23 36 3a  |#6:ADD r2,r9,#6:|
000078b0  61 64 64 20 72 31 2c 72  31 2c 72 31 30 3a 61 64  |add r1,r1,r10:ad|
000078c0  64 20 72 32 2c 72 32 2c  72 31 31 3a 53 57 49 20  |d r2,r2,r11:SWI |
000078d0  22 4f 53 5f 50 6c 6f 74  22 3a 4d 4f 56 20 72 30  |"OS_Plot":MOV r0|
000078e0  2c 23 35 3a 53 55 42 20  72 31 2c 72 38 2c 23 36  |,#5:SUB r1,r8,#6|
000078f0  3a 53 55 42 20 72 32 2c  72 39 2c 23 36 3a 61 64  |:SUB r2,r9,#6:ad|
00007900  64 20 72 31 2c 72 31 2c  72 31 30 3a 61 64 64 20  |d r1,r1,r10:add |
00007910  72 32 2c 72 32 2c 72 31  31 3a 53 57 49 20 22 4f  |r2,r2,r11:SWI "O|
00007920  53 5f 50 6c 6f 74 22 3a  4c 44 4d 46 44 20 28 68  |S_Plot":LDMFD (h|
00007930  6a 29 21 2c 7b 72 30 2d  72 31 32 2c 50 43 7d 3a  |j)!,{r0-r12,PC}:|
00007940  2e 6a 5a 20 44 43 44 20  66 6e 3a 2e 6a 61 20 44  |.jZ DCD fn:.ja D|
00007950  43 44 20 30 0d 62 0c f4  2e 6a 62 20 44 43 44 20  |CD 0.b...jb DCD |
00007960  30 3a 2e 6a 63 20 44 43  44 20 30 3a 2e 6a 64 20  |0:.jc DCD 0:.jd |
00007970  44 43 44 20 30 3a 2e 6a  65 20 44 43 44 20 30 3a  |DCD 0:.je DCD 0:|
00007980  2e 6a 66 20 44 43 44 20  30 3a 2e 6a 67 20 44 43  |.jf DCD 0:.jg DC|
00007990  44 20 30 3a 2e 6a 6b 20  44 43 44 20 30 3a 2e 6a  |D 0:.jk DCD 0:.j|
000079a0  6c 20 44 43 44 20 30 3a  2e 6a 70 20 44 43 42 20  |l DCD 0:.jp DCB |
000079b0  30 20 3a 20 44 43 42 20  35 3a 44 43 42 20 31 20  |0 : DCB 5:DCB 1 |
000079c0  3a 20 44 43 42 20 36 3a  44 43 42 20 32 20 3a 20  |: DCB 6:DCB 2 : |
000079d0  44 43 42 20 35 3a 44 43  42 20 33 20 3a 20 44 43  |DCB 5:DCB 3 : DC|
000079e0  42 20 36 3a 44 43 42 20  34 20 3a 20 44 43 42 20  |B 6:DCB 4 : DCB |
000079f0  31 3a 44 43 42 20 35 20  3a 20 44 43 42 20 32 3a  |1:DCB 5 : DCB 2:|
00007a00  44 43 42 20 36 20 3a 20  44 43 42 20 31 3a 44 43  |DCB 6 : DCB 1:DC|
00007a10  42 20 37 20 3a 20 44 43  42 20 32 3a 44 43 42 20  |B 7 : DCB 2:DCB |
00007a20  38 20 3a 20 44 43 42 20  31 35 3a 44 43 42 20 39  |8 : DCB 15:DCB 9|
00007a30  20 3a 20 44 43 42 20 31  31 3a 44 43 42 20 31 30  | : DCB 11:DCB 10|
00007a40  20 3a 20 44 43 42 20 30  0d 62 f2 f7 44 43 42 20  | : DCB 0.b..DCB |
00007a50  31 31 20 3a 20 44 43 42  20 31 34 3a 44 43 42 20  |11 : DCB 14:DCB |
00007a60  31 32 20 3a 20 44 43 42  20 34 3a 44 43 42 20 31  |12 : DCB 4:DCB 1|
00007a70  33 20 3a 20 44 43 42 20  31 30 3a 44 43 42 20 31  |3 : DCB 10:DCB 1|
00007a80  34 20 3a 20 44 43 42 20  31 31 3a 44 43 42 20 31  |4 : DCB 11:DCB 1|
00007a90  35 20 3a 20 44 43 42 20  38 3a 2e 6a 72 20 53 54  |5 : DCB 8:.jr ST|
00007aa0  4d 46 44 20 28 68 6a 29  21 2c 7b 68 6b 7d 3a 4c  |MFD (hj)!,{hk}:L|
00007ab0  44 52 20 72 30 2c 6a 73  3a 53 57 49 20 22 57 69  |DR r0,js:SWI "Wi|
00007ac0  6d 70 5f 53 65 74 43 6f  6c 6f 75 72 22 3a 4c 44  |mp_SetColour":LD|
00007ad0  52 20 72 31 32 2c 6a 74  3a 4c 44 52 20 72 31 31  |R r12,jt:LDR r11|
00007ae0  2c 6a 75 3a 4c 44 52 20  72 31 30 2c 6a 76 3a 4c  |,ju:LDR r10,jv:L|
00007af0  44 52 20 72 39 2c 6a 77  3a 4c 44 52 20 72 36 2c  |DR r9,jw:LDR r6,|
00007b00  6a 78 3a 42 4c 20 6a 79  3a 4c 44 52 20 72 31 32  |jx:BL jy:LDR r12|
00007b10  2c 6a 74 3a 42 4c 20 6a  7a 3a 4c 44 4d 46 44 20  |,jt:BL jz:LDMFD |
00007b20  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 6a 79 20 53  |(hj)!,{PC}:.jy S|
00007b30  54 4d 46 44 20 28 68 6a  29 21 2c 7b 68 6b 7d 0d  |TMFD (hj)!,{hk}.|
00007b40  63 ec fb 4d 4f 56 20 72  37 2c 72 31 30 3a 2e 6b  |c..MOV r7,r10:.k|
00007b50  55 20 53 55 42 20 72 38  2c 72 31 31 2c 23 31 3a  |U SUB r8,r11,#1:|
00007b60  2e 6b 56 20 4d 4f 56 20  72 30 2c 23 34 3a 4c 44  |.kV MOV r0,#4:LD|
00007b70  52 20 72 31 2c 5b 72 31  32 2c 23 32 30 5d 3a 20  |R r1,[r12,#20]: |
00007b80  4d 4f 56 20 72 31 2c 72  31 2c 4c 53 52 20 23 31  |MOV r1,r1,LSR #1|
00007b90  36 3a 4c 44 52 20 72 32  2c 5b 72 31 32 2c 23 32  |6:LDR r2,[r12,#2|
00007ba0  30 5d 3a 20 80 20 72 32  2c 72 32 2c 72 39 3a 53  |0]: . r2,r2,r9:S|
00007bb0  57 49 20 22 4f 53 5f 50  6c 6f 74 22 3a 41 44 44  |WI "OS_Plot":ADD|
00007bc0  20 72 31 32 2c 72 31 32  2c 23 32 34 3a 4d 4f 56  | r12,r12,#24:MOV|
00007bd0  20 72 30 2c 23 35 3a 4c  44 52 20 72 31 2c 5b 72  | r0,#5:LDR r1,[r|
00007be0  31 32 2c 23 32 30 5d 3a  20 4d 4f 56 20 72 31 2c  |12,#20]: MOV r1,|
00007bf0  72 31 2c 4c 53 52 20 23  31 36 3a 4c 44 52 20 72  |r1,LSR #16:LDR r|
00007c00  32 2c 5b 72 31 32 2c 23  32 30 5d 3a 20 80 20 72  |2,[r12,#20]: . r|
00007c10  32 2c 72 32 2c 72 39 3a  53 57 49 20 22 4f 53 5f  |2,r2,r9:SWI "OS_|
00007c20  50 6c 6f 74 22 3a 53 55  42 53 20 72 38 2c 72 38  |Plot":SUBS r8,r8|
00007c30  2c 23 31 3a 42 4e 45 20  6b 56 0d 64 6e f8 41 44  |,#1:BNE kV.dn.AD|
00007c40  44 20 72 31 32 2c 72 31  32 2c 23 32 34 3a 53 55  |D r12,r12,#24:SU|
00007c50  42 53 20 72 37 2c 72 37  2c 23 31 3a 42 4e 45 20  |BS r7,r7,#1:BNE |
00007c60  6b 55 3a 4c 44 4d 46 44  20 28 68 6a 29 21 2c 7b  |kU:LDMFD (hj)!,{|
00007c70  50 43 7d 3a 2e 6a 7a 20  53 54 4d 46 44 20 28 68  |PC}:.jz STMFD (h|
00007c80  6a 29 21 2c 7b 68 6b 7d  3a 4d 4f 56 20 72 37 2c  |j)!,{hk}:MOV r7,|
00007c90  72 31 31 3a 2e 6b 57 20  53 55 42 20 72 38 2c 72  |r11:.kW SUB r8,r|
00007ca0  31 30 2c 23 31 3a 4d 4f  56 20 72 35 2c 23 30 3a  |10,#1:MOV r5,#0:|
00007cb0  2e 6b 58 20 4d 4f 56 20  72 30 2c 23 34 3a 4c 44  |.kX MOV r0,#4:LD|
00007cc0  52 20 72 31 2c 5b 72 31  32 2c 23 32 30 5d 3a 20  |R r1,[r12,#20]: |
00007cd0  4d 4f 56 20 72 31 2c 72  31 2c 4c 53 52 20 23 31  |MOV r1,r1,LSR #1|
00007ce0  36 3a 4c 44 52 20 72 32  2c 5b 72 31 32 2c 23 32  |6:LDR r2,[r12,#2|
00007cf0  30 5d 3a 20 80 20 72 32  2c 72 32 2c 72 39 3a 53  |0]: . r2,r2,r9:S|
00007d00  57 49 20 22 4f 53 5f 50  6c 6f 74 22 3a 41 44 44  |WI "OS_Plot":ADD|
00007d10  20 72 31 32 2c 72 31 32  2c 72 36 3a 41 44 44 20  | r12,r12,r6:ADD |
00007d20  72 35 2c 72 35 2c 72 36  3a 4d 4f 56 20 72 30 2c  |r5,r5,r6:MOV r0,|
00007d30  23 35 0d 65 18 f1 4c 44  52 20 72 31 2c 5b 72 31  |#5.e..LDR r1,[r1|
00007d40  32 2c 23 32 30 5d 3a 20  4d 4f 56 20 72 31 2c 72  |2,#20]: MOV r1,r|
00007d50  31 2c 4c 53 52 20 23 31  36 3a 4c 44 52 20 72 32  |1,LSR #16:LDR r2|
00007d60  2c 5b 72 31 32 2c 23 32  30 5d 3a 20 80 20 72 32  |,[r12,#20]: . r2|
00007d70  2c 72 32 2c 72 39 3a 53  57 49 20 22 4f 53 5f 50  |,r2,r9:SWI "OS_P|
00007d80  6c 6f 74 22 3a 53 55 42  53 20 72 38 2c 72 38 2c  |lot":SUBS r8,r8,|
00007d90  23 31 3a 42 4e 45 20 6b  58 3a 53 55 42 20 72 31  |#1:BNE kX:SUB r1|
00007da0  32 2c 72 31 32 2c 72 35  3a 41 44 44 20 72 31 32  |2,r12,r5:ADD r12|
00007db0  2c 72 31 32 2c 23 32 34  3a 53 55 42 53 20 72 37  |,r12,#24:SUBS r7|
00007dc0  2c 72 37 2c 23 31 3a 42  4e 45 20 6b 57 3a 4c 44  |,r7,#1:BNE kW:LD|
00007dd0  4d 46 44 20 28 68 6a 29  21 2c 7b 50 43 7d 3a 2e  |MFD (hj)!,{PC}:.|
00007de0  6a 74 20 44 43 44 20 66  6e 3a 2e 6a 75 20 44 43  |jt DCD fn:.ju DC|
00007df0  44 20 30 3a 2e 6a 76 20  44 43 44 20 30 3a 2e 6a  |D 0:.jv DCD 0:.j|
00007e00  77 20 44 43 44 20 26 30  30 30 30 46 46 46 46 3a  |w DCD &0000FFFF:|
00007e10  2e 6a 78 20 44 43 44 20  30 3a 2e 6a 73 20 44 43  |.jx DCD 0:.js DC|
00007e20  44 20 30 0d 65 fe ff 2e  66 64 20 53 54 4d 46 44  |D 0.e...fd STMFD|
00007e30  20 28 68 6a 29 21 2c 7b  68 6b 7d 3a 4c 44 52 20  | (hj)!,{hk}:LDR |
00007e40  72 30 2c 6b 59 3a 4d 4f  56 20 72 31 2c 23 33 32  |r0,kY:MOV r1,#32|
00007e50  20 2a 31 30 32 34 3a 4d  4f 56 20 72 32 2c 23 30  | *1024:MOV r2,#0|
00007e60  3a 2e 6b 5a 20 53 54 52  20 72 32 2c 5b 72 30 2c  |:.kZ STR r2,[r0,|
00007e70  23 31 36 5d 3a 41 44 44  20 72 30 2c 72 30 2c 23  |#16]:ADD r0,r0,#|
00007e80  32 34 3a 53 55 42 53 20  72 31 2c 72 31 2c 23 32  |24:SUBS r1,r1,#2|
00007e90  34 3a 42 47 54 20 6b 5a  3a 4d 4f 56 20 72 30 2c  |4:BGT kZ:MOV r0,|
00007ea0  23 30 3a 53 54 52 20 72  30 2c 67 66 3a 4c 44 4d  |#0:STR r0,gf:LDM|
00007eb0  46 44 20 28 68 6a 29 21  2c 7b 50 43 7d 3a 2e 6b  |FD (hj)!,{PC}:.k|
00007ec0  59 20 44 43 44 20 66 6e  3a 2e 6b 61 20 53 54 4d  |Y DCD fn:.ka STM|
00007ed0  46 44 20 28 68 6a 29 21  2c 7b 68 6b 7d 3a 2e 6b  |FD (hj)!,{hk}:.k|
00007ee0  62 20 43 4d 50 20 72 32  2c 23 30 3a 4c 44 4d 45  |b CMP r2,#0:LDME|
00007ef0  51 46 44 20 28 68 6a 29  21 2c 7b 50 43 7d 3a 43  |QFD (hj)!,{PC}:C|
00007f00  4d 50 20 72 32 2c 23 34  3a 42 4c 54 20 6b 63 3a  |MP r2,#4:BLT kc:|
00007f10  2e 6b 64 20 4c 44 52 20  72 33 2c 5b 72 30 5d 2c  |.kd LDR r3,[r0],|
00007f20  23 34 0d 67 48 a3 53 54  52 20 72 33 2c 5b 72 31  |#4.gH.STR r3,[r1|
00007f30  5d 2c 23 34 3a 53 55 42  20 72 32 2c 72 32 2c 23  |],#4:SUB r2,r2,#|
00007f40  34 3a 42 20 6b 62 3a 2e  6b 63 20 4c 44 52 42 20  |4:B kb:.kc LDRB |
00007f50  72 33 2c 5b 72 30 5d 2c  23 31 3a 53 54 52 42 20  |r3,[r0],#1:STRB |
00007f60  72 33 2c 5b 72 31 5d 2c  23 31 3a 53 55 42 20 72  |r3,[r1],#1:SUB r|
00007f70  32 2c 72 32 2c 23 31 3a  42 20 6b 62 3a 2e 67 66  |2,r2,#1:B kb:.gf|
00007f80  20 44 43 44 20 30 3a 2e  6b 65 20 44 43 44 20 28  | DCD 0:.ke DCD (|
00007f90  33 32 2a 31 30 32 34 29  2f 32 34 3a 2e 66 6e 20  |32*1024)/24:.fn |
00007fa0  a4 63 74 69 6f 6e 5f 52  65 73 65 72 76 65 4d 65  |.ction_ReserveMe|
00007fb0  6d 6f 72 79 28 33 32 2a  31 30 32 34 29 3a 5d 3a  |mory(32*1024):]:|
00007fc0  ed 68 6e 3a e1 0d 68 b0  25 dd a4 63 74 69 6f 6e  |.hn:..h.%..ction|
00007fd0  5f 52 65 73 65 72 76 65  4d 65 6d 6f 72 79 28 6b  |_ReserveMemory(k|
00007fe0  66 29 3a e7 68 6e 3d 30  20 8c 0d 68 c4 0a 50 25  |f):.hn=0 ..h..P%|
00007ff0  2b 3d 6b 66 0d 68 ce 23  cc 3a e3 69 3d 30 20 b8  |+=kf.h.#.:.i=0 .|
00008000  6b 66 2d 31 88 34 3a 50  25 21 69 3d 30 3a ed 69  |kf-1.4:P%!i=0:.i|
00008010  3a 50 25 2b 3d 6b 66 0d  69 00 1c cd 3a 5b 4f 50  |:P%+=kf.i...:[OP|
00008020  54 20 68 6e 20 3a 20 41  4c 49 47 4e 20 3a 5d 3a  |T hn : ALIGN :]:|
00008030  3d 68 6e 0d 69 f0 35 dd  f2 56 63 3a c8 99 26 35  |=hn.i.5..Vc:..&5|
00008040  31 20 b8 6b 67 3a 6b 68  3d a4 63 74 69 6f 6e 5f  |1 .kg:kh=.ction_|
00008050  52 65 61 64 53 6c 6f 74  53 69 7a 65 3a 6b 69 3d  |ReadSlotSize:ki=|
00008060  30 3a 6b 6a 3d 93 3a e1  0d 6a 40 6f dd a4 63 74  |0:kj=.:..j@o..ct|
00008070  69 6f 6e 5f 41 6c 6c 6f  63 61 74 65 4d 65 6d 6f  |ion_AllocateMemo|
00008080  72 79 28 6b 6b 29 3a ea  6b 6c 2c 6b 6d 3a ea 6b  |ry(kk):.kl,km:.k|
00008090  6e 2c 6b 6f 2c 6b 70 3a  ea 6b 71 2c 6b 72 3a 6b  |n,ko,kp:.kq,kr:k|
000080a0  6c 3d 28 6b 6b 20 81 6b  67 29 2b 31 3a 6b 6d 3d  |l=(kk .kg)+1:km=|
000080b0  6b 6c 2a 20 6b 67 3a e7  a4 63 74 69 6f 6e 5f 52  |kl* kg:..ction_R|
000080c0  65 61 64 53 69 7a 65 4f  66 46 72 65 65 50 6f 6f  |eadSizeOfFreePoo|
000080d0  6c 3e 3d 6b 6b 20 8c 0d  6a 86 50 6b 6e 3d a4 63  |l>=kk ..j.Pkn=.c|
000080e0  74 69 6f 6e 5f 52 65 61  64 53 6c 6f 74 53 69 7a  |tion_ReadSlotSiz|
000080f0  65 3a 6b 6f 3d 6b 6e 2b  6b 6b 3a 6b 70 3d a4 63  |e:ko=kn+kk:kp=.c|
00008100  74 69 6f 6e 5f 53 65 74  53 6c 6f 74 53 69 7a 65  |tion_SetSlotSize|
00008110  28 6b 6f 29 3a 6b 69 2b  3d 6b 6b 3a 6b 6a 2b 3d  |(ko):ki+=kk:kj+=|
00008120  6b 6b 3a 6b 72 3d b9 0d  6a c2 0c cc 3a 6b 72 3d  |kk:kr=..j...:kr=|
00008130  20 ac b9 0d 6a d6 09 cd  3a 3d 6b 72 0d 6a fe 3b  | ...j...:=kr.j.;|
00008140  dd a4 63 74 69 6f 6e 5f  41 6c 69 67 6e 54 6f 50  |..ction_AlignToP|
00008150  61 67 65 53 69 7a 65 28  6b 6b 29 3a 6b 6c 3d 28  |ageSize(kk):kl=(|
00008160  6b 6b 20 81 6b 67 29 2b  31 3a 6b 6d 3d 6b 6c 2a  |kk .kg)+1:km=kl*|
00008170  20 6b 67 3a 3d 6b 6d 0d  6b 3a 28 dd f2 6b 73 3a  | kg:=km.k:(..ks:|
00008180  6b 6e 3d a4 63 74 69 6f  6e 5f 52 65 61 64 53 6c  |kn=.ction_ReadSl|
00008190  6f 74 53 69 7a 65 3a e7  6b 6e 3e 6b 68 20 8c 0d  |otSize:.kn>kh ..|
000081a0  6b 58 22 59 6a 3d a4 63  74 69 6f 6e 5f 53 65 74  |kX"Yj=.ction_Set|
000081b0  53 6c 6f 74 53 69 7a 65  28 6b 68 29 3a 6b 69 3d  |SlotSize(kh):ki=|
000081c0  30 0d 6b 6c 07 cd 3a e1  0d 6b f8 30 dd f2 56 67  |0.kl..:..k.0..Vg|
000081d0  28 68 6e 29 3a 68 6a 3d  31 33 3a 68 6b 3d 31 34  |(hn):hj=13:hk=14|
000081e0  3a 68 6c 3d 31 35 3a e7  68 6e 3d 30 20 8c de 6b  |:hl=15:.hn=0 ..k|
000081f0  74 20 38 2a 31 30 32 34  0d 6c 16 f4 50 25 3d 6b  |t 8*1024.l..P%=k|
00008200  74 3a 5b 4f 50 54 20 68  6e 3a 2e 6b 75 20 44 43  |t:[OPT hn:.ku DC|
00008210  44 20 61 78 3a 2e 6b 76  20 53 54 4d 46 44 20 28  |D ax:.kv STMFD (|
00008220  68 6a 29 21 2c 7b 72 31  32 2c 68 6b 7d 3a 4c 44  |hj)!,{r12,hk}:LD|
00008230  52 20 72 31 32 2c 6b 75  3a 4c 44 52 20 72 31 32  |R r12,ku:LDR r12|
00008240  2c 5b 72 31 32 5d 3a 43  4d 50 20 72 31 32 2c 23  |,[r12]:CMP r12,#|
00008250  31 20 3a 20 42 45 51 20  6b 77 3a 43 4d 50 20 72  |1 : BEQ kw:CMP r|
00008260  31 32 2c 23 32 20 3a 20  42 45 51 20 6b 78 3a 43  |12,#2 : BEQ kx:C|
00008270  4d 50 20 72 31 32 2c 23  33 20 3a 20 42 45 51 20  |MP r12,#3 : BEQ |
00008280  6b 78 3a 43 4d 50 20 72  31 32 2c 23 34 20 3a 20  |kx:CMP r12,#4 : |
00008290  42 45 51 20 6b 79 3a 43  4d 50 20 72 31 32 2c 23  |BEQ ky:CMP r12,#|
000082a0  35 20 3a 20 42 45 51 20  6b 7a 3a 2e 6b 77 20 42  |5 : BEQ kz:.kw B|
000082b0  4c 20 6c 55 20 3a 20 4c  44 4d 46 44 20 28 68 6a  |L lU : LDMFD (hj|
000082c0  29 21 2c 7b 72 31 32 2c  50 43 7d 3a 2e 6b 78 20  |)!,{r12,PC}:.kx |
000082d0  42 4c 20 6c 56 20 3a 20  4c 44 4d 46 44 20 28 68  |BL lV : LDMFD (h|
000082e0  6a 29 21 2c 7b 72 31 32  2c 50 43 7d 0d 6c e8 e8  |j)!,{r12,PC}.l..|
000082f0  2e 6b 79 20 42 4c 20 6c  57 20 3a 20 4c 44 4d 46  |.ky BL lW : LDMF|
00008300  44 20 28 68 6a 29 21 2c  7b 72 31 32 2c 50 43 7d  |D (hj)!,{r12,PC}|
00008310  3a 2e 6b 7a 20 42 4c 20  6c 58 20 3a 20 4c 44 4d  |:.kz BL lX : LDM|
00008320  46 44 20 28 68 6a 29 21  2c 7b 72 31 32 2c 50 43  |FD (hj)!,{r12,PC|
00008330  7d 3a 2e 6c 55 20 53 54  4d 46 44 20 28 68 6a 29  |}:.lU STMFD (hj)|
00008340  21 2c 7b 72 31 2d 72 34  2c 68 6b 7d 3a 2e 6c 59  |!,{r1-r4,hk}:.lY|
00008350  20 41 44 44 20 72 33 2c  72 33 2c 23 37 3a 4d 4f  | ADD r3,r3,#7:MO|
00008360  56 20 72 33 2c 72 33 2c  4c 53 52 20 23 33 3a 4d  |V r3,r3,LSR #3:M|
00008370  4f 56 20 72 33 2c 72 33  2c 4c 53 4c 20 23 32 3a  |OV r3,r3,LSL #2:|
00008380  2e 6c 5a 20 4d 55 4c 20  72 34 2c 72 33 2c 72 31  |.lZ MUL r4,r3,r1|
00008390  3a 41 44 44 20 72 32 2c  72 32 2c 72 34 3a 2e 6c  |:ADD r2,r2,r4:.l|
000083a0  61 20 41 44 44 20 72 32  2c 72 32 2c 72 30 2c 41  |a ADD r2,r2,r0,A|
000083b0  53 52 20 23 31 3a 4c 44  52 42 20 72 34 2c 5b 72  |SR #1:LDRB r4,[r|
000083c0  32 5d 3a 2e 6c 62 20 80  53 20 72 30 2c 20 72 30  |2]:.lb .S r0, r0|
000083d0  2c 20 23 31 0d 6d 6a f3  20 80 45 51 20 72 30 2c  |, #1.mj. .EQ r0,|
000083e0  20 72 34 2c 20 23 25 30  30 30 30 31 31 31 31 3a  | r4, #%00001111:|
000083f0  20 80 4e 45 20 72 30 2c  20 72 34 2c 20 23 25 31  | .NE r0, r4, #%1|
00008400  31 31 31 30 30 30 30 3a  4d 4f 56 4e 45 20 72 30  |1110000:MOVNE r0|
00008410  2c 72 30 2c 4c 53 52 20  23 34 3a 4c 44 4d 46 44  |,r0,LSR #4:LDMFD|
00008420  20 28 68 6a 29 21 2c 7b  72 31 2d 72 34 2c 50 43  | (hj)!,{r1-r4,PC|
00008430  7d 3a 2e 6c 56 20 53 54  4d 46 44 20 28 68 6a 29  |}:.lV STMFD (hj)|
00008440  21 2c 7b 72 31 2d 72 34  2c 68 6b 7d 3a 4c 44 4d  |!,{r1-r4,hk}:LDM|
00008450  46 44 20 28 68 6a 29 21  2c 7b 72 31 2d 72 34 2c  |FD (hj)!,{r1-r4,|
00008460  50 43 7d 3a 2e 6c 58 20  53 54 4d 46 44 20 28 68  |PC}:.lX STMFD (h|
00008470  6a 29 21 2c 7b 72 31 2d  72 34 2c 68 6b 7d 3a 4c  |j)!,{r1-r4,hk}:L|
00008480  44 4d 46 44 20 28 68 6a  29 21 2c 7b 72 31 2d 72  |DMFD (hj)!,{r1-r|
00008490  34 2c 50 43 7d 3a 2e 6c  57 20 53 54 4d 46 44 20  |4,PC}:.lW STMFD |
000084a0  28 68 6a 29 21 2c 7b 72  31 2d 72 34 2c 68 6b 7d  |(hj)!,{r1-r4,hk}|
000084b0  3a 4c 44 4d 46 44 20 28  68 6a 29 21 2c 7b 72 31  |:LDMFD (hj)!,{r1|
000084c0  2d 72 34 2c 50 43 7d 0d  6e 50 fc 2e 6c 63 20 53  |-r4,PC}.nP..lc S|
000084d0  54 4d 46 44 20 28 68 6a  29 21 2c 7b 72 31 32 2c  |TMFD (hj)!,{r12,|
000084e0  68 6b 7d 3a 4c 44 52 20  72 31 32 2c 6b 75 3a 4c  |hk}:LDR r12,ku:L|
000084f0  44 52 20 72 31 32 2c 5b  72 31 32 5d 3a 43 4d 50  |DR r12,[r12]:CMP|
00008500  20 72 31 32 2c 23 31 20  3a 20 42 45 51 20 6c 64  | r12,#1 : BEQ ld|
00008510  3a 43 4d 50 20 72 31 32  2c 23 32 20 3a 20 42 45  |:CMP r12,#2 : BE|
00008520  51 20 6c 65 3a 43 4d 50  20 72 31 32 2c 23 33 20  |Q le:CMP r12,#3 |
00008530  3a 20 42 45 51 20 6c 65  3a 43 4d 50 20 72 31 32  |: BEQ le:CMP r12|
00008540  2c 23 34 20 3a 20 42 45  51 20 6c 66 3a 43 4d 50  |,#4 : BEQ lf:CMP|
00008550  20 72 31 32 2c 23 35 20  3a 20 42 45 51 20 6c 67  | r12,#5 : BEQ lg|
00008560  3a 2e 6c 64 20 42 4c 20  6c 68 20 3a 20 4c 44 4d  |:.ld BL lh : LDM|
00008570  46 44 20 28 68 6a 29 21  2c 7b 72 31 32 2c 50 43  |FD (hj)!,{r12,PC|
00008580  7d 3a 2e 6c 65 20 42 4c  20 6c 69 20 3a 20 4c 44  |}:.le BL li : LD|
00008590  4d 46 44 20 28 68 6a 29  21 2c 7b 72 31 32 2c 50  |MFD (hj)!,{r12,P|
000085a0  43 7d 3a 2e 6c 66 20 42  4c 20 6c 6a 20 3a 20 4c  |C}:.lf BL lj : L|
000085b0  44 4d 46 44 20 28 68 6a  29 21 2c 7b 72 31 32 2c  |DMFD (hj)!,{r12,|
000085c0  50 43 7d 0d 6e be f5 2e  6c 67 20 42 4c 20 6c 6b  |PC}.n...lg BL lk|
000085d0  20 3a 20 4c 44 4d 46 44  20 28 68 6a 29 21 2c 7b  | : LDMFD (hj)!,{|
000085e0  72 31 32 2c 50 43 7d 3a  2e 6c 68 20 53 54 4d 46  |r12,PC}:.lh STMF|
000085f0  44 20 28 68 6a 29 21 2c  7b 72 30 2d 72 35 2c 68  |D (hj)!,{r0-r5,h|
00008600  6b 7d 3a 2e 6c 6c 20 41  44 44 20 72 33 2c 72 33  |k}:.ll ADD r3,r3|
00008610  2c 23 37 3a 4d 4f 56 20  72 33 2c 72 33 2c 4c 53  |,#7:MOV r3,r3,LS|
00008620  52 20 23 33 3a 4d 4f 56  20 72 33 2c 72 33 2c 4c  |R #3:MOV r3,r3,L|
00008630  53 4c 20 23 32 3a 2e 6c  6d 20 4d 55 4c 20 72 35  |SL #2:.lm MUL r5|
00008640  2c 72 33 2c 72 31 3a 41  44 44 20 72 32 2c 72 32  |,r3,r1:ADD r2,r2|
00008650  2c 72 35 3a 2e 6c 6e 20  41 44 44 20 72 32 2c 72  |,r5:.ln ADD r2,r|
00008660  32 2c 72 30 2c 41 53 52  20 23 31 3a 4c 44 52 42  |2,r0,ASR #1:LDRB|
00008670  20 72 35 2c 5b 72 32 5d  3a 2e 6c 6f 20 80 53 20  | r5,[r2]:.lo .S |
00008680  72 30 2c 20 72 30 2c 20  23 31 3a 20 80 4e 45 20  |r0, r0, #1: .NE |
00008690  72 35 2c 20 72 35 2c 20  23 25 30 30 30 30 31 31  |r5, r5, #%000011|
000086a0  31 31 3a 41 44 44 4e 45  20 72 35 2c 72 35 2c 72  |11:ADDNE r5,r5,r|
000086b0  34 2c 4c 53 4c 20 23 34  0d 6f 4a f6 20 80 45 51  |4,LSL #4.oJ. .EQ|
000086c0  20 72 35 2c 20 72 35 2c  20 23 25 31 31 31 31 30  | r5, r5, #%11110|
000086d0  30 30 30 3a 41 44 44 45  51 20 72 35 2c 72 35 2c  |000:ADDEQ r5,r5,|
000086e0  72 34 3a 53 54 52 42 20  72 35 2c 5b 72 32 5d 3a  |r4:STRB r5,[r2]:|
000086f0  4c 44 4d 46 44 20 28 68  6a 29 21 2c 7b 72 30 2d  |LDMFD (hj)!,{r0-|
00008700  72 35 2c 50 43 7d 3a 2e  6c 69 20 53 54 4d 46 44  |r5,PC}:.li STMFD|
00008710  20 28 68 6a 29 21 2c 7b  72 30 2d 72 34 2c 68 6b  | (hj)!,{r0-r4,hk|
00008720  7d 3a 4c 44 4d 46 44 20  28 68 6a 29 21 2c 7b 72  |}:LDMFD (hj)!,{r|
00008730  30 2d 72 34 2c 50 43 7d  3a 2e 6c 6b 20 53 54 4d  |0-r4,PC}:.lk STM|
00008740  46 44 20 28 68 6a 29 21  2c 7b 72 30 2d 72 34 2c  |FD (hj)!,{r0-r4,|
00008750  68 6b 7d 3a 4c 44 4d 46  44 20 28 68 6a 29 21 2c  |hk}:LDMFD (hj)!,|
00008760  7b 72 30 2d 72 34 2c 50  43 7d 3a 2e 6c 6a 20 53  |{r0-r4,PC}:.lj S|
00008770  54 4d 46 44 20 28 68 6a  29 21 2c 7b 72 30 2d 72  |TMFD (hj)!,{r0-r|
00008780  36 2c 68 6b 7d 3a 4c 44  4d 46 44 20 28 68 6a 29  |6,hk}:LDMFD (hj)|
00008790  21 2c 7b 72 30 2d 72 36  2c 50 43 7d 3a 2e 6c 70  |!,{r0-r6,PC}:.lp|
000087a0  20 44 43 44 20 26 30 30  30 30 46 46 46 46 0d 70  | DCD &0000FFFF.p|
000087b0  4e ec 2e 6c 71 20 53 54  4d 46 44 20 28 68 6a 29  |N..lq STMFD (hj)|
000087c0  21 2c 7b 68 6b 7d 3a 4c  44 52 20 72 31 32 2c 6b  |!,{hk}:LDR r12,k|
000087d0  75 3a 4c 44 52 20 72 31  32 2c 5b 72 31 32 5d 3a  |u:LDR r12,[r12]:|
000087e0  43 4d 50 20 72 31 32 2c  23 31 20 3a 20 42 45 51  |CMP r12,#1 : BEQ|
000087f0  20 6c 72 3a 43 4d 50 20  72 31 32 2c 23 32 20 3a  | lr:CMP r12,#2 :|
00008800  20 42 45 51 20 6c 73 3a  43 4d 50 20 72 31 32 2c  | BEQ ls:CMP r12,|
00008810  23 33 20 3a 20 42 45 51  20 6c 74 3a 43 4d 50 20  |#3 : BEQ lt:CMP |
00008820  72 31 32 2c 23 34 20 3a  20 42 45 51 20 6c 75 3a  |r12,#4 : BEQ lu:|
00008830  43 4d 50 20 72 31 32 2c  23 35 20 3a 20 42 45 51  |CMP r12,#5 : BEQ|
00008840  20 6c 76 3a 2e 6c 72 20  42 4c 20 6c 77 20 3a 20  | lv:.lr BL lw : |
00008850  4c 44 4d 46 44 20 28 68  6a 29 21 2c 7b 50 43 7d  |LDMFD (hj)!,{PC}|
00008860  3a 2e 6c 73 20 42 4c 20  6c 78 20 3a 20 4c 44 4d  |:.ls BL lx : LDM|
00008870  46 44 20 28 68 6a 29 21  2c 7b 50 43 7d 3a 2e 6c  |FD (hj)!,{PC}:.l|
00008880  74 20 42 4c 20 6c 79 20  3a 20 4c 44 4d 46 44 20  |t BL ly : LDMFD |
00008890  28 68 6a 29 21 2c 7b 50  43 7d 0d 70 bc f9 2e 6c  |(hj)!,{PC}.p...l|
000088a0  76 20 42 4c 20 6c 7a 20  3a 20 4c 44 4d 46 44 20  |v BL lz : LDMFD |
000088b0  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 6c 75 20 42  |(hj)!,{PC}:.lu B|
000088c0  4c 20 6d 55 20 3a 20 4c  44 4d 46 44 20 28 68 6a  |L mU : LDMFD (hj|
000088d0  29 21 2c 7b 50 43 7d 3a  2e 6c 77 20 53 54 4d 46  |)!,{PC}:.lw STMF|
000088e0  44 20 28 68 6a 29 21 2c  7b 68 6b 7d 3a 42 4c 20  |D (hj)!,{hk}:BL |
000088f0  6d 56 3a 4c 44 4d 46 44  20 28 68 6a 29 21 2c 7b  |mV:LDMFD (hj)!,{|
00008900  50 43 7d 3a 2e 6c 79 20  53 54 4d 46 44 20 28 68  |PC}:.ly STMFD (h|
00008910  6a 29 21 2c 7b 68 6b 7d  3a 4c 44 4d 46 44 20 28  |j)!,{hk}:LDMFD (|
00008920  68 6a 29 21 2c 7b 50 43  7d 3a 2e 6c 78 20 53 54  |hj)!,{PC}:.lx ST|
00008930  4d 46 44 20 28 68 6a 29  21 2c 7b 72 31 2d 72 31  |MFD (hj)!,{r1-r1|
00008940  32 2c 68 6b 7d 3a 4c 44  4d 46 44 20 28 68 6a 29  |2,hk}:LDMFD (hj)|
00008950  21 2c 7b 72 31 2d 72 31  32 2c 50 43 7d 3a 2e 6d  |!,{r1-r12,PC}:.m|
00008960  57 20 a4 63 74 69 6f 6e  5f 54 61 62 6c 65 5f 46  |W .ction_Table_F|
00008970  6f 72 5f 38 62 70 70 3a  2e 6c 7a 20 53 54 4d 46  |or_8bpp:.lz STMF|
00008980  44 20 28 68 6a 29 21 2c  7b 72 31 2d 72 31 32 2c  |D (hj)!,{r1-r12,|
00008990  68 6b 7d 0d 71 8e fe 4c  44 4d 46 44 20 28 68 6a  |hk}.q..LDMFD (hj|
000089a0  29 21 2c 7b 72 31 2d 72  31 32 2c 50 43 7d 3a 2e  |)!,{r1-r12,PC}:.|
000089b0  6d 55 20 53 54 4d 46 44  20 28 68 6a 29 21 2c 7b  |mU STMFD (hj)!,{|
000089c0  72 31 2d 72 31 32 2c 68  6b 7d 3a 4c 44 4d 46 44  |r1-r12,hk}:LDMFD|
000089d0  20 28 68 6a 29 21 2c 7b  72 31 2d 72 31 32 2c 50  | (hj)!,{r1-r12,P|
000089e0  43 7d 3a 2e 6d 56 20 53  54 4d 46 44 20 28 68 6a  |C}:.mV STMFD (hj|
000089f0  29 21 2c 7b 72 31 2d 72  33 2c 68 6b 7d 3a 4c 44  |)!,{r1-r3,hk}:LD|
00008a00  52 20 72 32 2c 6d 58 3a  4c 44 52 20 72 33 2c 6d  |R r2,mX:LDR r3,m|
00008a10  59 3a 53 55 42 20 72 33  2c 72 33 2c 72 32 3a 4d  |Y:SUB r3,r3,r2:M|
00008a20  55 4c 20 72 33 2c 72 30  2c 72 33 3a 4d 55 4c 20  |UL r3,r0,r3:MUL |
00008a30  72 32 2c 72 31 2c 72 32  3a 41 44 44 20 72 30 2c  |r2,r1,r2:ADD r0,|
00008a40  72 32 2c 72 33 3a 4d 4f  56 20 72 30 2c 72 30 2c  |r2,r3:MOV r0,r0,|
00008a50  41 53 52 20 23 38 3a 4c  44 4d 46 44 20 28 68 6a  |ASR #8:LDMFD (hj|
00008a60  29 21 2c 7b 72 31 2d 72  33 2c 50 43 7d 3a 2e 6d  |)!,{r1-r3,PC}:.m|
00008a70  58 20 44 43 44 20 30 3a  2e 6d 59 20 44 43 44 20  |X DCD 0:.mY DCD |
00008a80  28 31 30 30 2f 31 30 30  29 2a 32 35 36 3a 5d 3a  |(100/100)*256:]:|
00008a90  e1 0d 72 c4 1e dd a4 63  74 69 6f 6e 5f 54 61 62  |..r....ction_Tab|
00008aa0  6c 65 5f 46 6f 72 5f 38  62 70 70 3a 3d 68 6e 0d  |le_For_8bpp:=hn.|
00008ab0  73 c8 41 dd f2 63 58 28  5a 7a 24 29 3a c8 99 26  |s.A..cX(Zz$):..&|
00008ac0  34 30 30 43 46 2c 2c 55  6a 3a 63 69 3d 55 6a 21  |400CF,,Uj:ci=Uj!|
00008ad0  31 32 3a 62 6d 3d 55 6a  21 31 36 3a 64 77 24 3d  |12:bm=Uj!16:dw$=|
00008ae0  22 55 4e 4b 4e 4f 57 4e  22 3a c8 8e 63 69 20 ca  |"UNKNOWN":..ci .|
00008af0  0d 74 04 10 c9 55 62 3a  e7 62 6d 3d 56 68 20 8c  |.t...Ub:.bm=Vh .|
00008b00  0d 74 0e 0b e7 20 ac 56  6a 20 8c 0d 74 18 10 64  |.t... .Vj ..t..d|
00008b10  77 24 3d 22 53 4f 55 52  43 45 22 0d 74 22 1e cc  |w$="SOURCE".t"..|
00008b20  3a e7 20 ac 56 6e 20 8c  64 77 24 3d 22 44 45 53  |:. .Vn .dw$="DES|
00008b30  54 49 4e 41 54 49 4f 4e  22 0d 74 36 05 cd 0d 74  |TINATION".t6...t|
00008b40  40 05 cd 0d 74 4a 1b c9  57 6a 3a e7 62 6d 3d 30  |@...tJ..Wj:.bm=0|
00008b50  20 8c 64 77 24 3d 22 53  4f 55 52 43 45 22 0d 74  | .dw$="SOURCE".t|
00008b60  54 1c e7 62 6d 3d 32 20  8c 64 77 24 3d 22 44 45  |T..bm=2 .dw$="DE|
00008b70  53 54 49 4e 41 54 49 4f  4e 22 0d 74 5e 14 c9 58  |STINATION".t^..X|
00008b80  77 3a 64 77 24 3d 22 53  4f 55 52 43 45 22 0d 74  |w:dw$="SOURCE".t|
00008b90  68 19 c9 58 7a 3a 64 77  24 3d 22 44 45 53 54 49  |h..Xz:dw$="DESTI|
00008ba0  4e 41 54 49 4f 4e 22 0d  74 72 18 c9 59 6e 3a 64  |NATION".tr..Yn:d|
00008bb0  77 24 3d 22 42 41 43 4b  47 52 4f 55 4e 44 22 0d  |w$="BACKGROUND".|
00008bc0  74 7c 16 cb 3a e7 64 77  24 3d 22 55 4e 4b 4e 4f  |t|..:.dw$="UNKNO|
00008bd0  57 4e 22 20 8c 0d 74 90  4e 59 69 24 3d a4 63 74  |WN" ..t.NYi$=.ct|
00008be0  69 6f 6e 5f 54 61 67 54  6f 53 74 72 69 6e 67 28  |ion_TagToString(|
00008bf0  22 65 72 72 30 32 22 29  3a 59 6a 3d a4 63 74 69  |"err02"):Yj=.cti|
00008c00  6f 6e 5f 52 65 70 6f 72  74 45 72 72 6f 72 28 55  |on_ReportError(U|
00008c10  6a 2c 39 39 2c 55 63 24  2c 59 69 24 2c 20 ac b9  |j,99,Uc$,Yi$, ..|
00008c20  2c b9 29 0d 74 a4 0d cc  3a c8 8e 64 77 24 20 ca  |,.).t...:..dw$ .|
00008c30  0d 74 b8 16 c9 22 53 4f  55 52 43 45 22 3a f2 67  |.t..."SOURCE":.g|
00008c40  6d 28 5a 7a 24 29 0d 74  c2 1b c9 22 44 45 53 54  |m(Zz$).t..."DEST|
00008c50  49 4e 41 54 49 4f 4e 22  3a f2 67 6e 28 5a 7a 24  |INATION":.gn(Zz$|
00008c60  29 0d 74 cc 1a c9 22 42  41 43 4b 47 52 4f 55 4e  |).t..."BACKGROUN|
00008c70  44 22 3a f2 67 6f 28 5a  7a 24 29 0d 74 d6 05 cb  |D":.go(Zz$).t...|
00008c80  0d 74 e0 07 cd 3a e1 0d  75 08 1b dd f2 5a 68 3a  |.t...:..u....Zh:|
00008c90  e7 56 6a 20 8c f2 6d 5a  28 56 6b 2c 55 74 2c 56  |.Vj ..mZ(Vk,Ut,V|
00008ca0  6d 29 0d 75 1c 16 e7 56  6e 20 8c f2 6d 5a 28 56  |m).u...Vn ..mZ(V|
00008cb0  6f 2c 55 75 2c 56 75 29  0d 75 26 16 e7 56 72 20  |o,Uu,Vu).u&..Vr |
00008cc0  8c f2 6d 5a 28 56 73 2c  55 76 2c 56 71 29 0d 75  |..mZ(Vs,Uv,Vq).u|
00008cd0  30 05 e1 0d 75 4e 1a dd  f2 6d 5a 28 6d 61 2c 6d  |0...uN...mZ(ma,m|
00008ce0  62 2c 6d 63 29 3a e7 20  ac 6d 63 20 8c 0d 75 b2  |b,mc):. .mc ..u.|
00008cf0  c0 6d 64 24 3d a4 63 74  69 6f 6e 5f 4e 61 6d 65  |.md$=.ction_Name|
00008d00  4f 66 4e 74 68 53 70 72  69 74 65 28 6d 61 2c 31  |OfNthSprite(ma,1|
00008d10  29 3a 6d 65 3d a4 63 74  69 6f 6e 5f 4d 6f 64 65  |):me=.ction_Mode|
00008d20  4f 66 53 70 72 69 74 65  28 6d 61 2c 6d 64 24 2c  |OfSprite(ma,md$,|
00008d30  20 ac b9 29 3a 6d 66 3d  a4 63 74 69 6f 6e 5f 53  | ..):mf=.ction_S|
00008d40  70 72 69 74 65 48 61 73  50 61 6c 65 74 74 65 28  |priteHasPalette(|
00008d50  6d 61 2c 6d 64 24 29 3a  6d 67 3d a4 63 74 69 6f  |ma,md$):mg=.ctio|
00008d60  6e 5f 50 6f 69 6e 74 65  72 54 6f 53 70 72 69 74  |n_PointerToSprit|
00008d70  65 44 61 74 61 28 6d 61  2c 6d 64 24 29 3a c8 99  |eData(ma,md$):..|
00008d80  26 33 35 2c 6d 65 2c 33  20 b8 2c 2c 6d 68 3a 6d  |&35,me,3 .,,mh:m|
00008d90  69 3d 6d 67 2d 6d 66 3a  6d 6a 3d 28 6d 69 2f 38  |i=mg-mf:mj=(mi/8|
00008da0  29 2d 31 3a e7 6d 66 3c  3e 2d 31 20 8c 0d 76 02  |)-1:.mf<>-1 ..v.|
00008db0  38 6d 6b 3d 55 77 3a e3  65 57 3d 30 20 b8 6d 6a  |8mk=Uw:.eW=0 .mj|
00008dc0  3a 21 28 6d 6b 2b 28 65  57 2a 34 29 20 29 20 3d  |:!(mk+(eW*4) ) =|
00008dd0  20 21 28 20 6d 66 20 2b  20 28 65 57 2a 38 29 20  | !( mf + (eW*8) |
00008de0  29 3a ed 65 57 0d 76 2a  0e cc 3a e7 6d 68 3d 36  |):.eW.v*..:.mh=6|
00008df0  33 20 8c 0d 76 3e 08 6d  6b 3d 30 0d 76 48 45 cc  |3 ..v>.mk=0.vHE.|
00008e00  3a 6d 6b 3d 55 77 3a c8  99 26 34 30 30 45 35 2c  |:mk=Uw:..&400E5,|
00008e10  2c 6d 6b 3a e3 69 3d 30  20 b8 31 35 3a 6d 6b 21  |,mk:.i=0 .15:mk!|
00008e20  28 69 2a 34 29 20 3d 20  28 6d 6b 21 28 69 2a 34  |(i*4) = (mk!(i*4|
00008e30  29 20 80 26 46 46 46 46  46 46 30 30 29 3a ed 69  |) .&FFFFFF00):.i|
00008e40  0d 76 84 05 cd 0d 76 8e  10 cd 3a e7 6d 6a 3c 3e  |.v....v...:.mj<>|
00008e50  32 35 35 20 8c 0d 76 a2  1b c8 99 26 34 30 37 34  |255 ..v....&4074|
00008e60  30 2c 6d 65 2c 6d 6b 2c  2d 31 2c 2d 31 2c 6d 62  |0,me,mk,-1,-1,mb|
00008e70  0d 76 ac 3b cc 3a e3 65  57 3d 30 20 b8 6d 6a 3a  |.v.;.:.eW=0 .mj:|
00008e80  41 25 3d 21 28 6d 66 2b  65 57 2a 38 20 29 3a c8  |A%=!(mf+eW*8 ):.|
00008e90  99 26 34 30 37 34 34 2c  41 25 20 b8 6d 6c 3a 6d  |.&40744,A% .ml:m|
00008ea0  62 3f 65 57 3d 6d 6c 3a  ed 65 57 0d 76 e8 05 cd  |b?eW=ml:.eW.v...|
00008eb0  0d 76 f2 61 cc 3a 6d 64  24 3d a4 63 74 69 6f 6e  |.v.a.:md$=.ction|
00008ec0  5f 4e 61 6d 65 4f 66 4e  74 68 53 70 72 69 74 65  |_NameOfNthSprite|
00008ed0  28 6d 61 2c 31 29 3a 6d  65 3d a4 63 74 69 6f 6e  |(ma,1):me=.ction|
00008ee0  5f 4d 6f 64 65 4f 66 53  70 72 69 74 65 28 6d 61  |_ModeOfSprite(ma|
00008ef0  2c 6d 64 24 2c 20 ac b9  29 3a c8 99 26 34 30 37  |,md$, ..):..&407|
00008f00  34 30 2c 6d 65 2c 55 77  2c 2d 31 2c 2d 31 2c 6d  |40,me,Uw,-1,-1,m|
00008f10  62 0d 77 6a 07 cd 3a e1  0d 77 92 30 dd f2 5a 69  |b.wj..:..w.0..Zi|
00008f20  3a c8 99 26 33 35 2c 2d  31 2c 34 20 b8 2c 2c 63  |:..&35,-1,4 .,,c|
00008f30  7a 3a c8 99 26 33 35 2c  2d 31 2c 35 20 b8 2c 2c  |z:..&35,-1,5 .,,|
00008f40  64 56 3a e7 56 6a 20 8c  0d 77 ce 3a c8 99 26 33  |dV:.Vj ..w.:..&3|
00008f50  35 2c 6d 6d 2c 34 20 b8  2c 2c 6d 6e 3a c8 99 26  |5,mm,4 .,,mn:..&|
00008f60  33 35 2c 6d 6d 2c 35 20  b8 2c 2c 6d 6f 3a 64 55  |35,mm,5 .,,mo:dU|
00008f70  3d 63 7a 3a 64 55 3d 6d  6e 3a 64 57 3d 6d 6f 2f  |=cz:dU=mn:dW=mo/|
00008f80  64 56 0d 78 00 0b cd 3a  e7 56 6e 20 8c 0d 78 1e  |dV.x...:.Vn ..x.|
00008f90  3a c8 99 26 33 35 2c 6d  70 2c 34 20 b8 2c 2c 6d  |:..&35,mp,4 .,,m|
00008fa0  6e 3a c8 99 26 33 35 2c  6d 70 2c 35 20 b8 2c 2c  |n:..&35,mp,5 .,,|
00008fb0  6d 6f 3a 64 58 3d 63 7a  3a 64 58 3d 6d 6e 3a 64  |mo:dX=cz:dX=mn:d|
00008fc0  59 3d 6d 6f 2f 64 56 0d  78 50 0b cd 3a e7 56 72  |Y=mo/dV.xP..:.Vr|
00008fd0  20 8c 0d 78 6e 3a c8 99  26 33 35 2c 6d 71 2c 34  | ..xn:..&35,mq,4|
00008fe0  20 b8 2c 2c 6d 6e 3a c8  99 26 33 35 2c 6d 71 2c  | .,,mn:..&35,mq,|
00008ff0  35 20 b8 2c 2c 6d 6f 3a  64 5a 3d 63 7a 3a 64 5a  |5 .,,mo:dZ=cz:dZ|
00009000  3d 6d 6e 3a 64 61 3d 6d  6f 2f 64 56 0d 78 a0 07  |=mn:da=mo/dV.x..|
00009010  cd 3a e1 0d 78 d2 0e dd  f2 5a 72 3a e7 56 6a 20  |.:..x....Zr:.Vj |
00009020  8c 0d 78 e6 74 65 6f 3d  5a 6c 2b 31 32 3a 65 70  |..x.teo=Zl+12:ep|
00009030  3d 5a 6e 2d 31 39 30 3a  61 61 3d 31 34 32 3a 61  |=Zn-190:aa=142:a|
00009040  62 3d 39 30 3a 6d 72 3d  55 6a 3a 6d 72 21 30 3d  |b=90:mr=Uj:mr!0=|
00009050  61 61 2f 63 7a 3a 6d 72  21 34 3d 61 62 2f 64 56  |aa/cz:mr!4=ab/dV|
00009060  3a 6d 72 21 38 3d 21 66  56 3a 6d 72 21 31 32 3d  |:mr!8=!fV:mr!12=|
00009070  21 66 58 3a c8 99 26 32  45 2c 32 35 36 2b 35 32  |!fX:..&2E,256+52|
00009080  2c 56 6b 2c 6d 73 24 2c  65 6f 2c 65 70 2c 38 2c  |,Vk,ms$,eo,ep,8,|
00009090  6d 72 2c 55 74 0d 79 22  0b cd 3a e7 56 6e 20 8c  |mr,Ut.y"..:.Vn .|
000090a0  0d 79 36 78 65 6f 3d 5a  6c 2b 31 32 2b 33 35 32  |.y6xeo=Zl+12+352|
000090b0  3a 65 70 3d 5a 6e 2d 31  39 30 3a 61 61 3d 31 34  |:ep=Zn-190:aa=14|
000090c0  32 3a 61 62 3d 39 30 3a  6d 72 3d 55 6a 3a 6d 72  |2:ab=90:mr=Uj:mr|
000090d0  21 30 3d 61 61 2f 63 7a  3a 6d 72 21 34 3d 61 62  |!0=aa/cz:mr!4=ab|
000090e0  2f 64 56 3a 6d 72 21 38  3d 21 6d 74 3a 6d 72 21  |/dV:mr!8=!mt:mr!|
000090f0  31 32 3d 21 6d 75 3a c8  99 26 32 45 2c 32 35 36  |12=!mu:..&2E,256|
00009100  2b 35 32 2c 56 6f 2c 6d  76 24 2c 65 6f 2c 65 70  |+52,Vo,mv$,eo,ep|
00009110  2c 38 2c 6d 72 2c 55 75  0d 79 72 07 cd 3a e1 0d  |,8,mr,Uu.yr..:..|
00009120  79 9a c7 dd f2 5a 73 3a  65 6f 3d 5a 6c 2d 5a 70  |y....Zs:eo=Zl-Zp|
00009130  2b 28 28 56 76 25 3c 3c  28 64 55 29 29 2a 20 28  |+((Vv%<<(dU))* (|
00009140  62 57 2f 62 58 29 20 29  3a 65 70 3d 5a 6e 2d 5a  |bW/bX) ):ep=Zn-Z|
00009150  71 2b 28 28 56 77 25 3c  3c 28 64 57 2a 64 56 29  |q+((Vw%<<(dW*dV)|
00009160  29 20 2a 20 28 62 57 2f  62 58 29 20 29 3a 6d 72  |) * (bW/bX) ):mr|
00009170  3d 55 6a 3a 6d 72 21 30  3d 28 21 66 56 2a 20 62  |=Uj:mr!0=(!fV* b|
00009180  57 29 20 2a 20 64 55 20  3a 6d 72 21 34 3d 28 21  |W) * dU :mr!4=(!|
00009190  66 58 2a 20 62 57 29 20  2a 20 64 57 3a 6d 72 21  |fX* bW) * dW:mr!|
000091a0  38 3d 28 21 66 56 2a 20  62 58 29 20 3a 6d 72 21  |8=(!fV* bX) :mr!|
000091b0  31 32 3d 28 21 66 58 2a  20 62 58 29 3a c8 99 26  |12=(!fX* bX):..&|
000091c0  32 45 2c 32 35 36 2b 35  32 2c 56 6b 2c 6d 73 24  |2E,256+52,Vk,ms$|
000091d0  2c 65 6f 2c 65 70 2c 38  2c 6d 72 2c 55 74 3a e7  |,eo,ep,8,mr,Ut:.|
000091e0  20 ac 57 58 20 8c 0d 79  ea 1c f2 6d 77 28 56 6b  | .WX ..y...mw(Vk|
000091f0  2c 62 57 2c 62 58 2c 21  66 56 2c 21 66 58 2c 6d  |,bW,bX,!fV,!fX,m|
00009200  6d 29 0d 79 f4 1e cc 3a  f2 6d 78 28 56 6b 2c 62  |m).y...:.mx(Vk,b|
00009210  57 2c 62 58 2c 21 66 56  2c 21 66 58 2c 6d 6d 29  |W,bX,!fV,!fX,mm)|
00009220  0d 7a 08 07 cd 3a e1 0d  7a 30 c7 dd f2 5a 74 3a  |.z...:..z0...Zt:|
00009230  65 6f 3d 5a 6c 2d 5a 70  2b 28 28 56 78 25 3c 3c  |eo=Zl-Zp+((Vx%<<|
00009240  28 64 58 29 29 2a 20 28  62 64 2f 62 65 29 20 29  |(dX))* (bd/be) )|
00009250  3a 65 70 3d 5a 6e 2d 5a  71 2b 28 28 56 79 25 3c  |:ep=Zn-Zq+((Vy%<|
00009260  3c 28 64 59 2a 64 56 29  29 20 2a 20 28 62 64 2f  |<(dY*dV)) * (bd/|
00009270  62 65 29 20 29 3a 6d 72  3d 55 6a 3a 6d 72 21 30  |be) ):mr=Uj:mr!0|
00009280  3d 28 21 6d 74 2a 20 62  64 29 20 2a 20 64 58 20  |=(!mt* bd) * dX |
00009290  3a 6d 72 21 34 3d 28 21  6d 75 2a 20 62 64 29 20  |:mr!4=(!mu* bd) |
000092a0  2a 20 64 59 3a 6d 72 21  38 3d 28 21 6d 74 2a 20  |* dY:mr!8=(!mt* |
000092b0  62 65 29 20 3a 6d 72 21  31 32 3d 28 21 6d 75 2a  |be) :mr!12=(!mu*|
000092c0  20 62 65 29 3a c8 99 26  32 45 2c 32 35 36 2b 35  | be):..&2E,256+5|
000092d0  32 2c 56 6f 2c 6d 76 24  2c 65 6f 2c 65 70 2c 38  |2,Vo,mv$,eo,ep,8|
000092e0  2c 6d 72 2c 55 75 3a e7  20 ac 57 58 20 8c 0d 7a  |,mr,Uu:. .WX ..z|
000092f0  80 1c f2 6d 77 28 56 6f  2c 62 64 2c 62 65 2c 21  |...mw(Vo,bd,be,!|
00009300  6d 74 2c 21 6d 75 2c 6d  70 29 0d 7a 8a 1e cc 3a  |mt,!mu,mp).z...:|
00009310  f2 6d 78 28 56 6f 2c 62  64 2c 62 65 2c 21 6d 74  |.mx(Vo,bd,be,!mt|
00009320  2c 21 6d 75 2c 6d 70 29  0d 7a 9e 07 cd 3a e1 0d  |,!mu,mp).z...:..|
00009330  7a c6 1b dd f2 57 68 28  5a 5a 24 2c 5a 58 2c 6d  |z....Wh(ZZ$,ZX,m|
00009340  79 29 3a c8 8e 5a 5a 24  20 ca 0d 7a da 2f c9 22  |y):..ZZ$ ..z./."|
00009350  53 4f 55 52 43 45 22 3a  62 57 3d 5a 58 3a 62 58  |SOURCE":bW=ZX:bX|
00009360  3d 6d 79 3a f2 6d 7a 28  b9 2c 20 ac b9 29 3a f2  |=my:.mz(., ..):.|
00009370  59 72 28 55 6a 2c 58 77  29 0d 7b 02 2d c9 22 44  |Yr(Uj,Xw).{.-."D|
00009380  45 53 54 22 3a 62 64 3d  5a 58 3a 62 65 3d 6d 79  |EST":bd=ZX:be=my|
00009390  3a f2 6d 7a 28 20 ac b9  2c b9 29 3a f2 59 72 28  |:.mz( ..,.):.Yr(|
000093a0  55 6a 2c 58 7a 29 0d 7b  2a 07 cb 3a e1 0d 7b 52  |Uj,Xz).{*..:..{R|
000093b0  19 dd f2 6d 7a 28 6e 55  2c 6e 56 29 3a e7 56 6a  |...mz(nU,nV):.Vj|
000093c0  20 80 6e 55 20 8c 0d 7b  66 75 6e 57 3d 62 57 2f  | .nU ..{funW=bW/|
000093d0  62 58 3a c8 99 26 33 35  2c 6d 6d 2c 34 20 b8 2c  |bX:..&35,mm,4 .,|
000093e0  2c 6e 58 3a c8 99 26 33  35 2c 6d 6d 2c 35 20 b8  |,nX:..&35,mm,5 .|
000093f0  2c 2c 6e 59 3a f2 6e 5a  28 55 6a 2c 58 77 2c 30  |,,nY:.nZ(Uj,Xw,0|
00009400  2c 28 21 66 56 2a 6e 57  29 3c 3c 6e 58 2c 30 2c  |,(!fV*nW)<<nX,0,|
00009410  28 21 66 58 2a 6e 57 29  3c 3c 6e 59 29 3a e7 a4  |(!fX*nW)<<nY):..|
00009420  63 74 69 6f 6e 5f 57 69  6e 64 6f 77 49 73 4f 70  |ction_WindowIsOp|
00009430  65 6e 28 55 6a 2c 58 77  29 20 8c 0d 7b 98 31 21  |en(Uj,Xw) ..{.1!|
00009440  55 6a 3d 58 77 3a c8 99  26 34 30 30 43 42 2c 2c  |Uj=Xw:..&400CB,,|
00009450  55 6a 3a c8 99 26 34 30  30 43 36 2c 2c 55 6a 3a  |Uj:..&400C6,,Uj:|
00009460  c8 99 26 34 30 30 43 35  2c 2c 55 6a 0d 7b c0 05  |..&400C5,,Uj.{..|
00009470  cd 0d 7b ca 0f cd 3a e7  56 6e 20 80 6e 56 20 8c  |..{...:.Vn .nV .|
00009480  0d 7b de 09 e7 56 6a 20  8c 0d 7b e8 1f 6d 64 24  |.{...Vj ..{..md$|
00009490  3d 6d 73 24 3a 61 61 3d  21 66 56 3a 61 62 3d 21  |=ms$:aa=!fV:ab=!|
000094a0  66 58 3a 6e 61 3d 6d 6d  0d 7b fc 21 cc 3a 6d 64  |fX:na=mm.{.!.:md|
000094b0  24 3d 6d 76 24 3a 61 61  3d 21 6d 74 3a 61 62 3d  |$=mv$:aa=!mt:ab=|
000094c0  21 6d 75 3a 6e 61 3d 6d  70 0d 7c 1a 75 cd 3a 6e  |!mu:na=mp.|.u.:n|
000094d0  62 3d 62 64 2f 62 65 3a  c8 99 26 33 35 2c 6e 61  |b=bd/be:..&35,na|
000094e0  2c 34 20 b8 2c 2c 6e 58  3a c8 99 26 33 35 2c 6e  |,4 .,,nX:..&35,n|
000094f0  61 2c 35 20 b8 2c 2c 6e  59 3a f2 6e 5a 28 55 6a  |a,5 .,,nY:.nZ(Uj|
00009500  2c 58 7a 2c 30 2c 28 61  61 2a 6e 62 29 3c 3c 6e  |,Xz,0,(aa*nb)<<n|
00009510  58 2c 30 2c 28 61 62 2a  6e 62 29 3c 3c 6e 59 29  |X,0,(ab*nb)<<nY)|
00009520  3a e7 a4 63 74 69 6f 6e  5f 57 69 6e 64 6f 77 49  |:..ction_WindowI|
00009530  73 4f 70 65 6e 28 55 6a  2c 58 7a 29 20 8c 0d 7c  |sOpen(Uj,Xz) ..||
00009540  56 31 21 55 6a 3d 58 7a  3a c8 99 26 34 30 30 43  |V1!Uj=Xz:..&400C|
00009550  42 2c 2c 55 6a 3a c8 99  26 34 30 30 43 36 2c 2c  |B,,Uj:..&400C6,,|
00009560  55 6a 3a c8 99 26 34 30  30 43 35 2c 2c 55 6a 0d  |Uj:..&400C5,,Uj.|
00009570  7c 7e 05 cd 0d 7c 88 07  cd 3a e1 0d 7c b0 64 dd  ||~...|...:..|.d.|
00009580  f2 59 59 28 6e 63 2c 6e  64 29 3a 6e 65 3d bb a4  |.YY(nc,nd):ne=..|
00009590  63 74 69 6f 6e 5f 52 65  61 64 49 63 6f 6e 54 65  |ction_ReadIconTe|
000095a0  78 74 28 55 6a 2c 59 58  2c 32 29 3a 6e 66 3d bb  |xt(Uj,YX,2):nf=.|
000095b0  a4 63 74 69 6f 6e 5f 52  65 61 64 49 63 6f 6e 54  |.ction_ReadIconT|
000095c0  65 78 74 28 55 6a 2c 59  58 2c 34 29 3a 6e 65 2b  |ext(Uj,YX,4):ne+|
000095d0  3d 6e 63 3a e7 6e 65 3c  31 20 8c 6e 65 3d 31 0d  |=nc:.ne<1 .ne=1.|
000095e0  7c e2 13 e7 6e 65 3e 39  39 39 20 8c 6e 65 3d 39  ||...ne>999 .ne=9|
000095f0  39 39 0d 7c ec 16 6e 66  2b 3d 6e 64 3a e7 6e 66  |99.|..nf+=nd:.nf|
00009600  3c 31 20 8c 6e 66 3d 31  0d 7d 00 13 e7 6e 66 3e  |<1 .nf=1.}...nf>|
00009610  39 39 39 20 8c 6e 66 3d  39 39 39 0d 7d 0a 2c f2  |999 .nf=999.}.,.|
00009620  57 69 28 55 6a 2c 59 58  2c 32 2c c3 6e 65 29 3a  |Wi(Uj,YX,2,.ne):|
00009630  f2 57 69 28 55 6a 2c 59  58 2c 34 2c c3 6e 66 29  |.Wi(Uj,YX,4,.nf)|
00009640  3a c8 8e 56 5a 20 ca 0d  7d 28 12 c9 35 3a 62 57  |:..VZ ..}(..5:bW|
00009650  3d 6e 65 3a 62 58 3d 6e  66 0d 7d 3c 12 c9 36 3a  |=ne:bX=nf.}<..6:|
00009660  62 64 3d 6e 65 3a 62 65  3d 6e 66 0d 7d 50 0c cb  |bd=ne:be=nf.}P..|
00009670  3a c8 8e 56 5a 20 ca 0d  7d 64 11 c9 35 3a f2 6d  |:..VZ ..}d..5:.m|
00009680  7a 28 b9 2c 20 ac b9 29  0d 7d 6e 11 c9 36 3a f2  |z(., ..).}n..6:.|
00009690  6d 7a 28 20 ac b9 2c b9  29 0d 7d 78 26 cb 3a e7  |mz( ..,.).}x&.:.|
000096a0  a4 63 74 69 6f 6e 5f 57  69 6e 64 6f 77 57 69 74  |.ction_WindowWit|
000096b0  68 43 61 72 65 74 28 55  6a 29 3d 59 58 20 8c 0d  |hCaret(Uj)=YX ..|
000096c0  7d 8c 07 f2 5a 62 0d 7d  96 07 cd 3a e1 0d 7d be  |}...Zb.}...:..}.|
000096d0  31 dd f2 57 6c 3a e3 69  3d 30 20 b8 32 35 35 3a  |1..Wl:.i=0 .255:|
000096e0  64 76 21 28 69 2a 34 29  20 3d 20 30 3a 64 79 21  |dv!(i*4) = 0:dy!|
000096f0  28 69 2a 34 29 20 3d 20  30 3a ed 69 3a e1 0d 7e  |(i*4) = 0:.i:..~|
00009700  0e 90 dd f2 6d 77 28 6e  67 2c 6e 68 2c 6e 69 2c  |....mw(ng,nh,ni,|
00009710  61 61 2c 61 62 2c 6e 61  29 3a 65 6f 3d 5a 6c 2d  |aa,ab,na):eo=Zl-|
00009720  5a 70 3a 65 70 3d 5a 6e  2d 5a 71 3a c8 99 26 33  |Zp:ep=Zn-Zq:..&3|
00009730  35 2c 2d 31 2c 34 20 b8  2c 2c 6e 6a 3a c8 99 26  |5,-1,4 .,,nj:..&|
00009740  33 35 2c 2d 31 2c 35 20  b8 2c 2c 65 6e 3a c8 99  |35,-1,5 .,,en:..|
00009750  26 33 35 2c 6e 61 2c 34  20 b8 2c 2c 6d 6e 3a c8  |&35,na,4 .,,mn:.|
00009760  99 26 33 35 2c 6e 61 2c  35 20 b8 2c 2c 6d 6f 3a  |.&35,na,5 .,,mo:|
00009770  65 6e 3d 65 6e 2d 28 65  6e 2d 6d 6f 29 3a 6e 6a  |en=en-(en-mo):nj|
00009780  3d 63 7a 2a 20 6d 6e 3a  c8 8e 6e 67 20 ca 0d 7e  |=cz* mn:..ng ..~|
00009790  72 11 c9 56 6b 3a 65 6e  3d 64 57 2a 20 64 56 0d  |r..Vk:en=dW* dV.|
000097a0  7e 7c 11 c9 56 6f 3a 65  6e 3d 64 59 2a 20 64 56  |~|..Vo:en=dY* dV|
000097b0  0d 7e 86 86 cb 3a c8 99  26 34 30 30 45 36 2c 31  |.~...:..&400E6,1|
000097c0  34 3a 21 69 57 3d 6e 6a  3a 21 69 58 3d 65 6e 3a  |4:!iW=nj:!iX=en:|
000097d0  21 69 5a 3d 61 62 3a 21  69 61 3d 61 61 3a 21 69  |!iZ=ab:!ia=aa:!i|
000097e0  62 3d 65 6f 3a 21 69 63  3d 65 70 3a 21 69 70 3d  |b=eo:!ic=ep:!ip=|
000097f0  5a 6d 3a 21 69 6f 3d 5a  6e 3a 21 69 59 3d 28 6e  |Zm:!io=Zn:!iY=(n|
00009800  68 2f 6e 69 29 2a 20 32  35 36 3a 21 69 65 3d 3f  |h/ni)* 256:!ie=?|
00009810  28 6a 70 2b 28 6e 6b 2a  32 29 2b 30 29 3a 21 69  |(jp+(nk*2)+0):!i|
00009820  66 3d 3f 28 6a 70 2b 28  6e 6b 2a 32 29 2b 31 29  |f=?(jp+(nk*2)+1)|
00009830  3a d6 68 79 3a e1 0d 7f  08 5f dd f2 6d 78 28 6e  |:.hy:...._..mx(n|
00009840  67 2c 6e 68 2c 6e 69 2c  61 61 2c 61 62 2c 6e 61  |g,nh,ni,aa,ab,na|
00009850  29 3a c8 99 26 33 35 2c  6e 61 2c 34 20 b8 2c 2c  |):..&35,na,4 .,,|
00009860  6d 6e 3a c8 99 26 33 35  2c 6e 61 2c 35 20 b8 2c  |mn:..&35,na,5 .,|
00009870  2c 6d 6f 3a 65 6f 3d 5a  6c 2d 5a 70 3a 65 70 3d  |,mo:eo=Zl-Zp:ep=|
00009880  5a 6e 2d 5a 71 3a 6e 6a  3d 63 7a 2a 6d 6e 3a c8  |Zn-Zq:nj=cz*mn:.|
00009890  8e 6e 67 20 ca 0d 7f 4e  17 c9 56 6b 3a 65 6e 3d  |.ng ...N..Vk:en=|
000098a0  64 57 2a 20 64 56 3a 21  6a 6b 3d 30 0d 7f 62 17  |dW* dV:!jk=0..b.|
000098b0  c9 56 6f 3a 65 6e 3d 64  59 2a 20 64 56 3a 21 6a  |.Vo:en=dY* dV:!j|
000098c0  6b 3d 38 0d 7f 76 6c cb  3a 21 6a 61 3d 28 6e 68  |k=8..vl.:!ja=(nh|
000098d0  2f 6e 69 29 2a 20 32 35  36 3a 21 6a 62 3d 6e 6a  |/ni)* 256:!jb=nj|
000098e0  3a 21 6a 63 3d 65 6e 3a  21 6a 64 3d 30 3a 21 6a  |:!jc=en:!jd=0:!j|
000098f0  65 3d 30 3a 21 6a 66 3d  65 6f 3a 21 6a 67 3d 65  |e=0:!jf=eo:!jg=e|
00009900  70 3a d6 6a 59 3a 21 6a  75 3d 66 61 25 3a 21 6a  |p:.jY:!ju=fa%:!j|
00009910  76 3d 66 59 25 3a 21 6a  78 3d 66 61 25 2a 20 32  |v=fY%:!jx=fa%* 2|
00009920  34 20 3a 21 6a 73 3d 6e  6b 3a d6 6a 72 3a e1 0d  |4 :!js=nk:.jr:..|
00009930  7f ee 54 dd f2 6e 6c 3a  6e 6d 3d 30 3a e3 69 3d  |..T..nl:nm=0:.i=|
00009940  31 20 b8 6e 6e 3a 6e 6f  3d a4 63 74 69 6f 6e 5f  |1 .nn:no=.ction_|
00009950  49 6e 73 65 72 74 5f 48  6f 72 56 28 64 76 2c 6e  |Insert_HorV(dv,n|
00009960  6d 29 3a 6e 6d 2b 3d 28  28 21 66 58 29 2f 28 6e  |m):nm+=((!fX)/(n|
00009970  6e 29 29 3a e7 6e 6d 3e  21 66 58 20 8c 6e 6d 3d  |n)):.nm>!fX .nm=|
00009980  21 66 58 0d 80 2a 52 ed  69 3a 6e 70 3d 30 3a e3  |!fX..*R.i:np=0:.|
00009990  69 3d 31 20 b8 6e 71 3a  6e 6f 3d a4 63 74 69 6f  |i=1 .nq:no=.ctio|
000099a0  6e 5f 49 6e 73 65 72 74  5f 48 6f 72 56 28 64 79  |n_Insert_HorV(dy|
000099b0  2c 6e 70 29 3a 6e 70 2b  3d 28 28 21 66 56 29 2f  |,np):np+=((!fV)/|
000099c0  28 6e 71 29 29 3a e7 6e  70 3e 21 66 56 20 8c 6e  |(nq)):.np>!fV .n|
000099d0  70 3d 21 66 56 0d 80 66  11 ed 69 3a f2 62 73 28  |p=!fV..f..i:.bs(|
000099e0  20 ac b9 29 3a e1 0d 80  98 0e dd f2 5a 75 3a e7  | ..):.......Zu:.|
000099f0  56 72 20 8c 0d 80 ac 82  65 6f 3d 5a 6c 3a 65 70  |Vr .....eo=Zl:ep|
00009a00  3d 5a 6f 3a 61 61 3d 5a  6d 2d 5a 6c 3a 61 62 3d  |=Zo:aa=Zm-Zl:ab=|
00009a10  5a 6e 2d 5a 6f 3a 6d 72  3d 55 6a 3a 6d 72 21 30  |Zn-Zo:mr=Uj:mr!0|
00009a20  3d 28 6e 72 2f 32 29 2f  28 63 7a 29 3a 6d 72 21  |=(nr/2)/(cz):mr!|
00009a30  34 3d 28 6e 73 2f 32 29  2f 28 64 56 29 3a 6d 72  |4=(ns/2)/(dV):mr|
00009a40  21 38 3d 21 67 63 3a 6d  72 21 31 32 3d 21 67 62  |!8=!gc:mr!12=!gb|
00009a50  3a c8 99 26 32 45 2c 32  35 36 2b 35 32 2c 56 73  |:..&2E,256+52,Vs|
00009a60  2c 6e 74 24 2c 65 6f 2c  65 70 2c 38 2c 6d 72 2c  |,nt$,eo,ep,8,mr,|
00009a70  55 76 3a f2 6e 75 0d 80  fc 16 cc 3a c8 99 26 34  |Uv:.nu.....:..&4|
00009a80  30 30 45 36 2c 31 2b 31  32 38 3a da 0d 81 10 07  |00E6,1+128:.....|
00009a90  cd 3a e1 0d 81 38 13 dd  f2 67 6d 28 5a 7a 24 29  |.:...8...gm(Zz$)|
00009aa0  3a e7 56 6a 20 8c 0d 81  4c 46 6e 76 3d a4 63 74  |:.Vj ...LFnv=.ct|
00009ab0  69 6f 6e 5f 57 69 6e 64  6f 77 49 73 4f 70 65 6e  |ion_WindowIsOpen|
00009ac0  28 55 6a 2c 58 77 29 3a  f2 62 78 28 22 53 6f 75  |(Uj,Xw):.bx("Sou|
00009ad0  72 63 65 22 29 3a e7 6e  76 20 8c f2 57 77 28 55  |rce"):.nv ..Ww(U|
00009ae0  68 2c 55 6a 2c 58 77 2c  20 ac b9 29 0d 81 6a 66  |h,Uj,Xw, ..)..jf|
00009af0  cd 3a 56 6b 3d 6b 6a 3a  6e 77 3d a4 63 74 69 6f  |.:Vk=kj:nw=.ctio|
00009b00  6e 5f 41 6c 69 67 6e 54  6f 50 61 67 65 53 69 7a  |n_AlignToPageSiz|
00009b10  65 28 a4 63 74 69 6f 6e  5f 53 69 7a 65 4f 66 46  |e(.ction_SizeOfF|
00009b20  69 6c 65 28 5a 7a 24 29  2b 31 32 38 29 3a 6b 72  |ile(Zz$)+128):kr|
00009b30  3d a4 63 74 69 6f 6e 5f  41 6c 6c 6f 63 61 74 65  |=.ction_Allocate|
00009b40  4d 65 6d 6f 72 79 28 6e  77 29 3a e7 20 ac 6b 72  |Memory(nw):. .kr|
00009b50  20 8c 0d 81 9c 4e 59 69  24 3d a4 63 74 69 6f 6e  | ....NYi$=.ction|
00009b60  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 65 72  |_TagToString("er|
00009b70  72 30 33 22 29 3a 59 6a  3d a4 63 74 69 6f 6e 5f  |r03"):Yj=.ction_|
00009b80  52 65 70 6f 72 74 45 72  72 6f 72 28 55 6a 2c 39  |ReportError(Uj,9|
00009b90  39 2c 55 63 24 2c 59 69  24 2c 20 ac b9 2c b9 29  |9,Uc$,Yi$, ..,.)|
00009ba0  0d 81 b0 e6 cc 3a 56 6c  3d 6e 77 3a 56 6a 3d b9  |.....:Vl=nw:Vj=.|
00009bb0  3a 58 76 24 3d 5a 7a 24  3a 58 75 3d b9 3a f2 58  |:Xv$=Zz$:Xu=.:.X|
00009bc0  68 28 56 6b 2c 56 6c 29  3a f2 58 69 28 56 6b 2c  |h(Vk,Vl):.Xi(Vk,|
00009bd0  5a 7a 24 29 3a 6d 73 24  3d a4 63 74 69 6f 6e 5f  |Zz$):ms$=.ction_|
00009be0  4e 61 6d 65 4f 66 4e 74  68 53 70 72 69 74 65 28  |NameOfNthSprite(|
00009bf0  56 6b 2c 31 29 3a 56 6d  3d a4 63 74 69 6f 6e 5f  |Vk,1):Vm=.ction_|
00009c00  53 70 72 69 74 65 49 73  4f 66 4e 65 77 46 6f 72  |SpriteIsOfNewFor|
00009c10  6d 61 74 28 56 6b 2c 6d  73 24 29 3a 21 66 56 3d  |mat(Vk,ms$):!fV=|
00009c20  a4 63 74 69 6f 6e 5f 57  69 64 74 68 4f 66 53 70  |.ction_WidthOfSp|
00009c30  72 69 74 65 28 56 6b 2c  6d 73 24 2c 56 6d 29 3a  |rite(Vk,ms$,Vm):|
00009c40  21 66 58 3d a4 63 74 69  6f 6e 5f 48 65 69 67 68  |!fX=.ction_Heigh|
00009c50  74 4f 66 53 70 72 69 74  65 28 56 6b 2c 6d 73 24  |tOfSprite(Vk,ms$|
00009c60  2c 56 6d 29 3a 6d 6d 3d  a4 63 74 69 6f 6e 5f 4d  |,Vm):mm=.ction_M|
00009c70  6f 64 65 4f 66 53 70 72  69 74 65 28 56 6b 2c 6d  |odeOfSprite(Vk,m|
00009c80  73 24 2c 56 6d 29 0d 82  28 8a 61 73 24 3d a4 63  |s$,Vm)..(.as$=.c|
00009c90  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
00009ca0  28 22 73 72 63 65 22 29  3a f2 57 69 28 55 6a 2c  |("srce"):.Wi(Uj,|
00009cb0  57 6a 2c 31 2c 61 73 24  2b c3 21 66 56 2b 22 78  |Wj,1,as$+.!fV+"x|
00009cc0  22 2b c3 21 66 58 29 3a  f2 57 6b 28 55 6a 2c 57  |"+.!fX):.Wk(Uj,W|
00009cd0  6a 2c 31 2c 37 29 3a f2  5a 68 3a f2 5a 69 3a f2  |j,1,7):.Zh:.Zi:.|
00009ce0  59 72 28 55 6a 2c 57 6a  29 3a f2 59 72 28 55 6a  |Yr(Uj,Wj):.Yr(Uj|
00009cf0  2c 59 6e 29 3a f2 6d 7a  28 b9 2c b9 29 3a e7 20  |,Yn):.mz(.,.):. |
00009d00  ac 56 6e 20 8c 56 6f 3d  56 6b 3a 64 59 3d 64 57  |.Vn .Vo=Vk:dY=dW|
00009d10  0d 82 82 28 59 6a 3d 31  3a e7 a4 63 74 69 6f 6e  |...(Yj=1:..ction|
00009d20  5f 53 70 72 69 74 65 48  61 73 4d 61 73 6b 28 56  |_SpriteHasMask(V|
00009d30  6b 2c 6d 73 24 29 20 8c  0d 82 96 4c 59 69 24 3d  |k,ms$) ....LYi$=|
00009d40  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00009d50  6e 67 28 22 65 72 72 31  38 22 29 3a 59 6a 3d a4  |ng("err18"):Yj=.|
00009d60  63 74 69 6f 6e 5f 52 65  70 6f 72 74 45 72 72 6f  |ction_ReportErro|
00009d70  72 28 55 6a 2c 39 39 2c  55 63 24 2c 59 69 24 2c  |r(Uj,99,Uc$,Yi$,|
00009d80  b9 2c b9 29 0d 82 aa 0d  cd 3a e7 59 6a 3d 31 20  |.,.).....:.Yj=1 |
00009d90  8c 0d 82 be 1e f2 6e 78  28 56 6b 2c 6d 73 24 29  |......nx(Vk,ms$)|
00009da0  3a e7 6e 79 20 80 20 ac  57 58 20 8c f2 6e 6c 0d  |:.ny . .WX ..nl.|
00009db0  82 d2 2d e7 20 ac a4 63  74 69 6f 6e 5f 57 69 6e  |..-. ..ction_Win|
00009dc0  64 6f 77 49 73 4f 70 65  6e 28 55 6a 2c 57 6a 29  |dowIsOpen(Uj,Wj)|
00009dd0  20 8c f2 58 73 28 55 6a  2c 57 6a 29 0d 82 dc 13  | ..Xs(Uj,Wj)....|
00009de0  cc 3a f2 62 78 28 22 53  6f 75 72 63 65 22 29 0d  |.:.bx("Source").|
00009df0  82 f0 05 cd 0d 82 fa 07  cd 3a e1 0d 83 22 13 dd  |.........:..."..|
00009e00  f2 67 6e 28 5a 7a 24 29  3a e7 56 6e 20 8c 0d 83  |.gn(Zz$):.Vn ...|
00009e10  36 44 6e 76 3d a4 63 74  69 6f 6e 5f 57 69 6e 64  |6Dnv=.ction_Wind|
00009e20  6f 77 49 73 4f 70 65 6e  28 55 6a 2c 58 7a 29 3a  |owIsOpen(Uj,Xz):|
00009e30  f2 62 78 28 22 44 65 73  74 22 29 3a e7 6e 76 20  |.bx("Dest"):.nv |
00009e40  8c f2 57 77 28 55 68 2c  55 6a 2c 58 7a 2c 20 ac  |..Ww(Uh,Uj,Xz, .|
00009e50  b9 29 0d 83 54 66 cd 3a  56 6f 3d 6b 6a 3a 6e 77  |.)..Tf.:Vo=kj:nw|
00009e60  3d a4 63 74 69 6f 6e 5f  41 6c 69 67 6e 54 6f 50  |=.ction_AlignToP|
00009e70  61 67 65 53 69 7a 65 28  a4 63 74 69 6f 6e 5f 53  |ageSize(.ction_S|
00009e80  69 7a 65 4f 66 46 69 6c  65 28 5a 7a 24 29 2b 31  |izeOfFile(Zz$)+1|
00009e90  32 38 29 3a 6b 72 3d a4  63 74 69 6f 6e 5f 41 6c  |28):kr=.ction_Al|
00009ea0  6c 6f 63 61 74 65 4d 65  6d 6f 72 79 28 6e 77 29  |locateMemory(nw)|
00009eb0  3a e7 20 ac 6b 72 20 8c  0d 83 86 4e 59 69 24 3d  |:. .kr ....NYi$=|
00009ec0  a4 63 74 69 6f 6e 5f 54  61 67 54 6f 53 74 72 69  |.ction_TagToStri|
00009ed0  6e 67 28 22 65 72 72 30  33 22 29 3a 59 6a 3d a4  |ng("err03"):Yj=.|
00009ee0  63 74 69 6f 6e 5f 52 65  70 6f 72 74 45 72 72 6f  |ction_ReportErro|
00009ef0  72 28 55 6a 2c 39 39 2c  55 63 24 2c 59 69 24 2c  |r(Uj,99,Uc$,Yi$,|
00009f00  20 ac b9 2c b9 29 0d 83  9a e6 cc 3a 56 70 3d 6e  | ..,.).....:Vp=n|
00009f10  77 3a 56 6e 3d b9 3a 58  79 24 3d 5a 7a 24 3a 58  |w:Vn=.:Xy$=Zz$:X|
00009f20  78 3d b9 3a f2 58 68 28  56 6f 2c 56 70 29 3a f2  |x=.:.Xh(Vo,Vp):.|
00009f30  58 69 28 56 6f 2c 5a 7a  24 29 3a 6d 76 24 3d a4  |Xi(Vo,Zz$):mv$=.|
00009f40  63 74 69 6f 6e 5f 4e 61  6d 65 4f 66 4e 74 68 53  |ction_NameOfNthS|
00009f50  70 72 69 74 65 28 56 6f  2c 31 29 3a 56 75 3d a4  |prite(Vo,1):Vu=.|
00009f60  63 74 69 6f 6e 5f 53 70  72 69 74 65 49 73 4f 66  |ction_SpriteIsOf|
00009f70  4e 65 77 46 6f 72 6d 61  74 28 56 6f 2c 6d 76 24  |NewFormat(Vo,mv$|
00009f80  29 3a 21 6d 74 3d a4 63  74 69 6f 6e 5f 57 69 64  |):!mt=.ction_Wid|
00009f90  74 68 4f 66 53 70 72 69  74 65 28 56 6f 2c 6d 76  |thOfSprite(Vo,mv|
00009fa0  24 2c 56 75 29 3a 21 6d  75 3d a4 63 74 69 6f 6e  |$,Vu):!mu=.ction|
00009fb0  5f 48 65 69 67 68 74 4f  66 53 70 72 69 74 65 28  |_HeightOfSprite(|
00009fc0  56 6f 2c 6d 76 24 2c 56  75 29 3a 6d 70 3d a4 63  |Vo,mv$,Vu):mp=.c|
00009fd0  74 69 6f 6e 5f 4d 6f 64  65 4f 66 53 70 72 69 74  |tion_ModeOfSprit|
00009fe0  65 28 56 6f 2c 6d 76 24  2c 56 75 29 0d 84 12 81  |e(Vo,mv$,Vu)....|
00009ff0  61 73 24 3d a4 63 74 69  6f 6e 5f 54 61 67 54 6f  |as$=.ction_TagTo|
0000a000  53 74 72 69 6e 67 28 22  64 65 73 74 22 29 3a f2  |String("dest"):.|
0000a010  57 69 28 55 6a 2c 57 6a  2c 33 2c 61 73 24 2b c3  |Wi(Uj,Wj,3,as$+.|
0000a020  21 6d 74 2b 22 78 22 2b  c3 21 6d 75 29 3a f2 57  |!mt+"x"+.!mu):.W|
0000a030  6b 28 55 6a 2c 57 6a 2c  33 2c 37 29 3a f2 5a 68  |k(Uj,Wj,3,7):.Zh|
0000a040  3a f2 5a 69 3a f2 59 72  28 55 6a 2c 57 6a 29 3a  |:.Zi:.Yr(Uj,Wj):|
0000a050  f2 6d 7a 28 20 ac b9 2c  b9 29 3a e7 20 ac 56 6a  |.mz( ..,.):. .Vj|
0000a060  20 8c 56 6b 3d 56 6f 3a  64 57 3d 64 59 0d 84 62  | .Vk=Vo:dW=dY..b|
0000a070  28 59 6a 3d 31 3a e7 a4  63 74 69 6f 6e 5f 53 70  |(Yj=1:..ction_Sp|
0000a080  72 69 74 65 48 61 73 4d  61 73 6b 28 56 6f 2c 6d  |riteHasMask(Vo,m|
0000a090  76 24 29 20 8c 0d 84 76  4c 59 69 24 3d a4 63 74  |v$) ...vLYi$=.ct|
0000a0a0  69 6f 6e 5f 54 61 67 54  6f 53 74 72 69 6e 67 28  |ion_TagToString(|
0000a0b0  22 65 72 72 31 38 22 29  3a 59 6a 3d a4 63 74 69  |"err18"):Yj=.cti|
0000a0c0  6f 6e 5f 52 65 70 6f 72  74 45 72 72 6f 72 28 55  |on_ReportError(U|
0000a0d0  6a 2c 39 39 2c 55 63 24  2c 59 69 24 2c b9 2c b9  |j,99,Uc$,Yi$,.,.|
0000a0e0  29 0d 84 8a 0d cd 3a e7  59 6a 3d 31 20 8c 0d 84  |).....:.Yj=1 ...|
0000a0f0  9e 39 f2 6e 78 28 56 6f  2c 6d 76 24 29 3a e7 20  |.9.nx(Vo,mv$):. |
0000a100  ac a4 63 74 69 6f 6e 5f  57 69 6e 64 6f 77 49 73  |..ction_WindowIs|
0000a110  4f 70 65 6e 28 55 6a 2c  57 6a 29 20 8c f2 58 73  |Open(Uj,Wj) ..Xs|
0000a120  28 55 6a 2c 57 6a 29 0d  84 b2 11 cc 3a f2 62 78  |(Uj,Wj).....:.bx|
0000a130  28 22 44 65 73 74 22 29  0d 84 c6 05 cd 0d 84 d0  |("Dest")........|
0000a140  07 cd 3a e1 0d 84 f8 13  dd f2 67 6f 28 5a 7a 24  |..:.......go(Zz$|
0000a150  29 3a e7 56 72 20 8c 0d  85 0c 44 6e 76 3d a4 63  |):.Vr ....Dnv=.c|
0000a160  74 69 6f 6e 5f 57 69 6e  64 6f 77 49 73 4f 70 65  |tion_WindowIsOpe|
0000a170  6e 28 55 6a 2c 59 6e 29  3a f2 62 78 28 22 42 61  |n(Uj,Yn):.bx("Ba|
0000a180  63 6b 22 29 3a e7 6e 76  20 8c f2 57 77 28 55 68  |ck"):.nv ..Ww(Uh|
0000a190  2c 55 6a 2c 59 6e 2c 20  ac b9 29 0d 85 2a 66 cd  |,Uj,Yn, ..)..*f.|
0000a1a0  3a 56 73 3d 6b 6a 3a 6e  77 3d a4 63 74 69 6f 6e  |:Vs=kj:nw=.ction|
0000a1b0  5f 41 6c 69 67 6e 54 6f  50 61 67 65 53 69 7a 65  |_AlignToPageSize|
0000a1c0  28 a4 63 74 69 6f 6e 5f  53 69 7a 65 4f 66 46 69  |(.ction_SizeOfFi|
0000a1d0  6c 65 28 5a 7a 24 29 2b  31 32 38 29 3a 6b 72 3d  |le(Zz$)+128):kr=|
0000a1e0  a4 63 74 69 6f 6e 5f 41  6c 6c 6f 63 61 74 65 4d  |.ction_AllocateM|
0000a1f0  65 6d 6f 72 79 28 6e 77  29 3a e7 20 ac 6b 72 20  |emory(nw):. .kr |
0000a200  8c 0d 85 5c 4e 59 69 24  3d a4 63 74 69 6f 6e 5f  |...\NYi$=.ction_|
0000a210  54 61 67 54 6f 53 74 72  69 6e 67 28 22 65 72 72  |TagToString("err|
0000a220  30 33 22 29 3a 59 6a 3d  a4 63 74 69 6f 6e 5f 52  |03"):Yj=.ction_R|
0000a230  65 70 6f 72 74 45 72 72  6f 72 28 55 6a 2c 39 39  |eportError(Uj,99|
0000a240  2c 55 63 24 2c 59 69 24  2c 20 ac b9 2c b9 29 0d  |,Uc$,Yi$, ..,.).|
0000a250  85 70 fa cc 3a 56 74 3d  6e 77 3a 56 72 3d b9 3a  |.p..:Vt=nw:Vr=.:|
0000a260  59 70 24 3d 5a 7a 24 3a  59 6f 3d b9 3a f2 58 68  |Yp$=Zz$:Yo=.:.Xh|
0000a270  28 56 73 2c 56 74 29 3a  f2 58 69 28 56 73 2c 5a  |(Vs,Vt):.Xi(Vs,Z|
0000a280  7a 24 29 3a 6e 74 24 3d  a4 63 74 69 6f 6e 5f 4e  |z$):nt$=.ction_N|
0000a290  61 6d 65 4f 66 4e 74 68  53 70 72 69 74 65 28 56  |ameOfNthSprite(V|
0000a2a0  73 2c 31 29 3a 56 71 3d  a4 63 74 69 6f 6e 5f 53  |s,1):Vq=.ction_S|
0000a2b0  70 72 69 74 65 49 73 4f  66 4e 65 77 46 6f 72 6d  |priteIsOfNewForm|
0000a2c0  61 74 28 56 73 2c 6e 74  24 29 3a 21 67 63 3d a4  |at(Vs,nt$):!gc=.|
0000a2d0  63 74 69 6f 6e 5f 57 69  64 74 68 4f 66 53 70 72  |ction_WidthOfSpr|
0000a2e0  69 74 65 28 56 73 2c 6e  74 24 2c 56 71 29 3a 21  |ite(Vs,nt$,Vq):!|
0000a2f0  67 62 3d a4 63 74 69 6f  6e 5f 48 65 69 67 68 74  |gb=.ction_Height|
0000a300  4f 66 53 70 72 69 74 65  28 56 73 2c 6e 74 24 2c  |OfSprite(Vs,nt$,|
0000a310  56 71 29 3a 6d 71 3d a4  63 74 69 6f 6e 5f 4d 6f  |Vq):mq=.ction_Mo|
0000a320  64 65 4f 66 53 70 72 69  74 65 28 56 73 2c 6e 74  |deOfSprite(Vs,nt|
0000a330  24 2c 56 71 29 3a e7 21  67 63 3c 21 66 56 20 84  |$,Vq):.!gc<!fV .|
0000a340  21 67 62 3c 21 66 58 20  8c 0d 85 f2 5a 59 69 24  |!gb<!fX ....ZYi$|
0000a350  3d a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |=.ction_TagToStr|
0000a360  69 6e 67 28 22 65 72 72  31 39 22 29 3a 59 6a 3d  |ing("err19"):Yj=|
0000a370  a4 63 74 69 6f 6e 5f 52  65 70 6f 72 74 45 72 72  |.ction_ReportErr|
0000a380  6f 72 28 55 6a 2c 39 39  2c 55 63 24 2c 59 69 24  |or(Uj,99,Uc$,Yi$|
0000a390  2c 20 ac b9 2c b9 29 3a  f2 62 78 28 22 42 61 63  |, ..,.):.bx("Bac|
0000a3a0  6b 22 29 0d 86 10 61 cc  3a f2 5a 68 3a f2 5a 69  |k")...a.:.Zh:.Zi|
0000a3b0  3a 6e 72 3d 28 28 32 36  30 2f 21 67 62 29 2a 20  |:nr=((260/!gb)* |
0000a3c0  21 67 63 20 29 20 3a 3a  6e 73 3d 28 32 36 30 29  |!gc ) ::ns=(260)|
0000a3d0  3a f2 6e 5a 28 55 6a 2c  59 6e 2c 30 2c 6e 72 2c  |:.nZ(Uj,Yn,0,nr,|
0000a3e0  2d 6e 73 2c 30 29 3a e7  a4 63 74 69 6f 6e 5f 57  |-ns,0):..ction_W|
0000a3f0  69 6e 64 6f 77 49 73 4f  70 65 6e 28 55 6a 2c 59  |indowIsOpen(Uj,Y|
0000a400  6e 29 20 8c 0d 86 56 1f  f2 6e 7a 28 55 6a 2c 59  |n) ...V..nz(Uj,Y|
0000a410  6e 2c 6e 72 2c 6e 73 29  3a f2 59 72 28 55 6a 2c  |n,nr,ns):.Yr(Uj,|
0000a420  59 6e 29 0d 86 6a 2a cd  3a 59 6a 3d 31 3a e7 a4  |Yn)..j*.:Yj=1:..|
0000a430  63 74 69 6f 6e 5f 53 70  72 69 74 65 48 61 73 4d  |ction_SpriteHasM|
0000a440  61 73 6b 28 56 73 2c 6e  74 24 29 20 8c 0d 86 88  |ask(Vs,nt$) ....|
0000a450  4c 59 69 24 3d a4 63 74  69 6f 6e 5f 54 61 67 54  |LYi$=.ction_TagT|
0000a460  6f 53 74 72 69 6e 67 28  22 65 72 72 31 38 22 29  |oString("err18")|
0000a470  3a 59 6a 3d a4 63 74 69  6f 6e 5f 52 65 70 6f 72  |:Yj=.ction_Repor|
0000a480  74 45 72 72 6f 72 28 55  6a 2c 39 39 2c 55 63 24  |tError(Uj,99,Uc$|
0000a490  2c 59 69 24 2c b9 2c b9  29 0d 86 9c 0d cd 3a e7  |,Yi$,.,.).....:.|
0000a4a0  59 6a 3d 31 20 8c 0d 86  b0 0f f2 6e 78 28 56 73  |Yj=1 ......nx(Vs|
0000a4b0  2c 6e 74 24 29 0d 86 ba  11 cc 3a f2 62 78 28 22  |,nt$).....:.bx("|
0000a4c0  42 61 63 6b 22 29 0d 86  ce 05 cd 0d 86 d8 05 cd  |Back")..........|
0000a4d0  0d 86 e2 07 cd 3a e1 0d  87 0a 0e dd f2 6e 75 3a  |.....:.......nu:|
0000a4e0  e7 56 6a 20 8c 0d 87 1e  87 6f 55 3d 65 6f 2b 28  |.Vj .....oU=eo+(|
0000a4f0  28 56 7a 25 2f 21 67 63  29 2a 20 61 61 20 29 3a  |(Vz%/!gc)* aa ):|
0000a500  6f 56 3d 65 70 2b 28 28  57 55 25 2f 21 67 62 29  |oV=ep+((WU%/!gb)|
0000a510  2a 20 61 62 20 29 3a 6f  57 3d 28 21 66 56 2f 21  |* ab ):oW=(!fV/!|
0000a520  67 63 29 2a 20 61 61 3a  6f 58 3d 28 21 66 58 2f  |gc)* aa:oX=(!fX/|
0000a530  21 67 62 29 2a 20 61 62  3a c8 99 26 34 30 30 45  |!gb)* ab:..&400E|
0000a540  36 2c 30 3a c8 93 c8 90  6f 55 2c 6f 56 2c 6f 57  |6,0:....oU,oV,oW|
0000a550  2c 6f 58 3a c8 99 26 34  30 30 45 36 2c 37 3a c8  |,oX:..&400E6,7:.|
0000a560  93 6f 55 2c 6f 56 2c 6f  57 2c 6f 58 0d 87 6e 07  |.oU,oV,oW,oX..n.|
0000a570  cd 3a e1 0d 87 96 5d dd  f2 59 79 28 58 6b 2c 58  |.:....]..Yy(Xk,X|
0000a580  6c 29 3a f2 64 68 28 55  6a 2c 59 6e 2c 58 6b 2c  |l):.dh(Uj,Yn,Xk,|
0000a590  58 6c 29 3a 6f 59 25 3d  28 64 6a 2f 6e 72 29 2a  |Xl):oY%=(dj/nr)*|
0000a5a0  20 21 67 63 3a 6f 5a 25  3d 28 28 64 6c 2b 6e 73  | !gc:oZ%=((dl+ns|
0000a5b0  29 2f 6e 73 29 2a 20 21  67 62 3a e7 6f 59 25 3c  |)/ns)* !gb:.oY%<|
0000a5c0  3e 56 7a 25 20 84 6f 5a  25 3c 3e 57 55 25 20 8c  |>Vz% .oZ%<>WU% .|
0000a5d0  0d 87 c8 2e 56 7a 25 3d  6f 59 25 3a 21 64 62 3d  |....Vz%=oY%:!db=|
0000a5e0  56 7a 25 3a 57 55 25 3d  6f 5a 25 3a 21 64 63 3d  |Vz%:WU%=oZ%:!dc=|
0000a5f0  57 55 25 3a f2 59 72 28  55 6a 2c 59 6e 29 0d 87  |WU%:.Yr(Uj,Yn)..|
0000a600  e6 07 cd 3a e1 0d 88 0e  15 dd f2 62 78 28 6f 61  |...:.......bx(oa|
0000a610  24 29 3a c8 8e 6f 61 24  20 ca 0d 88 22 4c c9 22  |$):..oa$ ..."L."|
0000a620  53 6f 75 72 63 65 22 3a  6f 62 3d 56 6f 3a 6f 63  |Source":ob=Vo:oc|
0000a630  3d 56 70 3a 6f 64 3d 56  6e 3a 6f 65 3d 56 73 3a  |=Vp:od=Vn:oe=Vs:|
0000a640  6f 66 3d 56 74 3a 6f 67  3d 56 72 3a 62 72 3d 56  |of=Vt:og=Vr:br=V|
0000a650  6c 3a 6e 67 3d 56 6b 3a  f2 57 6b 28 55 6a 2c 57  |l:ng=Vk:.Wk(Uj,W|
0000a660  6a 2c 31 2c 33 29 0d 88  4a 4a c9 22 44 65 73 74  |j,1,3)..JJ."Dest|
0000a670  22 3a 6f 62 3d 56 6b 3a  6f 63 3d 56 6c 3a 6f 64  |":ob=Vk:oc=Vl:od|
0000a680  3d 56 6a 3a 6f 65 3d 56  73 3a 6f 66 3d 56 74 3a  |=Vj:oe=Vs:of=Vt:|
0000a690  6f 67 3d 56 72 3a 62 72  3d 56 70 3a 6e 67 3d 56  |og=Vr:br=Vp:ng=V|
0000a6a0  6f 3a f2 57 6b 28 55 6a  2c 57 6a 2c 33 2c 33 29  |o:.Wk(Uj,Wj,3,3)|
0000a6b0  0d 88 72 3b c9 22 42 61  63 6b 22 3a 6f 62 3d 56  |..r;."Back":ob=V|
0000a6c0  6b 3a 6f 63 3d 56 6c 3a  6f 64 3d 56 6a 3a 6f 65  |k:oc=Vl:od=Vj:oe|
0000a6d0  3d 56 6f 3a 6f 66 3d 56  70 3a 6f 67 3d 56 6e 3a  |=Vo:of=Vp:og=Vn:|
0000a6e0  62 72 3d 56 74 3a 6e 67  3d 56 73 0d 88 90 14 cb  |br=Vt:ng=Vs.....|
0000a6f0  3a 6f 68 3d 6f 62 3e 6f  65 3a e7 6f 68 20 8c 0d  |:oh=ob>oe:.oh ..|
0000a700  88 ae 1b c8 94 6f 62 2c  6f 65 3a c8 94 6f 63 2c  |.....ob,oe:..oc,|
0000a710  6f 66 3a c8 94 6f 64 2c  6f 67 0d 88 cc 12 cd 3a  |of:..od,og.....:|
0000a720  e7 6f 64 20 80 6f 62 3e  6e 67 20 8c 0d 88 e0 23  |.od .ob>ng ....#|
0000a730  41 25 3d 6f 62 3a 42 25  3d 6f 62 2d 62 72 3a 43  |A%=ob:B%=ob-br:C|
0000a740  25 3d 6f 63 3a d6 68 6f  3a 6f 62 2d 3d 62 72 0d  |%=oc:.ho:ob-=br.|
0000a750  88 fe 12 cd 3a e7 6f 67  20 80 6f 65 3e 6e 67 20  |....:.og .oe>ng |
0000a760  8c 0d 89 12 23 41 25 3d  6f 65 3a 42 25 3d 6f 65  |....#A%=oe:B%=oe|
0000a770  2d 62 72 3a 43 25 3d 6f  66 3a d6 68 6f 3a 6f 65  |-br:C%=of:.ho:oe|
0000a780  2d 3d 62 72 0d 89 30 0b  cd 3a e7 6f 68 20 8c 0d  |-=br..0..:.oh ..|
0000a790  89 44 1b c8 94 6f 62 2c  6f 65 3a c8 94 6f 63 2c  |.D...ob,oe:..oc,|
0000a7a0  6f 66 3a c8 94 6f 64 2c  6f 67 0d 89 62 2b cd 3a  |of:..od,og..b+.:|
0000a7b0  6b 72 3d a4 63 74 69 6f  6e 5f 41 6c 6c 6f 63 61  |kr=.ction_Alloca|
0000a7c0  74 65 4d 65 6d 6f 72 79  28 2d 62 72 29 3a c8 8e  |teMemory(-br):..|
0000a7d0  6f 61 24 20 ca 0d 89 80  49 c9 22 53 6f 75 72 63  |oa$ ....I."Sourc|
0000a7e0  65 22 3a 56 6f 3d 6f 62  3a 56 73 3d 6f 65 3a 56  |e":Vo=ob:Vs=oe:V|
0000a7f0  6a 3d 20 ac b9 3a f2 59  72 28 55 6a 2c 57 6a 29  |j= ..:.Yr(Uj,Wj)|
0000a800  3a e7 a4 63 74 69 6f 6e  5f 57 69 6e 64 6f 77 49  |:..ction_WindowI|
0000a810  73 4f 70 65 6e 28 55 6a  2c 58 77 29 20 8c 0d 89  |sOpen(Uj,Xw) ...|
0000a820  a8 0e f2 58 55 28 55 6a  2c 58 77 29 0d 89 b2 63  |...XU(Uj,Xw)...c|
0000a830  cd 3a 61 73 24 3d a4 63  74 69 6f 6e 5f 54 61 67  |.:as$=.ction_Tag|
0000a840  54 6f 53 74 72 69 6e 67  28 22 73 72 63 65 22 29  |ToString("srce")|
0000a850  3a 6f 69 24 3d a4 63 74  69 6f 6e 5f 54 61 67 54  |:oi$=.ction_TagT|
0000a860  6f 53 74 72 69 6e 67 28  22 6e 6f 6e 65 22 29 3a  |oString("none"):|
0000a870  f2 57 69 28 55 6a 2c 57  6a 2c 31 2c 61 73 24 2b  |.Wi(Uj,Wj,1,as$+|
0000a880  6f 69 24 29 3a f2 59 72  28 55 6a 2c 59 6e 29 0d  |oi$):.Yr(Uj,Yn).|
0000a890  89 e4 47 c9 22 44 65 73  74 22 3a 56 6b 3d 6f 62  |..G."Dest":Vk=ob|
0000a8a0  3a 56 73 3d 6f 65 3a 56  6e 3d 20 ac b9 3a f2 59  |:Vs=oe:Vn= ..:.Y|
0000a8b0  72 28 55 6a 2c 57 6a 29  3a e7 a4 63 74 69 6f 6e  |r(Uj,Wj):..ction|
0000a8c0  5f 57 69 6e 64 6f 77 49  73 4f 70 65 6e 28 55 6a  |_WindowIsOpen(Uj|
0000a8d0  2c 58 7a 29 20 8c 0d 8a  0c 0e f2 58 55 28 55 6a  |,Xz) ......XU(Uj|
0000a8e0  2c 58 7a 29 0d 8a 16 58  cd 3a 61 73 24 3d a4 63  |,Xz)...X.:as$=.c|
0000a8f0  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
0000a900  28 22 64 65 73 74 22 29  3a 6f 69 24 3d a4 63 74  |("dest"):oi$=.ct|
0000a910  69 6f 6e 5f 54 61 67 54  6f 53 74 72 69 6e 67 28  |ion_TagToString(|
0000a920  22 6e 6f 6e 65 22 29 3a  f2 57 69 28 55 6a 2c 57  |"none"):.Wi(Uj,W|
0000a930  6a 2c 33 2c 61 73 24 2b  6f 69 24 29 0d 8a 3e 54  |j,3,as$+oi$)..>T|
0000a940  c9 22 42 61 63 6b 22 3a  56 6b 3d 6f 62 3a 56 6f  |."Back":Vk=ob:Vo|
0000a950  3d 6f 65 3a 56 72 3d 20  ac b9 3a 56 7a 25 3d 30  |=oe:Vr= ..:Vz%=0|
0000a960  3a 21 64 62 3d 30 3a 57  55 25 3d 30 3a 21 64 63  |:!db=0:WU%=0:!dc|
0000a970  3d 30 3a e7 a4 63 74 69  6f 6e 5f 57 69 6e 64 6f  |=0:..ction_Windo|
0000a980  77 49 73 4f 70 65 6e 28  55 6a 2c 59 6e 29 20 8c  |wIsOpen(Uj,Yn) .|
0000a990  0d 8a 70 0e f2 59 72 28  55 6a 2c 59 6e 29 0d 8a  |..p..Yr(Uj,Yn)..|
0000a9a0  7a 05 cd 0d 8a 84 07 cb  3a e1 0d 8b ec 14 dd f2  |z.......:.......|
0000a9b0  57 6d 3a ea 85 3a ee 85  ea f2 6f 6a 3a e1 0d 8c  |Wm:..:....oj:...|
0000a9c0  0a 5e 67 64 3d 8e 22 3c  4d 6f 72 70 68 24 44 69  |.^gd=."<Morph$Di|
0000a9d0  72 3e 2e 50 72 65 66 73  22 3a e8 23 67 64 2c 6e  |r>.Prefs":.#gd,n|
0000a9e0  79 3a e8 23 67 64 2c 6e  71 2c 6e 6e 3a e8 23 67  |y:.#gd,nq,nn:.#g|
0000a9f0  64 2c 6e 6b 3a e8 23 67  64 2c 57 72 3a e8 23 67  |d,nk:.#gd,Wr:.#g|
0000aa00  64 2c 6f 6b 2c 6f 6c 2c  6f 6d 3a d9 23 67 64 3a  |d,ok,ol,om:.#gd:|
0000aa10  f2 59 67 3a f2 59 64 3a  f7 85 3a e1 0d 8c 8c 6a  |.Yg:.Yd:..:....j|
0000aa20  dd f2 6f 6a 3a d9 23 67  64 3a f2 6f 6e 3a f2 59  |..oj:.#gd:.on:.Y|
0000aa30  67 3a f2 59 64 3a 59 69  24 3d a4 63 74 69 6f 6e  |g:.Yd:Yi$=.ction|
0000aa40  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 65 72  |_TagToString("er|
0000aa50  72 30 39 22 29 3a 59 6a  3d a4 63 74 69 6f 6e 5f  |r09"):Yj=.ction_|
0000aa60  52 65 70 6f 72 74 45 72  72 6f 72 28 55 6a 2c 39  |ReportError(Uj,9|
0000aa70  39 2c 55 63 24 2c 59 69  24 2c 20 ac b9 2c b9 29  |9,Uc$,Yi$, ..,.)|
0000aa80  3a f2 59 66 3a e1 0d 8c  fa 14 dd f2 59 66 3a ea  |:.Yf:.......Yf:.|
0000aa90  85 3a ee 85 ea f2 6f 6f  3a e1 0d 8d 18 9e 67 64  |.:....oo:.....gd|
0000aaa0  3d ae 22 3c 4d 6f 72 70  68 24 44 69 72 3e 2e 50  |=."<Morph$Dir>.P|
0000aab0  72 65 66 73 22 3a f2 59  68 3a f1 23 67 64 2c 6e  |refs":.Yh:.#gd,n|
0000aac0  79 3a f1 23 67 64 2c 6e  71 2c 6e 6e 3a f1 23 67  |y:.#gd,nq,nn:.#g|
0000aad0  64 2c 6e 6b 3a f1 23 67  64 2c 57 72 3a f1 23 67  |d,nk:.#gd,Wr:.#g|
0000aae0  64 2c 6f 6b 2c 6f 6c 2c  6f 6d 3a d9 23 67 64 3a  |d,ok,ol,om:.#gd:|
0000aaf0  ff 22 53 74 61 6d 70 20  20 20 3c 4d 6f 72 70 68  |."Stamp   <Morph|
0000ab00  24 44 69 72 3e 2e 50 72  65 66 73 20 20 20 20 20  |$Dir>.Prefs     |
0000ab10  22 3a ff 22 53 65 74 54  79 70 65 20 3c 4d 6f 72  |":."SetType <Mor|
0000ab20  70 68 24 44 69 72 3e 2e  50 72 65 66 73 20 44 61  |ph$Dir>.Prefs Da|
0000ab30  74 61 22 3a f7 85 3a e1  0d 8d a4 5a dd f2 6f 6f  |ta":..:....Z..oo|
0000ab40  3a d9 23 67 64 3a 59 69  24 3d a4 63 74 69 6f 6e  |:.#gd:Yi$=.ction|
0000ab50  5f 54 61 67 54 6f 53 74  72 69 6e 67 28 22 65 72  |_TagToString("er|
0000ab60  72 31 30 22 29 3a 59 6a  3d a4 63 74 69 6f 6e 5f  |r10"):Yj=.ction_|
0000ab70  52 65 70 6f 72 74 45 72  72 6f 72 28 55 6a 2c 39  |ReportError(Uj,9|
0000ab80  39 2c 55 63 24 2c 59 69  24 2c 20 ac b9 2c b9 29  |9,Uc$,Yi$, ..,.)|
0000ab90  3a e1 0d 8d ea 39 dd f2  6f 6e 3a 6e 79 3d 20 ac  |:....9..on:ny= .|
0000aba0  b9 3a 6e 71 3d 31 30 3a  6e 6e 3d 31 30 3a 6e 6b  |.:nq=10:nn=10:nk|
0000abb0  3d 31 34 3a 57 72 3d 20  ac b9 3a 6f 6b 3d b9 3a  |=14:Wr= ..:ok=.:|
0000abc0  6f 6c 3d 31 3a 6f 6d 3d  31 3a e1 0d 8e 62 87 dd  |ol=1:om=1:...b..|
0000abd0  f2 59 67 3a f2 67 78 28  55 6a 2c 57 7a 2c 34 2c  |.Yg:.gx(Uj,Wz,4,|
0000abe0  6e 79 29 3a f2 57 69 28  55 6a 2c 57 7a 2c 31 31  |ny):.Wi(Uj,Wz,11|
0000abf0  2c c3 6e 71 29 3a f2 57  69 28 55 6a 2c 57 7a 2c  |,.nq):.Wi(Uj,Wz,|
0000ac00  38 2c c3 6e 6e 29 3a f2  63 55 28 55 6a 2c 57 7a  |8,.nn):.cU(Uj,Wz|
0000ac10  2c 31 39 2c 6e 6b 29 3a  f2 67 78 28 55 6a 2c 57  |,19,nk):.gx(Uj,W|
0000ac20  7a 2c 31 32 2c 57 72 29  3a f2 57 69 28 55 6a 2c  |z,12,Wr):.Wi(Uj,|
0000ac30  57 7a 2c 31 33 2c c3 6f  6c 29 3a f2 57 69 28 55  |Wz,13,.ol):.Wi(U|
0000ac40  6a 2c 57 7a 2c 31 34 2c  c3 6f 6d 29 3a e7 6f 6b  |j,Wz,14,.om):.ok|
0000ac50  20 8c 0d 8e bc 0e f2 59  65 28 22 41 6c 6c 22 29  | ......Ye("All")|
0000ac60  0d 8e c6 11 cc 3a f2 59  65 28 22 46 72 6f 6d 22  |.....:.Ye("From"|
0000ac70  29 0d 8e da 07 cd 3a e1  0d 8f 02 f8 dd f2 59 68  |).....:.......Yh|
0000ac80  3a 6e 79 3d 20 ac a4 63  74 69 6f 6e 5f 49 63 6f  |:ny= ..ction_Ico|
0000ac90  6e 49 73 54 6f 67 67 6c  65 64 28 55 6a 2c 57 7a  |nIsToggled(Uj,Wz|
0000aca0  2c 34 29 3a 6e 71 3d bb  a4 63 74 69 6f 6e 5f 52  |,4):nq=..ction_R|
0000acb0  65 61 64 49 63 6f 6e 54  65 78 74 28 55 6a 2c 57  |eadIconText(Uj,W|
0000acc0  7a 2c 31 31 29 3a 6e 6e  3d bb a4 63 74 69 6f 6e  |z,11):nn=..ction|
0000acd0  5f 52 65 61 64 49 63 6f  6e 54 65 78 74 28 55 6a  |_ReadIconText(Uj|
0000ace0  2c 57 7a 2c 38 29 3a 6e  6b 3d a4 63 74 69 6f 6e  |,Wz,8):nk=.ction|
0000acf0  5f 43 6f 6c 6f 75 72 4f  66 49 63 6f 6e 28 55 6a  |_ColourOfIcon(Uj|
0000ad00  2c 57 7a 2c 31 39 29 3a  57 72 3d 20 ac a4 63 74  |,Wz,19):Wr= ..ct|
0000ad10  69 6f 6e 5f 49 63 6f 6e  49 73 54 6f 67 67 6c 65  |ion_IconIsToggle|
0000ad20  64 28 55 6a 2c 57 7a 2c  31 32 29 3a 6f 6b 3d 20  |d(Uj,Wz,12):ok= |
0000ad30  ac a4 63 74 69 6f 6e 5f  49 63 6f 6e 49 73 54 6f  |..ction_IconIsTo|
0000ad40  67 67 6c 65 64 28 55 6a  2c 57 7a 2c 33 29 3a 6f  |ggled(Uj,Wz,3):o|
0000ad50  6c 3d bb a4 63 74 69 6f  6e 5f 52 65 61 64 49 63  |l=..ction_ReadIc|
0000ad60  6f 6e 54 65 78 74 28 55  6a 2c 57 7a 2c 31 33 29  |onText(Uj,Wz,13)|
0000ad70  0d 8f 52 51 6f 6d 3d bb  a4 63 74 69 6f 6e 5f 52  |..RQom=..ction_R|
0000ad80  65 61 64 49 63 6f 6e 54  65 78 74 28 55 6a 2c 57  |eadIconText(Uj,W|
0000ad90  7a 2c 31 34 29 3a f2 59  67 3a e7 a4 63 74 69 6f  |z,14):.Yg:..ctio|
0000ada0  6e 5f 57 69 6e 64 6f 77  49 73 4f 70 65 6e 28 55  |n_WindowIsOpen(U|
0000adb0  6a 2c 58 77 29 20 8c f2  59 72 28 55 6a 2c 58 77  |j,Xw) ..Yr(Uj,Xw|
0000adc0  29 0d 8f 70 2b e7 a4 63  74 69 6f 6e 5f 57 69 6e  |)..p+..ction_Win|
0000add0  64 6f 77 49 73 4f 70 65  6e 28 55 6a 2c 58 7a 29  |dowIsOpen(Uj,Xz)|
0000ade0  20 8c f2 59 72 28 55 6a  2c 58 7a 29 0d 8f 7a 05  | ..Yr(Uj,Xz)..z.|
0000adf0  e1 0d 8f 98 6d dd f2 59  64 3a 65 6b 3d a4 63 74  |....m..Yd:ek=.ct|
0000ae00  69 6f 6e 5f 49 63 6f 6e  49 73 54 6f 67 67 6c 65  |ion_IconIsToggle|
0000ae10  64 28 55 6a 2c 57 7a 2c  34 29 3a f2 67 79 28 55  |d(Uj,Wz,4):.gy(U|
0000ae20  6a 2c 57 7a 2c 31 31 2c  65 6b 29 3a f2 67 79 28  |j,Wz,11,ek):.gy(|
0000ae30  55 6a 2c 57 7a 2c 31 38  2c 65 6b 29 3a f2 67 79  |Uj,Wz,18,ek):.gy|
0000ae40  28 55 6a 2c 57 7a 2c 38  2c 65 6b 29 3a f2 67 79  |(Uj,Wz,8,ek):.gy|
0000ae50  28 55 6a 2c 57 7a 2c 39  2c 65 6b 29 3a e1 0d 91  |(Uj,Wz,9,ek):...|
0000ae60  c8 2c dd a4 63 74 69 6f  6e 5f 57 69 64 74 68 4f  |.,..ction_WidthO|
0000ae70  66 53 70 72 69 74 65 28  6f 70 2c 6f 71 24 2c 6d  |fSprite(op,oq$,m|
0000ae80  63 29 3a e7 20 ac 6d 63  20 8c 0d 91 dc 2d c8 99  |c):. .mc ....-..|
0000ae90  26 32 45 2c 32 35 36 2b  34 30 2c 6f 70 2c 6f 71  |&2E,256+40,op,oq|
0000aea0  24 20 b8 2c 2c 2c 63 64  2c 63 65 2c 63 66 2c 6f  |$ .,,,cd,ce,cf,o|
0000aeb0  72 3a 6f 73 3d 63 64 0d  91 f0 76 cc 3a 6f 74 3d  |r:os=cd...v.:ot=|
0000aec0  a4 63 74 69 6f 6e 5f 50  6f 69 6e 74 65 72 54 6f  |.ction_PointerTo|
0000aed0  53 70 72 69 74 65 43 6f  6e 74 72 6f 6c 42 6c 6f  |SpriteControlBlo|
0000aee0  63 6b 28 6f 70 2c 6f 71  24 29 3a 6f 73 3d 6f 74  |ck(op,oq$):os=ot|
0000aef0  21 28 34 2a 34 29 20 2b  20 31 3a 6f 75 3d 6f 74  |!(4*4) + 1:ou=ot|
0000af00  21 28 31 30 2a 34 29 20  3a 3a 6f 76 3d 28 28 6f  |!(10*4) ::ov=((o|
0000af10  75 3e 3e 32 37 29 20 80  25 31 31 31 31 31 29 3a  |u>>27) .%11111):|
0000af20  e7 6f 76 3d 35 20 8c 6f  73 2b 3d 6f 73 0d 92 2c  |.ov=5 .os+=os..,|
0000af30  09 cd 3a 3d 6f 73 0d 92  54 2d dd a4 63 74 69 6f  |..:=os..T-..ctio|
0000af40  6e 5f 48 65 69 67 68 74  4f 66 53 70 72 69 74 65  |n_HeightOfSprite|
0000af50  28 6f 70 2c 6f 71 24 2c  6d 63 29 3a e7 20 ac 6d  |(op,oq$,mc):. .m|
0000af60  63 20 8c 0d 92 68 2d c8  99 26 32 45 2c 32 35 36  |c ...h-..&2E,256|
0000af70  2b 34 30 2c 6f 70 2c 6f  71 24 20 b8 2c 2c 2c 63  |+40,op,oq$ .,,,c|
0000af80  64 2c 63 65 2c 63 66 2c  6f 72 3a 6f 77 3d 63 65  |d,ce,cf,or:ow=ce|
0000af90  0d 92 7c 43 cc 3a 6f 74  3d a4 63 74 69 6f 6e 5f  |..|C.:ot=.ction_|
0000afa0  50 6f 69 6e 74 65 72 54  6f 53 70 72 69 74 65 43  |PointerToSpriteC|
0000afb0  6f 6e 74 72 6f 6c 42 6c  6f 63 6b 28 6f 70 2c 6f  |ontrolBlock(op,o|
0000afc0  71 24 29 3a 6f 77 3d 6f  74 21 28 35 2a 34 29 20  |q$):ow=ot!(5*4) |
0000afd0  2b 20 31 0d 92 9a 09 cd  3a 3d 6f 77 0d 92 c2 2b  |+ 1.....:=ow...+|
0000afe0  dd a4 63 74 69 6f 6e 5f  4d 6f 64 65 4f 66 53 70  |..ction_ModeOfSp|
0000aff0  72 69 74 65 28 6f 70 2c  6f 71 24 2c 6d 63 29 3a  |rite(op,oq$,mc):|
0000b000  e7 20 ac 6d 63 20 8c 0d  92 d6 30 c8 99 26 32 30  |. .mc ....0..&20|
0000b010  30 32 45 2c 32 35 36 2b  34 30 2c 6f 70 2c 6f 71  |02E,256+40,op,oq|
0000b020  24 20 b8 2c 2c 2c 63 64  2c 63 65 2c 63 66 2c 6f  |$ .,,,cd,ce,cf,o|
0000b030  72 3a 6f 75 3d 6f 72 0d  92 ea 42 cc 3a 6f 74 3d  |r:ou=or...B.:ot=|
0000b040  a4 63 74 69 6f 6e 5f 50  6f 69 6e 74 65 72 54 6f  |.ction_PointerTo|
0000b050  53 70 72 69 74 65 43 6f  6e 74 72 6f 6c 42 6c 6f  |SpriteControlBlo|
0000b060  63 6b 28 6f 70 2c 6f 71  24 29 3a 6f 75 3d 6f 74  |ck(op,oq$):ou=ot|
0000b070  21 28 31 30 2a 34 29 20  3a 0d 93 08 09 cd 3a 3d  |!(10*4) :.....:=|
0000b080  6f 75 0d 93 30 6f dd a4  63 74 69 6f 6e 5f 53 70  |ou..0o..ction_Sp|
0000b090  72 69 74 65 48 61 73 4d  61 73 6b 28 6f 70 2c 6f  |riteHasMask(op,o|
0000b0a0  71 24 29 3a 6f 74 3d a4  63 74 69 6f 6e 5f 50 6f  |q$):ot=.ction_Po|
0000b0b0  69 6e 74 65 72 54 6f 53  70 72 69 74 65 43 6f 6e  |interToSpriteCon|
0000b0c0  74 72 6f 6c 42 6c 6f 63  6b 28 6f 70 2c 6f 71 24  |trolBlock(op,oq$|
0000b0d0  29 3a 6f 78 3d 6f 74 21  28 38 2a 34 29 3a 6f 79  |):ox=ot!(8*4):oy|
0000b0e0  3d 6f 74 21 28 39 2a 34  29 3a 3d 6f 79 3c 3e 6f  |=ot!(9*4):=oy<>o|
0000b0f0  78 0d 93 76 66 dd a4 63  74 69 6f 6e 5f 53 70 72  |x..vf..ction_Spr|
0000b100  69 74 65 48 61 73 50 61  6c 65 74 74 65 28 6f 70  |iteHasPalette(op|
0000b110  2c 6f 71 24 29 3a 6f 7a  3d a4 63 74 69 6f 6e 5f  |,oq$):oz=.ction_|
0000b120  50 6f 69 6e 74 65 72 54  6f 53 70 72 69 74 65 43  |PointerToSpriteC|
0000b130  6f 6e 74 72 6f 6c 42 6c  6f 63 6b 28 6f 70 2c 6f  |ontrolBlock(op,o|
0000b140  71 24 29 3a 70 55 3d 6f  7a 21 33 32 3a e7 70 55  |q$):pU=oz!32:.pU|
0000b150  3d 31 31 2a 34 20 8c 0d  93 9e 09 70 56 3d 2d 31  |=11*4 .....pV=-1|
0000b160  0d 93 a8 10 cc 3a 70 56  3d 6f 7a 2b 31 31 2a 34  |.....:pV=oz+11*4|
0000b170  0d 93 bc 09 cd 3a 3d 70  56 0d 93 e4 2b dd a4 63  |.....:=pV...+..c|
0000b180  74 69 6f 6e 5f 4e 75 6d  62 65 72 4f 66 53 70 72  |tion_NumberOfSpr|
0000b190  69 74 65 73 49 6e 41 72  65 61 28 6f 70 29 3a 3d  |itesInArea(op):=|
0000b1a0  6f 70 21 34 0d 94 0c 73  dd a4 63 74 69 6f 6e 5f  |op!4...s..ction_|
0000b1b0  4e 61 6d 65 4f 66 4e 74  68 53 70 72 69 74 65 28  |NameOfNthSprite(|
0000b1c0  6f 70 2c 6e 29 3a 70 57  3d 6f 70 2b 6f 70 21 38  |op,n):pW=op+op!8|
0000b1d0  3a 70 58 3d 31 3a c8 95  70 58 3c 6e 3a 70 59 3d  |:pX=1:..pX<n:pY=|
0000b1e0  70 57 21 30 3a 70 57 2b  3d 70 59 3a 70 58 2b 3d  |pW!0:pW+=pY:pX+=|
0000b1f0  31 3a ce 3a 3d c0 a4 63  74 69 6f 6e 5f 45 78 74  |1:.:=..ction_Ext|
0000b200  72 61 63 74 53 74 72 69  6e 67 28 70 57 2b 34 29  |ractString(pW+4)|
0000b210  2c 31 32 29 2b bd 30 0d  94 8e 5d dd a4 63 74 69  |,12)+.0...]..cti|
0000b220  6f 6e 5f 50 6f 69 6e 74  65 72 54 6f 53 70 72 69  |on_PointerToSpri|
0000b230  74 65 44 61 74 61 28 6f  70 2c 6f 71 24 29 3a c8  |teData(op,oq$):.|
0000b240  99 26 32 45 2c 32 35 36  2b 32 34 2c 6f 70 2c 6f  |.&2E,256+24,op,o|
0000b250  71 24 20 b8 2c 2c 63 63  3a 70 5a 3d 63 63 3a 70  |q$ .,,cc:pZ=cc:p|
0000b260  55 3d 70 5a 21 33 32 3a  70 61 3d 70 5a 2b 70 55  |U=pZ!32:pa=pZ+pU|
0000b270  3a 3d 70 61 0d 94 de 5b  dd a4 63 74 69 6f 6e 5f  |:=pa...[..ction_|
0000b280  50 6f 69 6e 74 65 72 54  6f 4d 61 73 6b 44 61 74  |PointerToMaskDat|
0000b290  61 28 6f 70 2c 6f 71 24  29 3a c8 99 26 32 45 2c  |a(op,oq$):..&2E,|
0000b2a0  32 35 36 2b 32 34 2c 6f  70 2c 6f 71 24 20 b8 2c  |256+24,op,oq$ .,|
0000b2b0  2c 63 63 3a 70 5a 3d 63  63 3a 70 62 3d 70 5a 21  |,cc:pZ=cc:pb=pZ!|
0000b2c0  33 36 3a 70 63 3d 70 5a  2b 70 62 3a 3d 70 63 0d  |36:pc=pZ+pb:=pc.|
0000b2d0  95 2e 53 dd a4 63 74 69  6f 6e 5f 50 6f 69 6e 74  |..S..ction_Point|
0000b2e0  65 72 54 6f 53 70 72 69  74 65 43 6f 6e 74 72 6f  |erToSpriteContro|
0000b2f0  6c 42 6c 6f 63 6b 28 6f  70 2c 6f 71 24 29 3a c8  |lBlock(op,oq$):.|
0000b300  99 26 32 45 2c 32 35 36  2b 32 34 2c 6f 70 2c 6f  |.&2E,256+24,op,o|
0000b310  71 24 20 b8 2c 2c 63 63  3a 70 64 3d 63 63 3a 3d  |q$ .,,cc:pd=cc:=|
0000b320  70 64 0d 95 6a 26 dd f2  70 65 28 6f 70 2c 5a 7a  |pd..j&..pe(op,Zz|
0000b330  24 29 3a c8 99 26 32 45  2c 32 35 36 2b 31 32 2c  |$):..&2E,256+12,|
0000b340  6f 70 2c 5a 7a 24 3a e1  0d 95 9c 26 dd f2 58 69  |op,Zz$:....&..Xi|
0000b350  28 6f 70 2c 5a 7a 24 29  3a c8 99 26 32 45 2c 32  |(op,Zz$):..&2E,2|
0000b360  35 36 2b 31 30 2c 6f 70  2c 5a 7a 24 3a e1 0d 95  |56+10,op,Zz$:...|
0000b370  ce 30 dd f2 58 68 28 6f  70 2c 70 66 29 3a 6f 70  |.0..Xh(op,pf):op|
0000b380  21 30 3d 70 66 3a 6f 70  21 38 3d 31 36 3a c8 99  |!0=pf:op!8=16:..|
0000b390  26 32 45 2c 32 35 36 2b  39 2c 6f 70 3a e1 0d 96  |&2E,256+9,op:...|
0000b3a0  14 62 dd a4 63 74 69 6f  6e 5f 52 65 61 64 53 70  |.b..ction_ReadSp|
0000b3b0  72 69 74 65 50 69 78 65  6c 28 6f 70 2c 6f 71 24  |ritePixel(op,oq$|
0000b3c0  2c 78 2c 79 29 3a ea 70  67 2c 70 68 3a c8 99 26  |,x,y):.pg,ph:..&|
0000b3d0  32 45 2c 32 35 36 2b 34  31 2c 6f 70 2c 6f 71 24  |2E,256+41,op,oq$|
0000b3e0  2c 78 2c 79 20 b8 2c 2c  2c 2c 2c 63 66 2c 6f 72  |,x,y .,,,,,cf,or|
0000b3f0  3a 70 67 3d 63 66 3a 70  68 3d 6f 72 3a 3d 70 67  |:pg=cf:ph=or:=pg|
0000b400  0d 96 64 3a dd f2 70 69  28 6f 70 2c 6f 71 24 2c  |..d:..pi(op,oq$,|
0000b410  78 2c 79 2c 70 67 2c 70  68 29 3a c8 99 26 32 45  |x,y,pg,ph):..&2E|
0000b420  2c 32 35 36 2b 34 32 2c  6f 70 2c 6f 71 24 2c 78  |,256+42,op,oq$,x|
0000b430  2c 79 2c 70 67 2c 70 68  3a e1 0d 96 96 2e dd f2  |,y,pg,ph:.......|
0000b440  70 6a 28 6f 70 2c 6f 71  24 2c 70 6b 24 29 3a c8  |pj(op,oq$,pk$):.|
0000b450  99 26 32 45 2c 32 35 36  2b 32 36 2c 6f 70 2c 6f  |.&2E,256+26,op,o|
0000b460  71 24 2c 70 6b 24 3a e1  0d 96 c8 47 dd a4 63 74  |q$,pk$:....G..ct|
0000b470  69 6f 6e 5f 53 70 72 69  74 65 73 54 79 70 65 3a  |ion_SpritesType:|
0000b480  70 6c 3d 31 3a c8 99 26  36 2c 31 36 31 2c 31 33  |pl=1:..&6,161,13|
0000b490  33 20 b8 2c 2c 70 6d 3a  70 6d 3d 28 70 6d 3e 3e  |3 .,,pm:pm=(pm>>|
0000b4a0  32 29 20 80 33 3a e7 28  70 6d 3d 32 29 20 8c 0d  |2) .3:.(pm=2) ..|
0000b4b0  97 0e 08 70 6c 3d 33 0d  97 18 30 cc 3a c8 99 26  |...pl=3...0.:..&|
0000b4c0  33 35 2c 2d 31 2c 34 20  b8 2c 2c 6e 58 3a c8 99  |35,-1,4 .,,nX:..|
0000b4d0  26 33 35 2c 2d 31 2c 35  20 b8 2c 2c 6e 59 3a e7  |&35,-1,5 .,,nY:.|
0000b4e0  6e 58 3d 6e 59 20 8c 0d  97 40 08 70 6c 3d 32 0d  |nX=nY ...@.pl=2.|
0000b4f0  97 4a 05 cd 0d 97 54 09  cd 3a 3d 70 6c 0d 97 7c  |.J....T..:=pl..||
0000b500  69 dd a4 63 74 69 6f 6e  5f 53 70 72 69 74 65 49  |i..ction_SpriteI|
0000b510  73 4f 66 4e 65 77 46 6f  72 6d 61 74 28 6f 70 2c  |sOfNewFormat(op,|
0000b520  6f 71 24 29 3a 6f 74 3d  a4 63 74 69 6f 6e 5f 50  |oq$):ot=.ction_P|
0000b530  6f 69 6e 74 65 72 54 6f  53 70 72 69 74 65 43 6f  |ointerToSpriteCo|
0000b540  6e 74 72 6f 6c 42 6c 6f  63 6b 28 6f 70 2c 6f 71  |ntrolBlock(op,oq|
0000b550  24 29 3a 6e 61 3d 6f 74  21 28 31 30 2a 34 29 3a  |$):na=ot!(10*4):|
0000b560  3d 6e 61 3e 34 30 0d 97  b8 26 dd f2 6e 78 28 6f  |=na>40...&..nx(o|
0000b570  70 2c 6f 71 24 29 3a c8  99 26 32 45 2c 32 35 36  |p,oq$):..&2E,256|
0000b580  2b 33 30 2c 6f 70 2c 6f  71 24 3a e1 0d 97 ea 3f  |+30,op,oq$:....?|
0000b590  dd f2 70 6e 28 6f 70 2c  6f 71 24 2c 61 61 2c 61  |..pn(op,oq$,aa,a|
0000b5a0  62 2c 6e 61 2c 70 6f 29  3a c8 99 26 32 45 2c 32  |b,na,po):..&2E,2|
0000b5b0  35 36 2b 31 35 2c 6f 70  2c 6f 71 24 2c 94 70 6f  |56+15,op,oq$,.po|
0000b5c0  2c 61 61 2c 61 62 2c 6e  61 3a e1 0d 98 8a 61 dd  |,aa,ab,na:....a.|
0000b5d0  f2 61 59 28 5a 7a 24 29  3a 21 70 70 3d 21 62 74  |.aY(Zz$):!pp=!bt|
0000b5e0  3a 21 70 71 3d 28 21 66  58 2d 21 62 75 29 2d 21  |:!pq=(!fX-!bu)-!|
0000b5f0  66 58 3a 21 70 72 3d 21  62 79 3a 21 70 73 3d 28  |fX:!pr=!by:!ps=(|
0000b600  21 6d 75 2d 21 62 7a 29  2d 21 6d 75 3a 21 70 74  |!mu-!bz)-!mu:!pt|
0000b610  3d 21 64 62 3a 21 70 75  3d 28 21 67 62 2d 21 64  |=!db:!pu=(!gb-!d|
0000b620  63 29 2d 21 66 58 3a e7  56 72 20 8c 0d 98 ee 1f  |c)-!fX:.Vr .....|
0000b630  70 76 3d 56 73 3a 70 77  3d 56 74 3a 21 70 78 3d  |pv=Vs:pw=Vt:!px=|
0000b640  21 67 63 3a 21 70 79 3d  21 67 62 0d 99 16 2d cc  |!gc:!py=!gb...-.|
0000b650  3a 70 76 3d 56 6b 3a 70  77 3d 56 6c 3a 21 70 78  |:pv=Vk:pw=Vl:!px|
0000b660  3d 21 66 56 3a 21 70 79  3d 21 66 58 3a 21 70 74  |=!fV:!py=!fX:!pt|
0000b670  3d 30 3a 21 70 75 3d 30  0d 99 5c 38 cd 3a 57 63  |=0:!pu=0..\8.:Wc|
0000b680  24 3d 5a 7a 24 3a 70 7a  3d 6b 6a 3a 6b 72 3d a4  |$=Zz$:pz=kj:kr=.|
0000b690  63 74 69 6f 6e 5f 41 6c  6c 6f 63 61 74 65 4d 65  |ction_AllocateMe|
0000b6a0  6d 6f 72 79 28 70 77 29  3a e7 20 ac 6b 72 20 8c  |mory(pw):. .kr .|
0000b6b0  0d 99 ac 4e 59 69 24 3d  a4 63 74 69 6f 6e 5f 54  |...NYi$=.ction_T|
0000b6c0  61 67 54 6f 53 74 72 69  6e 67 28 22 65 72 72 30  |agToString("err0|
0000b6d0  38 22 29 3a 59 6a 3d a4  63 74 69 6f 6e 5f 52 65  |8"):Yj=.ction_Re|
0000b6e0  70 6f 72 74 45 72 72 6f  72 28 55 6a 2c 39 39 2c  |portError(Uj,99,|
0000b6f0  55 63 24 2c 59 69 24 2c  20 ac b9 2c b9 29 0d 99  |Uc$,Yi$, ..,.)..|
0000b700  ca e1 cc 3a f2 71 55 3a  71 56 24 3d a4 63 74 69  |...:.qU:qV$=.cti|
0000b710  6f 6e 5f 4e 61 6d 65 4f  66 4e 74 68 53 70 72 69  |on_NameOfNthSpri|
0000b720  74 65 28 56 6b 2c 31 29  3a 71 57 24 3d a4 63 74  |te(Vk,1):qW$=.ct|
0000b730  69 6f 6e 5f 4e 61 6d 65  4f 66 4e 74 68 53 70 72  |ion_NameOfNthSpr|
0000b740  69 74 65 28 70 7a 2c 31  29 3a 71 58 24 3d a4 63  |ite(pz,1):qX$=.c|
0000b750  74 69 6f 6e 5f 4e 61 6d  65 4f 66 4e 74 68 53 70  |tion_NameOfNthSp|
0000b760  72 69 74 65 28 56 6f 2c  31 29 3a 21 71 59 3d a4  |rite(Vo,1):!qY=.|
0000b770  63 74 69 6f 6e 5f 50 6f  69 6e 74 65 72 54 6f 53  |ction_PointerToS|
0000b780  70 72 69 74 65 44 61 74  61 28 56 6b 2c 71 56 24  |priteData(Vk,qV$|
0000b790  29 3a 21 71 5a 3d a4 63  74 69 6f 6e 5f 50 6f 69  |):!qZ=.ction_Poi|
0000b7a0  6e 74 65 72 54 6f 53 70  72 69 74 65 44 61 74 61  |nterToSpriteData|
0000b7b0  28 70 7a 2c 71 57 24 29  3a 21 71 61 3d a4 63 74  |(pz,qW$):!qa=.ct|
0000b7c0  69 6f 6e 5f 50 6f 69 6e  74 65 72 54 6f 53 70 72  |ion_PointerToSpr|
0000b7d0  69 74 65 44 61 74 61 28  56 6f 2c 71 58 24 29 0d  |iteData(Vo,qX$).|
0000b7e0  9a 42 2b 21 71 62 3d bb  a4 63 74 69 6f 6e 5f 52  |.B+!qb=..ction_R|
0000b7f0  65 61 64 49 63 6f 6e 54  65 78 74 28 55 6a 2c 57  |eadIconText(Uj,W|
0000b800  6a 2c 36 29 3a e7 6f 6b  20 8c 0d 9a 56 11 6f 6c  |j,6):.ok ...V.ol|
0000b810  3d 32 3a 6f 6d 3d 21 71  62 2d 31 0d 9a 6a 11 cd  |=2:om=!qb-1..j..|
0000b820  3a e7 6f 6c 3c 31 20 8c  6f 6c 3d 31 0d 9a 7e 13  |:.ol<1 .ol=1..~.|
0000b830  e7 6f 6c 3e 21 71 62 20  8c 6f 6c 3d 21 71 62 0d  |.ol>!qb .ol=!qb.|
0000b840  9a 88 0f e7 6f 6d 3c 31  20 8c 6f 6d 3d 31 0d 9a  |....om<1 .om=1..|
0000b850  92 13 e7 6f 6d 3e 21 71  62 20 8c 6f 6d 3d 21 71  |...om>!qb .om=!q|
0000b860  62 0d 9a 9c 2d f2 59 67  3a 71 63 3d 28 6f 6d 2d  |b...-.Yg:qc=(om-|
0000b870  6f 6c 29 2b 31 3a ff 22  43 44 69 72 20 22 2b 5a  |ol)+1:."CDir "+Z|
0000b880  7a 24 3a f2 71 64 3a e7  71 63 3e 30 20 8c 0d 9a  |z$:.qd:.qc>0 ...|
0000b890  e2 0b e7 20 ac 57 72 20  8c 0d 9a ec 07 f2 71 65  |... .Wr ......qe|
0000b8a0  0d 9a f6 09 cc 3a f2 71  66 0d 9b 0a 05 cd 0d 9b  |.....:.qf.......|
0000b8b0  14 05 cd 0d 9b 28 07 cd  3a e1 0d 9b 5a 10 dd f2  |.....(..:...Z...|
0000b8c0  71 65 3a e7 71 63 3e 30  20 8c 0d 9b 6e 42 c8 99  |qe:.qc>0 ...nB..|
0000b8d0  26 34 30 36 43 30 3a f2  71 66 3a f5 3a 71 67 25  |&406C0:.qf:.:qg%|
0000b8e0  3d 28 28 21 71 68 2d 6f  6c 2b 31 29 2f 28 6f 6d  |=((!qh-ol+1)/(om|
0000b8f0  2d 6f 6c 2b 31 29 29 2a  20 31 30 30 3a e7 71 67  |-ol+1))* 100:.qg|
0000b900  25 3e 39 39 20 8c 71 67  25 3d 39 39 0d 9b a0 23  |%>99 .qg%=99...#|
0000b910  c8 99 26 34 30 36 43 34  2c 71 67 25 3a f2 57 74  |..&406C4,qg%:.Wt|
0000b920  3a fd 20 ac 57 59 3a c8  99 26 34 30 36 43 31 0d  |:. .WY:..&406C1.|
0000b930  9b c8 07 cd 3a e1 0d 9b  f0 a8 dd f2 71 66 3a f2  |....:.......qf:.|
0000b940  57 69 28 55 6a 2c 58 74  2c 33 2c 22 22 29 3a 57  |Wi(Uj,Xt,3,""):W|
0000b950  5a 3d a4 63 74 69 6f 6e  5f 53 65 74 49 63 6f 6e  |Z=.ction_SetIcon|
0000b960  57 69 64 74 68 28 55 6a  2c 58 74 2c 57 5a 2c 31  |Width(Uj,Xt,WZ,1|
0000b970  29 3a f2 58 55 28 55 6a  2c 59 71 29 3a f2 58 55  |):.XU(Uj,Yq):.XU|
0000b980  28 55 6a 2c 59 74 29 3a  f2 58 55 28 55 6a 2c 57  |(Uj,Yt):.XU(Uj,W|
0000b990  6a 29 3a f2 58 55 28 55  6a 2c 59 6c 29 3a f2 58  |j):.XU(Uj,Yl):.X|
0000b9a0  55 28 55 6a 2c 58 77 29  3a f2 58 55 28 55 6a 2c  |U(Uj,Xw):.XU(Uj,|
0000b9b0  58 7a 29 3a f2 58 55 28  55 6a 2c 59 6e 29 3a f2  |Xz):.XU(Uj,Yn):.|
0000b9c0  58 73 28 55 6a 2c 58 74  29 3a 21 71 68 3d 6f 6c  |Xs(Uj,Xt):!qh=ol|
0000b9d0  3a e7 21 71 68 3d 31 20  8c 21 71 68 3d 32 0d 9c  |:.!qh=1 .!qh=2..|
0000b9e0  40 1d 71 69 3d 2d 31 3a  71 6a 3d 30 3a 57 59 3d  |@.qi=-1:qj=0:WY=|
0000b9f0  b9 3a f2 71 6b 3a f2 71  6c 3a e1 0d 9c 90 10 dd  |.:.qk:.ql:......|
0000ba00  f2 57 74 3a e7 20 ac 71  6d 20 8c 0d 9c a4 0b f2  |.Wt:. .qm ......|
0000ba10  71 6e 28 57 72 29 0d 9c  ae 0d cc 3a f2 71 6b 3a  |qn(Wr).....:.qk:|
0000ba20  f2 71 6f 0d 9c cc 07 cd  3a e1 0d 9c f4 1a dd f2  |.qo.....:.......|
0000ba30  71 6b 3a 71 69 2b 3d 31  3a e7 71 69 3e 66 61 25  |qk:qi+=1:.qi>fa%|
0000ba40  2d 32 20 8c 0d 9d 1c 1a  71 69 3d 30 3a 71 6a 2b  |-2 .....qi=0:qj+|
0000ba50  3d 31 3a e7 71 6a 3e 66  59 25 2d 32 20 8c 0d 9d  |=1:.qj>fY%-2 ...|
0000ba60  3a 47 f2 70 65 28 70 7a  2c 57 63 24 2b 22 2e 69  |:G.pe(pz,Wc$+".i|
0000ba70  6d 61 67 65 22 2b c2 22  30 30 30 22 2b c3 21 71  |mage"+."000"+.!q|
0000ba80  68 2c 33 29 29 3a 71 6a  3d 30 3a 21 71 68 2b 3d  |h,3)):qj=0:!qh+=|
0000ba90  31 3a f2 71 6c 3a e7 21  71 68 3e 6f 6d 20 8c 57  |1:.ql:.!qh>om .W|
0000baa0  59 3d 20 ac b9 0d 9d 6c  05 cd 0d 9d 76 0b cd 3a  |Y= ....l....v..:|
0000bab0  e7 57 59 20 8c 0d 9d 94  16 f2 71 70 28 71 69 2c  |.WY ......qp(qi,|
0000bac0  71 6a 29 3a f2 71 6e 28  57 72 29 0d 9d a8 18 cc  |qj):.qn(Wr).....|
0000bad0  3a f2 58 55 28 55 6a 2c  58 74 29 3a f2 71 71 3a  |:.XU(Uj,Xt):.qq:|
0000bae0  f2 58 67 0d 9d d0 07 cd  3a e1 0d 9e 02 8e dd f2  |.Xg.....:.......|
0000baf0  71 6c 3a 71 72 24 3d a4  63 74 69 6f 6e 5f 54 61  |ql:qr$=.ction_Ta|
0000bb00  67 54 6f 53 74 72 69 6e  67 28 22 66 72 6d 65 22  |gToString("frme"|
0000bb10  29 3a 5a 58 24 3d 22 20  22 2b c3 28 21 71 68 2d  |):ZX$=" "+.(!qh-|
0000bb20  6f 6c 2b 31 29 2b 22 20  22 3a 71 73 24 3d a4 63  |ol+1)+" ":qs$=.c|
0000bb30  74 69 6f 6e 5f 54 61 67  54 6f 53 74 72 69 6e 67  |tion_TagToString|
0000bb40  28 22 6f 66 22 29 3a 5a  59 24 3d 22 20 22 2b c3  |("of"):ZY$=" "+.|
0000bb50  28 6f 6d 2b 31 2d 6f 6c  29 3a f2 57 69 28 55 6a  |(om+1-ol):.Wi(Uj|
0000bb60  2c 58 74 2c 33 2c 71 72  24 2b 5a 58 24 2b 71 73  |,Xt,3,qr$+ZX$+qs|
0000bb70  24 2b 5a 59 24 29 3a e1  0d 9e 5c 62 dd f2 71 6f  |$+ZY$):...\b..qo|
0000bb80  3a 71 74 3d 28 66 61 25  2d 31 29 2a 20 28 66 59  |:qt=(fa%-1)* (fY|
0000bb90  25 2d 31 29 3a 71 75 3d  31 2b 71 69 2b 71 6a 2a  |%-1):qu=1+qi+qj*|
0000bba0  28 66 61 25 2d 31 29 3a  71 76 3d 71 75 2f 71 74  |(fa%-1):qv=qu/qt|
0000bbb0  3a 57 5a 3d a4 63 74 69  6f 6e 5f 53 65 74 49 63  |:WZ=.ction_SetIc|
0000bbc0  6f 6e 57 69 64 74 68 28  55 6a 2c 58 74 2c 57 5a  |onWidth(Uj,Xt,WZ|
0000bbd0  2c 34 36 34 2a 71 76 29  3a e1 0d 9e ac ea dd f2  |,464*qv):.......|
0000bbe0  71 70 28 71 77 2c 71 78  29 3a f2 71 79 28 71 77  |qp(qw,qx):.qy(qw|
0000bbf0  2c 71 78 2c b9 29 3a 21  71 7a 3d 72 55 25 3a 21  |,qx,.):!qz=rU%:!|
0000bc00  72 56 3d 72 57 25 3a 21  72 58 3d 72 59 25 3a 21  |rV=rW%:!rX=rY%:!|
0000bc10  72 5a 3d 72 61 25 3a 21  72 62 3d 72 63 25 3a 21  |rZ=ra%:!rb=rc%:!|
0000bc20  72 64 3d 72 65 25 3a 21  72 66 3d 72 67 25 3a 21  |rd=re%:!rf=rg%:!|
0000bc30  72 68 3d 72 69 25 3a f2  71 79 28 71 77 2c 71 78  |rh=ri%:.qy(qw,qx|
0000bc40  2c ac b9 29 3a 21 72 6a  3d 72 55 25 3a 21 72 6b  |,..):!rj=rU%:!rk|
0000bc50  3d 72 57 25 3a 21 72 6c  3d 72 59 25 3a 21 72 6d  |=rW%:!rl=rY%:!rm|
0000bc60  3d 72 61 25 3a 21 72 6e  3d 72 63 25 3a 21 72 6f  |=ra%:!rn=rc%:!ro|
0000bc70  3d 72 65 25 3a 21 72 70  3d 72 67 25 3a 21 72 71  |=re%:!rp=rg%:!rq|
0000bc80  3d 72 69 25 3a 72 72 3d  21 71 68 2d 31 3a 61 7a  |=ri%:rr=!qh-1:az|
0000bc90  3d 21 71 62 3a 68 61 3d  a4 63 74 69 6f 6e 5f 47  |=!qb:ha=.ction_G|
0000bca0  65 74 50 65 72 63 65 6e  74 61 67 65 28 28 21 71  |etPercentage((!q|
0000bcb0  68 2d 31 29 2f 28 21 71  62 2d 31 29 2a 31 30 30  |h-1)/(!qb-1)*100|
0000bcc0  2c 55 7a 29 0d 9f 74 e4  21 72 73 3d 21 71 7a 2b  |,Uz)..t.!rs=!qz+|
0000bcd0  28 28 21 72 6a 2d 21 71  7a 29 2a 20 68 61 20 29  |((!rj-!qz)* ha )|
0000bce0  3a 21 72 74 3d 21 72 58  2b 28 28 21 72 6c 2d 21  |:!rt=!rX+((!rl-!|
0000bcf0  72 58 29 2a 20 68 61 20  29 3a 21 72 75 3d 21 72  |rX)* ha ):!ru=!r|
0000bd00  62 2b 28 28 21 72 6e 2d  21 72 62 29 2a 20 68 61  |b+((!rn-!rb)* ha|
0000bd10  20 29 3a 21 72 76 3d 21  72 66 2b 28 28 21 72 70  | ):!rv=!rf+((!rp|
0000bd20  2d 21 72 66 29 2a 20 68  61 20 29 3a 21 72 77 3d  |-!rf)* ha ):!rw=|
0000bd30  21 72 56 2b 28 28 21 72  6b 2d 21 72 56 29 2a 20  |!rV+((!rk-!rV)* |
0000bd40  68 61 20 29 3a 21 72 78  3d 21 72 5a 2b 28 28 21  |ha ):!rx=!rZ+((!|
0000bd50  72 6d 2d 21 72 5a 29 2a  20 68 61 20 29 3a 21 72  |rm-!rZ)* ha ):!r|
0000bd60  79 3d 21 72 64 2b 28 28  21 72 6f 2d 21 72 64 29  |y=!rd+((!ro-!rd)|
0000bd70  2a 20 68 61 20 29 3a 21  72 7a 3d 21 72 68 2b 28  |* ha ):!rz=!rh+(|
0000bd80  28 21 72 71 2d 21 72 68  29 2a 20 68 61 20 29 3a  |(!rq-!rh)* ha ):|
0000bd90  21 73 55 3d a4 63 74 69  6f 6e 5f 4c 6f 77 65 73  |!sU=.ction_Lowes|
0000bda0  74 5f 51 75 61 64 5f 59  0d 9f e2 3c 21 6d 58 3d  |t_Quad_Y...<!mX=|
0000bdb0  a4 63 74 69 6f 6e 5f 47  65 74 50 65 72 63 65 6e  |.ction_GetPercen|
0000bdc0  74 61 67 65 28 28 28 21  71 68 2d 31 29 2f 28 21  |tage(((!qh-1)/(!|
0000bdd0  71 62 2d 31 29 29 2a 31  30 30 2c 55 78 29 2a 32  |qb-1))*100,Ux)*2|
0000bde0  35 36 3a e1 0d a0 14 f5  dd f2 71 79 28 78 2c 79  |56:.......qy(x,y|
0000bdf0  2c 71 56 29 3a 73 56 3d  66 61 25 2a 20 32 34 3a  |,qV):sV=fa%* 24:|
0000be00  73 57 3d 66 6e 2b 28 28  79 2a 73 56 29 20 2b 20  |sW=fn+((y*sV) + |
0000be10  28 20 78 20 2a 32 34 29  20 29 3a 73 58 3d 66 6e  |( x *24) ):sX=fn|
0000be20  2b 28 28 79 2a 73 56 29  20 2b 20 28 28 78 2b 31  |+((y*sV) + ((x+1|
0000be30  29 2a 32 34 29 20 29 3a  73 59 3d 66 6e 2b 28 28  |)*24) ):sY=fn+((|
0000be40  28 79 2b 31 29 2a 73 56  29 20 2b 20 28 20 78 20  |(y+1)*sV) + ( x |
0000be50  2a 32 34 29 20 29 3a 73  5a 3d 66 6e 2b 28 28 28  |*24) ):sZ=fn+(((|
0000be60  79 2b 31 29 2a 73 56 29  20 2b 20 28 28 78 2b 31  |y+1)*sV) + ((x+1|
0000be70  29 2a 32 34 29 20 29 3a  66 6f 3d 94 28 28 ac 71  |)*24) ):fo=.((.q|
0000be80  56 29 2a 38 29 3a 72 55  25 3d 73 57 21 28 66 6f  |V)*8):rU%=sW!(fo|
0000be90  2b 30 29 3a 72 57 25 3d  73 57 21 28 66 6f 2b 34  |+0):rW%=sW!(fo+4|
0000bea0  29 3a 72 59 25 3d 73 58  21 28 66 6f 2b 30 29 3a  |):rY%=sX!(fo+0):|
0000beb0  72 61 25 3d 73 58 21 28  66 6f 2b 34 29 3a 72 67  |ra%=sX!(fo+4):rg|
0000bec0  25 3d 73 59 21 28 66 6f  2b 30 29 3a 72 69 25 3d  |%=sY!(fo+0):ri%=|
0000bed0  73 59 21 28 66 6f 2b 34  29 0d a0 78 21 72 63 25  |sY!(fo+4)..x!rc%|
0000bee0  3d 73 5a 21 28 66 6f 2b  30 29 3a 72 65 25 3d 73  |=sZ!(fo+0):re%=s|
0000bef0  5a 21 28 66 6f 2b 34 29  3a e1 0d a0 a0 30 dd a4  |Z!(fo+4):....0..|
0000bf00  63 74 69 6f 6e 5f 4c 6f  77 65 73 74 5f 51 75 61  |ction_Lowest_Qua|
0000bf10  64 5f 59 3a 73 61 3d 21  72 77 3a e7 21 72 78 3c  |d_Y:sa=!rw:.!rx<|
0000bf20  73 61 20 8c 73 61 3d 21  72 78 0d a0 be 13 e7 21  |sa .sa=!rx.....!|
0000bf30  72 79 3c 73 61 20 8c 73  61 3d 21 72 79 0d a0 c8  |ry<sa .sa=!ry...|
0000bf40  13 e7 21 72 7a 3c 73 61  20 8c 73 61 3d 21 72 7a  |..!rz<sa .sa=!rz|
0000bf50  0d a0 d2 07 3d 73 61 0d  a0 f0 31 dd a4 63 74 69  |....=sa...1..cti|
0000bf60  6f 6e 5f 48 69 67 68 65  73 74 5f 51 75 61 64 5f  |on_Highest_Quad_|
0000bf70  59 3a 73 62 3d 21 72 77  3a e7 21 72 78 3e 73 62  |Y:sb=!rw:.!rx>sb|
0000bf80  20 8c 73 62 3d 21 72 78  0d a1 0e 13 e7 21 72 79  | .sb=!rx.....!ry|
0000bf90  3e 73 62 20 8c 73 62 3d  21 72 79 0d a1 18 13 e7  |>sb .sb=!ry.....|
0000bfa0  21 72 7a 3e 73 62 20 8c  73 62 3d 21 72 7a 0d a1  |!rz>sb .sb=!rz..|
0000bfb0  22 07 3d 73 62 0d a1 40  47 dd f2 71 6e 28 73 63  |".=sb..@G..qn(sc|
0000bfc0  29 3a 21 73 64 3d a4 63  74 69 6f 6e 5f 48 69 67  |):!sd=.ction_Hig|
0000bfd0  68 65 73 74 5f 51 75 61  64 5f 59 3a 21 73 65 3d  |hest_Quad_Y:!se=|
0000bfe0  a4 63 74 69 6f 6e 5f 4c  6f 77 65 73 74 5f 51 75  |.ction_Lowest_Qu|
0000bff0  61 64 5f 59 3a e7 20 ac  73 63 20 8c 0d a1 68 18  |ad_Y:. .sc ...h.|
0000c000  21 73 66 3d 21 73 64 2d  21 73 65 3a d6 73 67 3a  |!sf=!sd-!se:.sg:|
0000c010  71 6d 3d b9 0d a1 86 1a  cc 3a 21 73 66 3d 34 3a  |qm=......:!sf=4:|
0000c020  d6 73 67 3a 71 6d 3d 21  73 55 3e 21 73 64 0d a1  |.sg:qm=!sU>!sd..|
0000c030  ae 07 cd 3a e1 0d a1 d6  24 dd f2 59 6b 3a 57 59  |...:....$..Yk:WY|
0000c040  3d 20 ac b9 3a f2 58 55  28 55 6a 2c 58 74 29 3a  |= ..:.XU(Uj,Xt):|
0000c050  f2 71 71 3a f2 58 67 3a  e1 0d a2 26 28 dd f2 71  |.qq:.Xg:...&(..q|
0000c060  71 3a 73 68 3d a4 63 74  69 6f 6e 5f 41 6c 6c 6f  |q:sh=.ction_Allo|
0000c070  63 61 74 65 4d 65 6d 6f  72 79 28 2d 70 77 29 3a  |cateMemory(-pw):|
0000c080  e1 0d a2 58 12 dd f2 71  64 3a f2 73 69 3a f2 73  |...X...qd:.si:.s|
0000c090  6a 3a e1 0d a2 94 14 dd  f2 73 69 3a e7 6f 6b 20  |j:.......si:.ok |
0000c0a0  84 6f 6c 3d 31 20 8c 0d  a2 a8 0b e7 20 ac 56 72  |.ol=1 ...... .Vr|
0000c0b0  20 8c 0d a2 b2 39 41 25  3d 56 6b 3a 42 25 3d 70  | ....9A%=Vk:B%=p|
0000c0c0  7a 3a 43 25 3d 56 6c 3a  d6 6b 61 3a d6 73 6b 3a  |z:C%=Vl:.ka:.sk:|
0000c0d0  f2 70 65 28 70 7a 2c 5a  7a 24 2b 22 2e 69 6d 61  |.pe(pz,Zz$+".ima|
0000c0e0  67 65 30 30 31 22 29 3a  f2 71 55 0d a2 e4 21 cc  |ge001"):.qU...!.|
0000c0f0  3a d6 73 6c 3a f2 70 65  28 70 7a 2c 5a 7a 24 2b  |:.sl:.pe(pz,Zz$+|
0000c100  22 2e 69 6d 61 67 65 30  30 31 22 29 0d a3 02 0b  |".image001")....|
0000c110  cd 3a 71 63 2d 3d 31 0d  a3 16 12 cd 3a e7 6f 6c  |.:qc-=1.....:.ol|
0000c120  3d 31 20 8c 6f 6c 2b 3d  31 0d a3 2a 05 e1 0d a3  |=1 .ol+=1..*....|
0000c130  48 16 dd f2 73 6a 3a e7  6f 6b 20 84 6f 6d 3d 21  |H...sj:.ok .om=!|
0000c140  71 62 20 8c 0d a3 5c 0b  e7 20 ac 56 72 20 8c 0d  |qb ...\.. .Vr ..|
0000c150  a3 66 45 41 25 3d 56 6b  3a 42 25 3d 70 7a 3a 43  |.fEA%=Vk:B%=pz:C|
0000c160  25 3d 56 6c 3a d6 6b 61  3a d6 73 6d 3a f2 70 65  |%=Vl:.ka:.sm:.pe|
0000c170  28 70 7a 2c 5a 7a 24 2b  22 2e 69 6d 61 67 65 22  |(pz,Zz$+".image"|
0000c180  2b c2 22 30 30 30 22 2b  c3 21 71 62 2c 33 29 29  |+."000"+.!qb,3))|
0000c190  3a f2 71 55 0d a3 98 2d  cc 3a d6 73 6e 3a f2 70  |:.qU...-.:.sn:.p|
0000c1a0  65 28 70 7a 2c 5a 7a 24  2b 22 2e 69 6d 61 67 65  |e(pz,Zz$+".image|
0000c1b0  22 2b c2 22 30 30 30 22  2b c3 21 71 62 2c 33 29  |"+."000"+.!qb,3)|
0000c1c0  29 0d a3 b6 0b cd 3a 71  63 2d 3d 31 0d a3 ca 14  |).....:qc-=1....|
0000c1d0  cd 3a e7 6f 6d 3d 21 71  62 20 8c 6f 6d 2d 3d 31  |.:.om=!qb .om-=1|
0000c1e0  0d a3 de 05 e1 0d a3 fc  20 dd f2 71 55 3a 41 25  |........ ..qU:A%|
0000c1f0  3d 70 76 3a 42 25 3d 70  7a 3a 43 25 3d 70 77 3a  |=pv:B%=pz:C%=pw:|
0000c200  d6 6b 61 3a e1 0d a4 4c  31 dd f2 56 66 28 68 6e  |.ka:...L1..Vf(hn|
0000c210  29 3a 68 6a 3d 31 33 3a  68 6b 3d 31 34 3a 68 6c  |):hj=13:hk=14:hl|
0000c220  3d 31 35 3a e7 68 6e 3d  30 20 8c de 73 6f 20 34  |=15:.hn=0 ..so 4|
0000c230  38 2a 31 30 32 34 0d a4  6a f3 50 25 3d 73 6f 3a  |8*1024..j.P%=so:|
0000c240  5b 4f 50 54 20 68 6e 3a  2e 73 70 20 53 54 4d 46  |[OPT hn:.sp STMF|
0000c250  44 20 28 68 6a 29 21 2c  7b 68 6b 7d 3a 4c 44 52  |D (hj)!,{hk}:LDR|
0000c260  20 72 31 30 2c 66 56 3a  4c 44 52 20 72 39 2c 66  | r10,fV:LDR r9,f|
0000c270  58 3a 4c 44 52 20 72 38  2c 6d 74 3a 4c 44 52 20  |X:LDR r8,mt:LDR |
0000c280  72 37 2c 6d 75 3a 4d 4f  56 20 72 31 32 2c 23 30  |r7,mu:MOV r12,#0|
0000c290  3a 2e 73 71 20 4d 4f 56  20 72 31 31 2c 23 30 3a  |:.sq MOV r11,#0:|
0000c2a0  2e 73 72 20 4d 4f 56 20  72 30 2c 72 31 31 3a 53  |.sr MOV r0,r11:S|
0000c2b0  55 42 20 72 31 2c 72 39  2c 72 31 32 3a 4c 44 52  |UB r1,r9,r12:LDR|
0000c2c0  20 72 32 2c 71 59 3a 4d  4f 56 20 72 33 2c 72 31  | r2,qY:MOV r3,r1|
0000c2d0  30 3a 42 4c 20 6b 76 3a  4d 4f 56 20 72 36 2c 72  |0:BL kv:MOV r6,r|
0000c2e0  30 3a 4d 4f 56 20 72 30  2c 72 31 31 3a 53 55 42  |0:MOV r0,r11:SUB|
0000c2f0  20 72 31 2c 72 37 2c 72  31 32 3a 4c 44 52 20 72  | r1,r7,r12:LDR r|
0000c300  32 2c 71 61 3a 4d 4f 56  20 72 33 2c 72 38 3a 42  |2,qa:MOV r3,r8:B|
0000c310  4c 20 6b 76 3a 4d 4f 56  20 72 35 2c 72 30 3a 4d  |L kv:MOV r5,r0:M|
0000c320  4f 56 20 72 30 2c 72 31  31 0d a5 50 fa 53 55 42  |OV r0,r11..P.SUB|
0000c330  20 72 31 2c 72 39 2c 72  31 32 3a 4c 44 52 20 72  | r1,r9,r12:LDR r|
0000c340  32 2c 71 59 3a 4d 4f 56  20 72 33 2c 72 31 30 3a  |2,qY:MOV r3,r10:|
0000c350  4d 4f 56 20 72 34 2c 72  35 3a 42 4c 20 6c 63 3a  |MOV r4,r5:BL lc:|
0000c360  4d 4f 56 20 72 30 2c 72  31 31 3a 53 55 42 20 72  |MOV r0,r11:SUB r|
0000c370  31 2c 72 37 2c 72 31 32  3a 4c 44 52 20 72 32 2c  |1,r7,r12:LDR r2,|
0000c380  71 61 3a 4d 4f 56 20 72  33 2c 72 38 3a 4d 4f 56  |qa:MOV r3,r8:MOV|
0000c390  20 72 34 2c 72 36 3a 42  4c 20 6c 63 3a 41 44 44  | r4,r6:BL lc:ADD|
0000c3a0  20 72 31 31 2c 72 31 31  2c 23 31 3a 43 4d 50 20  | r11,r11,#1:CMP |
0000c3b0  72 31 31 2c 72 31 30 3a  42 4e 45 20 73 72 3a 41  |r11,r10:BNE sr:A|
0000c3c0  44 44 20 72 31 32 2c 72  31 32 2c 23 31 3a 43 4d  |DD r12,r12,#1:CM|
0000c3d0  50 20 72 31 32 2c 72 39  3a 42 4e 45 20 73 71 3a  |P r12,r9:BNE sq:|
0000c3e0  4c 44 4d 46 44 20 28 68  6a 29 21 2c 7b 50 43 7d  |LDMFD (hj)!,{PC}|
0000c3f0  3a 2e 73 6c 20 53 54 4d  46 44 20 28 68 6a 29 21  |:.sl STMFD (hj)!|
0000c400  2c 7b 68 6b 7d 3a 4c 44  52 20 72 37 2c 66 56 3a  |,{hk}:LDR r7,fV:|
0000c410  4c 44 52 20 72 38 2c 66  58 3a 4c 44 52 20 72 39  |LDR r8,fX:LDR r9|
0000c420  2c 70 78 0d a6 40 f9 4c  44 52 20 72 31 30 2c 70  |,px..@.LDR r10,p|
0000c430  79 3a 4d 4f 56 20 72 35  2c 23 30 3a 2e 73 73 20  |y:MOV r5,#0:.ss |
0000c440  4d 4f 56 20 72 36 2c 23  30 3a 2e 73 74 20 4d 4f  |MOV r6,#0:.st MO|
0000c450  56 20 72 30 2c 72 35 3a  53 55 42 20 72 31 2c 72  |V r0,r5:SUB r1,r|
0000c460  38 2c 72 36 20 3a 20 53  55 42 20 72 31 2c 72 31  |8,r6 : SUB r1,r1|
0000c470  2c 23 31 3a 4c 44 52 20  72 32 2c 62 74 20 3a 20  |,#1:LDR r2,bt : |
0000c480  53 55 42 20 72 30 2c 72  30 2c 72 32 3a 4c 44 52  |SUB r0,r0,r2:LDR|
0000c490  20 72 32 2c 62 75 20 3a  20 41 44 44 20 72 31 2c  | r2,bu : ADD r1,|
0000c4a0  72 31 2c 72 32 3a 4c 44  52 20 72 32 2c 71 59 3a  |r1,r2:LDR r2,qY:|
0000c4b0  4d 4f 56 20 72 33 2c 72  37 3a 43 4d 50 20 72 30  |MOV r3,r7:CMP r0|
0000c4c0  2c 23 30 20 3a 20 4d 4f  56 4c 54 20 72 34 2c 23  |,#0 : MOVLT r4,#|
0000c4d0  30 20 3a 20 42 4c 54 20  73 75 3a 43 4d 50 20 72  |0 : BLT su:CMP r|
0000c4e0  31 2c 23 30 20 3a 20 4d  4f 56 4c 54 20 72 34 2c  |1,#0 : MOVLT r4,|
0000c4f0  23 30 20 3a 20 42 4c 54  20 73 75 3a 43 4d 50 20  |#0 : BLT su:CMP |
0000c500  72 30 2c 72 37 20 3a 20  4d 4f 56 47 45 20 72 34  |r0,r7 : MOVGE r4|
0000c510  2c 23 30 20 3a 20 42 47  45 20 73 75 0d a6 b8 fe  |,#0 : BGE su....|
0000c520  43 4d 50 20 72 31 2c 72  38 20 3a 20 4d 4f 56 47  |CMP r1,r8 : MOVG|
0000c530  45 20 72 34 2c 23 30 20  3a 20 42 47 45 20 73 75  |E r4,#0 : BGE su|
0000c540  3a 42 4c 20 6b 76 20 3a  20 4d 4f 56 20 72 34 2c  |:BL kv : MOV r4,|
0000c550  72 30 20 3a 20 2e 73 75  3a 2e 73 76 20 4d 4f 56  |r0 : .su:.sv MOV|
0000c560  20 72 30 2c 72 35 3a 53  55 42 20 72 31 2c 72 31  | r0,r5:SUB r1,r1|
0000c570  30 2c 72 36 20 3a 20 73  75 62 20 72 31 2c 72 31  |0,r6 : sub r1,r1|
0000c580  2c 23 31 3a 4c 44 52 20  72 32 2c 71 5a 3a 4d 4f  |,#1:LDR r2,qZ:MO|
0000c590  56 20 72 33 2c 72 39 3a  4c 44 52 20 72 31 31 2c  |V r3,r9:LDR r11,|
0000c5a0  64 62 20 3a 20 41 44 44  20 72 30 2c 72 30 2c 72  |db : ADD r0,r0,r|
0000c5b0  31 31 3a 4c 44 52 20 72  31 31 2c 64 63 20 3a 20  |11:LDR r11,dc : |
0000c5c0  53 55 42 20 72 31 2c 72  31 2c 72 31 31 3a 43 4d  |SUB r1,r1,r11:CM|
0000c5d0  50 20 72 30 2c 23 30 20  3a 20 42 4c 54 20 73 77  |P r0,#0 : BLT sw|
0000c5e0  3a 43 4d 50 20 72 31 2c  23 30 20 3a 20 42 4c 54  |:CMP r1,#0 : BLT|
0000c5f0  20 73 77 3a 43 4d 50 20  72 30 2c 72 39 20 3a 20  | sw:CMP r0,r9 : |
0000c600  42 47 45 20 73 77 3a 43  4d 50 20 72 31 2c 72 31  |BGE sw:CMP r1,r1|
0000c610  30 20 3a 20 42 47 45 20  73 77 0d a7 30 f9 42 4c  |0 : BGE sw..0.BL|
0000c620  20 6c 63 20 3a 20 2e 73  77 3a 2e 73 78 20 41 44  | lc : .sw:.sx AD|
0000c630  44 20 72 36 2c 72 36 2c  23 31 3a 43 4d 50 20 72  |D r6,r6,#1:CMP r|
0000c640  36 2c 72 38 3a 42 4e 45  20 73 74 3a 2e 73 79 20  |6,r8:BNE st:.sy |
0000c650  41 44 44 20 72 35 2c 72  35 2c 23 31 3a 43 4d 50  |ADD r5,r5,#1:CMP|
0000c660  20 72 35 2c 72 37 3a 42  4e 45 20 73 73 3a 4c 44  | r5,r7:BNE ss:LD|
0000c670  4d 46 44 20 28 68 6a 29  21 2c 7b 50 43 7d 3a 2e  |MFD (hj)!,{PC}:.|
0000c680  73 6e 20 53 54 4d 46 44  20 28 68 6a 29 21 2c 7b  |sn STMFD (hj)!,{|
0000c690  68 6b 7d 3a 4c 44 52 20  72 37 2c 66 56 3a 4c 44  |hk}:LDR r7,fV:LD|
0000c6a0  52 20 72 38 2c 66 58 3a  4c 44 52 20 72 39 2c 70  |R r8,fX:LDR r9,p|
0000c6b0  78 3a 4c 44 52 20 72 31  30 2c 70 79 3a 4c 44 52  |x:LDR r10,py:LDR|
0000c6c0  20 72 31 32 2c 6d 74 3a  4d 4f 56 20 72 35 2c 23  | r12,mt:MOV r5,#|
0000c6d0  30 3a 2e 73 7a 20 4d 4f  56 20 72 36 2c 23 30 3a  |0:.sz MOV r6,#0:|
0000c6e0  2e 74 55 20 4d 4f 56 20  72 30 2c 72 35 3a 4c 44  |.tU MOV r0,r5:LD|
0000c6f0  52 20 72 31 2c 6d 75 3a  53 55 42 20 72 31 2c 72  |R r1,mu:SUB r1,r|
0000c700  31 2c 72 36 20 3a 20 53  55 42 20 72 31 2c 72 31  |1,r6 : SUB r1,r1|
0000c710  2c 23 31 0d a8 02 fe 4c  44 52 20 72 32 2c 62 79  |,#1....LDR r2,by|
0000c720  20 3a 20 53 55 42 20 72  30 2c 72 30 2c 72 32 3a  | : SUB r0,r0,r2:|
0000c730  4c 44 52 20 72 32 2c 62  7a 20 3a 20 41 44 44 20  |LDR r2,bz : ADD |
0000c740  72 31 2c 72 31 2c 72 32  3a 4c 44 52 20 72 32 2c  |r1,r1,r2:LDR r2,|
0000c750  71 61 3a 4d 4f 56 20 72  33 2c 72 31 32 3a 43 4d  |qa:MOV r3,r12:CM|
0000c760  50 20 72 30 2c 23 30 20  3a 20 4d 4f 56 4c 54 20  |P r0,#0 : MOVLT |
0000c770  72 34 2c 23 30 20 3a 20  42 4c 54 20 74 56 3a 43  |r4,#0 : BLT tV:C|
0000c780  4d 50 20 72 31 2c 23 30  20 3a 20 4d 4f 56 4c 54  |MP r1,#0 : MOVLT|
0000c790  20 72 34 2c 23 30 20 3a  20 42 4c 54 20 74 56 3a  | r4,#0 : BLT tV:|
0000c7a0  43 4d 50 20 72 30 2c 72  37 20 3a 20 4d 4f 56 47  |CMP r0,r7 : MOVG|
0000c7b0  45 20 72 34 2c 23 30 20  3a 20 42 47 45 20 74 56  |E r4,#0 : BGE tV|
0000c7c0  3a 4c 44 52 20 72 34 2c  6d 75 3a 43 4d 50 20 72  |:LDR r4,mu:CMP r|
0000c7d0  31 2c 72 34 20 3a 20 4d  4f 56 47 45 20 72 34 2c  |1,r4 : MOVGE r4,|
0000c7e0  23 30 20 3a 20 42 47 45  20 74 56 3a 42 4c 20 6b  |#0 : BGE tV:BL k|
0000c7f0  76 20 3a 20 4d 4f 56 20  72 34 2c 72 30 20 3a 20  |v : MOV r4,r0 : |
0000c800  2e 74 56 3a 2e 74 57 20  4d 4f 56 20 72 30 2c 72  |.tV:.tW MOV r0,r|
0000c810  35 0d a8 70 f6 53 55 42  20 72 31 2c 72 31 30 2c  |5..p.SUB r1,r10,|
0000c820  72 36 20 3a 20 73 75 62  20 72 31 2c 72 31 2c 23  |r6 : sub r1,r1,#|
0000c830  31 3a 4c 44 52 20 72 32  2c 71 5a 3a 4d 4f 56 20  |1:LDR r2,qZ:MOV |
0000c840  72 33 2c 72 39 3a 4c 44  52 20 72 31 31 2c 64 62  |r3,r9:LDR r11,db|
0000c850  20 3a 20 41 44 44 20 72  30 2c 72 30 2c 72 31 31  | : ADD r0,r0,r11|
0000c860  3a 4c 44 52 20 72 31 31  2c 64 63 20 3a 20 53 55  |:LDR r11,dc : SU|
0000c870  42 20 72 31 2c 72 31 2c  72 31 31 3a 43 4d 50 20  |B r1,r1,r11:CMP |
0000c880  72 30 2c 23 30 20 3a 20  42 4c 54 20 74 58 3a 43  |r0,#0 : BLT tX:C|
0000c890  4d 50 20 72 31 2c 23 30  20 3a 20 42 4c 54 20 74  |MP r1,#0 : BLT t|
0000c8a0  58 3a 43 4d 50 20 72 30  2c 72 39 20 3a 20 42 47  |X:CMP r0,r9 : BG|
0000c8b0  45 20 74 58 3a 43 4d 50  20 72 31 2c 72 31 30 20  |E tX:CMP r1,r10 |
0000c8c0  3a 20 42 47 45 20 74 58  3a 42 4c 20 6c 63 20 3a  |: BGE tX:BL lc :|
0000c8d0  20 2e 74 58 3a 2e 74 59  20 41 44 44 20 72 36 2c  | .tX:.tY ADD r6,|
0000c8e0  72 36 2c 23 31 3a 43 4d  50 20 72 36 2c 72 38 3a  |r6,#1:CMP r6,r8:|
0000c8f0  42 4e 45 20 74 55 3a 2e  74 5a 20 41 44 44 20 72  |BNE tU:.tZ ADD r|
0000c900  35 2c 72 35 2c 23 31 0d  a8 fc e6 43 4d 50 20 72  |5,r5,#1....CMP r|
0000c910  35 2c 72 37 3a 42 4e 45  20 73 7a 3a 4c 44 4d 46  |5,r7:BNE sz:LDMF|
0000c920  44 20 28 68 6a 29 21 2c  7b 50 43 7d 3a 2e 73 6d  |D (hj)!,{PC}:.sm|
0000c930  20 53 54 4d 46 44 20 28  68 6a 29 21 2c 7b 68 6b  | STMFD (hj)!,{hk|
0000c940  7d 3a 4c 44 52 20 72 31  32 2c 66 56 3a 4c 44 52  |}:LDR r12,fV:LDR|
0000c950  20 72 31 31 2c 66 58 3a  4d 4f 56 20 72 31 30 2c  | r11,fX:MOV r10,|
0000c960  23 30 3a 2e 74 61 20 4d  4f 56 20 72 39 2c 23 30  |#0:.ta MOV r9,#0|
0000c970  3a 2e 74 62 20 4d 4f 56  20 72 30 2c 72 39 3a 4c  |:.tb MOV r0,r9:L|
0000c980  44 52 20 72 31 2c 6d 75  20 3a 20 53 55 42 20 72  |DR r1,mu : SUB r|
0000c990  31 2c 72 31 2c 72 31 30  20 3a 20 53 55 42 20 72  |1,r1,r10 : SUB r|
0000c9a0  31 2c 72 31 2c 23 31 3a  4c 44 52 20 72 32 2c 70  |1,r1,#1:LDR r2,p|
0000c9b0  72 20 3a 20 53 55 42 20  72 30 2c 72 30 2c 72 32  |r : SUB r0,r0,r2|
0000c9c0  3a 4c 44 52 20 72 33 2c  70 73 20 3a 20 53 55 42  |:LDR r3,ps : SUB|
0000c9d0  20 72 31 2c 72 31 2c 72  33 3a 4c 44 52 20 72 32  | r1,r1,r3:LDR r2|
0000c9e0  2c 71 61 3a 4c 44 52 20  72 33 2c 6d 74 0d a9 9c  |,qa:LDR r3,mt...|
0000c9f0  f4 43 4d 50 20 72 30 2c  23 30 20 3a 20 4d 4f 56  |.CMP r0,#0 : MOV|
0000ca00  4c 54 20 72 30 2c 23 30  20 3a 20 42 4c 54 20 74  |LT r0,#0 : BLT t|
0000ca10  63 3a 43 4d 50 20 72 30  2c 72 33 20 3a 20 4d 4f  |c:CMP r0,r3 : MO|
0000ca20  56 47 45 20 72 30 2c 23  30 20 3a 20 42 47 45 20  |VGE r0,#0 : BGE |
0000ca30  74 63 3a 43 4d 50 20 72  31 2c 23 30 20 3a 20 4d  |tc:CMP r1,#0 : M|
0000ca40  4f 56 4c 54 20 72 30 2c  23 30 20 3a 20 42 4c 54  |OVLT r0,#0 : BLT|
0000ca50  20 74 63 3a 4c 44 52 20  72 34 2c 6d 75 3a 43 4d  | tc:LDR r4,mu:CM|
0000ca60  50 20 72 31 2c 72 34 20  3a 20 4d 4f 56 47 45 20  |P r1,r4 : MOVGE |
0000ca70  72 30 2c 23 30 20 3a 20  42 47 45 20 74 63 3a 42  |r0,#0 : BGE tc:B|
0000ca80  4c 20 6b 76 20 3a 20 2e  74 63 3a 4d 4f 56 20 72  |L kv : .tc:MOV r|
0000ca90  34 2c 72 30 3a 4d 4f 56  20 72 30 2c 72 39 3a 4c  |4,r0:MOV r0,r9:L|
0000caa0  44 52 20 72 31 2c 66 58  20 3a 20 53 55 42 20 72  |DR r1,fX : SUB r|
0000cab0  31 2c 72 31 2c 72 31 30  20 3a 20 53 55 42 20 72  |1,r1,r10 : SUB r|
0000cac0  31 2c 72 31 2c 23 31 3a  4c 44 52 20 72 32 2c 71  |1,r1,#1:LDR r2,q|
0000cad0  5a 3a 4c 44 52 20 72 33  2c 66 56 3a 42 4c 20 6c  |Z:LDR r3,fV:BL l|
0000cae0  63 0d aa 14 ed 41 44 44  20 72 39 2c 72 39 2c 23  |c....ADD r9,r9,#|
0000caf0  31 3a 43 4d 50 20 72 39  2c 72 31 32 20 3a 20 42  |1:CMP r9,r12 : B|
0000cb00  4e 45 20 74 62 3a 41 44  44 20 72 31 30 2c 72 31  |NE tb:ADD r10,r1|
0000cb10  30 2c 23 31 3a 43 4d 50  20 72 31 30 2c 72 31 31  |0,#1:CMP r10,r11|
0000cb20  20 3a 20 42 4e 45 20 74  61 3a 4c 44 4d 46 44 20  | : BNE ta:LDMFD |
0000cb30  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 73 6b 20 53  |(hj)!,{PC}:.sk S|
0000cb40  54 4d 46 44 20 28 68 6a  29 21 2c 7b 68 6b 7d 3a  |TMFD (hj)!,{hk}:|
0000cb50  4c 44 52 20 72 31 32 2c  66 56 3a 4c 44 52 20 72  |LDR r12,fV:LDR r|
0000cb60  31 31 2c 66 58 3a 4d 4f  56 20 72 31 30 2c 23 30  |11,fX:MOV r10,#0|
0000cb70  3a 2e 74 64 20 4d 4f 56  20 72 39 2c 23 30 3a 2e  |:.td MOV r9,#0:.|
0000cb80  74 65 20 4d 4f 56 20 72  30 2c 72 39 3a 4c 44 52  |te MOV r0,r9:LDR|
0000cb90  20 72 31 2c 66 58 20 3a  20 53 55 42 20 72 31 2c  | r1,fX : SUB r1,|
0000cba0  72 31 2c 72 31 30 20 3a  20 53 55 42 20 72 31 2c  |r1,r10 : SUB r1,|
0000cbb0  72 31 2c 23 31 3a 4c 44  52 20 72 32 2c 70 70 20  |r1,#1:LDR r2,pp |
0000cbc0  3a 20 53 55 42 20 72 30  2c 72 30 2c 72 32 0d aa  |: SUB r0,r0,r2..|
0000cbd0  c8 de 4c 44 52 20 72 33  2c 70 71 20 3a 20 53 55  |..LDR r3,pq : SU|
0000cbe0  42 20 72 31 2c 72 31 2c  72 33 3a 4c 44 52 20 72  |B r1,r1,r3:LDR r|
0000cbf0  32 2c 71 59 3a 4c 44 52  20 72 33 2c 66 56 3a 43  |2,qY:LDR r3,fV:C|
0000cc00  4d 50 20 72 30 2c 23 30  20 3a 20 4d 4f 56 4c 54  |MP r0,#0 : MOVLT|
0000cc10  20 72 30 2c 23 30 20 3a  20 42 4c 54 20 74 66 3a  | r0,#0 : BLT tf:|
0000cc20  43 4d 50 20 72 30 2c 72  33 20 3a 20 4d 4f 56 47  |CMP r0,r3 : MOVG|
0000cc30  45 20 72 30 2c 23 30 20  3a 20 42 47 45 20 74 66  |E r0,#0 : BGE tf|
0000cc40  3a 43 4d 50 20 72 31 2c  23 30 20 3a 20 4d 4f 56  |:CMP r1,#0 : MOV|
0000cc50  4c 54 20 72 30 2c 23 30  20 3a 20 42 4c 54 20 74  |LT r0,#0 : BLT t|
0000cc60  66 3a 4c 44 52 20 72 34  2c 66 58 3a 43 4d 50 20  |f:LDR r4,fX:CMP |
0000cc70  72 31 2c 72 34 20 3a 20  4d 4f 56 47 45 20 72 30  |r1,r4 : MOVGE r0|
0000cc80  2c 23 30 20 3a 20 42 47  45 20 74 66 3a 42 4c 20  |,#0 : BGE tf:BL |
0000cc90  6b 76 20 3a 20 2e 74 66  3a 4d 4f 56 20 72 34 2c  |kv : .tf:MOV r4,|
0000cca0  72 30 3a 4d 4f 56 20 72  30 2c 72 39 0d ab 40 fa  |r0:MOV r0,r9..@.|
0000ccb0  4c 44 52 20 72 31 2c 66  58 20 3a 20 53 55 42 20  |LDR r1,fX : SUB |
0000ccc0  72 31 2c 72 31 2c 72 31  30 20 3a 20 53 55 42 20  |r1,r1,r10 : SUB |
0000ccd0  72 31 2c 72 31 2c 23 31  3a 4c 44 52 20 72 32 2c  |r1,r1,#1:LDR r2,|
0000cce0  71 5a 3a 4c 44 52 20 72  33 2c 66 56 3a 42 4c 20  |qZ:LDR r3,fV:BL |
0000ccf0  6c 63 3a 41 44 44 20 72  39 2c 72 39 2c 23 31 3a  |lc:ADD r9,r9,#1:|
0000cd00  43 4d 50 20 72 39 2c 72  31 32 20 3a 20 42 4e 45  |CMP r9,r12 : BNE|
0000cd10  20 74 65 3a 41 44 44 20  72 31 30 2c 72 31 30 2c  | te:ADD r10,r10,|
0000cd20  23 31 3a 43 4d 50 20 72  31 30 2c 72 31 31 20 3a  |#1:CMP r10,r11 :|
0000cd30  20 42 4e 45 20 74 64 3a  4c 44 4d 46 44 20 28 68  | BNE td:LDMFD (h|
0000cd40  6a 29 21 2c 7b 50 43 7d  3a 2e 71 59 20 44 43 44  |j)!,{PC}:.qY DCD|
0000cd50  20 30 3a 2e 71 5a 20 44  43 44 20 30 3a 2e 71 61  | 0:.qZ DCD 0:.qa|
0000cd60  20 44 43 44 20 30 3a 2e  74 67 20 44 43 44 20 30  | DCD 0:.tg DCD 0|
0000cd70  3a 2e 73 55 20 44 43 44  20 30 3a 2e 74 68 20 44  |:.sU DCD 0:.th D|
0000cd80  43 44 20 30 20 3a 20 2e  74 69 20 44 43 44 20 30  |CD 0 : .ti DCD 0|
0000cd90  3a 2e 74 6a 20 44 43 44  20 30 20 3a 20 2e 74 6b  |:.tj DCD 0 : .tk|
0000cda0  20 44 43 44 20 30 0d ac  44 f9 2e 74 6c 20 44 43  | DCD 0..D..tl DC|
0000cdb0  44 20 30 20 3a 20 2e 74  6d 20 44 43 44 20 30 3a  |D 0 : .tm DCD 0:|
0000cdc0  2e 74 6e 20 44 43 44 20  30 20 3a 20 2e 74 6f 20  |.tn DCD 0 : .to |
0000cdd0  44 43 44 20 30 3a 2e 74  70 20 44 43 44 20 30 20  |DCD 0:.tp DCD 0 |
0000cde0  3a 20 2e 74 71 20 44 43  44 20 30 3a 2e 74 72 20  |: .tq DCD 0:.tr |
0000cdf0  44 43 44 20 30 20 3a 20  2e 74 73 20 44 43 44 20  |DCD 0 : .ts DCD |
0000ce00  30 3a 2e 74 74 20 44 43  44 20 30 20 3a 20 2e 74  |0:.tt DCD 0 : .t|
0000ce10  75 20 44 43 44 20 30 3a  2e 74 76 20 44 43 44 20  |u DCD 0:.tv DCD |
0000ce20  30 20 3a 20 2e 74 77 20  44 43 44 20 30 3a 2e 74  |0 : .tw DCD 0:.t|
0000ce30  78 20 44 43 44 20 30 20  3a 20 2e 74 79 20 44 43  |x DCD 0 : .ty DC|
0000ce40  44 20 30 3a 2e 74 7a 20  44 43 44 20 30 20 3a 20  |D 0:.tz DCD 0 : |
0000ce50  2e 75 55 20 44 43 44 20  30 3a 2e 75 56 3a 2e 71  |.uU DCD 0:.uV:.q|
0000ce60  7a 20 44 43 44 20 30 20  3a 20 2e 72 56 20 44 43  |z DCD 0 : .rV DC|
0000ce70  44 20 30 3a 2e 72 58 20  44 43 44 20 30 20 3a 20  |D 0:.rX DCD 0 : |
0000ce80  2e 72 5a 20 44 43 44 20  30 3a 2e 72 62 20 44 43  |.rZ DCD 0:.rb DC|
0000ce90  44 20 30 20 3a 20 2e 72  64 20 44 43 44 20 30 0d  |D 0 : .rd DCD 0.|
0000cea0  ac f8 f9 2e 72 66 20 44  43 44 20 30 20 3a 20 2e  |....rf DCD 0 : .|
0000ceb0  72 68 20 44 43 44 20 30  3a 2e 75 57 3a 2e 72 6a  |rh DCD 0:.uW:.rj|
0000cec0  20 44 43 44 20 30 20 3a  20 2e 72 6b 20 44 43 44  | DCD 0 : .rk DCD|
0000ced0  20 30 3a 2e 72 6c 20 44  43 44 20 30 20 3a 20 2e  | 0:.rl DCD 0 : .|
0000cee0  72 6d 20 44 43 44 20 30  3a 2e 72 6e 20 44 43 44  |rm DCD 0:.rn DCD|
0000cef0  20 30 20 3a 20 2e 72 6f  20 44 43 44 20 30 3a 2e  | 0 : .ro DCD 0:.|
0000cf00  72 70 20 44 43 44 20 30  20 3a 20 2e 72 71 20 44  |rp DCD 0 : .rq D|
0000cf10  43 44 20 30 3a 2e 75 58  3a 2e 72 73 20 44 43 44  |CD 0:.uX:.rs DCD|
0000cf20  20 30 20 3a 20 2e 72 77  20 44 43 44 20 30 3a 2e  | 0 : .rw DCD 0:.|
0000cf30  72 74 20 44 43 44 20 30  20 3a 20 2e 72 78 20 44  |rt DCD 0 : .rx D|
0000cf40  43 44 20 30 3a 2e 72 75  20 44 43 44 20 30 20 3a  |CD 0:.ru DCD 0 :|
0000cf50  20 2e 72 79 20 44 43 44  20 30 3a 2e 72 76 20 44  | .ry DCD 0:.rv D|
0000cf60  43 44 20 30 20 3a 20 2e  72 7a 20 44 43 44 20 30  |CD 0 : .rz DCD 0|
0000cf70  3a 2e 71 62 20 44 43 44  20 30 3a 2e 71 68 20 44  |:.qb DCD 0:.qh D|
0000cf80  43 44 20 30 3a 2e 73 64  20 44 43 44 20 30 3a 2e  |CD 0:.sd DCD 0:.|
0000cf90  73 65 20 44 43 44 20 30  0d ad f2 fc 2e 61 78 20  |se DCD 0.....ax |
0000cfa0  44 43 44 20 31 3a 2e 73  66 20 44 43 44 20 30 3a  |DCD 1:.sf DCD 0:|
0000cfb0  2e 64 62 20 44 43 44 20  30 3a 2e 64 63 20 44 43  |.db DCD 0:.dc DC|
0000cfc0  44 20 30 3a 2e 62 74 20  44 43 44 20 30 3a 2e 62  |D 0:.bt DCD 0:.b|
0000cfd0  75 20 44 43 44 20 30 3a  2e 62 79 20 44 43 44 20  |u DCD 0:.by DCD |
0000cfe0  30 3a 2e 62 7a 20 44 43  44 20 30 3a 2e 66 56 20  |0:.bz DCD 0:.fV |
0000cff0  44 43 44 20 30 20 3a 20  2e 66 58 20 44 43 44 20  |DCD 0 : .fX DCD |
0000d000  30 3a 2e 6d 74 20 44 43  44 20 30 20 3a 20 2e 6d  |0:.mt DCD 0 : .m|
0000d010  75 20 44 43 44 20 30 3a  2e 67 63 20 44 43 44 20  |u DCD 0:.gc DCD |
0000d020  30 20 3a 20 2e 67 62 20  44 43 44 20 30 3a 2e 70  |0 : .gb DCD 0:.p|
0000d030  78 20 44 43 44 20 30 20  3a 20 2e 70 79 20 44 43  |x DCD 0 : .py DC|
0000d040  44 20 30 3a 2e 70 70 20  44 43 44 20 30 3a 2e 70  |D 0:.pp DCD 0:.p|
0000d050  71 20 44 43 44 20 30 3a  2e 70 72 20 44 43 44 20  |q DCD 0:.pr DCD |
0000d060  30 3a 2e 70 73 20 44 43  44 20 30 3a 2e 70 74 20  |0:.ps DCD 0:.pt |
0000d070  44 43 44 20 30 3a 2e 70  75 20 44 43 44 20 30 3a  |DCD 0:.pu DCD 0:|
0000d080  2e 75 59 20 53 54 4d 46  44 20 28 68 6a 29 21 2c  |.uY STMFD (hj)!,|
0000d090  7b 68 6b 7d 0d af 5a f5  4d 56 4e 20 72 30 2c 23  |{hk}..Z.MVN r0,#|
0000d0a0  30 3a 53 54 52 20 72 30  2c 74 67 3a 42 4c 20 75  |0:STR r0,tg:BL u|
0000d0b0  5a 3a 42 4c 20 75 61 3a  4c 44 52 20 72 30 2c 72  |Z:BL ua:LDR r0,r|
0000d0c0  62 20 3a 20 4c 44 52 20  72 31 2c 72 66 3a 53 55  |b : LDR r1,rf:SU|
0000d0d0  42 20 72 30 2c 72 30 2c  72 31 20 3a 20 53 54 52  |B r0,r0,r1 : STR|
0000d0e0  20 72 30 2c 74 68 3a 4c  44 52 20 72 30 2c 72 64  | r0,th:LDR r0,rd|
0000d0f0  20 3a 20 4c 44 52 20 72  31 2c 72 68 3a 53 55 42  | : LDR r1,rh:SUB|
0000d100  20 72 30 2c 72 30 2c 72  31 20 3a 20 53 54 52 20  | r0,r0,r1 : STR |
0000d110  72 30 2c 74 69 3a 4c 44  52 20 72 30 2c 72 58 20  |r0,ti:LDR r0,rX |
0000d120  3a 20 4c 44 52 20 72 31  2c 71 7a 3a 53 55 42 20  |: LDR r1,qz:SUB |
0000d130  72 30 2c 72 30 2c 72 31  20 3a 20 53 54 52 20 72  |r0,r0,r1 : STR r|
0000d140  30 2c 74 6c 3a 4c 44 52  20 72 30 2c 72 5a 20 3a  |0,tl:LDR r0,rZ :|
0000d150  20 4c 44 52 20 72 31 2c  72 56 3a 53 55 42 20 72  | LDR r1,rV:SUB r|
0000d160  30 2c 72 30 2c 72 31 20  3a 20 53 54 52 20 72 30  |0,r0,r1 : STR r0|
0000d170  2c 74 6d 3a 4c 44 52 20  72 30 2c 72 6e 20 3a 20  |,tm:LDR r0,rn : |
0000d180  4c 44 52 20 72 31 2c 72  70 0d af dc ed 53 55 42  |LDR r1,rp....SUB|
0000d190  20 72 30 2c 72 30 2c 72  31 20 3a 20 53 54 52 20  | r0,r0,r1 : STR |
0000d1a0  72 30 2c 74 70 3a 4c 44  52 20 72 30 2c 72 6f 20  |r0,tp:LDR r0,ro |
0000d1b0  3a 20 4c 44 52 20 72 31  2c 72 71 3a 53 55 42 20  |: LDR r1,rq:SUB |
0000d1c0  72 30 2c 72 30 2c 72 31  20 3a 20 53 54 52 20 72  |r0,r0,r1 : STR r|
0000d1d0  30 2c 74 71 3a 4c 44 52  20 72 30 2c 72 6c 20 3a  |0,tq:LDR r0,rl :|
0000d1e0  20 4c 44 52 20 72 31 2c  72 6a 3a 53 55 42 20 72  | LDR r1,rj:SUB r|
0000d1f0  30 2c 72 30 2c 72 31 20  3a 20 53 54 52 20 72 30  |0,r0,r1 : STR r0|
0000d200  2c 74 74 3a 4c 44 52 20  72 30 2c 72 6d 20 3a 20  |,tt:LDR r0,rm : |
0000d210  4c 44 52 20 72 31 2c 72  6b 3a 53 55 42 20 72 30  |LDR r1,rk:SUB r0|
0000d220  2c 72 30 2c 72 31 20 3a  20 53 54 52 20 72 30 2c  |,r0,r1 : STR r0,|
0000d230  74 75 3a 4c 44 4d 46 44  20 28 68 6a 29 21 2c 7b  |tu:LDMFD (hj)!,{|
0000d240  50 43 7d 3a 2e 73 67 20  53 54 4d 46 44 20 28 68  |PC}:.sg STMFD (h|
0000d250  6a 29 21 2c 7b 68 6b 7d  3a 2e 75 62 20 42 4c 20  |j)!,{hk}:.ub BL |
0000d260  75 59 3a 4c 44 52 20 72  30 2c 75 63 3a 53 54 52  |uY:LDR r0,uc:STR|
0000d270  20 72 30 2c 74 67 0d b0  a4 ee 2e 75 64 20 42 4c  | r0,tg.....ud BL|
0000d280  20 75 65 20 3a 20 4c 44  52 20 72 30 2c 75 66 20  | ue : LDR r0,uf |
0000d290  3a 20 43 4d 50 20 72 30  2c 23 30 20 3a 20 42 4e  |: CMP r0,#0 : BN|
0000d2a0  45 20 75 67 3a 42 4c 20  75 68 20 3a 20 4c 44 52  |E ug:BL uh : LDR|
0000d2b0  20 72 30 2c 75 69 20 3a  20 43 4d 50 20 72 30 2c  | r0,ui : CMP r0,|
0000d2c0  23 30 20 3a 20 42 4e 45  20 75 67 3a 2e 75 6a 20  |#0 : BNE ug:.uj |
0000d2d0  42 4c 20 75 6b 3a 4c 44  52 20 72 30 2c 74 7a 20  |BL uk:LDR r0,tz |
0000d2e0  3a 20 41 44 44 20 72 30  2c 72 30 2c 23 31 3a 4c  |: ADD r0,r0,#1:L|
0000d2f0  44 52 20 72 31 2c 75 55  20 3a 20 41 44 44 20 72  |DR r1,uU : ADD r|
0000d300  31 2c 72 31 2c 23 32 3a  4c 44 52 20 72 32 2c 66  |1,r1,#2:LDR r2,f|
0000d310  58 3a 53 55 42 20 72 31  2c 72 32 2c 72 31 3a 4c  |X:SUB r1,r2,r1:L|
0000d320  44 52 20 72 32 2c 70 70  20 3a 20 53 55 42 20 72  |DR r2,pp : SUB r|
0000d330  30 2c 72 30 2c 72 32 3a  4c 44 52 20 72 33 2c 70  |0,r0,r2:LDR r3,p|
0000d340  71 20 3a 20 53 55 42 20  72 31 2c 72 31 2c 72 33  |q : SUB r1,r1,r3|
0000d350  3a 4c 44 52 20 72 34 2c  66 56 3a 4c 44 52 20 72  |:LDR r4,fV:LDR r|
0000d360  35 2c 66 58 0d b1 12 ef  43 4d 50 20 72 30 2c 23  |5,fX....CMP r0,#|
0000d370  30 20 3a 20 42 4c 54 20  75 6c 3a 43 4d 50 20 72  |0 : BLT ul:CMP r|
0000d380  30 2c 72 34 20 3a 20 42  47 45 20 75 6c 3a 43 4d  |0,r4 : BGE ul:CM|
0000d390  50 20 72 31 2c 23 30 20  3a 20 42 4c 54 20 75 6c  |P r1,#0 : BLT ul|
0000d3a0  3a 43 4d 50 20 72 31 2c  72 35 20 3a 20 42 47 45  |:CMP r1,r5 : BGE|
0000d3b0  20 75 6c 3a 4c 44 52 20  72 32 2c 75 6d 3a 4c 44  | ul:LDR r2,um:LD|
0000d3c0  52 20 72 32 2c 5b 72 32  5d 3a 4c 44 52 20 72 33  |R r2,[r2]:LDR r3|
0000d3d0  2c 66 56 3a 42 4c 20 6b  76 3a 53 54 52 20 72 30  |,fV:BL kv:STR r0|
0000d3e0  2c 75 6e 3a 42 20 75 6f  3a 2e 75 6c 20 4d 4f 56  |,un:B uo:.ul MOV|
0000d3f0  20 72 30 2c 23 30 3a 53  54 52 20 72 30 2c 75 6e  | r0,#0:STR r0,un|
0000d400  3a 2e 75 6f 20 42 4c 20  75 70 3a 4c 44 52 20 72  |:.uo BL up:LDR r|
0000d410  30 2c 74 7a 20 3a 20 41  44 44 20 72 30 2c 72 30  |0,tz : ADD r0,r0|
0000d420  2c 23 31 3a 4c 44 52 20  72 31 2c 75 55 20 3a 20  |,#1:LDR r1,uU : |
0000d430  41 44 44 20 72 31 2c 72  31 2c 23 32 3a 4c 44 52  |ADD r1,r1,#2:LDR|
0000d440  20 72 32 2c 6d 75 3a 53  55 42 20 72 31 2c 72 32  | r2,mu:SUB r1,r2|
0000d450  2c 72 31 0d b1 bc fa 4c  44 52 20 72 32 2c 70 72  |,r1....LDR r2,pr|
0000d460  20 3a 20 53 55 42 20 72  30 2c 72 30 2c 72 32 3a  | : SUB r0,r0,r2:|
0000d470  4c 44 52 20 72 33 2c 70  73 20 3a 20 53 55 42 20  |LDR r3,ps : SUB |
0000d480  72 31 2c 72 31 2c 72 33  3a 4c 44 52 20 72 34 2c  |r1,r1,r3:LDR r4,|
0000d490  6d 74 3a 4c 44 52 20 72  35 2c 6d 75 3a 43 4d 50  |mt:LDR r5,mu:CMP|
0000d4a0  20 72 30 2c 23 30 20 3a  20 42 4c 54 20 75 71 3a  | r0,#0 : BLT uq:|
0000d4b0  43 4d 50 20 72 30 2c 72  34 20 3a 20 42 47 45 20  |CMP r0,r4 : BGE |
0000d4c0  75 71 3a 43 4d 50 20 72  31 2c 23 30 20 3a 20 42  |uq:CMP r1,#0 : B|
0000d4d0  4c 54 20 75 71 3a 43 4d  50 20 72 31 2c 72 35 20  |LT uq:CMP r1,r5 |
0000d4e0  3a 20 42 47 45 20 75 71  3a 4c 44 52 20 72 32 2c  |: BGE uq:LDR r2,|
0000d4f0  75 72 3a 4c 44 52 20 72  32 2c 5b 72 32 5d 3a 4c  |ur:LDR r2,[r2]:L|
0000d500  44 52 20 72 33 2c 6d 74  3a 42 4c 20 6b 76 3a 53  |DR r3,mt:BL kv:S|
0000d510  54 52 20 72 30 2c 75 73  3a 42 20 75 74 3a 2e 75  |TR r0,us:B ut:.u|
0000d520  71 20 4d 4f 56 20 72 30  2c 23 30 3a 53 54 52 20  |q MOV r0,#0:STR |
0000d530  72 30 2c 75 73 3a 2e 75  74 20 4c 44 52 20 72 30  |r0,us:.ut LDR r0|
0000d540  2c 75 6e 3a 4c 44 52 20  72 31 2c 75 73 0d b2 7a  |,un:LDR r1,us..z|
0000d550  f5 43 4d 50 20 72 30 2c  72 31 3a 42 4c 4e 45 20  |.CMP r0,r1:BLNE |
0000d560  6c 71 3a 4d 4f 56 20 72  34 2c 72 30 3a 4c 44 52  |lq:MOV r4,r0:LDR|
0000d570  20 72 30 2c 74 67 3a 4c  44 52 20 72 31 2c 73 55  | r0,tg:LDR r1,sU|
0000d580  3a 4c 44 52 20 72 32 2c  66 56 3a 43 4d 50 20 72  |:LDR r2,fV:CMP r|
0000d590  30 2c 72 32 3a 42 47 45  20 75 75 3a 4c 44 52 20  |0,r2:BGE uu:LDR |
0000d5a0  72 32 2c 70 79 20 3a 20  53 55 42 20 72 31 2c 72  |r2,py : SUB r1,r|
0000d5b0  32 2c 72 31 20 3a 20 53  55 42 20 72 31 2c 72 31  |2,r1 : SUB r1,r1|
0000d5c0  2c 23 31 3a 4c 44 52 20  72 32 2c 64 62 20 3a 20  |,#1:LDR r2,db : |
0000d5d0  41 44 44 20 72 30 2c 72  30 2c 72 32 3a 4c 44 52  |ADD r0,r0,r2:LDR|
0000d5e0  20 72 33 2c 64 63 20 3a  20 53 55 42 20 72 31 2c  | r3,dc : SUB r1,|
0000d5f0  72 31 2c 72 33 3a 4c 44  52 20 72 35 2c 70 78 3a  |r1,r3:LDR r5,px:|
0000d600  4c 44 52 20 72 36 2c 70  79 3a 43 4d 50 20 72 30  |LDR r6,py:CMP r0|
0000d610  2c 23 30 20 3a 20 42 4c  54 20 75 75 3a 43 4d 50  |,#0 : BLT uu:CMP|
0000d620  20 72 30 2c 72 35 20 3a  20 42 47 45 20 75 75 3a  | r0,r5 : BGE uu:|
0000d630  43 4d 50 20 72 31 2c 23  30 20 3a 20 42 4c 54 20  |CMP r1,#0 : BLT |
0000d640  75 75 0d b3 10 f5 43 4d  50 20 72 31 2c 72 36 20  |uu....CMP r1,r6 |
0000d650  3a 20 42 47 45 20 75 75  3a 4c 44 52 20 72 32 2c  |: BGE uu:LDR r2,|
0000d660  75 76 3a 4c 44 52 20 72  32 2c 5b 72 32 5d 3a 4c  |uv:LDR r2,[r2]:L|
0000d670  44 52 20 72 33 2c 70 78  3a 42 4c 20 6c 63 3a 2e  |DR r3,px:BL lc:.|
0000d680  75 75 3a 2e 75 67 20 4c  44 52 20 72 30 2c 74 67  |uu:.ug LDR r0,tg|
0000d690  3a 41 44 44 20 72 30 2c  72 30 2c 23 31 3a 53 54  |:ADD r0,r0,#1:ST|
0000d6a0  52 20 72 30 2c 74 67 3a  4c 44 52 20 72 31 2c 75  |R r0,tg:LDR r1,u|
0000d6b0  77 3a 43 4d 50 20 72 30  2c 72 31 3a 42 4c 45 20  |w:CMP r0,r1:BLE |
0000d6c0  75 64 3a 2e 75 78 20 4c  44 52 20 72 30 2c 73 55  |ud:.ux LDR r0,sU|
0000d6d0  3a 41 44 44 20 72 30 2c  72 30 2c 23 31 3a 53 54  |:ADD r0,r0,#1:ST|
0000d6e0  52 20 72 30 2c 73 55 3a  4c 44 52 20 72 31 2c 73  |R r0,sU:LDR r1,s|
0000d6f0  64 3a 43 4d 50 20 72 30  2c 72 31 3a 4c 44 4d 47  |d:CMP r0,r1:LDMG|
0000d700  54 46 44 20 28 68 6a 29  21 2c 7b 50 43 7d 3a 4c  |TFD (hj)!,{PC}:L|
0000d710  44 52 20 72 31 2c 73 66  3a 53 55 42 53 20 72 31  |DR r1,sf:SUBS r1|
0000d720  2c 72 31 2c 23 31 3a 53  54 52 20 72 31 2c 73 66  |,r1,#1:STR r1,sf|
0000d730  3a 42 4e 45 20 75 62 0d  b4 1e ff 4c 44 4d 46 44  |:BNE ub....LDMFD|
0000d740  20 28 68 6a 29 21 2c 7b  50 43 7d 3a 2e 75 6d 20  | (hj)!,{PC}:.um |
0000d750  44 43 44 20 71 59 3a 2e  75 76 20 44 43 44 20 71  |DCD qY:.uv DCD q|
0000d760  5a 3a 2e 75 72 20 44 43  44 20 71 61 3a 2e 75 6e  |Z:.ur DCD qa:.un|
0000d770  20 44 43 44 20 30 3a 2e  75 73 20 44 43 44 20 30  | DCD 0:.us DCD 0|
0000d780  3a 2e 75 63 20 44 43 44  20 30 3a 2e 75 79 20 44  |:.uc DCD 0:.uy D|
0000d790  43 44 20 30 3a 2e 75 5a  20 53 54 4d 46 44 20 28  |CD 0:.uZ STMFD (|
0000d7a0  68 6a 29 21 2c 7b 68 6b  7d 3a 4c 44 52 20 72 33  |hj)!,{hk}:LDR r3|
0000d7b0  2c 72 73 3a 4c 44 52 20  72 34 2c 72 76 3a 53 55  |,rs:LDR r4,rv:SU|
0000d7c0  42 53 20 72 35 2c 72 33  2c 72 34 3a 53 54 52 45  |BS r5,r3,r4:STRE|
0000d7d0  51 20 72 33 2c 75 63 3a  4c 44 4d 45 51 46 44 20  |Q r3,uc:LDMEQFD |
0000d7e0  28 68 6a 29 21 2c 7b 50  43 7d 3a 4c 44 52 20 72  |(hj)!,{PC}:LDR r|
0000d7f0  30 2c 72 77 3a 4c 44 52  20 72 31 2c 72 7a 3a 53  |0,rw:LDR r1,rz:S|
0000d800  55 42 20 72 30 2c 72 30  2c 72 31 3a 4d 4f 56 20  |UB r0,r0,r1:MOV |
0000d810  72 31 2c 72 35 3a 6d 6f  76 20 72 30 2c 72 30 2c  |r1,r5:mov r0,r0,|
0000d820  61 73 6c 20 23 38 3a 42  4c 20 75 7a 3a 53 54 52  |asl #8:BL uz:STR|
0000d830  20 72 30 2c 75 79 0d b5  68 f5 4c 44 52 20 72 30  | r0,uy..h.LDR r0|
0000d840  2c 73 55 3a 4c 44 52 20  72 31 2c 72 7a 3a 53 55  |,sU:LDR r1,rz:SU|
0000d850  42 20 72 30 2c 72 30 2c  72 31 3a 4c 44 52 20 72  |B r0,r0,r1:LDR r|
0000d860  31 2c 75 79 3a 6d 6f 76  20 72 30 2c 72 30 2c 61  |1,uy:mov r0,r0,a|
0000d870  73 6c 20 23 38 3a 42 4c  20 75 7a 3a 4c 44 52 20  |sl #8:BL uz:LDR |
0000d880  72 31 2c 72 76 3a 41 44  44 20 72 30 2c 72 30 2c  |r1,rv:ADD r0,r0,|
0000d890  72 31 3a 53 54 52 20 72  30 2c 75 63 3a 4c 44 4d  |r1:STR r0,uc:LDM|
0000d8a0  46 44 20 28 68 6a 29 21  2c 7b 50 43 7d 3a 2e 75  |FD (hj)!,{PC}:.u|
0000d8b0  77 20 44 43 44 20 30 3a  2e 76 55 20 44 43 44 20  |w DCD 0:.vU DCD |
0000d8c0  30 3a 2e 75 61 20 53 54  4d 46 44 20 28 68 6a 29  |0:.ua STMFD (hj)|
0000d8d0  21 2c 7b 68 6b 7d 3a 4c  44 52 20 72 33 2c 72 74  |!,{hk}:LDR r3,rt|
0000d8e0  3a 4c 44 52 20 72 34 2c  72 75 3a 53 55 42 53 20  |:LDR r4,ru:SUBS |
0000d8f0  72 35 2c 72 33 2c 72 34  3a 53 54 52 45 51 20 72  |r5,r3,r4:STREQ r|
0000d900  33 2c 75 77 3a 4c 44 4d  45 51 46 44 20 28 68 6a  |3,uw:LDMEQFD (hj|
0000d910  29 21 2c 7b 50 43 7d 3a  4c 44 52 20 72 30 2c 72  |)!,{PC}:LDR r0,r|
0000d920  78 3a 4c 44 52 20 72 31  2c 72 79 0d b6 a8 f6 53  |x:LDR r1,ry....S|
0000d930  55 42 20 72 30 2c 72 30  2c 72 31 3a 4d 4f 56 20  |UB r0,r0,r1:MOV |
0000d940  72 31 2c 72 35 3a 6d 6f  76 20 72 30 2c 72 30 2c  |r1,r5:mov r0,r0,|
0000d950  61 73 6c 20 23 38 3a 42  4c 20 75 7a 3a 53 54 52  |asl #8:BL uz:STR|
0000d960  20 72 30 2c 76 55 3a 4c  44 52 20 72 30 2c 73 55  | r0,vU:LDR r0,sU|
0000d970  3a 4c 44 52 20 72 31 2c  72 79 3a 53 55 42 20 72  |:LDR r1,ry:SUB r|
0000d980  30 2c 72 30 2c 72 31 3a  4c 44 52 20 72 31 2c 76  |0,r0,r1:LDR r1,v|
0000d990  55 3a 6d 6f 76 20 72 30  2c 72 30 2c 61 73 6c 20  |U:mov r0,r0,asl |
0000d9a0  23 38 3a 42 4c 20 75 7a  3a 4c 44 52 20 72 31 2c  |#8:BL uz:LDR r1,|
0000d9b0  72 75 3a 41 44 44 20 72  30 2c 72 30 2c 72 31 3a  |ru:ADD r0,r0,r1:|
0000d9c0  53 54 52 20 72 30 2c 75  77 3a 4c 44 4d 46 44 20  |STR r0,uw:LDMFD |
0000d9d0  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 76 56 20 44  |(hj)!,{PC}:.vV D|
0000d9e0  43 44 20 30 3a 2e 76 57  20 44 43 44 20 30 3a 2e  |CD 0:.vW DCD 0:.|
0000d9f0  75 66 20 44 43 44 20 30  3a 2e 75 65 20 53 54 4d  |uf DCD 0:.ue STM|
0000da00  46 44 20 28 68 6a 29 21  2c 7b 68 6b 7d 3a 4c 44  |FD (hj)!,{hk}:LD|
0000da10  52 20 72 33 2c 72 77 3a  4c 44 52 20 72 34 2c 72  |R r3,rw:LDR r4,r|
0000da20  78 0d b7 f2 fe 53 55 42  53 20 72 35 2c 72 33 2c  |x....SUBS r5,r3,|
0000da30  72 34 3a 53 54 52 45 51  20 72 33 2c 76 56 3a 42  |r4:STREQ r3,vV:B|
0000da40  45 51 20 76 58 3a 4d 4f  56 20 72 30 2c 72 35 3a  |EQ vX:MOV r0,r5:|
0000da50  4c 44 52 20 72 31 2c 72  73 3a 4c 44 52 20 72 32  |LDR r1,rs:LDR r2|
0000da60  2c 72 74 3a 53 55 42 20  72 31 2c 72 31 2c 72 32  |,rt:SUB r1,r1,r2|
0000da70  3a 6d 6f 76 20 72 30 2c  72 30 2c 61 73 6c 20 23  |:mov r0,r0,asl #|
0000da80  31 31 3a 42 4c 20 75 7a  3a 53 54 52 20 72 30 2c  |11:BL uz:STR r0,|
0000da90  76 57 3a 4c 44 52 20 72  30 2c 74 67 3a 4c 44 52  |vW:LDR r0,tg:LDR|
0000daa0  20 72 31 2c 72 73 3a 53  55 42 20 72 30 2c 72 30  | r1,rs:SUB r0,r0|
0000dab0  2c 72 31 3a 4c 44 52 20  72 31 2c 76 57 3a 4d 55  |,r1:LDR r1,vW:MU|
0000dac0  4c 20 72 30 2c 72 31 2c  72 30 3a 6d 6f 76 20 72  |L r0,r1,r0:mov r|
0000dad0  30 2c 72 30 2c 61 73 72  20 23 31 31 3a 4c 44 52  |0,r0,asr #11:LDR|
0000dae0  20 72 31 2c 72 77 3a 41  44 44 20 72 30 2c 72 30  | r1,rw:ADD r0,r0|
0000daf0  2c 72 31 3a 53 54 52 20  72 30 2c 76 56 3a 2e 76  |,r1:STR r0,vV:.v|
0000db00  58 20 4c 44 52 20 72 30  2c 73 55 3a 4c 44 52 20  |X LDR r0,sU:LDR |
0000db10  72 31 2c 76 56 3a 43 4d  50 20 72 30 2c 72 31 0d  |r1,vV:CMP r0,r1.|
0000db20  b9 0a ff 4d 56 4e 47 45  20 72 30 2c 23 30 3a 4d  |...MVNGE r0,#0:M|
0000db30  4f 56 4c 54 20 72 30 2c  23 30 3a 53 54 52 20 72  |OVLT r0,#0:STR r|
0000db40  30 2c 75 66 3a 4c 44 4d  46 44 20 28 68 6a 29 21  |0,uf:LDMFD (hj)!|
0000db50  2c 7b 50 43 7d 3a 2e 76  59 20 44 43 44 20 30 3a  |,{PC}:.vY DCD 0:|
0000db60  2e 76 5a 20 44 43 44 20  30 3a 2e 75 69 20 44 43  |.vZ DCD 0:.ui DC|
0000db70  44 20 30 3a 2e 75 68 20  53 54 4d 46 44 20 28 68  |D 0:.uh STMFD (h|
0000db80  6a 29 21 2c 7b 68 6b 7d  3a 4c 44 52 20 72 33 2c  |j)!,{hk}:LDR r3,|
0000db90  72 7a 3a 4c 44 52 20 72  34 2c 72 79 3a 53 55 42  |rz:LDR r4,ry:SUB|
0000dba0  53 20 72 35 2c 72 33 2c  72 34 3a 53 54 52 45 51  |S r5,r3,r4:STREQ|
0000dbb0  20 72 33 2c 76 59 3a 42  45 51 20 76 61 3a 4d 4f  | r3,vY:BEQ va:MO|
0000dbc0  56 20 72 30 2c 72 35 3a  4c 44 52 20 72 31 2c 72  |V r0,r5:LDR r1,r|
0000dbd0  76 3a 4c 44 52 20 72 32  2c 72 75 3a 53 55 42 20  |v:LDR r2,ru:SUB |
0000dbe0  72 31 2c 72 31 2c 72 32  3a 6d 6f 76 20 72 30 2c  |r1,r1,r2:mov r0,|
0000dbf0  72 30 2c 61 73 6c 20 23  31 31 3a 42 4c 20 75 7a  |r0,asl #11:BL uz|
0000dc00  3a 53 54 52 20 72 30 2c  76 5a 3a 4c 44 52 20 72  |:STR r0,vZ:LDR r|
0000dc10  30 2c 74 67 3a 4c 44 52  20 72 31 2c 72 76 0d ba  |0,tg:LDR r1,rv..|
0000dc20  54 f9 53 55 42 20 72 30  2c 72 30 2c 72 31 3a 4c  |T.SUB r0,r0,r1:L|
0000dc30  44 52 20 72 31 2c 76 5a  3a 4d 55 4c 20 72 30 2c  |DR r1,vZ:MUL r0,|
0000dc40  72 31 2c 72 30 3a 6d 6f  76 20 72 30 2c 72 30 2c  |r1,r0:mov r0,r0,|
0000dc50  61 73 72 20 23 31 31 3a  4c 44 52 20 72 31 2c 72  |asr #11:LDR r1,r|
0000dc60  7a 3a 41 44 44 20 72 30  2c 72 30 2c 72 31 3a 53  |z:ADD r0,r0,r1:S|
0000dc70  54 52 20 72 30 2c 76 59  3a 2e 76 61 20 4c 44 52  |TR r0,vY:.va LDR|
0000dc80  20 72 30 2c 73 55 3a 4c  44 52 20 72 31 2c 76 59  | r0,sU:LDR r1,vY|
0000dc90  3a 43 4d 50 20 72 30 2c  72 31 3a 4d 56 4e 4c 54  |:CMP r0,r1:MVNLT|
0000dca0  20 72 30 2c 23 30 3a 4d  4f 56 47 45 20 72 30 2c  | r0,#0:MOVGE r0,|
0000dcb0  23 30 3a 53 54 52 20 72  30 2c 75 69 3a 4c 44 4d  |#0:STR r0,ui:LDM|
0000dcc0  46 44 20 28 68 6a 29 21  2c 7b 50 43 7d 3a 2e 75  |FD (hj)!,{PC}:.u|
0000dcd0  6b 20 53 54 4d 46 44 20  28 68 6a 29 21 2c 7b 68  |k STMFD (hj)!,{h|
0000dce0  6b 7d 3a 4c 44 52 20 72  30 2c 74 67 3a 4c 44 52  |k}:LDR r0,tg:LDR|
0000dcf0  20 72 31 2c 75 63 3a 53  55 42 20 72 30 2c 72 30  | r1,uc:SUB r0,r0|
0000dd00  2c 72 31 3a 4c 44 52 20  72 31 2c 75 77 3a 4c 44  |,r1:LDR r1,uw:LD|
0000dd10  52 20 72 32 2c 75 63 0d  bb 80 fb 53 55 42 20 72  |R r2,uc....SUB r|
0000dd20  31 2c 72 31 2c 72 32 3a  6d 6f 76 20 72 30 2c 72  |1,r1,r2:mov r0,r|
0000dd30  30 2c 61 73 6c 20 23 38  3a 42 4c 20 75 7a 3a 53  |0,asl #8:BL uz:S|
0000dd40  54 52 20 72 30 2c 61 63  3a 4c 44 52 20 72 30 2c  |TR r0,ac:LDR r0,|
0000dd50  73 55 3a 4c 44 52 20 72  31 2c 76 59 3a 53 55 42  |sU:LDR r1,vY:SUB|
0000dd60  20 72 30 2c 72 30 2c 72  31 3a 4c 44 52 20 72 31  | r0,r0,r1:LDR r1|
0000dd70  2c 76 56 3a 4c 44 52 20  72 32 2c 76 59 3a 53 55  |,vV:LDR r2,vY:SU|
0000dd80  42 20 72 31 2c 72 31 2c  72 32 3a 6d 6f 76 20 72  |B r1,r1,r2:mov r|
0000dd90  30 2c 72 30 2c 61 73 6c  20 23 38 3a 42 4c 20 75  |0,r0,asl #8:BL u|
0000dda0  7a 3a 53 54 52 20 72 30  2c 61 64 3a 4c 44 52 20  |z:STR r0,ad:LDR |
0000ddb0  72 30 2c 72 66 3a 4c 44  52 20 72 31 2c 74 68 3a  |r0,rf:LDR r1,th:|
0000ddc0  4c 44 52 20 72 32 2c 61  63 3a 4d 55 4c 20 72 33  |LDR r2,ac:MUL r3|
0000ddd0  2c 72 31 2c 72 32 3a 6d  6f 76 20 72 33 2c 72 33  |,r1,r2:mov r3,r3|
0000dde0  2c 61 73 72 20 23 38 3a  41 44 44 20 72 30 2c 72  |,asr #8:ADD r0,r|
0000ddf0  30 2c 72 33 3a 53 54 52  20 72 30 2c 74 6a 3a 4c  |0,r3:STR r0,tj:L|
0000de00  44 52 20 72 30 2c 72 68  3a 4c 44 52 20 72 31 2c  |DR r0,rh:LDR r1,|
0000de10  74 69 0d bc 7a fc 4c 44  52 20 72 32 2c 61 63 3a  |ti..z.LDR r2,ac:|
0000de20  4d 55 4c 20 72 33 2c 72  31 2c 72 32 3a 6d 6f 76  |MUL r3,r1,r2:mov|
0000de30  20 72 33 2c 72 33 2c 61  73 72 20 23 38 3a 41 44  | r3,r3,asr #8:AD|
0000de40  44 20 72 30 2c 72 30 2c  72 33 3a 53 54 52 20 72  |D r0,r0,r3:STR r|
0000de50  30 2c 74 6b 3a 4c 44 52  20 72 30 2c 71 7a 3a 4c  |0,tk:LDR r0,qz:L|
0000de60  44 52 20 72 31 2c 74 6c  3a 4c 44 52 20 72 32 2c  |DR r1,tl:LDR r2,|
0000de70  61 63 3a 4d 55 4c 20 72  33 2c 72 31 2c 72 32 3a  |ac:MUL r3,r1,r2:|
0000de80  6d 6f 76 20 72 33 2c 72  33 2c 61 73 72 20 23 38  |mov r3,r3,asr #8|
0000de90  3a 41 44 44 20 72 30 2c  72 30 2c 72 33 3a 53 54  |:ADD r0,r0,r3:ST|
0000dea0  52 20 72 30 2c 74 6e 3a  4c 44 52 20 72 30 2c 72  |R r0,tn:LDR r0,r|
0000deb0  56 3a 4c 44 52 20 72 31  2c 74 6d 3a 4c 44 52 20  |V:LDR r1,tm:LDR |
0000dec0  72 32 2c 61 63 3a 4d 55  4c 20 72 33 2c 72 31 2c  |r2,ac:MUL r3,r1,|
0000ded0  72 32 3a 6d 6f 76 20 72  33 2c 72 33 2c 61 73 72  |r2:mov r3,r3,asr|
0000dee0  20 23 38 3a 41 44 44 20  72 30 2c 72 30 2c 72 33  | #8:ADD r0,r0,r3|
0000def0  3a 53 54 52 20 72 30 2c  74 6f 3a 4c 44 52 20 72  |:STR r0,to:LDR r|
0000df00  30 2c 74 6e 3a 4c 44 52  20 72 31 2c 74 6a 0d bd  |0,tn:LDR r1,tj..|
0000df10  6a fc 53 55 42 20 72 30  2c 72 30 2c 72 31 3a 53  |j.SUB r0,r0,r1:S|
0000df20  54 52 20 72 30 2c 74 78  3a 4c 44 52 20 72 30 2c  |TR r0,tx:LDR r0,|
0000df30  74 6f 3a 4c 44 52 20 72  31 2c 74 6b 3a 53 55 42  |to:LDR r1,tk:SUB|
0000df40  20 72 30 2c 72 30 2c 72  31 3a 53 54 52 20 72 30  | r0,r0,r1:STR r0|
0000df50  2c 74 79 3a 4c 44 52 20  72 30 2c 74 6a 3a 4c 44  |,ty:LDR r0,tj:LD|
0000df60  52 20 72 31 2c 74 78 3a  4c 44 52 20 72 32 2c 61  |R r1,tx:LDR r2,a|
0000df70  64 3a 4d 55 4c 20 72 33  2c 72 31 2c 72 32 3a 6d  |d:MUL r3,r1,r2:m|
0000df80  6f 76 20 72 33 2c 72 33  2c 61 73 72 20 23 38 3a  |ov r3,r3,asr #8:|
0000df90  41 44 44 20 72 30 2c 72  30 2c 72 33 3a 53 54 52  |ADD r0,r0,r3:STR|
0000dfa0  20 72 30 2c 74 7a 3a 4c  44 52 20 72 30 2c 74 6b  | r0,tz:LDR r0,tk|
0000dfb0  3a 4c 44 52 20 72 31 2c  74 79 3a 4c 44 52 20 72  |:LDR r1,ty:LDR r|
0000dfc0  32 2c 61 64 3a 4d 55 4c  20 72 33 2c 72 31 2c 72  |2,ad:MUL r3,r1,r|
0000dfd0  32 3a 6d 6f 76 20 72 33  2c 72 33 2c 61 73 72 20  |2:mov r3,r3,asr |
0000dfe0  23 38 3a 41 44 44 20 72  30 2c 72 30 2c 72 33 3a  |#8:ADD r0,r0,r3:|
0000dff0  53 54 52 20 72 30 2c 75  55 3a 4c 44 4d 46 44 20  |STR r0,uU:LDMFD |
0000e000  28 68 6a 29 21 2c 7b 50  43 7d 0d be a0 fc 2e 75  |(hj)!,{PC}.....u|
0000e010  70 20 53 54 4d 46 44 20  28 68 6a 29 21 2c 7b 68  |p STMFD (hj)!,{h|
0000e020  6b 7d 3a 4c 44 52 20 72  30 2c 74 67 3a 4c 44 52  |k}:LDR r0,tg:LDR|
0000e030  20 72 31 2c 75 63 3a 53  55 42 20 72 30 2c 72 30  | r1,uc:SUB r0,r0|
0000e040  2c 72 31 3a 4c 44 52 20  72 31 2c 75 77 3a 4c 44  |,r1:LDR r1,uw:LD|
0000e050  52 20 72 32 2c 75 63 3a  53 55 42 20 72 31 2c 72  |R r2,uc:SUB r1,r|
0000e060  31 2c 72 32 3a 6d 6f 76  20 72 30 2c 72 30 2c 61  |1,r2:mov r0,r0,a|
0000e070  73 6c 20 23 38 3a 42 4c  20 75 7a 3a 53 54 52 20  |sl #8:BL uz:STR |
0000e080  72 30 2c 61 63 3a 4c 44  52 20 72 30 2c 73 55 3a  |r0,ac:LDR r0,sU:|
0000e090  4c 44 52 20 72 31 2c 76  59 3a 53 55 42 20 72 30  |LDR r1,vY:SUB r0|
0000e0a0  2c 72 30 2c 72 31 3a 4c  44 52 20 72 31 2c 76 56  |,r0,r1:LDR r1,vV|
0000e0b0  3a 4c 44 52 20 72 32 2c  76 59 3a 53 55 42 20 72  |:LDR r2,vY:SUB r|
0000e0c0  31 2c 72 31 2c 72 32 3a  6d 6f 76 20 72 30 2c 72  |1,r1,r2:mov r0,r|
0000e0d0  30 2c 61 73 6c 20 23 38  3a 42 4c 20 75 7a 3a 53  |0,asl #8:BL uz:S|
0000e0e0  54 52 20 72 30 2c 61 64  3a 4c 44 52 20 72 30 2c  |TR r0,ad:LDR r0,|
0000e0f0  72 70 3a 4c 44 52 20 72  31 2c 74 70 3a 4c 44 52  |rp:LDR r1,tp:LDR|
0000e100  20 72 32 2c 61 63 0d bf  9a fc 4d 55 4c 20 72 33  | r2,ac....MUL r3|
0000e110  2c 72 31 2c 72 32 3a 6d  6f 76 20 72 33 2c 72 33  |,r1,r2:mov r3,r3|
0000e120  2c 61 73 72 20 23 38 3a  41 44 44 20 72 30 2c 72  |,asr #8:ADD r0,r|
0000e130  30 2c 72 33 3a 53 54 52  20 72 30 2c 74 72 3a 4c  |0,r3:STR r0,tr:L|
0000e140  44 52 20 72 30 2c 72 71  3a 4c 44 52 20 72 31 2c  |DR r0,rq:LDR r1,|
0000e150  74 71 3a 4c 44 52 20 72  32 2c 61 63 3a 4d 55 4c  |tq:LDR r2,ac:MUL|
0000e160  20 72 33 2c 72 31 2c 72  32 3a 6d 6f 76 20 72 33  | r3,r1,r2:mov r3|
0000e170  2c 72 33 2c 61 73 72 20  23 38 3a 41 44 44 20 72  |,r3,asr #8:ADD r|
0000e180  30 2c 72 30 2c 72 33 3a  53 54 52 20 72 30 2c 74  |0,r0,r3:STR r0,t|
0000e190  73 3a 4c 44 52 20 72 30  2c 72 6a 3a 4c 44 52 20  |s:LDR r0,rj:LDR |
0000e1a0  72 31 2c 74 74 3a 4c 44  52 20 72 32 2c 61 63 3a  |r1,tt:LDR r2,ac:|
0000e1b0  4d 55 4c 20 72 33 2c 72  31 2c 72 32 3a 6d 6f 76  |MUL r3,r1,r2:mov|
0000e1c0  20 72 33 2c 72 33 2c 61  73 72 20 23 38 3a 41 44  | r3,r3,asr #8:AD|
0000e1d0  44 20 72 30 2c 72 30 2c  72 33 3a 53 54 52 20 72  |D r0,r0,r3:STR r|
0000e1e0  30 2c 74 76 3a 4c 44 52  20 72 30 2c 72 6b 3a 4c  |0,tv:LDR r0,rk:L|
0000e1f0  44 52 20 72 31 2c 74 75  3a 4c 44 52 20 72 32 2c  |DR r1,tu:LDR r2,|
0000e200  61 63 0d c0 8a ff 4d 55  4c 20 72 33 2c 72 31 2c  |ac....MUL r3,r1,|
0000e210  72 32 3a 6d 6f 76 20 72  33 2c 72 33 2c 61 73 72  |r2:mov r3,r3,asr|
0000e220  20 23 38 3a 41 44 44 20  72 30 2c 72 30 2c 72 33  | #8:ADD r0,r0,r3|
0000e230  3a 53 54 52 20 72 30 2c  74 77 3a 4c 44 52 20 72  |:STR r0,tw:LDR r|
0000e240  30 2c 74 76 3a 4c 44 52  20 72 31 2c 74 72 3a 53  |0,tv:LDR r1,tr:S|
0000e250  55 42 20 72 30 2c 72 30  2c 72 31 3a 53 54 52 20  |UB r0,r0,r1:STR |
0000e260  72 30 2c 74 78 3a 4c 44  52 20 72 30 2c 74 77 3a  |r0,tx:LDR r0,tw:|
0000e270  4c 44 52 20 72 31 2c 74  73 3a 53 55 42 20 72 30  |LDR r1,ts:SUB r0|
0000e280  2c 72 30 2c 72 31 3a 53  54 52 20 72 30 2c 74 79  |,r0,r1:STR r0,ty|
0000e290  3a 4c 44 52 20 72 30 2c  74 72 3a 4c 44 52 20 72  |:LDR r0,tr:LDR r|
0000e2a0  31 2c 74 78 3a 4c 44 52  20 72 32 2c 61 64 3a 4d  |1,tx:LDR r2,ad:M|
0000e2b0  55 4c 20 72 33 2c 72 31  2c 72 32 3a 6d 6f 76 20  |UL r3,r1,r2:mov |
0000e2c0  72 33 2c 72 33 2c 61 73  72 20 23 38 3a 41 44 44  |r3,r3,asr #8:ADD|
0000e2d0  20 72 30 2c 72 30 2c 72  33 3a 53 54 52 20 72 30  | r0,r0,r3:STR r0|
0000e2e0  2c 74 7a 3a 4c 44 52 20  72 30 2c 74 73 3a 4c 44  |,tz:LDR r0,ts:LD|
0000e2f0  52 20 72 31 2c 74 79 3a  4c 44 52 20 72 32 2c 61  |R r1,ty:LDR r2,a|
0000e300  64 0d c1 8e f6 4d 55 4c  20 72 33 2c 72 31 2c 72  |d....MUL r3,r1,r|
0000e310  32 3a 6d 6f 76 20 72 33  2c 72 33 2c 61 73 72 20  |2:mov r3,r3,asr |
0000e320  23 38 3a 41 44 44 20 72  30 2c 72 30 2c 72 33 3a  |#8:ADD r0,r0,r3:|
0000e330  53 54 52 20 72 30 2c 75  55 3a 4c 44 4d 46 44 20  |STR r0,uU:LDMFD |
0000e340  28 68 6a 29 21 2c 7b 50  43 7d 3a 2e 61 63 20 44  |(hj)!,{PC}:.ac D|
0000e350  43 44 20 30 3a 2e 61 64  20 44 43 44 20 30 3a 2e  |CD 0:.ad DCD 0:.|
0000e360  75 7a 20 41 44 52 20 72  32 2c 76 62 3a 63 6d 70  |uz ADR r2,vb:cmp|
0000e370  20 72 31 2c 23 30 3a 61  64 64 67 74 20 72 31 2c  | r1,#0:addgt r1,|
0000e380  72 31 2c 23 31 3a 73 75  62 6c 65 20 72 31 2c 72  |r1,#1:suble r1,r|
0000e390  31 2c 23 31 3a 43 4d 50  20 72 31 2c 23 30 3a 4d  |1,#1:CMP r1,#0:M|
0000e3a0  56 4e 4c 54 20 72 31 2c  72 31 3a 41 44 44 4c 54  |VNLT r1,r1:ADDLT|
0000e3b0  20 72 31 2c 72 31 2c 23  31 3a 4c 44 52 20 72 32  | r1,r1,#1:LDR r2|
0000e3c0  2c 5b 72 32 2c 72 31 2c  41 53 4c 20 23 32 5d 3a  |,[r2,r1,ASL #2]:|
0000e3d0  4d 55 4c 20 72 30 2c 72  32 2c 72 30 3a 4d 56 4e  |MUL r0,r2,r0:MVN|
0000e3e0  4c 54 20 72 30 2c 72 30  3a 41 44 44 4c 54 20 72  |LT r0,r0:ADDLT r|
0000e3f0  30 2c 72 30 2c 23 31 0d  c2 ec 41 4d 4f 56 20 72  |0,r0,#1...AMOV r|
0000e400  30 2c 72 30 2c 41 53 52  20 23 31 36 3a 4d 4f 56  |0,r0,ASR #16:MOV|
0000e410  20 50 43 2c 68 6b 3a 2e  76 62 20 44 43 44 20 31  | PC,hk:.vb DCD 1|
0000e420  3a 20 a4 63 74 69 6f 6e  5f 52 65 63 69 70 72 6f  |: .ction_Recipro|
0000e430  63 61 6c 73 3a 5d 3a e1  0d c3 6e 1f dd a4 63 74  |cals:]:...n...ct|
0000e440  69 6f 6e 5f 52 65 63 69  70 72 6f 63 61 6c 73 3a  |ion_Reciprocals:|
0000e450  e7 68 6e 3c 32 20 8c 0d  c3 82 0f 50 25 2b 3d 38  |.hn<2 .....P%+=8|
0000e460  31 39 32 2a 20 34 0d c3  8c 29 cc 3a e3 69 3d 31  |192* 4...).:.i=1|
0000e470  20 b8 38 31 39 32 3a 21  50 25 3d 28 31 2f 69 29  | .8192:!P%=(1/i)|
0000e480  2a 20 32 5e 31 36 3a 50  25 2b 3d 34 3a ed 69 0d  |* 2^16:P%+=4:.i.|
0000e490  c3 be 09 cd 3a 3d 68 6e  0d c6 f2 57 dd a4 63 74  |....:=hn...W..ct|
0000e4a0  69 6f 6e 5f 49 6e 69 74  69 61 6c 69 73 65 54 61  |ion_InitialiseTa|
0000e4b0  73 6b 28 76 63 2c 76 64  24 29 3a ea 63 5a 2c 63  |sk(vc,vd$):.cZ,c|
0000e4c0  62 3a c8 99 26 34 30 30  43 30 2c 76 63 2c 26 34  |b:..&400C0,vc,&4|
0000e4d0  42 35 33 34 31 35 34 2c  76 64 24 2b bd 30 20 b8  |B534154,vd$+.0 .|
0000e4e0  63 5a 2c 63 62 3a 76 65  3d 63 62 3a 3d 76 65 0d  |cZ,cb:ve=cb:=ve.|
0000e4f0  c7 38 21 dd f2 58 62 28  76 65 29 3a c8 99 26 34  |.8!..Xb(ve):..&4|
0000e500  30 30 44 44 2c 76 65 2c  22 54 41 53 4b 22 3a e1  |00DD,ve,"TASK":.|
0000e510  0d c7 6a 95 dd a4 63 74  69 6f 6e 5f 52 65 70 6f  |..j...ction_Repo|
0000e520  72 74 45 72 72 6f 72 28  58 63 2c 76 66 2c 61 6b  |rtError(Xc,vf,ak|
0000e530  24 2c 59 69 24 2c 76 67  2c 76 68 29 3a ea 61 6f  |$,Yi$,vg,vh):.ao|
0000e540  2c 63 62 2c 76 69 3a 24  58 63 3d 61 6b 24 2b bd  |,cb,vi:$Xc=ak$+.|
0000e550  30 3a 58 63 21 33 32 3d  76 66 3a 24 28 58 63 2b  |0:Xc!32=vf:$(Xc+|
0000e560  33 36 29 3d 59 69 24 2b  bd 30 3a 61 6f 3d 28 94  |36)=Yi$+.0:ao=(.|
0000e570  76 67 2a 32 5e 30 29 2b  28 94 76 68 2a 32 5e 31  |vg*2^0)+(.vh*2^1|
0000e580  29 3a c8 99 26 34 30 30  44 46 2c 58 63 2b 33 32  |):..&400DF,Xc+32|
0000e590  2c 61 6f 2c 58 63 20 b8  2c 63 62 3a 76 69 3d 63  |,ao,Xc .,cb:vi=c|
0000e5a0  62 3a 3d 76 69 0d c7 e2  1d dd f2 57 77 28 58 6a  |b:=vi......Ww(Xj|
0000e5b0  2c 58 63 2c 58 6e 2c 76  6a 29 3a e7 20 ac 76 6a  |,Xc,Xn,vj):. .vj|
0000e5c0  20 8c 0d c7 f6 24 21 58  63 3d 58 6e 3a c8 99 26  | ....$!Xc=Xn:..&|
0000e5d0  34 30 30 43 42 2c 2c 58  63 3a c8 99 26 34 30 30  |400CB,,Xc:..&400|
0000e5e0  43 35 2c 2c 58 63 0d c8  14 35 cc 3a 21 58 63 3d  |C5,,Xc...5.:!Xc=|
0000e5f0  21 58 6a 3a c8 99 26 34  30 30 43 42 2c 2c 58 63  |!Xj:..&400CB,,Xc|
0000e600  3a 76 6b 3d 58 63 21 32  38 3a 76 6c 3d 58 6a 21  |:vk=Xc!28:vl=Xj!|
0000e610  32 38 3a e7 76 6c 3d 2d  31 20 8c 0d c8 50 0b c8  |28:.vl=-1 ...P..|
0000e620  8e 21 58 6a 20 ca 0d c8  5a 2f c9 57 78 3a 21 58  |.!Xj ...Z/.Wx:!X|
0000e630  63 3d 57 7a 3a c8 99 26  34 30 30 43 42 2c 2c 58  |c=Wz:..&400CB,,X|
0000e640  63 3a e7 58 63 21 32 38  3d 2d 31 20 8c 58 6a 21  |c:.Xc!28=-1 .Xj!|
0000e650  32 38 3d 76 6b 0d c8 78  05 cb 0d c8 82 12 cd 3a  |28=vk..x.......:|
0000e660  c8 99 26 34 30 30 43 35  2c 2c 58 6a 0d c8 96 07  |..&400C5,,Xj....|
0000e670  cd 3a e1 0d c8 be 26 dd  f2 58 55 28 58 63 2c 58  |.:....&..XU(Xc,X|
0000e680  6e 29 3a 58 63 21 30 3d  58 6e 3a c8 99 26 34 30  |n):Xc!0=Xn:..&40|
0000e690  30 43 36 2c 2c 58 63 3a  e1 0d c8 fa 53 dd f2 58  |0C6,,Xc:....S..X|
0000e6a0  73 28 58 63 2c 58 6e 29  3a ea 61 61 2c 61 62 2c  |s(Xc,Xn):.aa,ab,|
0000e6b0  76 6d 2c 76 6e 2c 76 6f  2c 76 70 3a 58 63 21 30  |vm,vn,vo,vp:Xc!0|
0000e6c0  3d 58 6e 3a c8 99 26 34  30 30 43 43 2c 2c 58 63  |=Xn:..&400CC,,Xc|
0000e6d0  3a 61 61 3d 94 58 63 21  35 32 3a e7 61 61 3e 31  |:aa=.Xc!52:.aa>1|
0000e6e0  30 30 30 20 8c 61 61 3d  31 30 30 30 0d c9 2c 1d  |000 .aa=1000..,.|
0000e6f0  61 62 3d 94 58 63 21 34  38 3a e7 61 62 3e 35 31  |ab=.Xc!48:.ab>51|
0000e700  32 20 8c 61 62 3d 35 31  32 0d c9 36 f0 58 63 21  |2 .ab=512..6.Xc!|
0000e710  30 3d 34 3a 58 63 21 34  3d 35 3a 58 63 21 38 3d  |0=4:Xc!4=5:Xc!8=|
0000e720  31 31 3a 58 63 21 31 32  3d 31 32 3a 58 63 21 31  |11:Xc!12=12:Xc!1|
0000e730  36 3d 2d 31 3a c8 99 26  33 31 2c 58 63 2c 58 63  |6=-1:..&31,Xc,Xc|
0000e740  2b 33 32 3a 76 6d 3d 58  63 21 33 32 3a 76 6e 3d  |+32:vm=Xc!32:vn=|
0000e750  58 63 21 33 36 3a 76 6f  3d 58 63 21 34 30 3a 76  |Xc!36:vo=Xc!40:v|
0000e760  70 3d 58 63 21 34 34 3a  78 3d 76 6f 2a 20 32 5e  |p=Xc!44:x=vo* 2^|
0000e770  76 6d 20 3a 79 3d 76 70  2a 20 32 5e 76 6e 3a 78  |vm :y=vp* 2^vn:x|
0000e780  3d 28 78 2d 61 61 29 20  81 32 3a 79 3d 28 79 2d  |=(x-aa) .2:y=(y-|
0000e790  61 62 29 20 81 32 3a 58  63 21 28 30 29 3d 58 6e  |ab) .2:Xc!(0)=Xn|
0000e7a0  3a 58 63 21 28 34 2b 30  29 3d 78 3a 58 63 21 28  |:Xc!(4+0)=x:Xc!(|
0000e7b0  34 2b 34 29 3d 79 3a 58  63 21 28 34 2b 38 29 3d  |4+4)=y:Xc!(4+8)=|
0000e7c0  58 63 21 28 34 2b 30 29  2b 61 61 3a 58 63 21 28  |Xc!(4+0)+aa:Xc!(|
0000e7d0  34 2b 31 32 29 3d 58 63  21 28 34 2b 34 29 2b 61  |4+12)=Xc!(4+4)+a|
0000e7e0  62 3a 58 63 21 32 38 3d  2d 31 3a c8 99 26 34 30  |b:Xc!28=-1:..&40|
0000e7f0  30 43 35 2c 2c 58 63 3a  e1 0d c9 d6 4d dd f2 6e  |0C5,,Xc:....M..n|
0000e800  5a 28 58 63 2c 58 6e 2c  76 71 2c 76 72 2c 76 73  |Z(Xc,Xn,vq,vr,vs|
0000e810  2c 76 74 29 3a 58 63 21  30 3d 76 71 3a 58 63 21  |,vt):Xc!0=vq:Xc!|
0000e820  34 3d 76 73 3a 58 63 21  38 3d 76 72 3a 58 63 21  |4=vs:Xc!8=vr:Xc!|
0000e830  31 32 3d 76 74 3a c8 99  26 34 30 30 44 37 2c 58  |12=vt:..&400D7,X|
0000e840  6e 2c 58 63 3a e1 0d ca  30 5b dd a4 63 74 69 6f  |n,Xc:...0[..ctio|
0000e850  6e 5f 57 69 6e 64 6f 77  49 73 4f 70 65 6e 28 58  |n_WindowIsOpen(X|
0000e860  63 2c 58 6e 29 3a ea 76  75 2c 76 76 3a 58 63 21  |c,Xn):.vu,vv:Xc!|
0000e870  30 3d 58 6e 3a c8 99 26  34 30 30 43 42 2c 2c 58  |0=Xn:..&400CB,,X|
0000e880  63 3a 76 75 3d 58 63 21  33 32 3a 76 76 3d 28 76  |c:vu=Xc!32:vv=(v|
0000e890  75 20 80 32 5e 31 36 29  3d 32 5e 31 36 3a 3d 76  |u .2^16)=2^16:=v|
0000e8a0  76 0d ca 8a a4 dd f2 59  72 28 58 63 2c 58 6e 29  |v......Yr(Xc,Xn)|
0000e8b0  3a ea 61 61 2c 61 62 2c  76 77 2c 76 78 3a ea 76  |:.aa,ab,vw,vx:.v|
0000e8c0  79 2c 76 7a 2c 77 55 2c  77 56 3a 58 63 21 30 3d  |y,vz,wU,wV:Xc!0=|
0000e8d0  58 6e 3a c8 99 26 34 30  30 43 43 2c 2c 58 63 3a  |Xn:..&400CC,,Xc:|
0000e8e0  61 61 3d 58 63 21 31 32  2d 55 6a 21 34 3a 61 62  |aa=Xc!12-Uj!4:ab|
0000e8f0  3d 58 63 21 31 36 2d 58  63 21 38 3a 76 77 3d 58  |=Xc!16-Xc!8:vw=X|
0000e900  63 21 32 30 3a 76 78 3d  58 63 21 32 34 3a 76 79  |c!20:vx=Xc!24:vy|
0000e910  3d 76 77 3a 77 56 3d 76  78 3a 77 55 3d 77 56 2d  |=vw:wV=vx:wU=wV-|
0000e920  61 62 3a 76 7a 3d 76 79  2b 61 61 3a c8 99 26 34  |ab:vz=vy+aa:..&4|
0000e930  30 30 44 31 2c 58 6e 2c  76 79 2c 77 55 2c 76 7a  |00D1,Xn,vy,wU,vz|
0000e940  2c 77 56 3a e1 0d cb 0c  40 dd f2 77 57 28 58 63  |,wV:....@..wW(Xc|
0000e950  2c 58 6e 2c 58 64 29 3a  58 63 21 30 3d 58 6e 3a  |,Xn,Xd):Xc!0=Xn:|
0000e960  58 63 21 34 3d 58 64 3a  58 63 21 38 3d 30 3a 58  |Xc!4=Xd:Xc!8=0:X|
0000e970  63 21 31 32 3d 30 3a c8  99 26 34 30 30 43 44 2c  |c!12=0:..&400CD,|
0000e980  2c 58 63 3a e1 0d cb 66  2d dd f2 5a 61 28 58 6e  |,Xc:...f-..Za(Xn|
0000e990  2c 58 64 2c 77 58 29 3a  c8 99 26 34 30 30 44 32  |,Xd,wX):..&400D2|
0000e9a0  2c 58 6e 2c 58 64 2c 30  2c 30 2c 2d 31 2c 77 58  |,Xn,Xd,0,0,-1,wX|
0000e9b0  3a e1 0d cb 98 25 dd f2  5a 62 3a c8 99 26 34 30  |:....%..Zb:..&40|
0000e9c0  30 44 32 2c 2d 31 2c 2d  31 2c 2d 31 2c 2d 31 2c  |0D2,-1,-1,-1,-1,|
0000e9d0  2d 31 2c 2d 31 3a e1 0d  cb ca 6e dd a4 63 74 69  |-1,-1:....n..cti|
0000e9e0  6f 6e 5f 52 65 61 64 49  63 6f 6e 54 65 78 74 28  |on_ReadIconText(|
0000e9f0  58 63 2c 58 6e 2c 58 64  29 3a ea 61 6f 2c 77 59  |Xc,Xn,Xd):.ao,wY|
0000ea00  2c 61 73 24 3a 58 63 21  30 3d 58 6e 3a 58 63 21  |,as$:Xc!0=Xn:Xc!|
0000ea10  34 3d 58 64 3a c8 99 26  34 30 30 43 45 2c 2c 58  |4=Xd:..&400CE,,X|
0000ea20  63 3a 61 6f 3d 58 63 21  28 38 2b 31 36 29 3a 77  |c:ao=Xc!(8+16):w|
0000ea30  59 3d 28 61 6f 20 80 32  5e 38 29 3d 32 5e 38 3a  |Y=(ao .2^8)=2^8:|
0000ea40  e7 77 59 20 8c 0d cc 1a  27 61 73 24 3d a4 63 74  |.wY ....'as$=.ct|
0000ea50  69 6f 6e 5f 45 78 74 72  61 63 74 53 74 72 69 6e  |ion_ExtractStrin|
0000ea60  67 28 58 63 21 28 38 2b  32 30 29 29 0d cc 24 27  |g(Xc!(8+20))..$'|
0000ea70  cc 3a 61 73 24 3d a4 63  74 69 6f 6e 5f 45 78 74  |.:as$=.ction_Ext|
0000ea80  72 61 63 74 53 74 72 69  6e 67 28 58 63 2b 38 2b  |ractString(Xc+8+|
0000ea90  32 30 29 0d cc 38 0a cd  3a 3d 61 73 24 0d cc 60  |20)..8..:=as$..`|
0000eaa0  5e dd f2 57 69 28 58 63  2c 58 6e 2c 58 64 2c 77  |^..Wi(Xc,Xn,Xd,w|
0000eab0  5a 24 29 3a ea 61 6f 2c  77 59 3a 58 63 21 30 3d  |Z$):.ao,wY:Xc!0=|
0000eac0  58 6e 3a 58 63 21 34 3d  58 64 3a c8 99 26 34 30  |Xn:Xc!4=Xd:..&40|
0000ead0  30 43 45 2c 2c 58 63 3a  61 6f 3d 58 63 21 28 38  |0CE,,Xc:ao=Xc!(8|
0000eae0  2b 31 36 29 3a 77 59 3d  28 61 6f 20 80 32 5e 38  |+16):wY=(ao .2^8|
0000eaf0  29 3d 32 5e 38 3a e7 77  59 20 8c 0d cc b0 14 24  |)=2^8:.wY .....$|
0000eb00  28 58 63 21 28 38 2b 32  30 29 29 3d 77 5a 24 0d  |(Xc!(8+20))=wZ$.|
0000eb10  cc ba 14 cc 3a 24 28 58  63 2b 38 2b 32 30 29 3d  |....:$(Xc+8+20)=|
0000eb20  77 5a 24 0d cc ce 33 cd  3a 58 63 21 30 3d 58 6e  |wZ$...3.:Xc!0=Xn|
0000eb30  3a 58 63 21 34 3d 58 64  3a 58 63 21 38 3d 30 3a  |:Xc!4=Xd:Xc!8=0:|
0000eb40  58 63 21 31 32 3d 30 3a  c8 99 26 34 30 30 43 44  |Xc!12=0:..&400CD|
0000eb50  2c 2c 58 63 3a e1 0d cd  28 1a dd f2 5a 65 28 77  |,,Xc:...(...Ze(w|
0000eb60  61 29 3a c8 99 26 34 30  30 44 43 2c 77 61 3a e1  |a):..&400DC,wa:.|
0000eb70  0d cd 5a 44 dd a4 63 74  69 6f 6e 5f 45 78 74 72  |..ZD..ction_Extr|
0000eb80  61 63 74 53 74 72 69 6e  67 28 77 62 29 3a 77 63  |actString(wb):wc|
0000eb90  24 3d 22 22 3a c8 95 3f  77 62 3e 33 31 3a 77 63  |$="":..?wb>31:wc|
0000eba0  24 2b 3d bd 3f 77 62 3a  77 62 2b 3d 31 3a ce 3a  |$+=.?wb:wb+=1:.:|
0000ebb0  3d 77 63 24 0d cd b4 2a  dd f2 61 66 28 58 63 2c  |=wc$...*..af(Xc,|
0000ebc0  5a 7a 24 29 3a 24 58 63  3d 5a 7a 24 2b bd 30 3a  |Zz$):$Xc=Zz$+.0:|
0000ebd0  c8 99 26 34 30 30 44 39  2c 2c 58 63 3a e1 0d cd  |..&400D9,,Xc:...|
0000ebe0  f0 a5 dd a4 63 74 69 6f  6e 5f 4c 6f 61 64 54 65  |....ction_LoadTe|
0000ebf0  6d 70 6c 61 74 65 28 77  64 2c 77 65 2c 77 66 2c  |mplate(wd,we,wf,|
0000ec00  77 67 24 29 3a ea 63 63  2c 77 68 2c 77 69 2c 77  |wg$):.cc,wh,wi,w|
0000ec10  6a 2c 77 6b 3a c8 99 26  34 30 30 44 42 2c 2c 77  |j,wk:..&400DB,,w|
0000ec20  64 2c 77 65 2c 77 66 2c  2d 31 2c 77 67 24 2c 30  |d,we,wf,-1,wg$,0|
0000ec30  20 b8 2c 2c 63 63 3a 77  68 3d 77 64 21 38 34 3a  | .,,cc:wh=wd!84:|
0000ec40  77 69 3d 63 63 3a 3d 63  63 3a 77 6a 3d 30 3a c8  |wi=cc:=cc:wj=0:.|
0000ec50  95 77 6a 3c 77 68 3a 77  6b 3d 77 64 2b 38 38 2b  |.wj<wh:wk=wd+88+|
0000ec60  77 6a 2a 33 32 3a e7 28  77 6b 21 31 36 20 80 26  |wj*32:.(wk!16 .&|
0000ec70  31 30 33 29 3d 26 31 30  32 20 8c 77 6b 21 32 34  |103)=&102 .wk!24|
0000ec80  3d 55 70 0d ce 68 0f 77  6a 2b 3d 31 3a ce 3a 3d  |=Up..h.wj+=1:.:=|
0000ec90  77 69 0d ce 9a 3c dd a4  63 74 69 6f 6e 5f 4d 61  |wi...<..ction_Ma|
0000eca0  6b 65 54 65 6d 70 6c 61  74 65 41 57 69 6e 64 6f  |keTemplateAWindo|
0000ecb0  77 28 77 64 29 3a ea 58  6e 3a c8 99 26 34 30 30  |w(wd):.Xn:..&400|
0000ecc0  43 31 2c 2c 77 64 20 b8  58 6e 3a 3d 58 6e 0d ce  |C1,,wd .Xn:=Xn..|
0000ecd0  d6 13 dd f2 61 69 3a c8  99 26 34 30 30 44 41 3a  |....ai:..&400DA:|
0000ece0  e1 0d cf 08 3c dd a4 63  74 69 6f 6e 5f 50 6f 6c  |....<..ction_Pol|
0000ecf0  6c 57 69 6d 70 28 58 6a  2c 77 6c 29 3a ea 63 5a  |lWimp(Xj,wl):.cZ|
0000ed00  3a c8 99 26 34 30 30 43  37 2c 77 6c 2c 58 6a 20  |:..&400C7,wl,Xj |
0000ed10  b8 63 5a 3a 77 6d 3d 63  5a 3a 3d 77 6d 0d cf 4e  |.cZ:wm=cZ:=wm..N|
0000ed20  46 dd a4 63 74 69 6f 6e  5f 50 6f 6c 6c 57 69 6d  |F..ction_PollWim|
0000ed30  70 49 64 6c 65 28 58 6a  2c 77 6c 2c 77 6e 29 3a  |pIdle(Xj,wl,wn):|
0000ed40  ea 63 5a 3a c8 99 26 34  30 30 45 31 2c 77 6c 2c  |.cZ:..&400E1,wl,|
0000ed50  58 6a 2c 77 6e 20 b8 63  5a 3a 77 6d 3d 63 5a 3a  |Xj,wn .cZ:wm=cZ:|
0000ed60  3d 77 6d 0d cf 94 4b dd  a4 63 74 69 6f 6e 5f 53  |=wm...K..ction_S|
0000ed70  65 74 53 6c 6f 74 53 69  7a 65 28 77 6f 29 3a ea  |etSlotSize(wo):.|
0000ed80  63 5a 2c 63 62 2c 63 63  2c 77 70 3a c8 99 26 34  |cZ,cb,cc,wp:..&4|
0000ed90  30 30 45 43 2c 77 6f 2c  2d 31 20 b8 63 5a 2c 63  |00EC,wo,-1 .cZ,c|
0000eda0  62 2c 63 63 3a 77 70 3d  63 5a 3a 3d 77 70 0d cf  |b,cc:wp=cZ:=wp..|
0000edb0  da 48 dd a4 63 74 69 6f  6e 5f 52 65 61 64 53 6c  |.H..ction_ReadSl|
0000edc0  6f 74 53 69 7a 65 3a ea  63 5a 2c 63 62 2c 63 63  |otSize:.cZ,cb,cc|
0000edd0  2c 77 70 3a c8 99 26 34  30 30 45 43 2c 2d 31 2c  |,wp:..&400EC,-1,|
0000ede0  2d 31 20 b8 63 5a 2c 63  62 2c 63 63 3a 77 70 3d  |-1 .cZ,cb,cc:wp=|
0000edf0  63 5a 3a 3d 77 70 0d d0  20 4e dd a4 63 74 69 6f  |cZ:=wp.. N..ctio|
0000ee00  6e 5f 52 65 61 64 53 69  7a 65 4f 66 46 72 65 65  |n_ReadSizeOfFree|
0000ee10  50 6f 6f 6c 3a ea 63 5a  2c 63 62 2c 63 63 2c 77  |Pool:.cZ,cb,cc,w|
0000ee20  71 3a c8 99 26 34 30 30  45 43 2c 2d 31 2c 2d 31  |q:..&400EC,-1,-1|
0000ee30  20 b8 63 5a 2c 63 62 2c  63 63 3a 77 71 3d 63 63  | .cZ,cb,cc:wq=cc|
0000ee40  3a 3d 77 71 0d d0 66 8e  dd f2 58 72 28 58 63 29  |:=wq..f...Xr(Xc)|
0000ee50  3a ea 76 6d 2c 76 6e 2c  76 6f 2c 76 70 3a 58 63  |:.vm,vn,vo,vp:Xc|
0000ee60  21 30 3d 34 3a 58 63 21  34 3d 35 3a 58 63 21 38  |!0=4:Xc!4=5:Xc!8|
0000ee70  3d 31 31 3a 58 63 21 31  32 3d 31 32 3a 58 63 21  |=11:Xc!12=12:Xc!|
0000ee80  31 36 3d 2d 31 3a c8 99  26 33 31 2c 58 63 2c 58  |16=-1:..&31,Xc,X|
0000ee90  63 2b 33 32 3a 76 6d 3d  58 63 21 33 32 3a 76 6e  |c+32:vm=Xc!32:vn|
0000eea0  3d 58 63 21 33 36 3a 76  6f 3d 58 63 21 34 30 3a  |=Xc!36:vo=Xc!40:|
0000eeb0  76 70 3d 58 63 21 34 34  3a c8 97 c8 93 30 2c 30  |vp=Xc!44:....0,0|
0000eec0  2c 76 6f 2a 32 5e 76 6d  2c 76 70 2a 32 5e 76 6e  |,vo*2^vm,vp*2^vn|
0000eed0  3a e1 0d d0 d4 f4 dd f2  68 69 28 58 63 2c 58 6e  |:.......hi(Xc,Xn|
0000eee0  29 3a ea 61 61 2c 61 62  2c 76 6d 2c 76 6e 2c 76  |):.aa,ab,vm,vn,v|
0000eef0  6f 2c 76 70 3a 21 58 63  3d 58 6e 3a c8 99 26 34  |o,vp:!Xc=Xn:..&4|
0000ef00  30 30 43 43 2c 2c 58 63  3a 61 61 3d 94 58 63 21  |00CC,,Xc:aa=.Xc!|
0000ef10  35 32 3a 61 62 3d 94 58  63 21 34 38 3a 58 63 21  |52:ab=.Xc!48:Xc!|
0000ef20  30 3d 34 3a 58 63 21 34  3d 35 3a 58 63 21 38 3d  |0=4:Xc!4=5:Xc!8=|
0000ef30  31 31 3a 58 63 21 31 32  3d 31 32 3a 58 63 21 31  |11:Xc!12=12:Xc!1|
0000ef40  36 3d 2d 31 3a c8 99 26  33 31 2c 58 63 2c 58 63  |6=-1:..&31,Xc,Xc|
0000ef50  2b 33 32 3a 76 6d 3d 58  63 21 33 32 3a 76 6e 3d  |+32:vm=Xc!32:vn=|
0000ef60  58 63 21 33 36 3a 76 6f  3d 58 63 21 34 30 3a 76  |Xc!36:vo=Xc!40:v|
0000ef70  70 3d 58 63 21 34 34 3a  78 3d 76 6f 2a 20 32 5e  |p=Xc!44:x=vo* 2^|
0000ef80  76 6d 20 3a 79 3d 76 70  2a 20 32 5e 76 6e 3a 78  |vm :y=vp* 2^vn:x|
0000ef90  3d 28 78 2d 61 61 29 2f  32 3a 79 3d 28 79 2d 61  |=(x-aa)/2:y=(y-a|
0000efa0  62 29 2f 32 3a 58 63 21  30 3d 58 6e 3a 58 63 21  |b)/2:Xc!0=Xn:Xc!|
0000efb0  28 30 2b 34 2b 30 29 3d  78 3a 58 63 21 28 30 2b  |(0+4+0)=x:Xc!(0+|
0000efc0  34 2b 34 29 3d 79 0d d1  6a 7e 58 63 21 28 30 2b  |4+4)=y..j~Xc!(0+|
0000efd0  34 2b 38 29 3d 58 63 21  28 30 2b 34 2b 30 29 2b  |4+8)=Xc!(0+4+0)+|
0000efe0  61 61 3a 58 63 21 28 30  2b 34 2b 31 32 29 3d 58  |aa:Xc!(0+4+12)=X|
0000eff0  63 21 28 30 2b 34 2b 34  29 2b 61 62 3a c8 99 26  |c!(0+4+4)+ab:..&|
0000f000  34 30 30 43 35 2c 2c 58  63 3a 78 3d 28 28 76 6f  |400C5,,Xc:x=((vo|
0000f010  2a 32 5e 76 6d 29 2d 61  61 20 29 20 2f 20 32 3a  |*2^vm)-aa ) / 2:|
0000f020  79 3d 28 28 76 70 2a 32  5e 76 6e 29 2d 61 62 29  |y=((vp*2^vn)-ab)|
0000f030  20 2f 20 32 3a c8 97 c8  93 78 2c 79 2c 61 61 2c  | / 2:....x,y,aa,|
0000f040  61 62 3a e1 0d d1 c4 d4  dd f2 77 72 28 58 63 2c  |ab:.......wr(Xc,|
0000f050  58 6e 2c 58 64 2c 77 73  2c 77 74 29 3a 21 58 63  |Xn,Xd,ws,wt):!Xc|
0000f060  3d 58 6e 3a c8 99 26 34  30 30 43 43 2c 2c 58 63  |=Xn:..&400CC,,Xc|
0000f070  3a 77 75 3d 58 63 21 34  3a 77 76 3d 58 63 21 38  |:wu=Xc!4:wv=Xc!8|
0000f080  3a 77 77 3d 58 63 21 31  32 3a 77 78 3d 58 63 21  |:ww=Xc!12:wx=Xc!|
0000f090  31 36 3a 58 63 21 30 3d  58 6e 3a 58 63 21 34 3d  |16:Xc!0=Xn:Xc!4=|
0000f0a0  58 64 3a c8 99 26 34 30  30 43 45 2c 2c 58 63 3a  |Xd:..&400CE,,Xc:|
0000f0b0  77 79 3d 58 63 21 38 3a  77 7a 3d 58 63 21 31 32  |wy=Xc!8:wz=Xc!12|
0000f0c0  3a 78 55 3d 58 63 21 31  36 3a 78 56 3d 58 63 21  |:xU=Xc!16:xV=Xc!|
0000f0d0  32 30 3a 78 57 3d 78 55  2d 77 79 3a 78 58 3d 78  |20:xW=xU-wy:xX=x|
0000f0e0  56 2d 77 7a 3a 5a 6c 3d  77 75 2b 77 79 3a 5a 6f  |V-wz:Zl=wu+wy:Zo|
0000f0f0  3d 77 78 2b 77 7a 3a c8  97 c8 93 5a 6c 2b 77 73  |=wx+wz:....Zl+ws|
0000f100  2c 5a 6f 2b 77 74 2c 78  57 2d 77 73 2a 32 2c 78  |,Zo+wt,xW-ws*2,x|
0000f110  58 2d 77 74 2a 32 3a e1  0d d2 64 64 dd f2 64 68  |X-wt*2:...dd..dh|
0000f120  28 58 63 2c 58 6e 2c 58  6b 2c 58 6c 29 3a 21 58  |(Xc,Xn,Xk,Xl):!X|
0000f130  63 3d 58 6e 3a c8 99 26  34 30 30 43 43 2c 2c 58  |c=Xn:..&400CC,,X|
0000f140  63 3a 64 6a 3d 58 63 21  34 2d 58 63 21 32 30 3a  |c:dj=Xc!4-Xc!20:|
0000f150  64 6c 3d 58 6c 2d 28 58  63 21 31 36 2d 58 63 21  |dl=Xl-(Xc!16-Xc!|
0000f160  32 34 29 3a 64 6a 3d 58  6b 2d 64 6a 3a 68 56 25  |24):dj=Xk-dj:hV%|
0000f170  3d 64 6a 3a 68 58 25 3d  64 6c 3a e1 0d d2 d2 b6  |=dj:hX%=dl:.....|
0000f180  dd f2 57 79 28 58 63 2c  58 6e 2c 78 59 29 3a 58  |..Wy(Xc,Xn,xY):X|
0000f190  63 21 30 3d 58 6e 3a c8  99 26 34 30 30 43 43 2c  |c!0=Xn:..&400CC,|
0000f1a0  2c 58 63 3a 78 5a 3d 58  63 21 34 3a 66 74 3d 58  |,Xc:xZ=Xc!4:ft=X|
0000f1b0  63 21 31 32 3a 78 61 3d  58 63 21 38 3a 66 75 3d  |c!12:xa=Xc!8:fu=|
0000f1c0  58 63 21 31 36 3a 78 62  3d 58 63 21 32 38 3a 58  |Xc!16:xb=Xc!28:X|
0000f1d0  63 21 30 3d 78 59 3a c8  99 26 34 30 30 43 43 2c  |c!0=xY:..&400CC,|
0000f1e0  2c 58 63 3a 58 63 21 34  3d 78 5a 2b 38 3a 58 63  |,Xc:Xc!4=xZ+8:Xc|
0000f1f0  21 31 32 3d 66 74 2d 31  36 3a 58 63 21 38 3d 78  |!12=ft-16:Xc!8=x|
0000f200  61 2b 38 3a 58 63 21 31  36 3d 58 63 21 38 2b 34  |a+8:Xc!16=Xc!8+4|
0000f210  32 34 3a 58 63 21 32 30  3d 30 3a 58 63 21 32 38  |24:Xc!20=0:Xc!28|
0000f220  3d 78 62 3a c8 99 26 34  30 30 43 35 2c 2c 58 63  |=xb:..&400C5,,Xc|
0000f230  3a e1 0d d3 54 29 dd a4  63 74 69 6f 6e 5f 57 6f  |:...T)..ction_Wo|
0000f240  72 64 41 6c 69 67 6e 28  65 55 29 3a 3d 28 28 65  |rdAlign(eU):=((e|
0000f250  55 2b 33 29 20 80 28 ac  33 29 29 0d d3 7c 5b dd  |U+3) .(.3))..|[.|
0000f260  a4 63 74 69 6f 6e 5f 49  6e 73 74 61 6c 6c 48 65  |.ction_InstallHe|
0000f270  6c 70 3a c8 99 26 31 45  2c 36 2c 2c 2c 31 36 20  |lp:..&1E,6,,,16 |
0000f280  b8 2c 2c 63 63 3a 56 69  3d 63 63 3a c8 99 26 34  |.,,cc:Vi=cc:..&4|
0000f290  31 35 30 31 2c 56 69 2c  22 3c 22 2b 55 63 24 2b  |1501,Vi,"<"+Uc$+|
0000f2a0  22 24 44 69 72 3e 2e 4d  65 73 73 61 67 65 73 22  |"$Dir>.Messages"|
0000f2b0  2c 30 3a 3d 56 69 0d d3  c2 26 dd f2 58 61 28 78  |,0:=Vi...&..Xa(x|
0000f2c0  63 29 3a c8 99 26 34 31  35 30 34 2c 78 63 3a c8  |c):..&41504,xc:.|
0000f2d0  99 26 31 45 2c 37 2c 2c  78 63 3a e1 0d d3 fe 58  |.&1E,7,,xc:....X|
0000f2e0  dd a4 63 74 69 6f 6e 5f  54 61 67 54 6f 53 74 72  |..ction_TagToStr|
0000f2f0  69 6e 67 28 63 68 24 29  3a c8 99 26 34 31 35 30  |ing(ch$):..&4150|
0000f300  32 2c 56 69 2c 63 68 24  2c 30 2c 30 2c 30 2c 30  |2,Vi,ch$,0,0,0,0|
0000f310  2c 30 2c 30 20 b8 2c 2c  63 63 3a 3d a4 63 74 69  |,0,0 .,,cc:=.cti|
0000f320  6f 6e 5f 45 78 74 72 61  63 74 53 74 72 69 6e 67  |on_ExtractString|
0000f330  28 63 63 29 0d d4 30 5a  dd f2 78 64 28 78 65 2c  |(cc)..0Z..xd(xe,|
0000f340  78 66 2c 78 67 29 3a 78  68 3d 78 65 3a 78 69 3d  |xf,xg):xh=xe:xi=|
0000f350  78 66 3a 78 6a 3d 78 67  3a 56 61 3d 34 3a f2 77  |xf:xj=xg:Va=4:.w|
0000f360  72 28 55 6a 2c 78 68 2c  78 6a 2c 31 36 2c 30 29  |r(Uj,xh,xj,16,0)|
0000f370  3a c8 99 26 31 43 20 b8  63 6c 2c 63 6d 2c 63 75  |:..&1C .cl,cm,cu|
0000f380  3a 78 6b 3d 63 6c 2d 31  3a f2 78 6c 3a e1 0d d4  |:xk=cl-1:.xl:...|
0000f390  b2 0f dd f2 78 6c 3a c8  8e 78 68 20 ca 0d d4 d0  |....xl:..xh ....|
0000f3a0  0e c9 78 6d 3a c8 8e 78  6a 20 ca 0d d4 da 4d c9  |..xm:..xj ....M.|
0000f3b0  34 3a 78 6e 3d a4 63 74  69 6f 6e 5f 44 72 61 67  |4:xn=.ction_Drag|
0000f3c0  41 42 61 72 28 78 6e 2c  36 29 3a 73 3d a8 28 31  |ABar(xn,6):s=.(1|
0000f3d0  32 37 2a 28 78 6f 2f 31  30 30 29 29 3a f2 57 69  |27*(xo/100)):.Wi|
0000f3e0  28 55 6a 2c 78 6d 2c 33  30 2c c3 73 29 3a c8 99  |(Uj,xm,30,.s):..|
0000f3f0  26 39 30 30 38 33 2c 73  0d d5 02 05 cb 0d d5 0c  |&90083,s........|
0000f400  07 cb 3a e1 0d d5 34 33  dd a4 63 74 69 6f 6e 5f  |..:...43..ction_|
0000f410  44 72 61 67 41 42 61 72  28 78 66 2c 78 67 29 3a  |DragABar(xf,xg):|
0000f420  c8 99 26 31 43 20 b8 63  6c 2c 63 6d 2c 63 75 3a  |..&1C .cl,cm,cu:|
0000f430  e7 63 75 3d 30 20 8c 0d  d5 84 10 56 61 3d 30 3a  |.cu=0 .....Va=0:|
0000f440  f2 58 72 28 55 6a 29 0d  d5 a2 0f cc 3a e7 63 6c  |.Xr(Uj).....:.cl|
0000f450  3c 3e 78 6b 20 8c 0d d5  d4 f8 21 55 6a 3d 78 68  |<>xk .....!Uj=xh|
0000f460  3a c8 99 26 34 30 30 43  43 2c 2c 55 6a 3a 77 75  |:..&400CC,,Uj:wu|
0000f470  3d 55 6a 21 34 3a 78 70  3d 63 6c 2d 77 75 3a 55  |=Uj!4:xp=cl-wu:U|
0000f480  6a 21 30 3d 78 68 3a 55  6a 21 34 3d 78 66 3a c8  |j!0=xh:Uj!4=xf:.|
0000f490  99 26 34 30 30 43 45 2c  2c 55 6a 3a 77 79 3d 55  |.&400CE,,Uj:wy=U|
0000f4a0  6a 21 28 38 2b 30 29 3a  77 7a 3d 55 6a 21 28 38  |j!(8+0):wz=Uj!(8|
0000f4b0  2b 34 29 3a 78 55 3d 55  6a 21 28 38 2b 38 29 3a  |+4):xU=Uj!(8+8):|
0000f4c0  78 56 3d 55 6a 21 28 38  2b 31 32 29 3a 55 6a 21  |xV=Uj!(8+12):Uj!|
0000f4d0  28 31 30 30 2b 30 29 3d  78 68 3a 55 6a 21 28 31  |(100+0)=xh:Uj!(1|
0000f4e0  30 30 2b 34 29 3d 78 66  3a c8 99 26 34 30 30 43  |00+4)=xf:..&400C|
0000f4f0  34 2c 2c 55 6a 2b 31 30  30 3a c8 99 26 34 30 30  |4,,Uj+100:..&400|
0000f500  44 31 2c 78 68 2c 77 79  2c 77 7a 2c 78 55 2c 78  |D1,xh,wy,wz,xU,x|
0000f510  56 3a 55 6a 21 28 38 2b  38 29 3d 78 70 3a 55 6a  |V:Uj!(8+8)=xp:Uj|
0000f520  21 34 3d 78 68 3a c8 99  26 34 30 30 43 32 2c 2c  |!4=xh:..&400C2,,|
0000f530  55 6a 2b 34 20 b8 78 66  3a f2 77 57 28 55 6a 2c  |Uj+4 .xf:.wW(Uj,|
0000f540  78 68 2c 78 66 29 3a 55  6a 21 30 3d 78 68 0d d6  |xh,xf):Uj!0=xh..|
0000f550  e2 3f 55 6a 21 34 3d 78  6a 3a c8 99 26 34 30 30  |.?Uj!4=xj:..&400|
0000f560  43 45 2c 2c 55 6a 3a 78  71 3d 55 6a 21 28 38 2b  |CE,,Uj:xq=Uj!(8+|
0000f570  38 29 2d 31 36 3a 78 6b  3d 63 6c 3a 78 6f 3d a8  |8)-16:xk=cl:xo=.|
0000f580  28 28 78 70 2f 78 71 29  2a 31 30 30 29 0d d7 28  |((xp/xq)*100)..(|
0000f590  05 cd 0d d7 3c 09 cd 3a  3d 78 66 0d d7 6e 52 dd  |....<..:=xf..nR.|
0000f5a0  f2 78 72 28 58 63 2c 58  6e 2c 78 73 24 29 3a ea  |.xr(Xc,Xn,xs$):.|
0000f5b0  61 6f 2c 77 59 3a 21 58  63 3d 58 6e 3a c8 99 26  |ao,wY:!Xc=Xn:..&|
0000f5c0  34 30 30 43 43 2c 2c 58  63 3a 61 6f 3d 58 63 21  |400CC,,Xc:ao=Xc!|
0000f5d0  28 34 2b 35 36 29 3a 77  59 3d 28 61 6f 20 80 32  |(4+56):wY=(ao .2|
0000f5e0  5e 38 29 3d 32 5e 38 3a  e7 77 59 20 8c 0d d7 b4  |^8)=2^8:.wY ....|
0000f5f0  24 64 7a 3d 21 28 58 63  2b 34 2b 37 32 29 3a 24  |$dz=!(Xc+4+72):$|
0000f600  21 28 58 63 2b 34 2b 37  32 29 3d 78 73 24 2b bd  |!(Xc+4+72)=xs$+.|
0000f610  30 0d d7 c8 17 cc 3a 24  28 58 63 2b 34 2b 37 32  |0.....:$(Xc+4+72|
0000f620  29 3d 77 5a 24 2b bd 30  0d d7 dc 07 cd 3a e1 0d  |)=wZ$+.0.....:..|
0000f630  d8 04 4f dd f2 67 78 28  58 63 2c 58 6e 2c 58 64  |..O..gx(Xc,Xn,Xd|
0000f640  2c 78 74 29 3a 58 63 21  30 3d 58 6e 3a 58 63 21  |,xt):Xc!0=Xn:Xc!|
0000f650  34 3d 58 64 3a 58 63 21  38 3d 28 94 78 74 29 3c  |4=Xd:Xc!8=(.xt)<|
0000f660  3c 32 31 3a 58 63 21 31  32 3d 31 3c 3c 32 31 3a  |<21:Xc!12=1<<21:|
0000f670  c8 99 26 34 30 30 43 44  2c 2c 58 63 3a e1 0d d8  |..&400CD,,Xc:...|
0000f680  5e 4f dd f2 67 79 28 58  63 2c 58 6e 2c 58 64 2c  |^O..gy(Xc,Xn,Xd,|
0000f690  78 75 29 3a 58 63 21 30  3d 58 6e 3a 58 63 21 34  |xu):Xc!0=Xn:Xc!4|
0000f6a0  3d 58 64 3a 58 63 21 38  3d 28 94 78 75 29 3c 3c  |=Xd:Xc!8=(.xu)<<|
0000f6b0  32 32 3a 58 63 21 31 32  3d 31 3c 3c 32 32 3a c8  |22:Xc!12=1<<22:.|
0000f6c0  99 26 34 30 30 43 44 2c  2c 58 63 3a e1 0d d8 b8  |.&400CD,,Xc:....|
0000f6d0  61 dd a4 63 74 69 6f 6e  5f 49 63 6f 6e 49 73 54  |a..ction_IconIsT|
0000f6e0  6f 67 67 6c 65 64 28 58  63 2c 58 6e 2c 58 64 29  |oggled(Xc,Xn,Xd)|
0000f6f0  3a 58 63 21 30 3d 58 6e  3a 58 63 21 34 3d 58 64  |:Xc!0=Xn:Xc!4=Xd|
0000f700  3a c8 99 26 34 30 30 43  45 2c 2c 58 63 3a 78 76  |:..&400CE,,Xc:xv|
0000f710  3d 28 58 63 21 28 38 2b  31 36 29 29 20 80 32 5e  |=(Xc!(8+16)) .2^|
0000f720  32 31 3a 3d ac 28 78 76  3d 32 5e 32 31 29 0d d9  |21:=.(xv=2^21)..|
0000f730  08 41 dd f2 78 77 28 58  63 2c 58 6e 2c 58 64 29  |.A..xw(Xc,Xn,Xd)|
0000f740  3a f2 67 78 28 58 63 2c  58 6e 2c 58 64 2c a4 63  |:.gx(Xc,Xn,Xd,.c|
0000f750  74 69 6f 6e 5f 49 63 6f  6e 49 73 54 6f 67 67 6c  |tion_IconIsToggl|
0000f760  65 64 28 58 63 2c 58 6e  2c 58 64 29 29 3a e1 0d  |ed(Xc,Xn,Xd)):..|
0000f770  d9 3a 32 dd a4 63 74 69  6f 6e 5f 57 69 6e 64 6f  |.:2..ction_Windo|
0000f780  77 57 69 74 68 43 61 72  65 74 28 58 63 29 3a c8  |wWithCaret(Xc):.|
0000f790  99 26 34 30 30 44 33 2c  2c 58 63 3a 3d 58 63 21  |.&400D3,,Xc:=Xc!|
0000f7a0  30 0d d9 6c 30 dd a4 63  74 69 6f 6e 5f 49 63 6f  |0..l0..ction_Ico|
0000f7b0  6e 57 69 74 68 43 61 72  65 74 28 58 63 29 3a c8  |nWithCaret(Xc):.|
0000f7c0  99 26 34 30 30 44 33 2c  2c 58 63 3a 3d 58 63 21  |.&400D3,,Xc:=Xc!|
0000f7d0  34 0d d9 9e 37 dd a4 63  74 69 6f 6e 5f 50 61 74  |4...7..ction_Pat|
0000f7e0  68 6e 61 6d 65 4f 6e 6c  79 28 5a 7a 24 29 3a e7  |hnameOnly(Zz$):.|
0000f7f0  5a 7a 24 3d 22 22 20 84  a7 5a 7a 24 2c 22 2e 22  |Zz$="" ..Zz$,"."|
0000f800  29 3d 30 20 8c 3d 22 22  0d d9 b2 30 ea 69 3a 69  |)=0 .=""...0.i:i|
0000f810  3d a9 5a 7a 24 3a c8 95  c1 5a 7a 24 2c 69 2c 31  |=.Zz$:...Zz$,i,1|
0000f820  29 3c 3e 22 2e 22 3a 69  2d 3d 31 3a ce 3a 3d c0  |)<>".":i-=1:.:=.|
0000f830  5a 7a 24 2c 69 2d 31 29  0d da 02 2a dd a4 63 74  |Zz$,i-1)...*..ct|
0000f840  69 6f 6e 5f 4c 65 61 66  6e 61 6d 65 4f 6e 6c 79  |ion_LeafnameOnly|
0000f850  28 5a 7a 24 29 3a e7 5a  7a 24 3d 22 22 20 8c 3d  |(Zz$):.Zz$="" .=|
0000f860  22 22 0d da 16 3a ea 69  3a 69 3d a9 5a 7a 24 3a  |""...:.i:i=.Zz$:|
0000f870  c8 95 c1 5a 7a 24 2c 69  2c 31 29 3c 3e 22 2e 22  |...Zz$,i,1)<>"."|
0000f880  20 80 69 3e 30 3a 69 2d  3d 31 3a ce 3a 3d c1 5a  | .i>0:i-=1:.:=.Z|
0000f890  7a 24 2c 69 2b 31 2c a9  5a 7a 24 29 0d da 66 4d  |z$,i+1,.Zz$)..fM|
0000f8a0  dd f2 63 55 28 58 63 2c  63 69 2c 62 6d 2c 70 67  |..cU(Xc,ci,bm,pg|
0000f8b0  29 3a 58 63 21 30 3d 63  69 3a 58 63 21 34 3d 62  |):Xc!0=ci:Xc!4=b|
0000f8c0  6d 3a 58 63 21 38 3d 70  67 3c 3c 32 38 3a 58 63  |m:Xc!8=pg<<28:Xc|
0000f8d0  21 31 32 3d 31 35 3c 3c  32 38 3a c8 99 26 34 30  |!12=15<<28:..&40|
0000f8e0  30 43 44 2c 2c 58 63 3a  e1 0d da c0 4d dd f2 57  |0CD,,Xc:....M..W|
0000f8f0  6b 28 58 63 2c 63 69 2c  62 6d 2c 70 67 29 3a 58  |k(Xc,ci,bm,pg):X|
0000f900  63 21 30 3d 63 69 3a 58  63 21 34 3d 62 6d 3a 58  |c!0=ci:Xc!4=bm:X|
0000f910  63 21 38 3d 70 67 3c 3c  32 34 3a 58 63 21 31 32  |c!8=pg<<24:Xc!12|
0000f920  3d 31 35 3c 3c 32 34 3a  c8 99 26 34 30 30 43 44  |=15<<24:..&400CD|
0000f930  2c 2c 58 63 3a e1 0d db  1a 68 dd a4 63 74 69 6f  |,,Xc:....h..ctio|
0000f940  6e 5f 43 6f 6c 6f 75 72  4f 66 49 63 6f 6e 28 58  |n_ColourOfIcon(X|
0000f950  63 2c 63 69 2c 62 6d 29  3a 58 63 21 30 3d 63 69  |c,ci,bm):Xc!0=ci|
0000f960  3a 58 63 21 34 3d 62 6d  3a c8 99 26 34 30 30 43  |:Xc!4=bm:..&400C|
0000f970  45 2c 2c 58 63 3a 70 67  3d 28 28 58 63 21 28 38  |E,,Xc:pg=((Xc!(8|
0000f980  2b 31 36 29 29 20 80 28  31 35 3c 3c 32 38 29 29  |+16)) .(15<<28))|
0000f990  3e 3e 32 38 3a 3d 28 70  67 20 80 31 35 29 0d db  |>>28:=(pg .15)..|
0000f9a0  6a d1 dd a4 63 74 69 6f  6e 5f 53 65 74 49 63 6f  |j...ction_SetIco|
0000f9b0  6e 57 69 64 74 68 28 58  63 2c 63 69 2c 62 6d 2c  |nWidth(Xc,ci,bm,|
0000f9c0  78 78 29 3a 21 58 63 3d  63 69 3a c8 99 26 34 30  |xx):!Xc=ci:..&40|
0000f9d0  30 43 43 2c 2c 58 63 3a  77 75 3d 58 63 21 34 3a  |0CC,,Xc:wu=Xc!4:|
0000f9e0  78 70 3d 77 75 2b 78 78  3a 58 63 21 30 3d 63 69  |xp=wu+xx:Xc!0=ci|
0000f9f0  3a 58 63 21 34 3d 62 6d  3a c8 99 26 34 30 30 43  |:Xc!4=bm:..&400C|
0000fa00  45 2c 2c 58 63 3a 77 79  3d 58 63 21 28 38 2b 30  |E,,Xc:wy=Xc!(8+0|
0000fa10  29 3a 77 7a 3d 58 63 21  28 38 2b 34 29 3a 78 55  |):wz=Xc!(8+4):xU|
0000fa20  3d 58 63 21 28 38 2b 38  29 3a 78 56 3d 58 63 21  |=Xc!(8+8):xV=Xc!|
0000fa30  28 38 2b 31 32 29 3a 58  63 21 28 31 30 30 2b 30  |(8+12):Xc!(100+0|
0000fa40  29 3d 63 69 3a 58 63 21  28 31 30 30 2b 34 29 3d  |)=ci:Xc!(100+4)=|
0000fa50  62 6d 3a c8 99 26 34 30  30 43 34 2c 2c 58 63 2b  |bm:..&400C4,,Xc+|
0000fa60  31 30 30 3a e7 77 79 2b  78 78 3c 78 55 20 8c 0d  |100:.wy+xx<xU ..|
0000fa70  dc 28 1b c8 99 26 34 30  30 44 31 2c 63 69 2c 77  |.(...&400D1,ci,w|
0000fa80  79 2c 77 7a 2c 78 55 2c  78 56 0d dc 32 53 cd 3a  |y,wz,xU,xV..2S.:|
0000fa90  58 63 21 28 38 2b 38 29  3d 77 79 2b 78 78 3a 58  |Xc!(8+8)=wy+xx:X|
0000faa0  63 21 34 3d 63 69 3a c8  99 26 34 30 30 43 32 2c  |c!4=ci:..&400C2,|
0000fab0  2c 58 63 2b 34 20 b8 78  66 3a c8 99 26 34 30 30  |,Xc+4 .xf:..&400|
0000fac0  44 31 2c 63 69 2c 78 55  2d 34 2c 77 7a 2c 58 63  |D1,ci,xU-4,wz,Xc|
0000fad0  21 28 38 2b 38 29 2c 78  56 3a 3d 78 66 0d dc aa  |!(8+8),xV:=xf...|
0000fae0  b5 dd a4 63 74 69 6f 6e  5f 49 64 65 6e 74 69 66  |...ction_Identif|
0000faf0  79 4f 53 28 58 63 29 3a  ff 22 53 65 74 20 56 65  |yOS(Xc):."Set Ve|
0000fb00  72 73 69 6f 6e 20 4e 45  57 22 3a ff 22 52 6d 45  |rsion NEW":."RmE|
0000fb10  6e 73 75 72 65 20 55 74  69 6c 69 74 79 4d 6f 64  |nsure UtilityMod|
0000fb20  75 6c 65 20 33 2e 35 30  20 53 65 74 20 56 65 72  |ule 3.50 Set Ver|
0000fb30  73 69 6f 6e 20 4f 4c 44  22 3a c8 99 26 32 33 2c  |sion OLD":..&23,|
0000fb40  22 56 65 72 73 69 6f 6e  22 2c 58 63 2c 31 36 2c  |"Version",Xc,16,|
0000fb50  30 2c 30 20 b8 63 5a 2c  63 62 2c 63 63 2c 63 64  |0,0 .cZ,cb,cc,cd|
0000fb60  2c 63 65 3a ff 22 55 6e  73 65 74 20 56 65 72 73  |,ce:."Unset Vers|
0000fb70  69 6f 6e 22 3a 3d c0 a4  63 74 69 6f 6e 5f 45 78  |ion":=..ction_Ex|
0000fb80  74 72 61 63 74 53 74 72  69 6e 67 28 58 63 29 2c  |tractString(Xc),|
0000fb90  33 29 0d dc fa 54 dd f2  6e 7a 28 58 63 2c 63 69  |3)...T..nz(Xc,ci|
0000fba0  2c 78 79 2c 78 7a 29 3a  21 58 63 3d 63 69 3a c8  |,xy,xz):!Xc=ci:.|
0000fbb0  99 26 34 30 30 43 43 2c  2c 58 63 3a 58 63 21 31  |.&400CC,,Xc:Xc!1|
0000fbc0  32 3d 58 63 21 34 2b 78  79 3a 58 63 21 31 36 3d  |2=Xc!4+xy:Xc!16=|
0000fbd0  58 63 21 38 2b 78 7a 3a  c8 99 26 34 30 30 43 35  |Xc!8+xz:..&400C5|
0000fbe0  2c 2c 58 63 3a e1 0d ff                           |,,Xc:...|
0000fbe8