y�>adfs::4.$.coding.appdevel.grapher.!grapher�2.!RunImage squished by MH's BASIC cruncher v1.20 14/5/89 On 14 Sep 1993
1aa%=0:p$="Grapher�2":ș"Hourglass_On":�Y:��Z
<(�_:�`:ș"Hourglass_Smash":�z:�A:�t:�
���A:�k�
�Q�c("Data changed but not saved,  these changes will be lost - continue ?")��
��:�
��
��z
���z:�_%:�:_%=�h(ba%):Ȏ_%�
�
�0:�aa

�1:�J(�)


�2:�ba

"
�3:�ca

,�4:�K(0)

6�5:�K(1)

@
�6:�da

J
�7:�ea

T
�8:�fa

^
�9:�ga

h�17:�ha

r�18:�ia

|�19:�ja

��

���:�

���K(aa):�`%:`%=!e%:�aa=0�

��

��

��

���ca:�`%:`%=!e%:Ȏ`%�
�m%:m%=0:�W%=v��e(J%)
:�M%:M%=0
X�
X�e(`%):�
lp��aa:�ca%:!e%=J%:ș"Wimp_GetWindowState",,e%:ș"Wimp_GetPointerInfo",,j%:ca%=ba*((j%!0)-((e%!4)+da%)):Ȏea%�
��0:fa%=ca%
��1:ga%=ca%
��2:ha%=ca%
��
�5ș"Wimp_ForceRedraw",J%,da%,ia%,ja%+ka%,la%+ma%:�
�3��J(na%):�oa%,w%:w%=0:�(W%=v)�(J%=!e%)�na%�w%=1
Wș"Wimp_RedrawWindow",,e%�oa%:ȕoa%:ș"Wimp_BorderWindow",,e%:�w%=1��ka(e%!4,e%!16)
>%ș"Wimp_GetRectangle",,e%�oa%:�:�
\"��ba:ș"Wimp_OpenWindow",,e%:�
zm��fa:�F%,R%,pa%:ș"Wimp_GetCaretPosition",,j%:qa%=e%!24:R%=-1:F%=-1:pa%=!j%:ra%=j%!4:�(qa%=13)�(ra%<>-1)�
�
Ȏpa%�
��m%:Ȏra%�
��3:F%=20
��7:F%=4
� �12:F%=20:�k%>=9�k%<12�R%=11
�
�11:R%=12
�8,9,14,15:R%=�i(pa%,ra%)
�10:�k%>9�k%<12�R%=11�R%=12
�16,19:R%=3
$�
$�M%:R%=�i(M%,ra%):Ȏra%�
B
�27:F%=28
V�43:�k%<>12�R%=57�R%=3
V�57:R%=2
j
�20:R%=30
t�31:�k%<>12�R%=21�R%=27
t�
~	ȎR%�
��3,6,9,12,15,18:F%=R%
�:ș"Wimp_CreateMenu",,-1
��
�:ș"Wimp_ProcessKey",qa%
��
��:ș"Wimp_ProcessKey",qa%
��
��F%<>-1�
�
Ȏpa%�
�
�m%:�B

$�M%:e%!12=pa%:e%!16=F%:e%!8=1:�L
�
�
3�R%<>-1�ș"Wimp_SetCaretPosition",pa%,R%,,,-1,0
(�
2N��da:�T%,F%,sa%,ta%,ua%:T%=e%!12:F%=e%!16:sa%=e%!0:ta%=e%!4:ua%=e%!8:ȎT%�
d�-2:�la
x�J%:�ma
�
�M%:�L
�
�m%:�B
��
��
�H��M:$va%="           "+�0:�n(-1,wa%,0,0):$va%=l$+�0:�n(-1,wa%,0,0):�
�.��B:�s%,i%,B,r%,g%,b%,xa%,ya%,za%:�F%<>99�
��k%=12�xa%=u%�xa%=N%
_B=�:r%=�(�a(c,8)):g%=�(�a(c,9)):b%=�(�a(c,10)):�(�a(c,8)="-")�(�a(c,9)="-")�(�a(c,10)="-")�
6
Aa%=-1
J#�:Aa%=(r%<<8)�(g%<<16)�(b%<<24)
^�
^kd%(xa%)=Aa%:r%=�(�a(c,14)):g%=�(�a(c,15)):b%=�(�a(c,16)):�(�a(c,14)="-")�(�a(c,15)="-")�(�a(c,16)="-")�
�	S%=-1
�"�:S%=(r%<<24)�(g%<<16)�(b%<<8)
��
�fa(N%,u%,0)=�(�a(c,12)):a(N%,u%,1)=�(�a(c,11)):c$(N%)=�a(c,7):b$(u%)=�a(c,3):�g(m%,40)�Ba%=1�Ba%=0
��g(m%,41)�Ca%=1�Ca%=0
��g(m%,42)�Da%=��Da%=�
�	�Da%�
�b(m%,43,0):Ea%=�g(m%,43)
&�:�b(m%,43,1)
:�
:q%=�(�a(c,19))
N�
N	ȎF%�
XU�8,9,10:�e(J%):W%=v:�o(W%,J%):fa%=�(�a(c,8)):ga%=�(�a(c,9)):ha%=�(�a(c,10)):Fa%=8
�Z�14,15,16:�e(J%):W%=v:�o(W%,J%):fa%=�(�a(c,14)):ga%=�(�a(c,15)):ha%=�(�a(c,16)):Fa%=14
'�20:u%+=1:B=�:�(k%<9)�(u%>D%)�u%=D%
�a(N%,0,0)<u%�a(N%,0,0)=u%
 �1:�u%>1�u%-=1:B=�
4�4:�N%<9�N%+=1:B=�
H�5:�N%>0�N%-=1:B=�
\�13:�g(m%,13)�Ga%=��Ga%=�
pB=�
��17:ya%=�:�k%=12�
�)�za%=1�a(N%,0,0):�a(N%,za%,0)=0�ya%=�
��
��
�
�ya%�
�Jș"Wimp_BorderIcon",1,e%:ș"Wimp_BorderIcon",,e%:�e(m%):�(W%=v)��e(J%)
�m�:ya%=�c("Cannot have zero size segments - please enter non-zero segment ('height') value & try again"):�
	�
	�39:�k%>=9�
	.!�a(N%,0,0)>0�a(N%,0,0)-=1:B=�
	8�u%>a(N%,0,0)�u%=a(N%,0,0)
	B�u%=0�u%=1
	L�
	V�99:B=�
	j�
	j�k%=12�xa%=u%�xa%=N%
	t�B�
	~�Ga%�s%=0�s%=1
	���i%=14�16:�b(m%,i%,s%):�:�d(c,19,�q%):�d(c,2,�u%):�d(c,3,b$(u%)):�d(c,6,�N%):�d(c,7,c$(N%)):�d(c,8,�j(d%(xa%))):�d(c,9,�k(d%(xa%))):�d(c,10,�l(d%(xa%))):�d(c,11,�a(N%,u%,1)):�d(c,12,�a(N%,u%,0)):�d(c,14,�j(S%))
��d(c,15,�k(S%)):�d(c,16,�l(S%)):�d(c,38,�(a(N%,0,0))):fa%=�(�a(c,8)):ga%=�(�a(c,9)):ha%=�(�a(c,10)):�(J%<>0)�(W%=v)�ș"Wimp_ForceRedraw",J%,da%,ia%,ja%+ka%,la%+ma%
Z1�N(m%,"2,3,6,7,8,9,10,11,12,14,15,16,19,38,")
n�
nk=�:�m%<>0��O
��
����ka(Ha%,Ia%):fa%=fa%�255:ga%=ga%�255:ha%=ha%�255:ș"Wimp_SetColour",11:ȓȐHa%+da%,Ia%+la%,fa%*ca,ma%:ș"Wimp_SetColour",10:ȓȐHa%+da%,Ia%+Ja%,ga%*ca,ma%:ș"Wimp_SetColour",8:ȓȐHa%+da%,Ia%+ia%,ha%*ca,ma%
�Xș"ColourTrans_SetGCOL",fa%<<8�ga%<<16�ha%<<24,,,256,0:ȓȐHa%+ka%,Ia%+ia%,ja%,Ka%:�
���na:�h%:�o(v,h%):!j%=h%:j%!4=0:ș"Wimp_GetIconState",,j%:da%=j%!8:ma%=(-((j%!12)-(j%!20)))-4:La%=j%!16:la%=j%!12:j%!4=1:ș"Wimp_GetIconState",,j%:Ja%=j%!12:j%!4=2:ș"Wimp_GetIconState",,j%:ia%=j%!12:j%!4=3:ș"Wimp_GetIconState",,j%
�bka%=j%!8:ja%=(j%!16)-ka%:Ka%=(-((j%!12)-(j%!20)))-4:�e(h%):ba=255/(La%-da%):ca=(La%-da%)/255:�
?��N(w%,i$):�p%,n%,da:p%=1:da=�:ȕ�da:n%=�i$,",",p%):�n%<>0�
D'�n(w%,�(�i$,p%,n%-p%)),0,0):p%=n%+1
b
�:da=�
v�
v�:�
�)ݤk(c%):�c%<>-1�=�((c%>>16)�255)�="-"
�(ݤj(c%):�c%<>-1�=�((c%>>8)�255)�="-"
�)ݤl(c%):�c%<>-1�=�((c%>>24)�255)�="-"
���L:�i%:ȎF%�
�\�3,6,9,12,15,18:ș"OS_GSTrans","<Font$Path>",j%,254�,,l%:j%?l%=32:j%?(l%+1)=13:�e$<>$j%�


e$=$j%:�P

*�

*#�C(ea,sa%-64,ta%+32):Ma%=F%:k=�

R]�28:a$(0)=�a(e,43):a$(1)=�a(e,57):a$(2)=�a(e,2):Na%=�(�a(e,27)):D%=�(�a(e,26)):�D%<1�D%=1

��(k%>=9)�(D%<2)�D%=2

�<n=�(�a(e,25)):C=�(�a(e,24)):Oa%=�(�a(e,23)):�Oa%<2�Oa%=2

��i=�(�a(e,22)):m=�(�a(e,21)):w=�(�a(e,30)):h=�(�a(e,31)):�i%=3�20�3:d$((i%/3)-1)=�a(e,i%):c%(((i%/3)-1)*2)=�(�a(e,i%+1)):c%((((i%/3)-1)*2)+1)=�(�a(e,i%+2)):�:k=�:ș"Wimp_BorderIcon",1,e%
8 �29:ș"Wimp_BorderIcon",1,e%
L�
L4�(F%=28)�(F%=29)�ș"Wimp_BorderIcon",0,e%:�e(M%)
V�O:�
jZ��O:ș"Wimp_GetCaretPosition",,j%:�j%!4>-1�ș"Wimp_SetCaretPosition",!j%,j%!4,0,0,-1,0
��
���ma:�Pa%,c$,Qa%,Ra%:ȎW%�
��s:ȎF%�
��2:c$=�a(s,0):�c$,1)=" "�
�yPa%=�m:ș"Wimp_BorderIcon",1,e%:ș"Wimp_BorderIcon",,e%:�D(c$):�Pa%<>1�ș"Wimp_CreateMenu",,-1�ș"Wimp_CreateMenu",,N
5�:�2002,"Drag the icon to a filer window to save"
2�
2�1:�ua%=64�
F�!e%=J%:ș"Wimp_GetWindowState",,e%:Qa%=e%!4:Ra%=e%!16:Pa%=�n(J%,1):fa=s:!t%=0:t%!12=(Pa%!12)+Ra%:t%!8=(Pa%!8)+Qa%:t%!20=(Pa%!20)+Ra%:t%!16=(Pa%!16)+Qa%:t%!4=5:t%!24=0:t%!28=0:t%!32=10000:t%!36=10000:ș"Wimp_DragBox",,t%
��
��
�
�v:�F%<3�
vba%=ba%�(�1):!e%=J%:ș"Wimp_GetWindowState",,e%:Ha%=e%!4:Ia%=e%!16:!j%=J%:j%!4=7:j%!24=Ha%+da%:j%!32=Ha%+La%:ȎF%�
r�0:j%!28=Ia%+la%
��1:j%!28=Ia%+Ja%
��2:j%!28=Ia%+ia%
��
��j%!36=(j%!28)+ma%:ș"Wimp_GetPointerInfo",,e%:j%!8=e%!0:j%!16=e%!0:j%!12=e%!4:j%!20=e%!4:ș"Wimp_DragBox",,j%:fa=v:ș"Wimp_ForceRedraw",J%,da%,ia%,ja%+ka%,la%+ma%:ea%=F%
&�:�F%=4�
0�ș"Wimp_BorderIcon",1,e%:e%!8=0:ș"Wimp_BorderIcon",,e%:�d(c,Fa%,�fa%):�d(c,Fa%+1,�ga%):�d(c,Fa%+2,�ha%):�N(m%,"8,9,10,14,15,16,")
v�
v�
��
��
���la:�F%<>wa%�
�
Ȏua%�
�!�Sa%:�C(N,sa%-60,96+(Ta%*44))
��
��
�,��ga:�q$,Ua%:Ua%=�m:q$=�o(Va%,e%):ȎVa%�
�N:�oa(q$)
 �ea:�pa
*�
*�Ua%=Wa%��C(Va%,0,0)
4�
>B��pa:ș"Wimp_DecodeMenu",,ea,e%,j%:�d(e,Ma%,$j%):�qa(M%,Ma%):�
p��oa(r$):�Xa%:Xa%=k%:Ȏr$�
��"Quit":�A:�t
��"Edit Data":�M%<>0��e(M%)
��u%>D%�u%=D%
��o(c,m%):�k%<9�
�2�b(m%,11,1):�b(m%,51,1):�b(m%,38,1):�b(m%,3,0)
4�:�b(m%,3,1):�b(m%,11,0):�b(m%,51,0):�b(m%,47,0)
L�
L�k%>=12�
V��b(m%,3,0):�b(m%,19,1):�b(m%,6,1):�b(m%,7,1):�b(m%,5,1):�b(m%,4,1):�b(m%,13,1):�b(m%,11,1):�b(m%,40,0):�b(m%,41,0):�Ba%��p(m%,40,1)
��Ca%��p(m%,41,1)
�N%=0
�a�:�b(m%,19,0):�b(m%,13,0):�b(m%,6,0):�b(m%,7,0):�b(m%,5,0):�b(m%,4,0):�b(m%,40,1):�b(m%,41,1)
<�
<�b(m%,43,1):�k%=9�
P�b(m%,42,0):�Da%�
d �p(m%,42,1):�Ea%��p(m%,43,1)
x�b(m%,43,0)
��
��:�b(m%,42,1)
��
�	�Ga%�
��p(m%,13,1)
�5�:�p(m%,13,0):�b(m%,14,1):�b(m%,15,1):�b(m%,16,1)
��
�F%=99:�B
��"Edit Axis":�e(m%):�e(J%):�d(e,43,a$(0)):�d(e,57,a$(1)):�d(e,2,a$(2)):�d(e,23,�Oa%):�d(e,22,�i):�d(e,21,�m):�d(e,24,�C):�d(e,25,�n):�d(e,26,�D%):�d(e,27,�Na%):�d(e,30,�w):�d(e,31,�h):�i%=3�20�3
�h�d(e,i%,d$((i%/3)-1)):�d(e,i%+1,�c%(((i%/3)-1)*2)):�d(e,i%+2,�c%((((i%/3)-1)*2)+1)):�:�o(e,M%):Ȏk%�
�.�0,1,2,3,4,5,6,7,8:�b(M%,24,1):�b(M%,25,1)
$�9,10,11:�b(M%,24,0):�b(M%,24,0)
&�
&�k%>=12�
0I�b(M%,57,1):�b(M%,2,1):�i%=6�11:�b(M%,i%,1):�:�i%=15�26:�b(M%,i%,1):�
b�
b�"3-D":k%=2
v�"SideBySide":k%=1
��"Overlay":k%=0
��"Compound":k%=3
��"3D Compound":k%=4
��"Compound %":k%=5
��"3D Comp %":k%=6
��"Line":k%=7
��"Line+Points":k%=8
��"Line Only":k%=11
��"Line+points":k%=10
��"Scatter":k%=9
��"Pie":�k%<12�
�H�k�k=��c("Changing to this graph type will loose all data - sure ?")
��k�
*�s%=1�99:b$(s%)="Segment "+�s%:�:k%=12
 �
 �
*t�"Reset":�k�k=��c("Current data changed but not saved - resetting will permanently erase these changes,  sure?")
>�k��E:�e(M%):�e(m%)
H�
R
�k%<>Xa%�
\%l$=r$:�M:�e(M%):�e(m%):�Xa%>11��E
��
��
�)ݤs(h$):=((h$=",")�(h$=".")�(h$=" "))
����P:�O%,l%,n$,Ya%,Za%,c$,Q%,_a%,`a%,X%,ab%,ga,bb%,cb%,db%,eb%:Q%=0:X=�:n$=e$:c$="":ga=�:fb%=gb%:O%=gb%+512:hb%=ib%-512:fb%?Q%=0:X%=0:ab%=0:bb%=1:db%=�:eb%=�:�:�s(�e$,1,1))�
Ve$=�e$,�(e$)-1)
j�:eb%=�
~�
~�eb%:�e$,",")<>0�
�=bb%=0:�:cb%=�e$,",",bb%):n$=�e$,bb%,cb%-bb%):�n$<>" ."��Q
�7bb%=cb%+1:��e$,",",bb%)=0:n$=�e$,bb%,�(e$)-(bb%-1))
��:n$=e$
�
`�Q:Q%=gb%+512:O%=ha:�(X%*24)>jb%��100,"Font menu area full - not all fonts have been listed"
2�hb%=jb%:!ia=(ab%+1)*16:ȕX%>0:!O%=0:O%!4=-1:O%!8=&7009001�257:O%!12=Q%+1:O%!16=0:O%!20=?Q%:Q%+=1+(?Q%):O%+=24:X%-=1:�:O%-=24:!O%=128:�
�g��Q:�h$,ja:Q%=0:X=�:ga=�:fb%!Q%=0:ja=�:�:h$=�n$,1):�(h$=".")�(h$=" ")�(h$=",")�n$=�n$,�(n$)-1)�ja=�
W�ja:ȕQ%>-1:$j%=n$+�0:ș"OS_GBPB",10,j%,e%,1,fb%?Q%,255�,,,_a%,l%:fb%?Q%=l%:�l%=-1�
@�(�X)�(Q%=1)�
J6hb%-=�(c$)+1:�hb%<0��10101,"Font name buffer full"
^H?O%=�(c$)+1:O%+=1:$O%=c$+�0:O%+=?(O%-1):X%+=1:�ab%<�(c$)�ab%=�(c$)+1
��
�Q%-=1:�Q%=0�X=�
��Q%>-1��R(n$):�R(c$)
�2�:f$=�f(e%+20):`a%=((!e%)>>8)�4095:�(e%!16)=2�
�&n$+="."+f$:�c$=""�c$=f$�c$+="."+f$
�Q%+=1:fb%?Q%=0:�Q%>1�
:X=�:hb%-=�(c$)+1:�hb%<0��10101,"Font name buffer full"
0H?O%=�(c$)+1:O%+=1:$O%=c$+�0:O%+=?(O%-1):X%+=1:�ab%<�(c$)�ab%=�(c$)+1
b�
l�
v�
��:�
�$��R(�s$):�p%:p%=�(s$):�(s$="")��
��s$,".")=0�
�	s$=""
�)�:�:p%-=1:��s$,p%,1)=".":s$=�s$,p%-1)
�
�
��ea:�kb%,b$:Ȏfa�
*��s:ș"Wimp_GetPointerInfo",,j%:t%!20=j%!12:t%!24=j%!16:t%!12=0:t%!16=1:t%!28=!j%:t%!32=j%!4:t%!36=lb%:�(mb%=0)�t%!40=2815�t%!40=512
�Ub$=�a(s,0):c$=�p(b$)+�0:$(t%+44)=c$:!t%=44+�(c$):�((!t%)�3)<>0�!t%=((!t%)�(�3))+4
�Enb%=�:ob%=�:pb%=�:ș"Wimp_SendMessage",18,t%,t%!20,t%!24:qb%=t%!8
��v:ba%=ba%�1
�#:�2001,"Unexpected drag event"
�
�
��ha:�rb%:rb%=e%!16:Ȏrb%�
8	�0:�t
V�262336:ȎVa%�
`�N:Ȏ�o(N,e%+32)�
t�"Info":�F(ka)
�6�"Graph":�S(s,1,"file_AFF"):�d(s,0,t$):�F(s):mb%=0
�9�"DataFile":�S(s,1,"file_200"):�d(s,0,j$):�F(s):mb%=1
��
��
�2:ob%=�:�e%!36=-1�
la=�:pb%=�
2�:la=�:pb%=�
F�
F%c$=�f(e%+44):�D(c$):�la�u$=" "+c$
dB!t%=44+�(c$)+1:$(t%+44)=c$+�0:�((!t%)�3)<>0�!t%=((!t%)�(�3))+4
�=t%!12=t%!8:t%!16=3:ș"Wimp_SendMessage",18,t%,t%!20,t%!24
��
��
���ia:�rb%:rb%=e%!16:Ȏrb%�
�
�8:�k�
�e%!12=e%!8:sb%=e%!4:ș"Wimp_SendMessage",19,e%,0:k=��c("The current graph has been edited but not saved - quitting will lose these changes permanently,  continue ?"):�k�
"Iș"Wimp_GetCaretPosition",,j%:j%!24=508:ș"Wimp_SendMessage",8,j%,sb%
J�
J�:�A:�t
r�
r�3,5:�e%!40=512�
��e%!12=e%!8:e%!16=4:ș"Wimp_SendMessage",19,e%,e%!20:�k�k=��c("The current file has been modified but not saved - continue (lose changes permanently) ?")
��k�
�u$=" "+�f(e%+44):�T(u$)
��
��
� �6:�(mb%=0)�ob%�(qb%=e%!12)�
 �nb%��D(c$):nb%=�
 te%!12=e%!8:tb%=e%!24:ub%=e%!20:e%!16=7:vb%=wb%+xb%-yb%:zb%=�:�(tb%>=vb%)�tb%=vb%:zb%=���yb%>=wb%+xb%�zb%=�:tb%=0
 X]ș"Wimp_TransferBlock",Ab%,yb%,e%!4,e%!20,tb%:e%!24=tb%:yb%+=tb%:�zb%�Bb%=17:ob%=��Bb%=18
 �4!e%=28:ș"Wimp_SendMessage",Bb%,e%,e%!4:qb%=e%!8
 ��
 ��
 ��
 ���ja:Ȏe%!16�
 �>�7:�e%!4=Ab%��2002,"Data transfer failed : reciever died?"
 ��
 ��
!,��D(b$):�H%,a%,b%:�b$,1)<>" "�b$=" "+b$
! �mb%=0�
!*�ra(b$):�pb%�t$=b$
!>F�(�ob%)��("SAVE "+b$+" "+�~wb%+" +"+�~xb%):�("SETTYPE "+b$+" AFF")
!H��:k=�:H%=�(b$):�#H%,ma,i,m,Oa%,n,C,D%,k%,l$,q%,S%,Ga%:�#H%,a$(0),a$(1),a$(2),Ba%,Ca%:�a%=0�9:�#H%,c$(a%):�b%=0�99:�#H%,a(a%,b%,0):�#H%,a(a%,b%,1):�:�:�a%=0�99:�#H%,d%(a%),b$(a%):�:�a%=0�5:�#H%,d$(a%),c%(a%),c%(a%+6):�
!��k%=9��#H%,Da%,Ea%
!�&�#H%:�("SETTYPE "+b$+" 200"):j$=b$
"�
"�
"l��T(b$):�ya%:�k�k=�c("The current graph has not been saved - continuing will permanentl lose in.  Ok ?")
".�k�
"8&j$=" "+b$:H%=�(b$):�#H%,na:�na<ma�
"`�ya%=�c("Warning : The data in this file is from an older version of !Grapher II and may not be read correctly - will try anyway"):�ya%��#H%:�
"t�
"~��#H%,i,m,Oa%,n,C,D%,k%,l$,q%,S%,Ga%:�#H%,a$(0),a$(1),a$(2),Ba%,Ca%:�a%=0�9:�#H%,c$(a%):�b%=0�99:�#H%,a(a%,b%,0):�#H%,a(a%,b%,1):�:�:�a%=0�99:�#H%,d%(a%),b$(a%):�:�a%=0�5:�#H%,d$(a%),c%(a%),c%(a%+6):�
"��k%=9��#H%,Da%,Ea%
"��#H%:�m%>0��e(m%)
#
�M%>0��e(M%)
#�
#�M:�
#2)��ra(b$):ș"Hourglass_On":�Ga%�S%=-1
#PZ�k%<12�xb%=�t(w,h,i,m,Oa%,k%,D%,q%+1,d%(),a(),b$(),0,c$(),b$,wb%,lb%,d$(),c%(),S%,Na%)
#ZJ�k%>11�xb%=�u(a(),d%(),d$(),c%(),b$(),a(0,0,0),w,h,Ba%,Ca%,wb%,lb%,b$)
#d!ș"Hourglass_Smash":yb%=wb%:�
#���sa:Ȏ!e%�
#�5�3:�2003,"Data transfer failed : reciever died ?"
#��
#��
#Ȇ��E:N%=0:u%=1:q%=0:w=23:h=18:a()=0:a$()="None":�a%=0�99:b$(a%)="Column "+�a%:�:�a%=0�9:c$(a%)="Dataset "+�a%:�:Ga%=�:Da%=�:Ea%=�:�
$���`:�Cb%,Db%,Eb%,Fb%,Gb%,a%,l%:�Hb% 22*1024:�d$(6),c%(12),d%(99),a(9,99,1),b$(99),c$(9),a$(2),f$(99):�wb% 80*1024,gb% 8*1024:i=0:m=100:n=0:C=100:k%=0:Oa%=11:D%=5:Na%=2:ma=234:d%()=-256:S%=0:l$="Overlay":d$()="Trinity.Medium":c%()=14
$h�d$(0)="Trinity.Bold":c%(0)=36:c%(1)=36:�E:Ba%=0:Ca%=0:Cb%=2^7:Eb%=2:Db%=1:Fb%=4:Gb%=8:Ib%=1024:Jb%=48*Ib%:Kb%=0:Va%=�:fa=0:Lb%=4:Wa%=1:Sa%=2:ba%=6193:Ta%=7:�ta:jb%=7*Ib%:lb%=80*Ib%:ob%=�:ib%=8*1024:�ua(Hb%,22*1024):�va
$��J%=0:k=�:W%=0:M%=0:m%=0:j$="GraphDef":t$="Graph":�wa:�na:ș"OS_GSTrans","<Font$Path>",j%,254�,,l%:j%?l%=32:j%?(l%+1)=13:e$=($j%):�(e$)<4��99,"Font$Path Not Defined - Open Directory Display Containing !Fonts"
%N�P:�
%b���ta:!e%=-1:e%!4=0:e%!8=-6:e%!12=11*16:e%!16=98:e%!20=385888523:e%!24=Mb%:$Mb%=l$+�0:$(Mb%+15)="S!Grapher�2"+�0:e%!28=Mb%+15:e%!32=14:va%=Mb%:ș"Wimp_CreateIcon",,e%�wa%:�
%�H��wa:�Nb%,g$:ș"OS_GetEnv"�Nb%:g$=�f(Nb%):Nb%=�g$,"-load "):�Nb%<>0�
& 4j$=�g$,�(g$)-(Nb%+4)):�T(j$):ș"Hourglass_Smash"
&H�
&H�
&R���va:�Ob%:Ob%=oa:�xa("<Obey$Dir>.Templates"):�q(s,Ob%,K,-1,"save"):�q(ka,Ob%,K,-1,"info"):�q(pa,Ob%,K,-1,"query"):�q(c,Ob%,K,-1,"dedita"):�q(e,Ob%,K,-1,"axisdets"):�q(v,Ob%,K,-1,"coloursel"):�ya:�
&����ua(Pb%,Qb%):Rb%=8:zb%=10:�Sb%=Rb%�zb%�zb%-Rb%:P%=Pb%:L%=Pb%+Qb%:[OPT Sb%:.qa str2,[0],#4:subs1,1,#4:bgt qa:mov15,14:.N EQUS"Grapher II"+�0+" ":EQUB7:EQUB2:EQUB7:EQUB0:.ra EQUD11*16:EQUD44:EQUD0
'��.sa EQUD Gb%:EQUD1:EQUD&7009001:EQUS"Info"+�0+"       ":EQUD0:EQUD ta:EQUD&7009001:EQUS"Graph Type"+�0+" ":EQUD0:EQUD-1:EQUD&7009001:EQUS"Edit Axis"+�0+"  ":EQUD0:EQUD-1:EQUD&7009001:EQUS"Edit Data"+�0+"  ":EQUD0:EQUD-1:EQUD&7009001
(x�EQUS"Reset"+�0+"      ":EQUD0:EQUD ua:EQUD&7009001:EQUS"Save"+�0+"       ":EQUD Cb%:EQUD-1:EQUD&7009001:EQUS"Quit"+�0+"       ":ALIGN:.ta EQUS"Graph Type"+�0+" ":EQUB7:EQUB2:EQUB7:EQUB0:EQUD8*16:EQUD44:EQUD0
)@�EQUD0:EQUD va:EQUD&7009001:EQUS"Bar"+�0+"        ":EQUD0:EQUD wa:EQUD&7009001:EQUS"Line"+�0+"       ":EQUD0:EQUD-1:EQUD&7009001:EQUS"Scatter"+�0+"    ":EQUD Cb%:EQUD-1:EQUD&7009001:EQUS"Pie"+�0+"        ":ALIGN
)��.va EQUS"Bargraph"+�0+"   ":EQUB7:EQUB2:EQUB7:EQUB0:EQUD12*16:EQUD44:EQUD0:EQUD0:EQUD-1:EQUD&7009001:EQUS"3-D"+�0+"        ":EQUD0:EQUD-1:EQUD&7009001:EQUS"SideBySide"+�0+" ":EQUD0:EQUD-1:EQUD&7009001:EQUS"Overlay"+�0+"    ":EQUD0:EQUD-1
*��EQUD&7009001:EQUS"Compound"+�0+"   ":EQUD0:EQUD-1:EQUD&7009001:EQUS"3D Compound"+�0:EQUD0:EQUD-1:EQUD&7009001:EQUS"Compound %"+�0+" ":EQUD0:EQUD-1:EQUD&7009001:EQUS"3D Comp %"+�0+"  ":EQUD0:EQUD-1:EQUD&7009001:EQUS"Line"+�0+"       "
+��EQUD Cb%:EQUD-1:EQUD&7009001:EQUS"Line+Points"+�0:ALIGN:.wa EQUS"Linegraph"+�0+"  ":EQUB7:EQUB2:EQUB7:EQUB0:EQUD12*16:EQUD44:EQUD0:EQUD0:EQUD-1:EQUD&7009001:EQUS"Line Only"+�0+"  ":EQUD Cb%:EQUD-1:EQUD&7009001:EQUS"Line+points"+�0
,��.ua EQUS"Save"+�0+"       ":EQUB7:EQUB2:EQUB7:EQUB0:EQUD9*16:EQUD44:EQUD0:EQUD Gb%:EQUD1:EQUD&7009001:EQUS"Graph"+�0+"      ":EQUD Cb% � Gb%:EQUD1:EQUD&7009001:EQUS"DataFile"+�0+"   ":ALIGN:.ea EQUS"Font"+�0+"       ":EQUB7:EQUB2:EQUB7
-��EQUB0:.ia EQUD27*16:EQUD44:EQUD0:.ha�d(jb%/4,0):ALIGN:EQUD0:.s�d(200/4,0):EQUD0:.ka�d(0.5*Ib%/4,0):EQUD0:.pa�d(Ib%/4,0):EQUD0:.c�d(2*Ib%/4,0):EQUD0:.e�d(3*Ib%/4,0):EQUD0:.v�d(0.5*Ib%/4,0):EQUD0:.oa�d(5*Ib%/4,0):.K: ]:�
.�0�(P%-Pb%)>Qb%��99,"Assembler limit exceeded"
.��
.�ݤh(Tb%):�_%:�Kb%=0�
.�ș"Wimp_Poll",ba%,e%�_%
.�(�:ș"Wimp_PollIdle",ba%,Ub%,Kb%+��_%
.��
.�=_%
/>��xa(v$):�f%:�f% 100:$f%=v$+�0:ș"Wimp_OpenTemplate",,f%:�
/:7��q(Vb%,�Wb%,Xb%,Yb%,b$):�n%:�n% 12:�(b$)<12b$+=�0
/bR$n%=�b$,12)+�12-�(b$)," "):ș"Wimp_LoadTemplate",,Vb%,Wb%,Xb%,Yb%,n%,0�,,Wb%:�
/�!��ya:ș"Wimp_CloseTemplate":�
/�;��C(Zb%,x%,y%):ș"Wimp_CreateMenu",,Zb%,x%,y%:Va%=Zb%:�
/���F(_b%):�J%<>0��e(J%)
/�>J%=�q(_b%):ș"Wimp_CreateSubMenu",,J%,e%!24,e%!28:W%=_b%:�
0{ݤi(`b%,K%):�ac%,bc%:ș"Wimp_WhichIcon",`b%,j%,&C0E000,57344:ac%=0:ȕ((j%!ac%)<>-1)�((j%!ac%)<>K%):ac%+=4:�:�j%!ac%=K%�
0>"bc%=j%!(ac%+4):�bc%<>-1�K%=bc%
0R�
0\=K%
0pLݤq(cc%):�Ab%:ș"Wimp_CreateWindow",,cc%�Ab%:!(cc%-4)=Ab%:cc%!24=-1:=Ab%
0�(��za(Ub%):ș"Wimp_OpenWindow",,Ub%:�
0�!��o(cc%,�dc%):�dc%<>0��e(dc%)
0�dc%=�q(cc%):�za(cc%-4):�
0���e(�`%):�ec%:�ec% 4:�`%>0�
1!ec%=`%:�`%=J%:J%=0:W%=0
1$%�ec%<>0ș"Wimp_DeleteWindow",,ec%
1.`%=0
1B�
1B�
1L9ݤo(fc%,gc%):ș"Wimp_DecodeMenu",,fc%,gc%,j%:=�p($j%)
1tAݤp(g$):�p%,o%,o$:p%=0:�:o%=p%+1:p%=�g$,".",o%):�p%=0:�o%<>0�
1�o$=�g$,�(g$)-o%+1)
1��:o$=""
1��
1�=o$
21��Z:�hc%,ic%,O,m$:hc%=jc%:O=�:xa=�:ic%=0:Ȏ��
2�67797,67796:xa=�
22�2002,67782
2<�99:O=�
2F
:hc%=kc%
2P�
2P	�xa�
2ZJ!lc%=�:m$="Internal error - "+�$+" - Code "+Þ+" - ":�(�O)�(jc%<>hc%)�
2x1m$+="click CANCEL to quit or OK to continue."
2�+�:�O�m$+="(FATAL) "+p$+" closing down."
2��
2�J$(lc%+4)=m$+�0:ș"Wimp_ReportError",lc%,hc%,lc%+280�,ic%:�(ic%=2)�O��t
2��
2��z:�
2�/��Y:�lc% 300:kc%=3:jc%=5:$(lc%+280)=p$+�0:�
3X��_:�e% 256,j% 256,t% 256,Mb% 48:ș"Wimp_Initialise",200,&4B534154,lc%+280�mc%,Ab%:�
3@6��t:ș"Wimp_CloseDown",Ab%,&4B534154:ș"OS_Exit":�
3h0ݤm:�b% 20:ș"Wimp_GetPointerInfo",,b%:=b%!8
3��ݤc(w$):�P,_%,e%,nc%,oc%,pc%,qc%,rc%,sc%,tc%:P=2:e%=j%:�d(pa,3,w$):�o(pa,uc%):!j%=uc%:ș"Wimp_GetWindowOutline",,j%:ȗȓj%!4,j%!8,(j%!12)-(j%!4)-10,(j%!16)-(j%!8)-10:ș"Wimp_SetCaretPosition",uc%,21,-1,-1,-1,0:�
3�_%=�h(923953):�_%=1��J(�)
4
�_%=6�
4�e%!12=uc%�
4
�e%!16=1�
4& ș"Wimp_BorderIcon",1,e%:P=0
4D*�:�e%!16=2P=1:ș"Wimp_BorderIcon",1,e%
4N�
4X�
4b�
4l�P<>2:ș"Wimp_BorderIcon",,e%:�e(uc%):uc%=0:e%!0=4:e%!4=5:e%!8=128:e%!12=129:e%!16=130:e%!20=131:e%!24=-1:tc%=e%+28:ș"OS_ReadVduVariables",e%,tc%:rc%=!tc%:sc%=tc%!4:nc%=(tc%!8)<<rc%:qc%=(tc%!12)<<sc%:oc%=((tc%!16)-(tc%!8))<<rc%
59pc%=((tc%!20)-(tc%!12))<<sc%:ȗȓnc%,qc%,oc%,pc%:=P-1
5>;ݤn(T%,K%):!j%=T%:j%!4=K%:ș"Wimp_GetIconState",,j%:=j%
5p;ݤg(T%,F%):�kb%:kb%=�n(T%,F%):kb%=kb%!24:=((kb%>>21)�1)
5�T��n(T%,K%,vc%,wc%):!j%=T%:j%!4=K%:j%!8=wc%:j%!12=vc%:ș"Wimp_SetIconState",,j%:�
5���qa(w%,i%):�n(w%,i%,0,0):�
5�0��b(T%,K%,xc%):�n(T%,K%,1<<22,xc%*(1<<22)):�
60��p(T%,K%,xc%):�n(T%,K%,1<<21,xc%*(1<<21)):�
68Pݤw(T%,yc%):ș"Wimp_WhichIcon",T%,j%,(31<<16)�(1<<21),(yc%<<16)�(1<<21):=!j%
6`iݤx(T%,K%):�zc%:!j%=T%:j%!4=K%:ș"Wimp_GetIconState",,j%:zc%=j%+28:!j%=!zc%:j%!4=zc%!4:j%!8=zc%!8:=j%
6�:��S(Ac%,K%,g$):�Bc%:Bc%=Ac%+88+(K%*32)+20:$Bc%=g$+�0:�
6�B��d(Ac%,K%,g$):�Bc%:Bc%=Ac%+88+(K%*32)+20:$(!Bc%)=�g$,Bc%!8):�
7I��Aa(w%):!j%=w%:ș"Wimp_GetWindowState",,j%:ș"Wimp_OpenWindow",,j%:�
7PG��Ba(Ac%,K%,Cc%,Dc%):�Ec%:Ec%=Ac%+88+(K%*32)+20+(Cc%<<2):!Ec%=Dc%:�
7�)ݤa(Ac%,K%):=�f(!(Ac%+88+(K%*32)+20))
7�&ݤy(Ac%,K%):=�f(Ac%+88+(K%*32)+20)
7�3ݤf(Zb%):�a$:ȕ?Zb%>31:a$+=�(?Zb%):Zb%+=1:�:=a$
7�.ݤd(Fc%,v%):�X%:A%=P%:P%+=Fc%<<2:�Sb%=zb%�
8"C%=v%:B%=Fc%<<2:�qa
8J�
8J=0
8^<��Ca(Gc%,Hc%,j$,b(),c(),d(),e(),h$(),e%():�Da(Gc%,Hc%):�
8r�ݤt(w,h,i,m,Ic%,k%,D%,q%,b%(),a(),b$(),j,c$(),j$,wb%,Jc%,e$(),a%(),S%,U%):�d,Y,ya,Kc%,o,g,za,c%:�G(wb%,Jc%):�U:j=0:�(k%=5)�(k%=6)�i=0:m=100:Ic%=11
8�
�k%>8�
8�;Aa=n:Ba=(C-n)/D%:�Lc%=1�D%+1:b$(Lc%)=�e(Aa,U%):Aa+=Ba:�
8��
8�e�k:�Ea(o,g,w,h,i,m,Ic%,0,0,b$(),a%(),e$(),k%,D%,q%,a$(),U%,S%):�V(za+1,g+h,q%,c$(),a%(),0):�k%<9�
9&,�Fa(k%,D%,q%,o,g,w,h,d,Y,i,m,b%(),a(),j)
9:+�:�Ga(o,g,w,h,k%,i,m,n,C,b%(),a(),j,q%)
9N�
9N�l:=�r("")
9l^��Ga(o,g,w,h,k%,i,m,n,C,b%(),a(),j,q%):�G%,E%,q,L:�k:L=w/(C-n):q=h/(m-i):�(k%=10)�(k%=11)�
9��E%=0�q%-1:�a(E%,0,0)>0�
9�.�h(-1,b%(E%),j,0,0):�G%=1�a(E%,0,0):�G%=1�
9�1�f(o+(L*(a(E%,G%,1)-n)),g+(q*(a(E%,G%,0)-i)))
9�3�:�a(o+(L*(a(E%,G%,1)-n)),g+(q*(a(E%,G%,0)-i)))
9��
9��:�g
:�
:�
:*�
:*�(k%=10)�(k%=9)�
:4�E%=0�q%-1:�a(E%,0,0)>0�
:H`�G%=1�a(E%,0,0):�j(o+(L*(a(E%,G%,1)-n))-0.15,g+(q*(a(E%,G%,0)-i))-0.15,.3,.3,b%(E%),0,j,0):�
:p�
:p�
:��
:��(k%=9)�Da%�
:��E%=0�q%-1:�a(E%,0,0)>0�
:�aG=0:Z=-&FFFFFFF:M=0:_=&FFFFFFF:�G%=1�a(E%,0,0):Q=a(E%,G%,1):Ca=a(E%,G%,0):G+=Q:M+=Ca:�Q<_�_=Q
;$�Q>Z�Z=Q
;.�:�G<>0�G=G/a(E%,0,0)
;B�M<>0�M=M/a(E%,0,0)
;LeDa=0:Ea=0:�G%=1�a(E%,0,0):Ea+=(a(E%,G%,1)-G)^2:Da+=(a(E%,G%,1)-G)*(a(E%,G%,0)-M):�:�Ea<>0�b=Da/Ea
;�na=M-(b*G):�h(-1,b%(E%),j,0,0):�f(o+(L*(_-n)),g+(q*((a+b*_)-i))):�a(o+(L*(Z-n)),g+(q*((a+b*Z)-i))):�g:�Ea%�
;�}�j(Fa,Ga-(E%*Ha),1,Ha/6*4,b%(E%+Mc%),0,0,0):�i("Y = "+�e(a,U%)+" + "+�e(b,U%)+"X",0,-256,4,a%(6),a%(7),Fa+1.5,Ga-(E%*Ha))
;��
;��
;��
<
�
<
�l:�
<���Fa(k%,D%,q%,o,g,Ia,Ja,d,Y,i,m,b%(),a(),j):�s%,x,u%,q,f,l,y,Ka,La,`:ș"Hourglass_On":Ka=100/((D%-1)*q%):La=0:q=Ja/(m-i):�k:x=o:�k%<7�
<n-x=o+0.5*d:�u%=1�D%:y=g:�k:�(k%=5)�(k%=6)�
<�7`=0:�s%=(q%-1)�0�-1:`+=a(s%,u%,0):�:�`=0�q=0�q=Ja/`
<��
<�V�s%=(q%-1)�0�-1:f=(a(s%,u%,0)-i)*q:l=s%*d:ș"Hourglass_Percentage",La:La+=Ka:Ȏk%�
<�!�0:�j(x+l,g,E,f,b%(s%),0,j,0)
=!�1:�j(x+l,g,d,f,b%(s%),0,j,0)
="��2:�j(x+l,g+l,E,f,b%(s%),0,j,0):�h(b%(s%),0,j,0,0):�f(x+l,g+f+l):�a(x+l+d,g+f+d+l):�a(x+E+l+d,g+f+d+l):�a(x+E+l,g+f+l):�a(x+l,g+f+l):�g:�h(b%(s%),0,j,0,0):�f(x+(5+s%)*d,g+f+l):�a(x+(6+s%)*d,g+f+d+l):�a(x+(6+s%)*d,g+l+d)
=�.�a(x+(5+s%)*d,g+l):�a(x+(5+s%)*d,g+f+l):�g
=�&�3,5:�j(x,y,E,f,b%(s%),0,j,0):y+=f
=���4,6:�j(x,y,E,f,b%(s%),0,j,0):�h(b%(s%),0,j,0,0):�f(x,y+f):�a(x+d,y+f+d):�a(x+E+d,y+f+d):�a(x+E,y+f):�a(x,y+f):�g:�h(b%(s%),0,j,0,0):�f(x+5*d,y+f):�a(x+6*d,y+f+d):�a(x+6*d,y+d):�a(x+5*d,y):�a(x+5*d,y+f):�g:y+=f
>��
>��:x+=(Y*d):�l:�
>�g�:�s%=(q%-1)�0�-1:�h(-1,b%(s%),j,0,0):x=o:�u%=0�D%-1:f=(a(s%,u%+1,0)-i)*q:�u%=0��f(x,g+f)��a(x,f+g)
>�x+=w/(D%-1):�:�g:�:�k%=8�
?*p�s%=(q%-1)�0�-1:x=o:�u%=0�D%-1:f=(a(s%,u%+1,0)-i)*q:�j(x-0.15,g+f-0.15,0.3,0.3,b%(s%),0,j,0):x+=w/(D%-1):�:�
?��
?��
?�ș"Hourglass_Off":�l:�
?�)��U:�W:�X%=0�5:�e$(X%)<>""��r(e$(X%))
?��:�r("END"):�
?�q��Ea(�x,�y,�w,�h,i,m,R,n,C,b$(),a%(),e$(),k%,D%,q%,a$(),U%,S%):�X%,z,r,Ma,Nc%,H,A,Na,Oa,c%,Pa,Oc%,Qa:�k:Ȏk%�
@2�0,1,2,3,4,5,6,7,8,9,10,11:�(k%=4)�(k%=6)�q%=1
@.�Ra=x+((a%(2)*V%*1.5)/Pc%):�i(a$(1),0,-1,2,a%(2),a%(3),(w/2)-0.33*�b(a$(1),a%(4)),y):y+=(1.5*a%(3)*V%)/Pc%:h-=(1.5*a%(3)*V%)/Pc%:Na=1.2*a%(5)*V%/I%:c%=1:�Oa=(y+(0.5*h)+(0.5*�(a$(2))*Na))�(y+(0.5*h)-(0.5*�(a$(2))*Na))�-Na
@jH�i(�a$(2),c%,1),0,-256,3,a%(4),a%(5),x,Oa):c%+=1:�:x=Ra:�m>i�z=m�z=i
@�Yz=0.8*�b(�e(z,U%),a%(10)):Sa=w-z:Oc%=D%:r=x+z:�k%<9�Qc%=0:r+=0.5*z:Oc%-=1:Sa-=z�Qc%=1
@��Ma=Sa/Oc%:�Nc%=1�D%+Qc%:�i(b$(Nc%),0,-1,5,a%(8),a%(9),r+(Qa*Ma)-0.3*�b(b$(Nc%),a%(8)),y):r+=Ma:�:y+=2*�b(" ",a%(9)):h-=2*�b(" ",a%(9)):H=i:A=(m-i)/(R-1):I=y:Ta=h/(R-1):�Rc%=1�R
AS�i(�e(H,U%),0,-1,6,a%(10),a%(11),x,I):I+=Ta:H+=A:�:x+=z:w-=z:�k%<3�Kc%=q%�Kc%=1
APGya=D%*(6+Kc%):d=w/ya:Y=6+Kc%:E=5*d:�s(�,�):�((k%=2)�(k%=4)�(k%=6))�
A��S%<>0�
A�o�h(S%,0,0,0,0):�f(x,y):�a(x,y+h):�a(x+q%*d,y+h+q%*d):�a(x+q%*d+w,y+h+q%*d):�a(x+q%*d+w,y+q%*d):�a(x+w,y):�g
A��
A���h(-1,0,0,0,0.2):A=x:Ra=h/(R-1):�H=y�y+q%*d�d:�f(A,H+h):�a(A,H):�a(A+w,H):A+=d:�:Pa=y+h+q%*d:za=x+q%*d+w:�r=y�y+h�Ra:�f(x,r):�a(x+q%*d,r+q%*d):�a(x+q%*d+w,r+q%*d):�:�g
B�M�:�h(S%,0,0,0,0):�f(x,y):�a(x,y+h):�a(x+w,y+h):�a(x+w,y):�g:za=x+w:Pa=y+h
B��
B�d�h(-1,0,0,0,0):�s(�,�):�f(x+w,y):�a(x,y):�a(x,y+h):�f(x,y):�g:�((k%<>2)�(k%<>4)�(k%<>6))�A=w�A=0
CD5�h(-1,0,0,0,0.2):I=0.5*�b(" ",a%(5)):�k%<9�Oc%+=1
Cbd�r=x�x+w�w/Oc%:�f(r,y-I):�a(r,y):�:r=0.5*�b(" ",a%(4)):�I=y�y+h�h/(R-1):�f(x-r,I):�a(x+A,I):�:�g
C��
C�L�i(a$(0),0,-256,1,a%(0),a%(1),x+(0.5*w)-(0.3*�b(a$(0),a%(0))),Pa+1):�l:�
C��
C��ݤu(a(),b%(),e$(),a%(),g$(),Sc%,w,h,Tc%,Uc%,wb%,Jc%,c$):�S,Ua,Va,d%,T,Wa,Xa,Vc%,Ya,Za,_a,Wc%:_a=0:Wc%=0:�G(wb%,Jc%):j=0:�U:�k
D>W�i(a$(0),0,-1,1,a%(0),a%(1),0.5*(w-0.3*�b(a$(0),a%(0))),h+a%(1)*V%/I%):�w<h�S=w�S=h
DRyUa=S/2:Va=Ua:T=0:�d%=1�Sc%:T+=a(0,d%,0):�:�T=0��2002,"Data sums to zero - cannot generate pie where all data is zero"
D�LWa=360/T:Xa=100/T:�d%=1�Sc%:�Tc%=1�f$(d%)=�e(Xa*a(0,d%,0),0)+"% "+g$(d%)
D�,�Uc%=1�f$(d%)=�e(a(0,d%,0),0)+" "+f$(d%)
D�m�:�V(S+�b("  ",a%(6)),h,Sc%,f$(),a%(),1):p=0:F=S/2:�k:�Vc%=1�Sc%:Ya=�b(b$(Vc%),a%(0)):�p>��Za=0.5*Ya�Za=0
D�{D=�(Wa*a(0,Vc%,0)):ȕD>(�/2):�X(�/2,p,F,Ua,Va,b%(Vc%),�):p+=�/2:D-=�/2:�:�X(D,p,F,Ua,Va,b%(Vc%),�):p+=D:�:�l:�l:=�r("")
E~���X(D,p,F,t,u,Xc%,`a):�U,V,ab,bb,cb,db,eb,fb,gb,hb,ib,W:W=F:U=D/128*41:V=F/�U:ab=W/�U:bb=t+F*�(p+D):cb=u+W*�(p+D):db=p+U:eb=p+D-U:fb=t+V*�db:gb=u+V*�db:hb=t+V*�eb:ib=u+V*�eb:�s(�,�):�h(Xc%,-1,j,0,0):�f(t,u)
F��a(t+F*�p,u+W*�p):�H(bb,cb,fb,gb,hb,ib):�a(t,u):�g:�s(�,�):�h(-1,0,j,0,0):�f(t+F*�p,u+W*�p):�H(bb,cb,fb,gb,hb,ib):�`a��a(t,u)
Fx�g:�s(�,�):�
F�-ݤz(a):�a>(3*�/4)�=3*�/4��a<(�/2)�=�/2�=a
F��
F�'ݤA(a):�(a>(�/2))�(a<(3*�/4))�=��=�
F��
F����V(x,y,q%,c$(),a%(),Za%):�k:jb=a%(6):kb=a%(7):f$=e$(3):J=1.4*(kb*V%/I%):y-=q%*J:�i("KEY",0,-256,4,jb,kb,x,y+q%*J):�d%=0�(q%-1):�j(x,y+d%*J,1,J/6*4,b%(d%+Za%),0,0,0):�i(c$(d%+Za%),0,-256,4,jb,kb,x+1.5,y+d%*J):�:�l
G^Fa=x:Ga=y-J:Ha=J:Mc%=Za%:�
G�$ݤb(k$,lb):=(�(k$)*0.8*lb*V%)/I%
G�0ݤe(mb,U%):�d$,s%:d$=�mb:s%=�d$,"."):�s%<>0�
G��U%<>0�
G�8d$=�d$,s%+U%):�(�(d$)-s%)<U%�d$+=�U%-(�(d$)-s%),"0")
G��:d$=�d$,s%-1)
H�
H�:�U%<>0�d$+="."+�U%,"0")
H0�
H:=d$
HN���Ha:�Yc% 10000:�G(Yc%,10000):�W:�r("Trinity.Medium"):�r("Revue"):�r("Homerton.Medium"):�r("END"):�i("Testing",0,&DDDDDDDD,2,48,10,1,2.5):�k:�i("Hello",0,-1,1,36,36,0,6):�h(-1,0,1,0,.3):�f(0,0):�a(0,2):�a(2,2):�a(2,0):�f(5,5)
H�G�H(10,10,6,6,9,9):�g:�l:�j(4,11,2,1,-1,0,1,0):�Ia("RAM:TESTFILE"):�
I*�
I4���G(Pb%,Qb%):Pc%=18142:Zc%=46080:V%=640:I%=Pc%:_c%=�:Y%=0:`c%=�:�s(�,�):_c%=�:ad%=Pb%:bd%=Qb%:cd%=ad%+bd%-1024:dd%=cd%:ed%=ad%+bd%-512:Z%=ed%:fd%=cd%-4:z%=ad%:�Ja:�
I���Ka(gd%):Ȏgd%�
I�
�1:I%=Zc%
I��2:I%=V%
I�:I%=Pc%
I��
I��
I�@��Ja:�_c%��4113,"No buffer allocated for drawfile creation"
J8�u("Draw",�):�c(201):�c(0):�u("DrawLib     ",�):�v:�
JLY��c(hd%):!z%=hd%:z%+=4:Y%+=4:�z%>=fd%��4112,"Drawfile too large for allocated buffer"
Jt�
J~Z��La(id%):?z%=id%:z%+=1:Y%+=1:�z%>=fd%��4112,"Drawfile too large for allocated buffer"
J��
J�O��u(d$,jd%):�(z%+�(d$))>fd%��4112,"Drawfile too large for allocated buffer"
J�0$z%=d$:z%+=�(d$):Y%+=�(d$):�jd%�((z%�3)<>0)�
J�*�kd%=1�4-(z%�3):z%?kd%=0:z%+=1:Y%+=1:�
K�
K�
K��w(Pb%):�Z%<>ed%�!(!Z%)=Y%
K2Y%=0:!Pb%=0:Z%+=4:!Z%=Pb%:�
KF��x:�Z%<>ed%�
KZ!(!Z%)=Y%:Z%-=4
Kx�
Kx)�Z%<>ed%�!(!Z%)=(!(!Z%))+Y%:Y%=!(!Z%)
K��
K���I(G%):�!G%>ld%�!G%=ld%
K��G%!4>md%�G%!4=md%
K��G%!8<nd%�G%!8=nd%
K��G%!12<od%�G%!12=od%
K��
K���m(x,y):�ld%>x�ld%=x
K��nd%<x�nd%=x
K��md%>y�md%=y
K��od%<y�od%=y
K��
L��v:�dd%<>cd%��I(!dd%)
Lodd%+=4:!dd%=z%:ld%=&FFFFFF:md%=ld%:!z%=ld%:z%!4=md%:nd%=-&FFFFFF:od%=nd%:z%!8=nd%:z%!12=od%:z%+=16:Y%+=16:�
LJ��y:�pd%:�dd%<>cd%�
Lh�I(!dd%):dd%-=4:�dd%<>cd%�
L�<pd%=!dd%:�I(pd%):ld%=!pd%:md%=pd%!4:nd%=pd%!8:od%=pd%!12
L�0�:ld%=&FFFFFFF:md%=ld%:nd%=-&FFFFFFF:od%=nd%
L��
L�&�:�4114,"No active bounding boxes"
L��
L��
L���s(a%,b%):qd%=b%:rd%=a%:�
M"��h(sd%,td%,nb,ud%,ob):�`c%��g
M0H�w(z%+4):�c(2):�c(0):�v:�c(sd%):�c(td%):�c(nb*V%):�ob<>0�ud%=ud%�2^7
M��c(ud%):�ob<>0�
M�#�c(0):�c(2):�c(ob*I%):�c(ob*I%)
M��
M�`c%=�:�
M�
��g:�rd%�
M��qd%��c(5)��c(4)
M��
N�c(0):`c%=�:�y:�x:�
N4<��a(x,y):x=x*I%:y=y*I%:�m(x,y):�c(8):�c(x):�c(y):`c%=�:�
N�.��f(x,y):x=x*I%:y=y*I%:�m(x,y):�(`c%�rd%)�
N��qd%��c(5)��c(4)
N��
N�`c%=�:�c(2):�c(x):�c(y):�
N���H(x,y,pb,qb,rb,sb):x=x*I%:y=y*I%:pb=pb*I%:qb=qb*I%:rb=rb*I%:sb=sb*I%:�m(x,y):�m(pb,qb):�m(rb,sb):�c(6):�c(pb):�c(qb):�c(rb):�c(sb):�c(x):�c(y):`c%=�:�
O�'��k:�(z%�3)<>0��1,"Alignment error"
O�2�w(z%+4):�c(6):�c(0):�v:�u("            ",�):�
O���l:�y:�x:�
P
$��W:�w(z%+4):�c(0):�c(0):vd%=1:�
PF��r(b$):�kd%:�b$="END"�
Pd�(z%�3)<>0�
Pn,�kd%=1�(4-(z%�3)):z%?kd%=0:z%+=1:Y%+=1:�
P��
P��x
P�!�:�La(vd%):vd%+=1:�u(b$+�0,�)
P��
P��
P����i(k$,Xc%,S%,ud%,tb,ub,t,u):k$=k$+�0:�w(z%+4):�c(1):�c(0):�v:�c(Xc%):�c(S%):�c(ud%�255):�c(tb*V%):�c(ub*V%):�c(t*I%):�c(u*I%):�u(k$,�):�m((t*I%)+(tb*V%*�(k$)),(u*I%)+(ub*V%)):�m(t*I%,u*I%):�y:�x:�
Q�g��j(x,y,w,h,sd%,td%,vb,wb):�h(sd%,td%,vb,0,wb):�f(x,y):�a(x,y+h):�a(x+w,y+h):�a(x+w,y):�a(x,y):�g:�
Q�ݤr(b$):�y:�(b$<>"")�
R<�("SAVE "+b$+" "+�~ad%+" "+�~z%):�("SETTYPE "+b$+" AFF")
R:�
R:
_c%=�:=�v
RXݤv:=z%-ad%
�

00000000  0d 00 01 79 f4 3e 61 64  66 73 3a 3a 34 2e 24 2e  |...y.>adfs::4.$.|
00000010  63 6f 64 69 6e 67 2e 61  70 70 64 65 76 65 6c 2e  |coding.appdevel.|
00000020  67 72 61 70 68 65 72 2e  21 67 72 61 70 68 65 72  |grapher.!grapher|
00000030  a0 32 2e 21 52 75 6e 49  6d 61 67 65 20 73 71 75  |.2.!RunImage squ|
00000040  69 73 68 65 64 20 62 79  20 4d 48 27 73 20 42 41  |ished by MH's BA|
00000050  53 49 43 20 63 72 75 6e  63 68 65 72 20 76 31 2e  |SIC cruncher v1.|
00000060  32 30 20 31 34 2f 35 2f  38 39 20 4f 6e 20 31 34  |20 14/5/89 On 14|
00000070  20 53 65 70 20 31 39 39  33 0d 00 02 31 61 61 25  | Sep 1993...1aa%|
00000080  3d 30 3a 70 24 3d 22 47  72 61 70 68 65 72 a0 32  |=0:p$="Grapher.2|
00000090  22 3a c8 99 22 48 6f 75  72 67 6c 61 73 73 5f 4f  |":.."Hourglass_O|
000000a0  6e 22 3a f2 59 3a ee 85  f2 5a 0d 00 3c 28 f2 5f  |n":.Y:...Z..<(._|
000000b0  3a f2 60 3a c8 99 22 48  6f 75 72 67 6c 61 73 73  |:.`:.."Hourglass|
000000c0  5f 53 6d 61 73 68 22 3a  f2 7a 3a f2 41 3a f2 74  |_Smash":.z:.A:.t|
000000d0  3a e0 0d 00 82 0b dd f2  41 3a e7 6b 8c 0d 00 96  |:.......A:.k....|
000000e0  51 e7 a4 63 28 22 44 61  74 61 20 63 68 61 6e 67  |Q..c("Data chang|
000000f0  65 64 20 62 75 74 20 6e  6f 74 20 73 61 76 65 64  |ed but not saved|
00000100  2c 20 20 74 68 65 73 65  20 63 68 61 6e 67 65 73  |,  these changes|
00000110  20 77 69 6c 6c 20 62 65  20 6c 6f 73 74 20 2d 20  | will be lost - |
00000120  63 6f 6e 74 69 6e 75 65  20 3f 22 29 8c e1 0d 00  |continue ?")....|
00000130  a0 07 cc 3a e1 0d 00 b4  05 cd 0d 00 be 06 f2 7a  |...:...........z|
00000140  0d 00 d2 1e dd f2 7a 3a  ea 5f 25 3a f5 3a 5f 25  |......z:._%:.:_%|
00000150  3d a4 68 28 62 61 25 29  3a c8 8e 5f 25 ca 0d 00  |=.h(ba%):.._%...|
00000160  fa 0a c9 30 3a f2 61 61  0d 01 0e 0c c9 31 3a f2  |...0:.aa.....1:.|
00000170  4a 28 b9 29 0d 01 18 0a  c9 32 3a f2 62 61 0d 01  |J(.).....2:.ba..|
00000180  22 0a c9 33 3a f2 63 61  0d 01 2c 0c c9 34 3a f2  |"..3:.ca..,..4:.|
00000190  4b 28 30 29 0d 01 36 0c  c9 35 3a f2 4b 28 31 29  |K(0)..6..5:.K(1)|
000001a0  0d 01 40 0a c9 36 3a f2  64 61 0d 01 4a 0a c9 37  |..@..6:.da..J..7|
000001b0  3a f2 65 61 0d 01 54 0a  c9 38 3a f2 66 61 0d 01  |:.ea..T..8:.fa..|
000001c0  5e 0a c9 39 3a f2 67 61  0d 01 68 0b c9 31 37 3a  |^..9:.ga..h..17:|
000001d0  f2 68 61 0d 01 72 0b c9  31 38 3a f2 69 61 0d 01  |.ha..r..18:.ia..|
000001e0  7c 0b c9 31 39 3a f2 6a  61 0d 01 86 05 cb 0d 01  ||..19:.ja.......|
000001f0  86 08 fd a3 3a e1 0d 01  9a 1d dd f2 4b 28 61 61  |....:.......K(aa|
00000200  29 3a ea 60 25 3a 60 25  3d 21 65 25 3a e7 61 61  |):.`%:`%=!e%:.aa|
00000210  3d 30 8c 0d 01 c2 05 cc  0d 01 ea 05 cd 0d 01 ea  |=0..............|
00000220  05 e1 0d 01 f4 19 dd f2  63 61 3a ea 60 25 3a 60  |........ca:.`%:`|
00000230  25 3d 21 65 25 3a c8 8e  60 25 ca 0d 02 1c 19 c9  |%=!e%:..`%......|
00000240  6d 25 3a 6d 25 3d 30 3a  e7 57 25 3d 76 8c f2 65  |m%:m%=0:.W%=v..e|
00000250  28 4a 25 29 0d 02 3a 0c  c9 4d 25 3a 4d 25 3d 30  |(J%)..:..M%:M%=0|
00000260  0d 02 58 05 cb 0d 02 58  0c f2 65 28 60 25 29 3a  |..X....X..e(`%):|
00000270  e1 0d 02 6c 70 dd f2 61  61 3a ea 63 61 25 3a 21  |...lp..aa:.ca%:!|
00000280  65 25 3d 4a 25 3a c8 99  22 57 69 6d 70 5f 47 65  |e%=J%:.."Wimp_Ge|
00000290  74 57 69 6e 64 6f 77 53  74 61 74 65 22 2c 2c 65  |tWindowState",,e|
000002a0  25 3a c8 99 22 57 69 6d  70 5f 47 65 74 50 6f 69  |%:.."Wimp_GetPoi|
000002b0  6e 74 65 72 49 6e 66 6f  22 2c 2c 6a 25 3a 63 61  |nterInfo",,j%:ca|
000002c0  25 3d 62 61 2a 28 28 6a  25 21 30 29 2d 28 28 65  |%=ba*((j%!0)-((e|
000002d0  25 21 34 29 2b 64 61 25  29 29 3a c8 8e 65 61 25  |%!4)+da%)):..ea%|
000002e0  ca 0d 02 b2 0e c9 30 3a  66 61 25 3d 63 61 25 0d  |......0:fa%=ca%.|
000002f0  02 c6 0e c9 31 3a 67 61  25 3d 63 61 25 0d 02 d0  |....1:ga%=ca%...|
00000300  0e c9 32 3a 68 61 25 3d  63 61 25 0d 02 da 05 cb  |..2:ha%=ca%.....|
00000310  0d 02 da 35 c8 99 22 57  69 6d 70 5f 46 6f 72 63  |...5.."Wimp_Forc|
00000320  65 52 65 64 72 61 77 22  2c 4a 25 2c 64 61 25 2c  |eRedraw",J%,da%,|
00000330  69 61 25 2c 6a 61 25 2b  6b 61 25 2c 6c 61 25 2b  |ia%,ja%+ka%,la%+|
00000340  6d 61 25 3a e1 0d 02 ee  33 dd f2 4a 28 6e 61 25  |ma%:....3..J(na%|
00000350  29 3a ea 6f 61 25 2c 77  25 3a 77 25 3d 30 3a e7  |):.oa%,w%:w%=0:.|
00000360  28 57 25 3d 76 29 80 28  4a 25 3d 21 65 25 29 80  |(W%=v).(J%=!e%).|
00000370  6e 61 25 8c 77 25 3d 31  0d 03 16 57 c8 99 22 57  |na%.w%=1...W.."W|
00000380  69 6d 70 5f 52 65 64 72  61 77 57 69 6e 64 6f 77  |imp_RedrawWindow|
00000390  22 2c 2c 65 25 b8 6f 61  25 3a c8 95 6f 61 25 3a  |",,e%.oa%:..oa%:|
000003a0  c8 99 22 57 69 6d 70 5f  42 6f 72 64 65 72 57 69  |.."Wimp_BorderWi|
000003b0  6e 64 6f 77 22 2c 2c 65  25 3a e7 77 25 3d 31 8c  |ndow",,e%:.w%=1.|
000003c0  f2 6b 61 28 65 25 21 34  2c 65 25 21 31 36 29 0d  |.ka(e%!4,e%!16).|
000003d0  03 3e 25 c8 99 22 57 69  6d 70 5f 47 65 74 52 65  |.>%.."Wimp_GetRe|
000003e0  63 74 61 6e 67 6c 65 22  2c 2c 65 25 b8 6f 61 25  |ctangle",,e%.oa%|
000003f0  3a ce 3a e1 0d 03 5c 22  dd f2 62 61 3a c8 99 22  |:.:...\"..ba:.."|
00000400  57 69 6d 70 5f 4f 70 65  6e 57 69 6e 64 6f 77 22  |Wimp_OpenWindow"|
00000410  2c 2c 65 25 3a e1 0d 03  7a 6d dd f2 66 61 3a ea  |,,e%:...zm..fa:.|
00000420  46 25 2c 52 25 2c 70 61  25 3a c8 99 22 57 69 6d  |F%,R%,pa%:.."Wim|
00000430  70 5f 47 65 74 43 61 72  65 74 50 6f 73 69 74 69  |p_GetCaretPositi|
00000440  6f 6e 22 2c 2c 6a 25 3a  71 61 25 3d 65 25 21 32  |on",,j%:qa%=e%!2|
00000450  34 3a 52 25 3d 2d 31 3a  46 25 3d 2d 31 3a 70 61  |4:R%=-1:F%=-1:pa|
00000460  25 3d 21 6a 25 3a 72 61  25 3d 6a 25 21 34 3a e7  |%=!j%:ra%=j%!4:.|
00000470  28 71 61 25 3d 31 33 29  80 28 72 61 25 3c 3e 2d  |(qa%=13).(ra%<>-|
00000480  31 29 8c 0d 03 b6 0a c8  8e 70 61 25 ca 0d 03 c0  |1).......pa%....|
00000490  0e c9 6d 25 3a c8 8e 72  61 25 ca 0d 03 d4 0c c9  |..m%:..ra%......|
000004a0  33 3a 46 25 3d 32 30 0d  03 e8 0b c9 37 3a 46 25  |3:F%=20.....7:F%|
000004b0  3d 34 0d 03 f2 20 c9 31  32 3a 46 25 3d 32 30 3a  |=4... .12:F%=20:|
000004c0  e7 6b 25 3e 3d 39 80 6b  25 3c 31 32 8c 52 25 3d  |.k%>=9.k%<12.R%=|
000004d0  31 31 0d 03 f2 0d c9 31  31 3a 52 25 3d 31 32 0d  |11.....11:R%=12.|
000004e0  04 06 1d c9 38 2c 39 2c  31 34 2c 31 35 3a 52 25  |....8,9,14,15:R%|
000004f0  3d a4 69 28 70 61 25 2c  72 61 25 29 0d 04 10 1f  |=.i(pa%,ra%)....|
00000500  c9 31 30 3a e7 6b 25 3e  39 80 6b 25 3c 31 32 8c  |.10:.k%>9.k%<12.|
00000510  52 25 3d 31 31 8b 52 25  3d 31 32 0d 04 10 0f c9  |R%=11.R%=12.....|
00000520  31 36 2c 31 39 3a 52 25  3d 33 0d 04 24 05 cb 0d  |16,19:R%=3..$...|
00000530  04 24 1c c9 4d 25 3a 52  25 3d a4 69 28 4d 25 2c  |.$..M%:R%=.i(M%,|
00000540  72 61 25 29 3a c8 8e 72  61 25 ca 0d 04 42 0d c9  |ra%):..ra%...B..|
00000550  32 37 3a 46 25 3d 32 38  0d 04 56 1a c9 34 33 3a  |27:F%=28..V..43:|
00000560  e7 6b 25 3c 3e 31 32 8c  52 25 3d 35 37 8b 52 25  |.k%<>12.R%=57.R%|
00000570  3d 33 0d 04 56 0c c9 35  37 3a 52 25 3d 32 0d 04  |=3..V..57:R%=2..|
00000580  6a 0d c9 32 30 3a 52 25  3d 33 30 0d 04 74 1b c9  |j..20:R%=30..t..|
00000590  33 31 3a e7 6b 25 3c 3e  31 32 8c 52 25 3d 32 31  |31:.k%<>12.R%=21|
000005a0  8b 52 25 3d 32 37 0d 04  74 05 cb 0d 04 7e 09 c8  |.R%=27..t....~..|
000005b0  8e 52 25 ca 0d 04 88 19  c9 33 2c 36 2c 39 2c 31  |.R%......3,6,9,1|
000005c0  32 2c 31 35 2c 31 38 3a  46 25 3d 52 25 0d 04 9c  |2,15,18:F%=R%...|
000005d0  1d 7f 3a c8 99 22 57 69  6d 70 5f 43 72 65 61 74  |..:.."Wimp_Creat|
000005e0  65 4d 65 6e 75 22 2c 2c  2d 31 0d 04 a6 05 cb 0d  |eMenu",,-1......|
000005f0  04 a6 1d 7f 3a c8 99 22  57 69 6d 70 5f 50 72 6f  |....:.."Wimp_Pro|
00000600  63 65 73 73 4b 65 79 22  2c 71 61 25 0d 04 c4 05  |cessKey",qa%....|
00000610  cb 0d 04 c4 1d cc 3a c8  99 22 57 69 6d 70 5f 50  |......:.."Wimp_P|
00000620  72 6f 63 65 73 73 4b 65  79 22 2c 71 61 25 0d 04  |rocessKey",qa%..|
00000630  e2 05 cd 0d 04 e2 0c e7  46 25 3c 3e 2d 31 8c 0d  |........F%<>-1..|
00000640  04 ec 0a c8 8e 70 61 25  ca 0d 04 f6 0a c9 6d 25  |.....pa%......m%|
00000650  3a f2 42 0d 05 0a 24 c9  4d 25 3a 65 25 21 31 32  |:.B...$.M%:e%!12|
00000660  3d 70 61 25 3a 65 25 21  31 36 3d 46 25 3a 65 25  |=pa%:e%!16=F%:e%|
00000670  21 38 3d 31 3a f2 4c 0d  05 14 05 cb 0d 05 14 05  |!8=1:.L.........|
00000680  cd 0d 05 1e 33 e7 52 25  3c 3e 2d 31 8c c8 99 22  |....3.R%<>-1..."|
00000690  57 69 6d 70 5f 53 65 74  43 61 72 65 74 50 6f 73  |Wimp_SetCaretPos|
000006a0  69 74 69 6f 6e 22 2c 70  61 25 2c 52 25 2c 2c 2c  |ition",pa%,R%,,,|
000006b0  2d 31 2c 30 0d 05 28 05  e1 0d 05 32 4e dd f2 64  |-1,0..(....2N..d|
000006c0  61 3a ea 54 25 2c 46 25  2c 73 61 25 2c 74 61 25  |a:.T%,F%,sa%,ta%|
000006d0  2c 75 61 25 3a 54 25 3d  65 25 21 31 32 3a 46 25  |,ua%:T%=e%!12:F%|
000006e0  3d 65 25 21 31 36 3a 73  61 25 3d 65 25 21 30 3a  |=e%!16:sa%=e%!0:|
000006f0  74 61 25 3d 65 25 21 34  3a 75 61 25 3d 65 25 21  |ta%=e%!4:ua%=e%!|
00000700  38 3a c8 8e 54 25 ca 0d  05 64 0b c9 2d 32 3a f2  |8:..T%...d..-2:.|
00000710  6c 61 0d 05 78 0b c9 4a  25 3a f2 6d 61 0d 05 82  |la..x..J%:.ma...|
00000720  0a c9 4d 25 3a f2 4c 0d  05 8c 0a c9 6d 25 3a f2  |..M%:.L.....m%:.|
00000730  42 0d 05 96 05 cb 0d 05  96 05 e1 0d 05 a0 48 dd  |B.............H.|
00000740  f2 4d 3a 24 76 61 25 3d  22 20 20 20 20 20 20 20  |.M:$va%="       |
00000750  20 20 20 20 22 2b bd 30  3a f2 6e 28 2d 31 2c 77  |    "+.0:.n(-1,w|
00000760  61 25 2c 30 2c 30 29 3a  24 76 61 25 3d 6c 24 2b  |a%,0,0):$va%=l$+|
00000770  bd 30 3a f2 6e 28 2d 31  2c 77 61 25 2c 30 2c 30  |.0:.n(-1,wa%,0,0|
00000780  29 3a e1 0d 05 dc 2e dd  f2 42 3a ea 73 25 2c 69  |):.......B:.s%,i|
00000790  25 2c 42 2c 72 25 2c 67  25 2c 62 25 2c 78 61 25  |%,B,r%,g%,b%,xa%|
000007a0  2c 79 61 25 2c 7a 61 25  3a e7 46 25 3c 3e 39 39  |,ya%,za%:.F%<>99|
000007b0  8c 0d 05 fa 18 e7 6b 25  3d 31 32 8c 78 61 25 3d  |......k%=12.xa%=|
000007c0  75 25 8b 78 61 25 3d 4e  25 0d 06 04 5f 42 3d a3  |u%.xa%=N%..._B=.|
000007d0  3a 72 25 3d bb 28 a4 61  28 63 2c 38 29 29 3a 67  |:r%=.(.a(c,8)):g|
000007e0  25 3d bb 28 a4 61 28 63  2c 39 29 29 3a 62 25 3d  |%=.(.a(c,9)):b%=|
000007f0  bb 28 a4 61 28 63 2c 31  30 29 29 3a e7 28 a4 61  |.(.a(c,10)):.(.a|
00000800  28 63 2c 38 29 3d 22 2d  22 29 84 28 a4 61 28 63  |(c,8)="-").(.a(c|
00000810  2c 39 29 3d 22 2d 22 29  84 28 a4 61 28 63 2c 31  |,9)="-").(.a(c,1|
00000820  30 29 3d 22 2d 22 29 8c  0d 06 36 0a 41 61 25 3d  |0)="-")...6.Aa%=|
00000830  2d 31 0d 06 4a 23 cc 3a  41 61 25 3d 28 72 25 3c  |-1..J#.:Aa%=(r%<|
00000840  3c 38 29 84 28 67 25 3c  3c 31 36 29 84 28 62 25  |<8).(g%<<16).(b%|
00000850  3c 3c 32 34 29 0d 06 5e  05 cd 0d 06 5e 6b 64 25  |<<24)..^....^kd%|
00000860  28 78 61 25 29 3d 41 61  25 3a 72 25 3d bb 28 a4  |(xa%)=Aa%:r%=.(.|
00000870  61 28 63 2c 31 34 29 29  3a 67 25 3d bb 28 a4 61  |a(c,14)):g%=.(.a|
00000880  28 63 2c 31 35 29 29 3a  62 25 3d bb 28 a4 61 28  |(c,15)):b%=.(.a(|
00000890  63 2c 31 36 29 29 3a e7  28 a4 61 28 63 2c 31 34  |c,16)):.(.a(c,14|
000008a0  29 3d 22 2d 22 29 84 28  a4 61 28 63 2c 31 35 29  |)="-").(.a(c,15)|
000008b0  3d 22 2d 22 29 84 28 a4  61 28 63 2c 31 36 29 3d  |="-").(.a(c,16)=|
000008c0  22 2d 22 29 8c 0d 06 90  09 53 25 3d 2d 31 0d 06  |"-").....S%=-1..|
000008d0  a4 22 cc 3a 53 25 3d 28  72 25 3c 3c 32 34 29 84  |.".:S%=(r%<<24).|
000008e0  28 67 25 3c 3c 31 36 29  84 28 62 25 3c 3c 38 29  |(g%<<16).(b%<<8)|
000008f0  0d 06 b8 05 cd 0d 06 b8  66 61 28 4e 25 2c 75 25  |........fa(N%,u%|
00000900  2c 30 29 3d bb 28 a4 61  28 63 2c 31 32 29 29 3a  |,0)=.(.a(c,12)):|
00000910  61 28 4e 25 2c 75 25 2c  31 29 3d bb 28 a4 61 28  |a(N%,u%,1)=.(.a(|
00000920  63 2c 31 31 29 29 3a 63  24 28 4e 25 29 3d a4 61  |c,11)):c$(N%)=.a|
00000930  28 63 2c 37 29 3a 62 24  28 75 25 29 3d a4 61 28  |(c,7):b$(u%)=.a(|
00000940  63 2c 33 29 3a e7 a4 67  28 6d 25 2c 34 30 29 8c  |c,3):..g(m%,40).|
00000950  42 61 25 3d 31 8b 42 61  25 3d 30 0d 06 ea 1a e7  |Ba%=1.Ba%=0.....|
00000960  a4 67 28 6d 25 2c 34 31  29 8c 43 61 25 3d 31 8b  |.g(m%,41).Ca%=1.|
00000970  43 61 25 3d 30 0d 06 f4  1a e7 a4 67 28 6d 25 2c  |Ca%=0......g(m%,|
00000980  34 32 29 8c 44 61 25 3d  b9 8b 44 61 25 3d a3 0d  |42).Da%=..Da%=..|
00000990  06 fe 09 e7 44 61 25 8c  0d 07 08 1d f2 62 28 6d  |....Da%......b(m|
000009a0  25 2c 34 33 2c 30 29 3a  45 61 25 3d a4 67 28 6d  |%,43,0):Ea%=.g(m|
000009b0  25 2c 34 33 29 0d 07 26  11 cc 3a f2 62 28 6d 25  |%,43)..&..:.b(m%|
000009c0  2c 34 33 2c 31 29 0d 07  3a 05 cd 0d 07 3a 12 71  |,43,1)..:....:.q|
000009d0  25 3d bb 28 a4 61 28 63  2c 31 39 29 29 0d 07 4e  |%=.(.a(c,19))..N|
000009e0  05 cd 0d 07 4e 09 c8 8e  46 25 ca 0d 07 58 55 c9  |....N...F%...XU.|
000009f0  38 2c 39 2c 31 30 3a f2  65 28 4a 25 29 3a 57 25  |8,9,10:.e(J%):W%|
00000a00  3d 76 3a f2 6f 28 57 25  2c 4a 25 29 3a 66 61 25  |=v:.o(W%,J%):fa%|
00000a10  3d bb 28 a4 61 28 63 2c  38 29 29 3a 67 61 25 3d  |=.(.a(c,8)):ga%=|
00000a20  bb 28 a4 61 28 63 2c 39  29 29 3a 68 61 25 3d bb  |.(.a(c,9)):ha%=.|
00000a30  28 a4 61 28 63 2c 31 30  29 29 3a 46 61 25 3d 38  |(.a(c,10)):Fa%=8|
00000a40  0d 07 b2 5a c9 31 34 2c  31 35 2c 31 36 3a f2 65  |...Z.14,15,16:.e|
00000a50  28 4a 25 29 3a 57 25 3d  76 3a f2 6f 28 57 25 2c  |(J%):W%=v:.o(W%,|
00000a60  4a 25 29 3a 66 61 25 3d  bb 28 a4 61 28 63 2c 31  |J%):fa%=.(.a(c,1|
00000a70  34 29 29 3a 67 61 25 3d  bb 28 a4 61 28 63 2c 31  |4)):ga%=.(.a(c,1|
00000a80  35 29 29 3a 68 61 25 3d  bb 28 a4 61 28 63 2c 31  |5)):ha%=.(.a(c,1|
00000a90  36 29 29 3a 46 61 25 3d  31 34 0d 08 02 27 c9 32  |6)):Fa%=14...'.2|
00000aa0  30 3a 75 25 2b 3d 31 3a  42 3d b9 3a e7 28 6b 25  |0:u%+=1:B=.:.(k%|
00000ab0  3c 39 29 80 28 75 25 3e  44 25 29 8c 75 25 3d 44  |<9).(u%>D%).u%=D|
00000ac0  25 0d 08 16 1e e7 61 28  4e 25 2c 30 2c 30 29 3c  |%.....a(N%,0,0)<|
00000ad0  75 25 8c 61 28 4e 25 2c  30 2c 30 29 3d 75 25 0d  |u%.a(N%,0,0)=u%.|
00000ae0  08 20 16 c9 31 3a e7 75  25 3e 31 8c 75 25 2d 3d  |. ..1:.u%>1.u%-=|
00000af0  31 3a 42 3d b9 0d 08 34  16 c9 34 3a e7 4e 25 3c  |1:B=...4..4:.N%<|
00000b00  39 8c 4e 25 2b 3d 31 3a  42 3d b9 0d 08 48 16 c9  |9.N%+=1:B=...H..|
00000b10  35 3a e7 4e 25 3e 30 8c  4e 25 2d 3d 31 3a 42 3d  |5:.N%>0.N%-=1:B=|
00000b20  b9 0d 08 5c 1e c9 31 33  3a e7 a4 67 28 6d 25 2c  |...\..13:..g(m%,|
00000b30  31 33 29 8c 47 61 25 3d  b9 8b 47 61 25 3d a3 0d  |13).Ga%=..Ga%=..|
00000b40  08 70 07 42 3d b9 0d 08  84 15 c9 31 37 3a 79 61  |.p.B=......17:ya|
00000b50  25 3d a3 3a e7 6b 25 3d  31 32 8c 0d 08 98 29 e3  |%=.:.k%=12....).|
00000b60  7a 61 25 3d 31 b8 61 28  4e 25 2c 30 2c 30 29 3a  |za%=1.a(N%,0,0):|
00000b70  e7 61 28 4e 25 2c 7a 61  25 2c 30 29 3d 30 8c 79  |.a(N%,za%,0)=0.y|
00000b80  61 25 3d b9 0d 08 ac 05  ed 0d 08 c0 05 cd 0d 08  |a%=.............|
00000b90  c0 0a e7 ac 79 61 25 8c  0d 08 ca 4a c8 99 22 57  |....ya%....J.."W|
00000ba0  69 6d 70 5f 42 6f 72 64  65 72 49 63 6f 6e 22 2c  |imp_BorderIcon",|
00000bb0  31 2c 65 25 3a c8 99 22  57 69 6d 70 5f 42 6f 72  |1,e%:.."Wimp_Bor|
00000bc0  64 65 72 49 63 6f 6e 22  2c 2c 65 25 3a f2 65 28  |derIcon",,e%:.e(|
00000bd0  6d 25 29 3a e7 28 57 25  3d 76 29 8c f2 65 28 4a  |m%):.(W%=v)..e(J|
00000be0  25 29 0d 08 f2 6d cc 3a  79 61 25 3d a4 63 28 22  |%)...m.:ya%=.c("|
00000bf0  43 61 6e 6e 6f 74 20 68  61 76 65 20 7a 65 72 6f  |Cannot have zero|
00000c00  20 73 69 7a 65 20 73 65  67 6d 65 6e 74 73 20 2d  | size segments -|
00000c10  20 70 6c 65 61 73 65 20  65 6e 74 65 72 20 6e 6f  | please enter no|
00000c20  6e 2d 7a 65 72 6f 20 73  65 67 6d 65 6e 74 20 28  |n-zero segment (|
00000c30  27 68 65 69 67 68 74 27  29 20 76 61 6c 75 65 20  |'height') value |
00000c40  26 20 74 72 79 20 61 67  61 69 6e 22 29 3a e1 0d  |& try again"):..|
00000c50  09 10 05 cd 0d 09 1a 0f  c9 33 39 3a e7 6b 25 3e  |.........39:.k%>|
00000c60  3d 39 8c 0d 09 2e 21 e7  61 28 4e 25 2c 30 2c 30  |=9....!.a(N%,0,0|
00000c70  29 3e 30 8c 61 28 4e 25  2c 30 2c 30 29 2d 3d 31  |)>0.a(N%,0,0)-=1|
00000c80  3a 42 3d b9 0d 09 38 1e  e7 75 25 3e 61 28 4e 25  |:B=...8..u%>a(N%|
00000c90  2c 30 2c 30 29 8c 75 25  3d 61 28 4e 25 2c 30 2c  |,0,0).u%=a(N%,0,|
00000ca0  30 29 0d 09 42 0e e7 75  25 3d 30 8c 75 25 3d 31  |0)..B..u%=0.u%=1|
00000cb0  0d 09 4c 05 cd 0d 09 56  0b c9 39 39 3a 42 3d b9  |..L....V..99:B=.|
00000cc0  0d 09 6a 05 cb 0d 09 6a  18 e7 6b 25 3d 31 32 8c  |..j....j..k%=12.|
00000cd0  78 61 25 3d 75 25 8b 78  61 25 3d 4e 25 0d 09 74  |xa%=u%.xa%=N%..t|
00000ce0  07 e7 42 8c 0d 09 7e 12  e7 47 61 25 8c 73 25 3d  |..B...~..Ga%.s%=|
00000cf0  30 8b 73 25 3d 31 0d 09  88 d6 e3 69 25 3d 31 34  |0.s%=1.....i%=14|
00000d00  b8 31 36 3a f2 62 28 6d  25 2c 69 25 2c 73 25 29  |.16:.b(m%,i%,s%)|
00000d10  3a ed 3a f2 64 28 63 2c  31 39 2c c3 71 25 29 3a  |:.:.d(c,19,.q%):|
00000d20  f2 64 28 63 2c 32 2c c3  75 25 29 3a f2 64 28 63  |.d(c,2,.u%):.d(c|
00000d30  2c 33 2c 62 24 28 75 25  29 29 3a f2 64 28 63 2c  |,3,b$(u%)):.d(c,|
00000d40  36 2c c3 4e 25 29 3a f2  64 28 63 2c 37 2c 63 24  |6,.N%):.d(c,7,c$|
00000d50  28 4e 25 29 29 3a f2 64  28 63 2c 38 2c a4 6a 28  |(N%)):.d(c,8,.j(|
00000d60  64 25 28 78 61 25 29 29  29 3a f2 64 28 63 2c 39  |d%(xa%))):.d(c,9|
00000d70  2c a4 6b 28 64 25 28 78  61 25 29 29 29 3a f2 64  |,.k(d%(xa%))):.d|
00000d80  28 63 2c 31 30 2c a4 6c  28 64 25 28 78 61 25 29  |(c,10,.l(d%(xa%)|
00000d90  29 29 3a f2 64 28 63 2c  31 31 2c c3 61 28 4e 25  |)):.d(c,11,.a(N%|
00000da0  2c 75 25 2c 31 29 29 3a  f2 64 28 63 2c 31 32 2c  |,u%,1)):.d(c,12,|
00000db0  c3 61 28 4e 25 2c 75 25  2c 30 29 29 3a f2 64 28  |.a(N%,u%,0)):.d(|
00000dc0  63 2c 31 34 2c a4 6a 28  53 25 29 29 0d 0a 14 a7  |c,14,.j(S%))....|
00000dd0  f2 64 28 63 2c 31 35 2c  a4 6b 28 53 25 29 29 3a  |.d(c,15,.k(S%)):|
00000de0  f2 64 28 63 2c 31 36 2c  a4 6c 28 53 25 29 29 3a  |.d(c,16,.l(S%)):|
00000df0  f2 64 28 63 2c 33 38 2c  c3 28 61 28 4e 25 2c 30  |.d(c,38,.(a(N%,0|
00000e00  2c 30 29 29 29 3a 66 61  25 3d bb 28 a4 61 28 63  |,0))):fa%=.(.a(c|
00000e10  2c 38 29 29 3a 67 61 25  3d bb 28 a4 61 28 63 2c  |,8)):ga%=.(.a(c,|
00000e20  39 29 29 3a 68 61 25 3d  bb 28 a4 61 28 63 2c 31  |9)):ha%=.(.a(c,1|
00000e30  30 29 29 3a e7 28 4a 25  3c 3e 30 29 80 28 57 25  |0)):.(J%<>0).(W%|
00000e40  3d 76 29 8c c8 99 22 57  69 6d 70 5f 46 6f 72 63  |=v)..."Wimp_Forc|
00000e50  65 52 65 64 72 61 77 22  2c 4a 25 2c 64 61 25 2c  |eRedraw",J%,da%,|
00000e60  69 61 25 2c 6a 61 25 2b  6b 61 25 2c 6c 61 25 2b  |ia%,ja%+ka%,la%+|
00000e70  6d 61 25 0d 0a 5a 31 f2  4e 28 6d 25 2c 22 32 2c  |ma%..Z1.N(m%,"2,|
00000e80  33 2c 36 2c 37 2c 38 2c  39 2c 31 30 2c 31 31 2c  |3,6,7,8,9,10,11,|
00000e90  31 32 2c 31 34 2c 31 35  2c 31 36 2c 31 39 2c 33  |12,14,15,16,19,3|
00000ea0  38 2c 22 29 0d 0a 6e 05  cd 0d 0a 6e 11 6b 3d b9  |8,")..n....n.k=.|
00000eb0  3a e7 6d 25 3c 3e 30 8c  f2 4f 0d 0a 82 05 e1 0d  |:.m%<>0..O......|
00000ec0  0a 8c d3 dd f2 6b 61 28  48 61 25 2c 49 61 25 29  |.....ka(Ha%,Ia%)|
00000ed0  3a 66 61 25 3d 66 61 25  80 32 35 35 3a 67 61 25  |:fa%=fa%.255:ga%|
00000ee0  3d 67 61 25 80 32 35 35  3a 68 61 25 3d 68 61 25  |=ga%.255:ha%=ha%|
00000ef0  80 32 35 35 3a c8 99 22  57 69 6d 70 5f 53 65 74  |.255:.."Wimp_Set|
00000f00  43 6f 6c 6f 75 72 22 2c  31 31 3a c8 93 c8 90 48  |Colour",11:....H|
00000f10  61 25 2b 64 61 25 2c 49  61 25 2b 6c 61 25 2c 66  |a%+da%,Ia%+la%,f|
00000f20  61 25 2a 63 61 2c 6d 61  25 3a c8 99 22 57 69 6d  |a%*ca,ma%:.."Wim|
00000f30  70 5f 53 65 74 43 6f 6c  6f 75 72 22 2c 31 30 3a  |p_SetColour",10:|
00000f40  c8 93 c8 90 48 61 25 2b  64 61 25 2c 49 61 25 2b  |....Ha%+da%,Ia%+|
00000f50  4a 61 25 2c 67 61 25 2a  63 61 2c 6d 61 25 3a c8  |Ja%,ga%*ca,ma%:.|
00000f60  99 22 57 69 6d 70 5f 53  65 74 43 6f 6c 6f 75 72  |."Wimp_SetColour|
00000f70  22 2c 38 3a c8 93 c8 90  48 61 25 2b 64 61 25 2c  |",8:....Ha%+da%,|
00000f80  49 61 25 2b 69 61 25 2c  68 61 25 2a 63 61 2c 6d  |Ia%+ia%,ha%*ca,m|
00000f90  61 25 0d 0a f0 58 c8 99  22 43 6f 6c 6f 75 72 54  |a%...X.."ColourT|
00000fa0  72 61 6e 73 5f 53 65 74  47 43 4f 4c 22 2c 66 61  |rans_SetGCOL",fa|
00000fb0  25 3c 3c 38 84 67 61 25  3c 3c 31 36 84 68 61 25  |%<<8.ga%<<16.ha%|
00000fc0  3c 3c 32 34 2c 2c 2c 32  35 36 2c 30 3a c8 93 c8  |<<24,,,256,0:...|
00000fd0  90 48 61 25 2b 6b 61 25  2c 49 61 25 2b 69 61 25  |.Ha%+ka%,Ia%+ia%|
00000fe0  2c 6a 61 25 2c 4b 61 25  3a e1 0d 0b 0e ec dd f2  |,ja%,Ka%:.......|
00000ff0  6e 61 3a ea 68 25 3a f2  6f 28 76 2c 68 25 29 3a  |na:.h%:.o(v,h%):|
00001000  21 6a 25 3d 68 25 3a 6a  25 21 34 3d 30 3a c8 99  |!j%=h%:j%!4=0:..|
00001010  22 57 69 6d 70 5f 47 65  74 49 63 6f 6e 53 74 61  |"Wimp_GetIconSta|
00001020  74 65 22 2c 2c 6a 25 3a  64 61 25 3d 6a 25 21 38  |te",,j%:da%=j%!8|
00001030  3a 6d 61 25 3d 28 2d 28  28 6a 25 21 31 32 29 2d  |:ma%=(-((j%!12)-|
00001040  28 6a 25 21 32 30 29 29  29 2d 34 3a 4c 61 25 3d  |(j%!20)))-4:La%=|
00001050  6a 25 21 31 36 3a 6c 61  25 3d 6a 25 21 31 32 3a  |j%!16:la%=j%!12:|
00001060  6a 25 21 34 3d 31 3a c8  99 22 57 69 6d 70 5f 47  |j%!4=1:.."Wimp_G|
00001070  65 74 49 63 6f 6e 53 74  61 74 65 22 2c 2c 6a 25  |etIconState",,j%|
00001080  3a 4a 61 25 3d 6a 25 21  31 32 3a 6a 25 21 34 3d  |:Ja%=j%!12:j%!4=|
00001090  32 3a c8 99 22 57 69 6d  70 5f 47 65 74 49 63 6f  |2:.."Wimp_GetIco|
000010a0  6e 53 74 61 74 65 22 2c  2c 6a 25 3a 69 61 25 3d  |nState",,j%:ia%=|
000010b0  6a 25 21 31 32 3a 6a 25  21 34 3d 33 3a c8 99 22  |j%!12:j%!4=3:.."|
000010c0  57 69 6d 70 5f 47 65 74  49 63 6f 6e 53 74 61 74  |Wimp_GetIconStat|
000010d0  65 22 2c 2c 6a 25 0d 0b  c2 62 6b 61 25 3d 6a 25  |e",,j%...bka%=j%|
000010e0  21 38 3a 6a 61 25 3d 28  6a 25 21 31 36 29 2d 6b  |!8:ja%=(j%!16)-k|
000010f0  61 25 3a 4b 61 25 3d 28  2d 28 28 6a 25 21 31 32  |a%:Ka%=(-((j%!12|
00001100  29 2d 28 6a 25 21 32 30  29 29 29 2d 34 3a f2 65  |)-(j%!20)))-4:.e|
00001110  28 68 25 29 3a 62 61 3d  32 35 35 2f 28 4c 61 25  |(h%):ba=255/(La%|
00001120  2d 64 61 25 29 3a 63 61  3d 28 4c 61 25 2d 64 61  |-da%):ca=(La%-da|
00001130  25 29 2f 32 35 35 3a e1  0d 0c 08 3f dd f2 4e 28  |%)/255:....?..N(|
00001140  77 25 2c 69 24 29 3a ea  70 25 2c 6e 25 2c 64 61  |w%,i$):.p%,n%,da|
00001150  3a 70 25 3d 31 3a 64 61  3d a3 3a c8 95 ac 64 61  |:p%=1:da=.:...da|
00001160  3a 6e 25 3d a7 69 24 2c  22 2c 22 2c 70 25 29 3a  |:n%=.i$,",",p%):|
00001170  e7 6e 25 3c 3e 30 8c 0d  0c 44 27 f2 6e 28 77 25  |.n%<>0...D'.n(w%|
00001180  2c bb 28 c1 69 24 2c 70  25 2c 6e 25 2d 70 25 29  |,.(.i$,p%,n%-p%)|
00001190  29 2c 30 2c 30 29 3a 70  25 3d 6e 25 2b 31 0d 0c  |),0,0):p%=n%+1..|
000011a0  62 0a cc 3a 64 61 3d b9  0d 0c 76 05 cd 0d 0c 76  |b..:da=...v....v|
000011b0  07 ce 3a e1 0d 0c 8a 29  dd a4 6b 28 63 25 29 3a  |..:....)..k(c%):|
000011c0  e7 63 25 3c 3e 2d 31 8c  3d c3 28 28 63 25 3e 3e  |.c%<>-1.=.((c%>>|
000011d0  31 36 29 80 32 35 35 29  8b 3d 22 2d 22 0d 0c 9e  |16).255).="-"...|
000011e0  28 dd a4 6a 28 63 25 29  3a e7 63 25 3c 3e 2d 31  |(..j(c%):.c%<>-1|
000011f0  8c 3d c3 28 28 63 25 3e  3e 38 29 80 32 35 35 29  |.=.((c%>>8).255)|
00001200  8b 3d 22 2d 22 0d 0c b2  29 dd a4 6c 28 63 25 29  |.="-"...)..l(c%)|
00001210  3a e7 63 25 3c 3e 2d 31  8c 3d c3 28 28 63 25 3e  |:.c%<>-1.=.((c%>|
00001220  3e 32 34 29 80 32 35 35  29 8b 3d 22 2d 22 0d 0c  |>24).255).="-"..|
00001230  c6 11 dd f2 4c 3a ea 69  25 3a c8 8e 46 25 ca 0d  |....L:.i%:..F%..|
00001240  0c e4 5c c9 33 2c 36 2c  39 2c 31 32 2c 31 35 2c  |..\.3,6,9,12,15,|
00001250  31 38 3a c8 99 22 4f 53  5f 47 53 54 72 61 6e 73  |18:.."OS_GSTrans|
00001260  22 2c 22 3c 46 6f 6e 74  24 50 61 74 68 3e 22 2c  |","<Font$Path>",|
00001270  6a 25 2c 32 35 34 b8 2c  2c 6c 25 3a 6a 25 3f 6c  |j%,254.,,l%:j%?l|
00001280  25 3d 33 32 3a 6a 25 3f  28 6c 25 2b 31 29 3d 31  |%=32:j%?(l%+1)=1|
00001290  33 3a e7 65 24 3c 3e 24  6a 25 8c 0d 0d 0c 0d 65  |3:.e$<>$j%.....e|
000012a0  24 3d 24 6a 25 3a f2 50  0d 0d 2a 05 cd 0d 0d 2a  |$=$j%:.P..*....*|
000012b0  23 f2 43 28 65 61 2c 73  61 25 2d 36 34 2c 74 61  |#.C(ea,sa%-64,ta|
000012c0  25 2b 33 32 29 3a 4d 61  25 3d 46 25 3a 6b 3d b9  |%+32):Ma%=F%:k=.|
000012d0  0d 0d 52 5d c9 32 38 3a  61 24 28 30 29 3d a4 61  |..R].28:a$(0)=.a|
000012e0  28 65 2c 34 33 29 3a 61  24 28 31 29 3d a4 61 28  |(e,43):a$(1)=.a(|
000012f0  65 2c 35 37 29 3a 61 24  28 32 29 3d a4 61 28 65  |e,57):a$(2)=.a(e|
00001300  2c 32 29 3a 4e 61 25 3d  bb 28 a4 61 28 65 2c 32  |,2):Na%=.(.a(e,2|
00001310  37 29 29 3a 44 25 3d bb  28 a4 61 28 65 2c 32 36  |7)):D%=.(.a(e,26|
00001320  29 29 3a e7 44 25 3c 31  8c 44 25 3d 31 0d 0d 8e  |)):.D%<1.D%=1...|
00001330  18 e7 28 6b 25 3e 3d 39  29 80 28 44 25 3c 32 29  |..(k%>=9).(D%<2)|
00001340  8c 44 25 3d 32 0d 0d 98  3c 6e 3d bb 28 a4 61 28  |.D%=2...<n=.(.a(|
00001350  65 2c 32 35 29 29 3a 43  3d bb 28 a4 61 28 65 2c  |e,25)):C=.(.a(e,|
00001360  32 34 29 29 3a 4f 61 25  3d bb 28 a4 61 28 65 2c  |24)):Oa%=.(.a(e,|
00001370  32 33 29 29 3a e7 4f 61  25 3c 32 8c 4f 61 25 3d  |23)):.Oa%<2.Oa%=|
00001380  32 0d 0d c0 bd 69 3d bb  28 a4 61 28 65 2c 32 32  |2....i=.(.a(e,22|
00001390  29 29 3a 6d 3d bb 28 a4  61 28 65 2c 32 31 29 29  |)):m=.(.a(e,21))|
000013a0  3a 77 3d bb 28 a4 61 28  65 2c 33 30 29 29 3a 68  |:w=.(.a(e,30)):h|
000013b0  3d bb 28 a4 61 28 65 2c  33 31 29 29 3a e3 69 25  |=.(.a(e,31)):.i%|
000013c0  3d 33 b8 32 30 88 33 3a  64 24 28 28 69 25 2f 33  |=3.20.3:d$((i%/3|
000013d0  29 2d 31 29 3d a4 61 28  65 2c 69 25 29 3a 63 25  |)-1)=.a(e,i%):c%|
000013e0  28 28 28 69 25 2f 33 29  2d 31 29 2a 32 29 3d bb  |(((i%/3)-1)*2)=.|
000013f0  28 a4 61 28 65 2c 69 25  2b 31 29 29 3a 63 25 28  |(.a(e,i%+1)):c%(|
00001400  28 28 28 69 25 2f 33 29  2d 31 29 2a 32 29 2b 31  |(((i%/3)-1)*2)+1|
00001410  29 3d bb 28 a4 61 28 65  2c 69 25 2b 32 29 29 3a  |)=.(.a(e,i%+2)):|
00001420  ed 3a 6b 3d b9 3a c8 99  22 57 69 6d 70 5f 42 6f  |.:k=.:.."Wimp_Bo|
00001430  72 64 65 72 49 63 6f 6e  22 2c 31 2c 65 25 0d 0e  |rderIcon",1,e%..|
00001440  38 20 c9 32 39 3a c8 99  22 57 69 6d 70 5f 42 6f  |8 .29:.."Wimp_Bo|
00001450  72 64 65 72 49 63 6f 6e  22 2c 31 2c 65 25 0d 0e  |rderIcon",1,e%..|
00001460  4c 05 cb 0d 0e 4c 34 e7  28 46 25 3d 32 38 29 84  |L....L4.(F%=28).|
00001470  28 46 25 3d 32 39 29 8c  c8 99 22 57 69 6d 70 5f  |(F%=29)..."Wimp_|
00001480  42 6f 72 64 65 72 49 63  6f 6e 22 2c 30 2c 65 25  |BorderIcon",0,e%|
00001490  3a f2 65 28 4d 25 29 0d  0e 56 08 f2 4f 3a e1 0d  |:.e(M%)..V..O:..|
000014a0  0e 6a 5a dd f2 4f 3a c8  99 22 57 69 6d 70 5f 47  |.jZ..O:.."Wimp_G|
000014b0  65 74 43 61 72 65 74 50  6f 73 69 74 69 6f 6e 22  |etCaretPosition"|
000014c0  2c 2c 6a 25 3a e7 6a 25  21 34 3e 2d 31 8c c8 99  |,,j%:.j%!4>-1...|
000014d0  22 57 69 6d 70 5f 53 65  74 43 61 72 65 74 50 6f  |"Wimp_SetCaretPo|
000014e0  73 69 74 69 6f 6e 22 2c  21 6a 25 2c 6a 25 21 34  |sition",!j%,j%!4|
000014f0  2c 30 2c 30 2c 2d 31 2c  30 0d 0e 88 05 e1 0d 0e  |,0,0,-1,0.......|
00001500  92 1e dd f2 6d 61 3a ea  50 61 25 2c 63 24 2c 51  |....ma:.Pa%,c$,Q|
00001510  61 25 2c 52 61 25 3a c8  8e 57 25 ca 0d 0e b0 0c  |a%,Ra%:..W%.....|
00001520  c9 73 3a c8 8e 46 25 ca  0d 0e c4 1e c9 32 3a 63  |.s:..F%......2:c|
00001530  24 3d a4 61 28 73 2c 30  29 3a e7 c0 63 24 2c 31  |$=.a(s,0):..c$,1|
00001540  29 3d 22 20 22 8c 0d 0e  e2 79 50 61 25 3d a4 6d  |)=" "....yPa%=.m|
00001550  3a c8 99 22 57 69 6d 70  5f 42 6f 72 64 65 72 49  |:.."Wimp_BorderI|
00001560  63 6f 6e 22 2c 31 2c 65  25 3a c8 99 22 57 69 6d  |con",1,e%:.."Wim|
00001570  70 5f 42 6f 72 64 65 72  49 63 6f 6e 22 2c 2c 65  |p_BorderIcon",,e|
00001580  25 3a f2 44 28 63 24 29  3a e7 50 61 25 3c 3e 31  |%:.D(c$):.Pa%<>1|
00001590  8c c8 99 22 57 69 6d 70  5f 43 72 65 61 74 65 4d  |..."Wimp_CreateM|
000015a0  65 6e 75 22 2c 2c 2d 31  8b c8 99 22 57 69 6d 70  |enu",,-1..."Wimp|
000015b0  5f 43 72 65 61 74 65 4d  65 6e 75 22 2c 2c 4e 0d  |_CreateMenu",,N.|
000015c0  0f 14 35 cc 3a 85 32 30  30 32 2c 22 44 72 61 67  |..5.:.2002,"Drag|
000015d0  20 74 68 65 20 69 63 6f  6e 20 74 6f 20 61 20 66  | the icon to a f|
000015e0  69 6c 65 72 20 77 69 6e  64 6f 77 20 74 6f 20 73  |iler window to s|
000015f0  61 76 65 22 0d 0f 32 05  cd 0d 0f 32 0f c9 31 3a  |ave"..2....2..1:|
00001600  e7 75 61 25 3d 36 34 8c  0d 0f 46 df 21 65 25 3d  |.ua%=64...F.!e%=|
00001610  4a 25 3a c8 99 22 57 69  6d 70 5f 47 65 74 57 69  |J%:.."Wimp_GetWi|
00001620  6e 64 6f 77 53 74 61 74  65 22 2c 2c 65 25 3a 51  |ndowState",,e%:Q|
00001630  61 25 3d 65 25 21 34 3a  52 61 25 3d 65 25 21 31  |a%=e%!4:Ra%=e%!1|
00001640  36 3a 50 61 25 3d a4 6e  28 4a 25 2c 31 29 3a 66  |6:Pa%=.n(J%,1):f|
00001650  61 3d 73 3a 21 74 25 3d  30 3a 74 25 21 31 32 3d  |a=s:!t%=0:t%!12=|
00001660  28 50 61 25 21 31 32 29  2b 52 61 25 3a 74 25 21  |(Pa%!12)+Ra%:t%!|
00001670  38 3d 28 50 61 25 21 38  29 2b 51 61 25 3a 74 25  |8=(Pa%!8)+Qa%:t%|
00001680  21 32 30 3d 28 50 61 25  21 32 30 29 2b 52 61 25  |!20=(Pa%!20)+Ra%|
00001690  3a 74 25 21 31 36 3d 28  50 61 25 21 31 36 29 2b  |:t%!16=(Pa%!16)+|
000016a0  51 61 25 3a 74 25 21 34  3d 35 3a 74 25 21 32 34  |Qa%:t%!4=5:t%!24|
000016b0  3d 30 3a 74 25 21 32 38  3d 30 3a 74 25 21 33 32  |=0:t%!28=0:t%!32|
000016c0  3d 31 30 30 30 30 3a 74  25 21 33 36 3d 31 30 30  |=10000:t%!36=100|
000016d0  30 30 3a c8 99 22 57 69  6d 70 5f 44 72 61 67 42  |00:.."Wimp_DragB|
000016e0  6f 78 22 2c 2c 74 25 0d  0f f0 05 cd 0d 0f f0 05  |ox",,t%.........|
000016f0  cb 0d 0f fa 0d c9 76 3a  e7 46 25 3c 33 8c 0d 10  |......v:.F%<3...|
00001700  0e 76 62 61 25 3d 62 61  25 80 28 ac 31 29 3a 21  |.vba%=ba%.(.1):!|
00001710  65 25 3d 4a 25 3a c8 99  22 57 69 6d 70 5f 47 65  |e%=J%:.."Wimp_Ge|
00001720  74 57 69 6e 64 6f 77 53  74 61 74 65 22 2c 2c 65  |tWindowState",,e|
00001730  25 3a 48 61 25 3d 65 25  21 34 3a 49 61 25 3d 65  |%:Ha%=e%!4:Ia%=e|
00001740  25 21 31 36 3a 21 6a 25  3d 4a 25 3a 6a 25 21 34  |%!16:!j%=J%:j%!4|
00001750  3d 37 3a 6a 25 21 32 34  3d 48 61 25 2b 64 61 25  |=7:j%!24=Ha%+da%|
00001760  3a 6a 25 21 33 32 3d 48  61 25 2b 4c 61 25 3a c8  |:j%!32=Ha%+La%:.|
00001770  8e 46 25 ca 0d 10 72 14  c9 30 3a 6a 25 21 32 38  |.F%...r..0:j%!28|
00001780  3d 49 61 25 2b 6c 61 25  0d 10 90 14 c9 31 3a 6a  |=Ia%+la%.....1:j|
00001790  25 21 32 38 3d 49 61 25  2b 4a 61 25 0d 10 a4 14  |%!28=Ia%+Ja%....|
000017a0  c9 32 3a 6a 25 21 32 38  3d 49 61 25 2b 69 61 25  |.2:j%!28=Ia%+ia%|
000017b0  0d 10 b8 05 cb 0d 10 b8  ad 6a 25 21 33 36 3d 28  |.........j%!36=(|
000017c0  6a 25 21 32 38 29 2b 6d  61 25 3a c8 99 22 57 69  |j%!28)+ma%:.."Wi|
000017d0  6d 70 5f 47 65 74 50 6f  69 6e 74 65 72 49 6e 66  |mp_GetPointerInf|
000017e0  6f 22 2c 2c 65 25 3a 6a  25 21 38 3d 65 25 21 30  |o",,e%:j%!8=e%!0|
000017f0  3a 6a 25 21 31 36 3d 65  25 21 30 3a 6a 25 21 31  |:j%!16=e%!0:j%!1|
00001800  32 3d 65 25 21 34 3a 6a  25 21 32 30 3d 65 25 21  |2=e%!4:j%!20=e%!|
00001810  34 3a c8 99 22 57 69 6d  70 5f 44 72 61 67 42 6f  |4:.."Wimp_DragBo|
00001820  78 22 2c 2c 6a 25 3a 66  61 3d 76 3a c8 99 22 57  |x",,j%:fa=v:.."W|
00001830  69 6d 70 5f 46 6f 72 63  65 52 65 64 72 61 77 22  |imp_ForceRedraw"|
00001840  2c 4a 25 2c 64 61 25 2c  69 61 25 2c 6a 61 25 2b  |,J%,da%,ia%,ja%+|
00001850  6b 61 25 2c 6c 61 25 2b  6d 61 25 3a 65 61 25 3d  |ka%,la%+ma%:ea%=|
00001860  46 25 0d 11 26 0c cc 3a  e7 46 25 3d 34 8c 0d 11  |F%..&..:.F%=4...|
00001870  30 86 c8 99 22 57 69 6d  70 5f 42 6f 72 64 65 72  |0..."Wimp_Border|
00001880  49 63 6f 6e 22 2c 31 2c  65 25 3a 65 25 21 38 3d  |Icon",1,e%:e%!8=|
00001890  30 3a c8 99 22 57 69 6d  70 5f 42 6f 72 64 65 72  |0:.."Wimp_Border|
000018a0  49 63 6f 6e 22 2c 2c 65  25 3a f2 64 28 63 2c 46  |Icon",,e%:.d(c,F|
000018b0  61 25 2c c3 66 61 25 29  3a f2 64 28 63 2c 46 61  |a%,.fa%):.d(c,Fa|
000018c0  25 2b 31 2c c3 67 61 25  29 3a f2 64 28 63 2c 46  |%+1,.ga%):.d(c,F|
000018d0  61 25 2b 32 2c c3 68 61  25 29 3a f2 4e 28 6d 25  |a%+2,.ha%):.N(m%|
000018e0  2c 22 38 2c 39 2c 31 30  2c 31 34 2c 31 35 2c 31  |,"8,9,10,14,15,1|
000018f0  36 2c 22 29 0d 11 76 05  cd 0d 11 76 05 cd 0d 11  |6,")..v....v....|
00001900  80 05 cb 0d 11 8a 05 e1  0d 11 94 12 dd f2 6c 61  |..............la|
00001910  3a e7 46 25 3c 3e 77 61  25 e1 0d 11 a8 0a c8 8e  |:.F%<>wa%.......|
00001920  75 61 25 ca 0d 11 b2 21  c9 53 61 25 3a f2 43 28  |ua%....!.Sa%:.C(|
00001930  4e 2c 73 61 25 2d 36 30  2c 39 36 2b 28 54 61 25  |N,sa%-60,96+(Ta%|
00001940  2a 34 34 29 29 0d 11 d0  05 cb 0d 11 d0 05 e1 0d  |*44))...........|
00001950  11 da 2c dd f2 67 61 3a  ea 71 24 2c 55 61 25 3a  |..,..ga:.q$,Ua%:|
00001960  55 61 25 3d a4 6d 3a 71  24 3d a4 6f 28 56 61 25  |Ua%=.m:q$=.o(Va%|
00001970  2c 65 25 29 3a c8 8e 56  61 25 ca 0d 12 0c 0e c9  |,e%):..Va%......|
00001980  4e 3a f2 6f 61 28 71 24  29 0d 12 20 0b c9 65 61  |N:.oa(q$).. ..ea|
00001990  3a f2 70 61 0d 12 2a 05  cb 0d 12 2a 18 e7 55 61  |:.pa..*....*..Ua|
000019a0  25 3d 57 61 25 8c f2 43  28 56 61 25 2c 30 2c 30  |%=Wa%..C(Va%,0,0|
000019b0  29 0d 12 34 05 e1 0d 12  3e 42 dd f2 70 61 3a c8  |)..4....>B..pa:.|
000019c0  99 22 57 69 6d 70 5f 44  65 63 6f 64 65 4d 65 6e  |."Wimp_DecodeMen|
000019d0  75 22 2c 2c 65 61 2c 65  25 2c 6a 25 3a f2 64 28  |u",,ea,e%,j%:.d(|
000019e0  65 2c 4d 61 25 2c 24 6a  25 29 3a f2 71 61 28 4d  |e,Ma%,$j%):.qa(M|
000019f0  25 2c 4d 61 25 29 3a e1  0d 12 70 1e dd f2 6f 61  |%,Ma%):...p...oa|
00001a00  28 72 24 29 3a ea 58 61  25 3a 58 61 25 3d 6b 25  |(r$):.Xa%:Xa%=k%|
00001a10  3a c8 8e 72 24 ca 0d 12  98 11 c9 22 51 75 69 74  |:..r$......"Quit|
00001a20  22 3a f2 41 3a f2 74 0d  12 c0 1e c9 22 45 64 69  |":.A:.t....."Edi|
00001a30  74 20 44 61 74 61 22 3a  e7 4d 25 3c 3e 30 8c f2  |t Data":.M%<>0..|
00001a40  65 28 4d 25 29 0d 12 ca  10 e7 75 25 3e 44 25 8c  |e(M%).....u%>D%.|
00001a50  75 25 3d 44 25 0d 12 d4  13 f2 6f 28 63 2c 6d 25  |u%=D%.....o(c,m%|
00001a60  29 3a e7 6b 25 3c 39 8c  0d 12 e8 32 f2 62 28 6d  |):.k%<9....2.b(m|
00001a70  25 2c 31 31 2c 31 29 3a  f2 62 28 6d 25 2c 35 31  |%,11,1):.b(m%,51|
00001a80  2c 31 29 3a f2 62 28 6d  25 2c 33 38 2c 31 29 3a  |,1):.b(m%,38,1):|
00001a90  f2 62 28 6d 25 2c 33 2c  30 29 0d 13 1a 34 cc 3a  |.b(m%,3,0)...4.:|
00001aa0  f2 62 28 6d 25 2c 33 2c  31 29 3a f2 62 28 6d 25  |.b(m%,3,1):.b(m%|
00001ab0  2c 31 31 2c 30 29 3a f2  62 28 6d 25 2c 35 31 2c  |,11,0):.b(m%,51,|
00001ac0  30 29 3a f2 62 28 6d 25  2c 34 37 2c 30 29 0d 13  |0):.b(m%,47,0)..|
00001ad0  4c 05 cd 0d 13 4c 0c e7  6b 25 3e 3d 31 32 8c 0d  |L....L..k%>=12..|
00001ae0  13 56 87 f2 62 28 6d 25  2c 33 2c 30 29 3a f2 62  |.V..b(m%,3,0):.b|
00001af0  28 6d 25 2c 31 39 2c 31  29 3a f2 62 28 6d 25 2c  |(m%,19,1):.b(m%,|
00001b00  36 2c 31 29 3a f2 62 28  6d 25 2c 37 2c 31 29 3a  |6,1):.b(m%,7,1):|
00001b10  f2 62 28 6d 25 2c 35 2c  31 29 3a f2 62 28 6d 25  |.b(m%,5,1):.b(m%|
00001b20  2c 34 2c 31 29 3a f2 62  28 6d 25 2c 31 33 2c 31  |,4,1):.b(m%,13,1|
00001b30  29 3a f2 62 28 6d 25 2c  31 31 2c 31 29 3a f2 62  |):.b(m%,11,1):.b|
00001b40  28 6d 25 2c 34 30 2c 30  29 3a f2 62 28 6d 25 2c  |(m%,40,0):.b(m%,|
00001b50  34 31 2c 30 29 3a e7 42  61 25 8c f2 70 28 6d 25  |41,0):.Ba%..p(m%|
00001b60  2c 34 30 2c 31 29 0d 13  c4 14 e7 43 61 25 8c f2  |,40,1).....Ca%..|
00001b70  70 28 6d 25 2c 34 31 2c  31 29 0d 13 ce 08 4e 25  |p(m%,41,1)....N%|
00001b80  3d 30 0d 13 e2 61 cc 3a  f2 62 28 6d 25 2c 31 39  |=0...a.:.b(m%,19|
00001b90  2c 30 29 3a f2 62 28 6d  25 2c 31 33 2c 30 29 3a  |,0):.b(m%,13,0):|
00001ba0  f2 62 28 6d 25 2c 36 2c  30 29 3a f2 62 28 6d 25  |.b(m%,6,0):.b(m%|
00001bb0  2c 37 2c 30 29 3a f2 62  28 6d 25 2c 35 2c 30 29  |,7,0):.b(m%,5,0)|
00001bc0  3a f2 62 28 6d 25 2c 34  2c 30 29 3a f2 62 28 6d  |:.b(m%,4,0):.b(m|
00001bd0  25 2c 34 30 2c 31 29 3a  f2 62 28 6d 25 2c 34 31  |%,40,1):.b(m%,41|
00001be0  2c 31 29 0d 14 3c 05 cd  0d 14 3c 16 f2 62 28 6d  |,1)..<....<..b(m|
00001bf0  25 2c 34 33 2c 31 29 3a  e7 6b 25 3d 39 8c 0d 14  |%,43,1):.k%=9...|
00001c00  50 15 f2 62 28 6d 25 2c  34 32 2c 30 29 3a e7 44  |P..b(m%,42,0):.D|
00001c10  61 25 8c 0d 14 64 20 f2  70 28 6d 25 2c 34 32 2c  |a%...d .p(m%,42,|
00001c20  31 29 3a e7 45 61 25 8c  f2 70 28 6d 25 2c 34 33  |1):.Ea%..p(m%,43|
00001c30  2c 31 29 0d 14 78 0f f2  62 28 6d 25 2c 34 33 2c  |,1)..x..b(m%,43,|
00001c40  30 29 0d 14 8c 05 cd 0d  14 8c 11 cc 3a f2 62 28  |0)..........:.b(|
00001c50  6d 25 2c 34 32 2c 31 29  0d 14 aa 05 cd 0d 14 aa  |m%,42,1)........|
00001c60  09 e7 47 61 25 8c 0d 14  b4 0f f2 70 28 6d 25 2c  |..Ga%......p(m%,|
00001c70  31 33 2c 31 29 0d 14 c8  35 cc 3a f2 70 28 6d 25  |13,1)...5.:.p(m%|
00001c80  2c 31 33 2c 30 29 3a f2  62 28 6d 25 2c 31 34 2c  |,13,0):.b(m%,14,|
00001c90  31 29 3a f2 62 28 6d 25  2c 31 35 2c 31 29 3a f2  |1):.b(m%,15,1):.|
00001ca0  62 28 6d 25 2c 31 36 2c  31 29 0d 14 fa 05 cd 0d  |b(m%,16,1)......|
00001cb0  14 fa 0c 46 25 3d 39 39  3a f2 42 0d 15 0e c6 c9  |...F%=99:.B.....|
00001cc0  22 45 64 69 74 20 41 78  69 73 22 3a f2 65 28 6d  |"Edit Axis":.e(m|
00001cd0  25 29 3a f2 65 28 4a 25  29 3a f2 64 28 65 2c 34  |%):.e(J%):.d(e,4|
00001ce0  33 2c 61 24 28 30 29 29  3a f2 64 28 65 2c 35 37  |3,a$(0)):.d(e,57|
00001cf0  2c 61 24 28 31 29 29 3a  f2 64 28 65 2c 32 2c 61  |,a$(1)):.d(e,2,a|
00001d00  24 28 32 29 29 3a f2 64  28 65 2c 32 33 2c c3 4f  |$(2)):.d(e,23,.O|
00001d10  61 25 29 3a f2 64 28 65  2c 32 32 2c c3 69 29 3a  |a%):.d(e,22,.i):|
00001d20  f2 64 28 65 2c 32 31 2c  c3 6d 29 3a f2 64 28 65  |.d(e,21,.m):.d(e|
00001d30  2c 32 34 2c c3 43 29 3a  f2 64 28 65 2c 32 35 2c  |,24,.C):.d(e,25,|
00001d40  c3 6e 29 3a f2 64 28 65  2c 32 36 2c c3 44 25 29  |.n):.d(e,26,.D%)|
00001d50  3a f2 64 28 65 2c 32 37  2c c3 4e 61 25 29 3a f2  |:.d(e,27,.Na%):.|
00001d60  64 28 65 2c 33 30 2c c3  77 29 3a f2 64 28 65 2c  |d(e,30,.w):.d(e,|
00001d70  33 31 2c c3 68 29 3a e3  69 25 3d 33 b8 32 30 88  |31,.h):.i%=3.20.|
00001d80  33 0d 15 a4 68 f2 64 28  65 2c 69 25 2c 64 24 28  |3...h.d(e,i%,d$(|
00001d90  28 69 25 2f 33 29 2d 31  29 29 3a f2 64 28 65 2c  |(i%/3)-1)):.d(e,|
00001da0  69 25 2b 31 2c c3 63 25  28 28 28 69 25 2f 33 29  |i%+1,.c%(((i%/3)|
00001db0  2d 31 29 2a 32 29 29 3a  f2 64 28 65 2c 69 25 2b  |-1)*2)):.d(e,i%+|
00001dc0  32 2c c3 63 25 28 28 28  28 69 25 2f 33 29 2d 31  |2,.c%((((i%/3)-1|
00001dd0  29 2a 32 29 2b 31 29 29  3a ed 3a f2 6f 28 65 2c  |)*2)+1)):.:.o(e,|
00001de0  4d 25 29 3a c8 8e 6b 25  ca 0d 15 e0 2e c9 30 2c  |M%):..k%......0,|
00001df0  31 2c 32 2c 33 2c 34 2c  35 2c 36 2c 37 2c 38 3a  |1,2,3,4,5,6,7,8:|
00001e00  f2 62 28 4d 25 2c 32 34  2c 31 29 3a f2 62 28 4d  |.b(M%,24,1):.b(M|
00001e10  25 2c 32 35 2c 31 29 0d  16 08 24 c9 39 2c 31 30  |%,25,1)...$.9,10|
00001e20  2c 31 31 3a f2 62 28 4d  25 2c 32 34 2c 30 29 3a  |,11:.b(M%,24,0):|
00001e30  f2 62 28 4d 25 2c 32 34  2c 30 29 0d 16 26 05 cb  |.b(M%,24,0)..&..|
00001e40  0d 16 26 0c e7 6b 25 3e  3d 31 32 8c 0d 16 30 49  |..&..k%>=12...0I|
00001e50  f2 62 28 4d 25 2c 35 37  2c 31 29 3a f2 62 28 4d  |.b(M%,57,1):.b(M|
00001e60  25 2c 32 2c 31 29 3a e3  69 25 3d 36 b8 31 31 3a  |%,2,1):.i%=6.11:|
00001e70  f2 62 28 4d 25 2c 69 25  2c 31 29 3a ed 3a e3 69  |.b(M%,i%,1):.:.i|
00001e80  25 3d 31 35 b8 32 36 3a  f2 62 28 4d 25 2c 69 25  |%=15.26:.b(M%,i%|
00001e90  2c 31 29 3a ed 0d 16 62  05 cd 0d 16 62 0f c9 22  |,1):...b....b.."|
00001ea0  33 2d 44 22 3a 6b 25 3d  32 0d 16 76 16 c9 22 53  |3-D":k%=2..v.."S|
00001eb0  69 64 65 42 79 53 69 64  65 22 3a 6b 25 3d 31 0d  |ideBySide":k%=1.|
00001ec0  16 80 13 c9 22 4f 76 65  72 6c 61 79 22 3a 6b 25  |...."Overlay":k%|
00001ed0  3d 30 0d 16 8a 14 c9 22  43 6f 6d 70 6f 75 6e 64  |=0....."Compound|
00001ee0  22 3a 6b 25 3d 33 0d 16  94 17 c9 22 33 44 20 43  |":k%=3....."3D C|
00001ef0  6f 6d 70 6f 75 6e 64 22  3a 6b 25 3d 34 0d 16 9e  |ompound":k%=4...|
00001f00  16 c9 22 43 6f 6d 70 6f  75 6e 64 20 25 22 3a 6b  |.."Compound %":k|
00001f10  25 3d 35 0d 16 a8 15 c9  22 33 44 20 43 6f 6d 70  |%=5....."3D Comp|
00001f20  20 25 22 3a 6b 25 3d 36  0d 16 b2 10 c9 22 4c 69  | %":k%=6....."Li|
00001f30  6e 65 22 3a 6b 25 3d 37  0d 16 bc 17 c9 22 4c 69  |ne":k%=7....."Li|
00001f40  6e 65 2b 50 6f 69 6e 74  73 22 3a 6b 25 3d 38 0d  |ne+Points":k%=8.|
00001f50  16 c6 16 c9 22 4c 69 6e  65 20 4f 6e 6c 79 22 3a  |...."Line Only":|
00001f60  6b 25 3d 31 31 0d 16 d0  18 c9 22 4c 69 6e 65 2b  |k%=11....."Line+|
00001f70  70 6f 69 6e 74 73 22 3a  6b 25 3d 31 30 0d 16 da  |points":k%=10...|
00001f80  13 c9 22 53 63 61 74 74  65 72 22 3a 6b 25 3d 39  |.."Scatter":k%=9|
00001f90  0d 16 e4 12 c9 22 50 69  65 22 3a e7 6b 25 3c 31  |....."Pie":.k%<1|
00001fa0  32 8c 0d 16 ee 48 e7 6b  8c 6b 3d ac a4 63 28 22  |2....H.k.k=..c("|
00001fb0  43 68 61 6e 67 69 6e 67  20 74 6f 20 74 68 69 73  |Changing to this|
00001fc0  20 67 72 61 70 68 20 74  79 70 65 20 77 69 6c 6c  | graph type will|
00001fd0  20 6c 6f 6f 73 65 20 61  6c 6c 20 64 61 74 61 20  | loose all data |
00001fe0  2d 20 73 75 72 65 20 3f  22 29 0d 16 f8 08 e7 ac  |- sure ?")......|
00001ff0  6b 8c 0d 17 02 2a e3 73  25 3d 31 b8 39 39 3a 62  |k....*.s%=1.99:b|
00002000  24 28 73 25 29 3d 22 53  65 67 6d 65 6e 74 20 22  |$(s%)="Segment "|
00002010  2b c3 73 25 3a ed 3a 6b  25 3d 31 32 0d 17 20 05  |+.s%:.:k%=12.. .|
00002020  cd 0d 17 20 05 cd 0d 17  2a 74 c9 22 52 65 73 65  |... ....*t."Rese|
00002030  74 22 3a e7 6b 8c 6b 3d  ac a4 63 28 22 43 75 72  |t":.k.k=..c("Cur|
00002040  72 65 6e 74 20 64 61 74  61 20 63 68 61 6e 67 65  |rent data change|
00002050  64 20 62 75 74 20 6e 6f  74 20 73 61 76 65 64 20  |d but not saved |
00002060  2d 20 72 65 73 65 74 74  69 6e 67 20 77 69 6c 6c  |- resetting will|
00002070  20 70 65 72 6d 61 6e 65  6e 74 6c 79 20 65 72 61  | permanently era|
00002080  73 65 20 74 68 65 73 65  20 63 68 61 6e 67 65 73  |se these changes|
00002090  2c 20 20 73 75 72 65 3f  22 29 0d 17 3e 18 e7 ac  |,  sure?")..>...|
000020a0  6b 8c f2 45 3a f2 65 28  4d 25 29 3a f2 65 28 6d  |k..E:.e(M%):.e(m|
000020b0  25 29 0d 17 48 05 cb 0d  17 52 0d e7 6b 25 3c 3e  |%)..H....R..k%<>|
000020c0  58 61 25 8c 0d 17 5c 25  6c 24 3d 72 24 3a f2 4d  |Xa%...\%l$=r$:.M|
000020d0  3a f2 65 28 4d 25 29 3a  f2 65 28 6d 25 29 3a e7  |:.e(M%):.e(m%):.|
000020e0  58 61 25 3e 31 31 8c f2  45 0d 17 8e 05 cd 0d 17  |Xa%>11..E.......|
000020f0  98 05 e1 0d 17 a2 29 dd  a4 73 28 68 24 29 3a 3d  |......)..s(h$):=|
00002100  28 28 68 24 3d 22 2c 22  29 84 28 68 24 3d 22 2e  |((h$=",").(h$=".|
00002110  22 29 84 28 68 24 3d 22  20 22 29 29 0d 17 c0 b1  |").(h$=" "))....|
00002120  dd f2 50 3a ea 4f 25 2c  6c 25 2c 6e 24 2c 59 61  |..P:.O%,l%,n$,Ya|
00002130  25 2c 5a 61 25 2c 63 24  2c 51 25 2c 5f 61 25 2c  |%,Za%,c$,Q%,_a%,|
00002140  60 61 25 2c 58 25 2c 61  62 25 2c 67 61 2c 62 62  |`a%,X%,ab%,ga,bb|
00002150  25 2c 63 62 25 2c 64 62  25 2c 65 62 25 3a 51 25  |%,cb%,db%,eb%:Q%|
00002160  3d 30 3a 58 3d a3 3a 6e  24 3d 65 24 3a 63 24 3d  |=0:X=.:n$=e$:c$=|
00002170  22 22 3a 67 61 3d a3 3a  66 62 25 3d 67 62 25 3a  |"":ga=.:fb%=gb%:|
00002180  4f 25 3d 67 62 25 2b 35  31 32 3a 68 62 25 3d 69  |O%=gb%+512:hb%=i|
00002190  62 25 2d 35 31 32 3a 66  62 25 3f 51 25 3d 30 3a  |b%-512:fb%?Q%=0:|
000021a0  58 25 3d 30 3a 61 62 25  3d 30 3a 62 62 25 3d 31  |X%=0:ab%=0:bb%=1|
000021b0  3a 64 62 25 3d a3 3a 65  62 25 3d a3 3a f5 3a e7  |:db%=.:eb%=.:.:.|
000021c0  a4 73 28 c1 65 24 2c 31  2c 31 29 29 8c 0d 18 56  |.s(.e$,1,1))...V|
000021d0  13 65 24 3d c2 65 24 2c  a9 28 65 24 29 2d 31 29  |.e$=.e$,.(e$)-1)|
000021e0  0d 18 6a 0b cc 3a 65 62  25 3d b9 0d 18 7e 05 cd  |..j..:eb%=...~..|
000021f0  0d 18 7e 16 fd 65 62 25  3a e7 a7 65 24 2c 22 2c  |..~..eb%:..e$,",|
00002200  22 29 3c 3e 30 8c 0d 18  92 3d 62 62 25 3d 30 3a  |")<>0....=bb%=0:|
00002210  f5 3a 63 62 25 3d a7 65  24 2c 22 2c 22 2c 62 62  |.:cb%=.e$,",",bb|
00002220  25 29 3a 6e 24 3d c1 65  24 2c 62 62 25 2c 63 62  |%):n$=.e$,bb%,cb|
00002230  25 2d 62 62 25 29 3a e7  6e 24 3c 3e 22 20 2e 22  |%-bb%):.n$<>" ."|
00002240  8c f2 51 0d 18 c4 37 62  62 25 3d 63 62 25 2b 31  |..Q...7bb%=cb%+1|
00002250  3a fd a7 65 24 2c 22 2c  22 2c 62 62 25 29 3d 30  |:..e$,",",bb%)=0|
00002260  3a 6e 24 3d c1 65 24 2c  62 62 25 2c a9 28 65 24  |:n$=.e$,bb%,.(e$|
00002270  29 2d 28 62 62 25 2d 31  29 29 0d 18 ec 0b cc 3a  |)-(bb%-1)).....:|
00002280  6e 24 3d 65 24 0d 19 00  05 cd 0d 19 00 60 f2 51  |n$=e$........`.Q|
00002290  3a 51 25 3d 67 62 25 2b  35 31 32 3a 4f 25 3d 68  |:Q%=gb%+512:O%=h|
000022a0  61 3a e7 28 58 25 2a 32  34 29 3e 6a 62 25 8c 85  |a:.(X%*24)>jb%..|
000022b0  31 30 30 2c 22 46 6f 6e  74 20 6d 65 6e 75 20 61  |100,"Font menu a|
000022c0  72 65 61 20 66 75 6c 6c  20 2d 20 6e 6f 74 20 61  |rea full - not a|
000022d0  6c 6c 20 66 6f 6e 74 73  20 68 61 76 65 20 62 65  |ll fonts have be|
000022e0  65 6e 20 6c 69 73 74 65  64 22 0d 19 32 8a 68 62  |en listed"..2.hb|
000022f0  25 3d 6a 62 25 3a 21 69  61 3d 28 61 62 25 2b 31  |%=jb%:!ia=(ab%+1|
00002300  29 2a 31 36 3a c8 95 58  25 3e 30 3a 21 4f 25 3d  |)*16:..X%>0:!O%=|
00002310  30 3a 4f 25 21 34 3d 2d  31 3a 4f 25 21 38 3d 26  |0:O%!4=-1:O%!8=&|
00002320  37 30 30 39 30 30 31 84  32 35 37 3a 4f 25 21 31  |7009001.257:O%!1|
00002330  32 3d 51 25 2b 31 3a 4f  25 21 31 36 3d 30 3a 4f  |2=Q%+1:O%!16=0:O|
00002340  25 21 32 30 3d 3f 51 25  3a 51 25 2b 3d 31 2b 28  |%!20=?Q%:Q%+=1+(|
00002350  3f 51 25 29 3a 4f 25 2b  3d 32 34 3a 58 25 2d 3d  |?Q%):O%+=24:X%-=|
00002360  31 3a ce 3a 4f 25 2d 3d  32 34 3a 21 4f 25 3d 31  |1:.:O%-=24:!O%=1|
00002370  32 38 3a e1 0d 19 c8 67  dd f2 51 3a ea 68 24 2c  |28:....g..Q:.h$,|
00002380  6a 61 3a 51 25 3d 30 3a  58 3d a3 3a 67 61 3d a3  |ja:Q%=0:X=.:ga=.|
00002390  3a 66 62 25 21 51 25 3d  30 3a 6a 61 3d a3 3a f5  |:fb%!Q%=0:ja=.:.|
000023a0  3a 68 24 3d c2 6e 24 2c  31 29 3a e7 28 68 24 3d  |:h$=.n$,1):.(h$=|
000023b0  22 2e 22 29 84 28 68 24  3d 22 20 22 29 84 28 68  |".").(h$=" ").(h|
000023c0  24 3d 22 2c 22 29 8c 6e  24 3d c0 6e 24 2c a9 28  |$=",").n$=.n$,.(|
000023d0  6e 24 29 2d 31 29 8b 6a  61 3d b9 0d 1a 04 57 fd  |n$)-1).ja=....W.|
000023e0  6a 61 3a c8 95 51 25 3e  2d 31 3a 24 6a 25 3d 6e  |ja:..Q%>-1:$j%=n|
000023f0  24 2b bd 30 3a c8 99 22  4f 53 5f 47 42 50 42 22  |$+.0:.."OS_GBPB"|
00002400  2c 31 30 2c 6a 25 2c 65  25 2c 31 2c 66 62 25 3f  |,10,j%,e%,1,fb%?|
00002410  51 25 2c 32 35 35 b8 2c  2c 2c 5f 61 25 2c 6c 25  |Q%,255.,,,_a%,l%|
00002420  3a 66 62 25 3f 51 25 3d  6c 25 3a e7 6c 25 3d 2d  |:fb%?Q%=l%:.l%=-|
00002430  31 8c 0d 1a 40 11 e7 28  ac 58 29 80 28 51 25 3d  |1...@..(.X).(Q%=|
00002440  31 29 8c 0d 1a 4a 36 68  62 25 2d 3d a9 28 63 24  |1)...J6hb%-=.(c$|
00002450  29 2b 31 3a e7 68 62 25  3c 30 8c 85 31 30 31 30  |)+1:.hb%<0..1010|
00002460  31 2c 22 46 6f 6e 74 20  6e 61 6d 65 20 62 75 66  |1,"Font name buf|
00002470  66 65 72 20 66 75 6c 6c  22 0d 1a 5e 48 3f 4f 25  |fer full"..^H?O%|
00002480  3d a9 28 63 24 29 2b 31  3a 4f 25 2b 3d 31 3a 24  |=.(c$)+1:O%+=1:$|
00002490  4f 25 3d 63 24 2b bd 30  3a 4f 25 2b 3d 3f 28 4f  |O%=c$+.0:O%+=?(O|
000024a0  25 2d 31 29 3a 58 25 2b  3d 31 3a e7 61 62 25 3c  |%-1):X%+=1:.ab%<|
000024b0  a9 28 63 24 29 8c 61 62  25 3d a9 28 63 24 29 2b  |.(c$).ab%=.(c$)+|
000024c0  31 0d 1a 90 05 cd 0d 1a  9a 13 51 25 2d 3d 31 3a  |1.........Q%-=1:|
000024d0  e7 51 25 3d 30 8c 58 3d  a3 0d 1a ae 18 e7 51 25  |.Q%=0.X=......Q%|
000024e0  3e 2d 31 8c f2 52 28 6e  24 29 3a f2 52 28 63 24  |>-1..R(n$):.R(c$|
000024f0  29 0d 1a b8 32 cc 3a 66  24 3d a4 66 28 65 25 2b  |)...2.:f$=.f(e%+|
00002500  32 30 29 3a 60 61 25 3d  28 28 21 65 25 29 3e 3e  |20):`a%=((!e%)>>|
00002510  38 29 80 34 30 39 35 3a  e7 28 65 25 21 31 36 29  |8).4095:.(e%!16)|
00002520  3d 32 8c 0d 1a e0 26 6e  24 2b 3d 22 2e 22 2b 66  |=2....&n$+="."+f|
00002530  24 3a e7 63 24 3d 22 22  8c 63 24 3d 66 24 8b 63  |$:.c$="".c$=f$.c|
00002540  24 2b 3d 22 2e 22 2b 66  24 0d 1a fe 19 51 25 2b  |$+="."+f$....Q%+|
00002550  3d 31 3a 66 62 25 3f 51  25 3d 30 3a e7 51 25 3e  |=1:fb%?Q%=0:.Q%>|
00002560  31 8c 0d 1b 12 3a 58 3d  b9 3a 68 62 25 2d 3d a9  |1....:X=.:hb%-=.|
00002570  28 63 24 29 2b 31 3a e7  68 62 25 3c 30 8c 85 31  |(c$)+1:.hb%<0..1|
00002580  30 31 30 31 2c 22 46 6f  6e 74 20 6e 61 6d 65 20  |0101,"Font name |
00002590  62 75 66 66 65 72 20 66  75 6c 6c 22 0d 1b 30 48  |buffer full"..0H|
000025a0  3f 4f 25 3d a9 28 63 24  29 2b 31 3a 4f 25 2b 3d  |?O%=.(c$)+1:O%+=|
000025b0  31 3a 24 4f 25 3d 63 24  2b bd 30 3a 4f 25 2b 3d  |1:$O%=c$+.0:O%+=|
000025c0  3f 28 4f 25 2d 31 29 3a  58 25 2b 3d 31 3a e7 61  |?(O%-1):X%+=1:.a|
000025d0  62 25 3c a9 28 63 24 29  8c 61 62 25 3d a9 28 63  |b%<.(c$).ab%=.(c|
000025e0  24 29 2b 31 0d 1b 62 05  cd 0d 1b 6c 05 cd 0d 1b  |$)+1..b....l....|
000025f0  76 05 cd 0d 1b 80 07 ce  3a e1 0d 1b 94 24 dd f2  |v.......:....$..|
00002600  52 28 f8 73 24 29 3a ea  70 25 3a 70 25 3d a9 28  |R(.s$):.p%:p%=.(|
00002610  73 24 29 3a e7 28 73 24  3d 22 22 29 8c e1 0d 1b  |s$):.(s$="")....|
00002620  c6 10 e7 a7 73 24 2c 22  2e 22 29 3d 30 8c 0d 1b  |....s$,".")=0...|
00002630  d0 09 73 24 3d 22 22 0d  1b e4 29 cc 3a f5 3a 70  |..s$=""...).:.:p|
00002640  25 2d 3d 31 3a fd c1 73  24 2c 70 25 2c 31 29 3d  |%-=1:..s$,p%,1)=|
00002650  22 2e 22 3a 73 24 3d c0  73 24 2c 70 25 2d 31 29  |".":s$=.s$,p%-1)|
00002660  0d 1c 02 05 cd 0d 1c 02  05 e1 0d 1c 0c 16 dd f2  |................|
00002670  65 61 3a ea 6b 62 25 2c  62 24 3a c8 8e 66 61 ca  |ea:.kb%,b$:..fa.|
00002680  0d 1c 2a 87 c9 73 3a c8  99 22 57 69 6d 70 5f 47  |..*..s:.."Wimp_G|
00002690  65 74 50 6f 69 6e 74 65  72 49 6e 66 6f 22 2c 2c  |etPointerInfo",,|
000026a0  6a 25 3a 74 25 21 32 30  3d 6a 25 21 31 32 3a 74  |j%:t%!20=j%!12:t|
000026b0  25 21 32 34 3d 6a 25 21  31 36 3a 74 25 21 31 32  |%!24=j%!16:t%!12|
000026c0  3d 30 3a 74 25 21 31 36  3d 31 3a 74 25 21 32 38  |=0:t%!16=1:t%!28|
000026d0  3d 21 6a 25 3a 74 25 21  33 32 3d 6a 25 21 34 3a  |=!j%:t%!32=j%!4:|
000026e0  74 25 21 33 36 3d 6c 62  25 3a e7 28 6d 62 25 3d  |t%!36=lb%:.(mb%=|
000026f0  30 29 8c 74 25 21 34 30  3d 32 38 31 35 8b 74 25  |0).t%!40=2815.t%|
00002700  21 34 30 3d 35 31 32 0d  1c 8e 55 62 24 3d a4 61  |!40=512...Ub$=.a|
00002710  28 73 2c 30 29 3a 63 24  3d a4 70 28 62 24 29 2b  |(s,0):c$=.p(b$)+|
00002720  bd 30 3a 24 28 74 25 2b  34 34 29 3d 63 24 3a 21  |.0:$(t%+44)=c$:!|
00002730  74 25 3d 34 34 2b a9 28  63 24 29 3a e7 28 28 21  |t%=44+.(c$):.((!|
00002740  74 25 29 80 33 29 3c 3e  30 8c 21 74 25 3d 28 28  |t%).3)<>0.!t%=((|
00002750  21 74 25 29 80 28 ac 33  29 29 2b 34 0d 1c c0 45  |!t%).(.3))+4...E|
00002760  6e 62 25 3d b9 3a 6f 62  25 3d b9 3a 70 62 25 3d  |nb%=.:ob%=.:pb%=|
00002770  a3 3a c8 99 22 57 69 6d  70 5f 53 65 6e 64 4d 65  |.:.."Wimp_SendMe|
00002780  73 73 61 67 65 22 2c 31  38 2c 74 25 2c 74 25 21  |ssage",18,t%,t%!|
00002790  32 30 2c 74 25 21 32 34  3a 71 62 25 3d 74 25 21  |20,t%!24:qb%=t%!|
000027a0  38 0d 1c e8 10 c9 76 3a  62 61 25 3d 62 61 25 84  |8.....v:ba%=ba%.|
000027b0  31 0d 1c fc 23 7f 3a 85  32 30 30 31 2c 22 55 6e  |1...#.:.2001,"Un|
000027c0  65 78 70 65 63 74 65 64  20 64 72 61 67 20 65 76  |expected drag ev|
000027d0  65 6e 74 22 0d 1d 06 05  cb 0d 1d 06 05 e1 0d 1d  |ent"............|
000027e0  10 1e dd f2 68 61 3a ea  72 62 25 3a 72 62 25 3d  |....ha:.rb%:rb%=|
000027f0  65 25 21 31 36 3a c8 8e  72 62 25 ca 0d 1d 38 09  |e%!16:..rb%...8.|
00002800  c9 30 3a f2 74 0d 1d 56  12 c9 32 36 32 33 33 36  |.0:.t..V..262336|
00002810  3a c8 8e 56 61 25 ca 0d  1d 60 15 c9 4e 3a c8 8e  |:..Va%...`..N:..|
00002820  a4 6f 28 4e 2c 65 25 2b  33 32 29 ca 0d 1d 74 12  |.o(N,e%+32)...t.|
00002830  c9 22 49 6e 66 6f 22 3a  f2 46 28 6b 61 29 0d 1d  |."Info":.F(ka)..|
00002840  92 36 c9 22 47 72 61 70  68 22 3a f2 53 28 73 2c  |.6."Graph":.S(s,|
00002850  31 2c 22 66 69 6c 65 5f  41 46 46 22 29 3a f2 64  |1,"file_AFF"):.d|
00002860  28 73 2c 30 2c 74 24 29  3a f2 46 28 73 29 3a 6d  |(s,0,t$):.F(s):m|
00002870  62 25 3d 30 0d 1d c4 39  c9 22 44 61 74 61 46 69  |b%=0...9."DataFi|
00002880  6c 65 22 3a f2 53 28 73  2c 31 2c 22 66 69 6c 65  |le":.S(s,1,"file|
00002890  5f 32 30 30 22 29 3a f2  64 28 73 2c 30 2c 6a 24  |_200"):.d(s,0,j$|
000028a0  29 3a f2 46 28 73 29 3a  6d 62 25 3d 31 0d 1d f6  |):.F(s):mb%=1...|
000028b0  05 cb 0d 1d f6 05 cb 0d  1e 00 17 c9 32 3a 6f 62  |............2:ob|
000028c0  25 3d a3 3a e7 65 25 21  33 36 3d 2d 31 8c 0d 1e  |%=.:.e%!36=-1...|
000028d0  1e 0e 6c 61 3d a3 3a 70  62 25 3d a3 0d 1e 32 10  |..la=.:pb%=...2.|
000028e0  cc 3a 6c 61 3d b9 3a 70  62 25 3d b9 0d 1e 46 05  |.:la=.:pb%=...F.|
000028f0  cd 0d 1e 46 25 63 24 3d  a4 66 28 65 25 2b 34 34  |...F%c$=.f(e%+44|
00002900  29 3a f2 44 28 63 24 29  3a e7 6c 61 8c 75 24 3d  |):.D(c$):.la.u$=|
00002910  22 20 22 2b 63 24 0d 1e  64 42 21 74 25 3d 34 34  |" "+c$..dB!t%=44|
00002920  2b a9 28 63 24 29 2b 31  3a 24 28 74 25 2b 34 34  |+.(c$)+1:$(t%+44|
00002930  29 3d 63 24 2b bd 30 3a  e7 28 28 21 74 25 29 80  |)=c$+.0:.((!t%).|
00002940  33 29 3c 3e 30 8c 21 74  25 3d 28 28 21 74 25 29  |3)<>0.!t%=((!t%)|
00002950  80 28 ac 33 29 29 2b 34  0d 1e 82 3d 74 25 21 31  |.(.3))+4...=t%!1|
00002960  32 3d 74 25 21 38 3a 74  25 21 31 36 3d 33 3a c8  |2=t%!8:t%!16=3:.|
00002970  99 22 57 69 6d 70 5f 53  65 6e 64 4d 65 73 73 61  |."Wimp_SendMessa|
00002980  67 65 22 2c 31 38 2c 74  25 2c 74 25 21 32 30 2c  |ge",18,t%,t%!20,|
00002990  74 25 21 32 34 0d 1e aa  05 cb 0d 1e aa 05 e1 0d  |t%!24...........|
000029a0  1e b4 1e dd f2 69 61 3a  ea 72 62 25 3a 72 62 25  |.....ia:.rb%:rb%|
000029b0  3d 65 25 21 31 36 3a c8  8e 72 62 25 ca 0d 1e dc  |=e%!16:..rb%....|
000029c0  0a c9 38 3a e7 6b 8c 0d  1e f0 ae 65 25 21 31 32  |..8:.k.....e%!12|
000029d0  3d 65 25 21 38 3a 73 62  25 3d 65 25 21 34 3a c8  |=e%!8:sb%=e%!4:.|
000029e0  99 22 57 69 6d 70 5f 53  65 6e 64 4d 65 73 73 61  |."Wimp_SendMessa|
000029f0  67 65 22 2c 31 39 2c 65  25 2c 30 3a 6b 3d ac a4  |ge",19,e%,0:k=..|
00002a00  63 28 22 54 68 65 20 63  75 72 72 65 6e 74 20 67  |c("The current g|
00002a10  72 61 70 68 20 68 61 73  20 62 65 65 6e 20 65 64  |raph has been ed|
00002a20  69 74 65 64 20 62 75 74  20 6e 6f 74 20 73 61 76  |ited but not sav|
00002a30  65 64 20 2d 20 71 75 69  74 74 69 6e 67 20 77 69  |ed - quitting wi|
00002a40  6c 6c 20 6c 6f 73 65 20  74 68 65 73 65 20 63 68  |ll lose these ch|
00002a50  61 6e 67 65 73 20 70 65  72 6d 61 6e 65 6e 74 6c  |anges permanentl|
00002a60  79 2c 20 20 63 6f 6e 74  69 6e 75 65 20 3f 22 29  |y,  continue ?")|
00002a70  3a e7 ac 6b 8c 0d 1f 22  49 c8 99 22 57 69 6d 70  |:..k..."I.."Wimp|
00002a80  5f 47 65 74 43 61 72 65  74 50 6f 73 69 74 69 6f  |_GetCaretPositio|
00002a90  6e 22 2c 2c 6a 25 3a 6a  25 21 32 34 3d 35 30 38  |n",,j%:j%!24=508|
00002aa0  3a c8 99 22 57 69 6d 70  5f 53 65 6e 64 4d 65 73  |:.."Wimp_SendMes|
00002ab0  73 61 67 65 22 2c 38 2c  6a 25 2c 73 62 25 0d 1f  |sage",8,j%,sb%..|
00002ac0  4a 05 cd 0d 1f 4a 0b cc  3a f2 41 3a f2 74 0d 1f  |J....J..:.A:.t..|
00002ad0  72 05 cd 0d 1f 72 14 c9  33 2c 35 3a e7 65 25 21  |r....r..3,5:.e%!|
00002ae0  34 30 3d 35 31 32 8c 0d  1f 90 9c 65 25 21 31 32  |40=512.....e%!12|
00002af0  3d 65 25 21 38 3a 65 25  21 31 36 3d 34 3a c8 99  |=e%!8:e%!16=4:..|
00002b00  22 57 69 6d 70 5f 53 65  6e 64 4d 65 73 73 61 67  |"Wimp_SendMessag|
00002b10  65 22 2c 31 39 2c 65 25  2c 65 25 21 32 30 3a e7  |e",19,e%,e%!20:.|
00002b20  6b 8c 6b 3d ac a4 63 28  22 54 68 65 20 63 75 72  |k.k=..c("The cur|
00002b30  72 65 6e 74 20 66 69 6c  65 20 68 61 73 20 62 65  |rent file has be|
00002b40  65 6e 20 6d 6f 64 69 66  69 65 64 20 62 75 74 20  |en modified but |
00002b50  6e 6f 74 20 73 61 76 65  64 20 2d 20 63 6f 6e 74  |not saved - cont|
00002b60  69 6e 75 65 20 28 6c 6f  73 65 20 63 68 61 6e 67  |inue (lose chang|
00002b70  65 73 20 70 65 72 6d 61  6e 65 6e 74 6c 79 29 20  |es permanently) |
00002b80  3f 22 29 0d 1f c2 08 e7  ac 6b 8c 0d 1f cc 1b 75  |?")......k.....u|
00002b90  24 3d 22 20 22 2b a4 66  28 65 25 2b 34 34 29 3a  |$=" "+.f(e%+44):|
00002ba0  f2 54 28 75 24 29 0d 1f  ea 05 cd 0d 1f ea 05 cd  |.T(u$)..........|
00002bb0  0d 1f f4 20 c9 36 3a e7  28 6d 62 25 3d 30 29 80  |... .6:.(mb%=0).|
00002bc0  6f 62 25 80 28 71 62 25  3d 65 25 21 31 32 29 8c  |ob%.(qb%=e%!12).|
00002bd0  0d 20 12 15 e7 6e 62 25  8c f2 44 28 63 24 29 3a  |. ...nb%..D(c$):|
00002be0  6e 62 25 3d a3 0d 20 1c  74 65 25 21 31 32 3d 65  |nb%=.. .te%!12=e|
00002bf0  25 21 38 3a 74 62 25 3d  65 25 21 32 34 3a 75 62  |%!8:tb%=e%!24:ub|
00002c00  25 3d 65 25 21 32 30 3a  65 25 21 31 36 3d 37 3a  |%=e%!20:e%!16=7:|
00002c10  76 62 25 3d 77 62 25 2b  78 62 25 2d 79 62 25 3a  |vb%=wb%+xb%-yb%:|
00002c20  7a 62 25 3d a3 3a e7 28  74 62 25 3e 3d 76 62 25  |zb%=.:.(tb%>=vb%|
00002c30  29 8c 74 62 25 3d 76 62  25 3a 7a 62 25 3d b9 8b  |).tb%=vb%:zb%=..|
00002c40  e7 79 62 25 3e 3d 77 62  25 2b 78 62 25 8c 7a 62  |.yb%>=wb%+xb%.zb|
00002c50  25 3d b9 3a 74 62 25 3d  30 0d 20 58 5d c8 99 22  |%=.:tb%=0. X].."|
00002c60  57 69 6d 70 5f 54 72 61  6e 73 66 65 72 42 6c 6f  |Wimp_TransferBlo|
00002c70  63 6b 22 2c 41 62 25 2c  79 62 25 2c 65 25 21 34  |ck",Ab%,yb%,e%!4|
00002c80  2c 65 25 21 32 30 2c 74  62 25 3a 65 25 21 32 34  |,e%!20,tb%:e%!24|
00002c90  3d 74 62 25 3a 79 62 25  2b 3d 74 62 25 3a e7 7a  |=tb%:yb%+=tb%:.z|
00002ca0  62 25 8c 42 62 25 3d 31  37 3a 6f 62 25 3d a3 8b  |b%.Bb%=17:ob%=..|
00002cb0  42 62 25 3d 31 38 0d 20  80 34 21 65 25 3d 32 38  |Bb%=18. .4!e%=28|
00002cc0  3a c8 99 22 57 69 6d 70  5f 53 65 6e 64 4d 65 73  |:.."Wimp_SendMes|
00002cd0  73 61 67 65 22 2c 42 62  25 2c 65 25 2c 65 25 21  |sage",Bb%,e%,e%!|
00002ce0  34 3a 71 62 25 3d 65 25  21 38 0d 20 a8 05 cd 0d  |4:qb%=e%!8. ....|
00002cf0  20 a8 05 cb 0d 20 b2 05  e1 0d 20 bc 11 dd f2 6a  | .... .... ....j|
00002d00  61 3a c8 8e 65 25 21 31  36 ca 0d 20 d0 3e c9 37  |a:..e%!16.. .>.7|
00002d10  3a e7 65 25 21 34 3d 41  62 25 8c 85 32 30 30 32  |:.e%!4=Ab%..2002|
00002d20  2c 22 44 61 74 61 20 74  72 61 6e 73 66 65 72 20  |,"Data transfer |
00002d30  66 61 69 6c 65 64 20 3a  20 72 65 63 69 65 76 65  |failed : recieve|
00002d40  72 20 64 69 65 64 3f 22  0d 20 ee 05 cb 0d 20 f8  |r died?". .... .|
00002d50  05 e1 0d 21 02 2c dd f2  44 28 62 24 29 3a ea 48  |...!.,..D(b$):.H|
00002d60  25 2c 61 25 2c 62 25 3a  e7 c0 62 24 2c 31 29 3c  |%,a%,b%:..b$,1)<|
00002d70  3e 22 20 22 8c 62 24 3d  22 20 22 2b 62 24 0d 21  |>" ".b$=" "+b$.!|
00002d80  20 0b e7 6d 62 25 3d 30  8c 0d 21 2a 16 f2 72 61  | ..mb%=0..!*..ra|
00002d90  28 62 24 29 3a e7 70 62  25 8c 74 24 3d 62 24 0d  |(b$):.pb%.t$=b$.|
00002da0  21 3e 46 e7 28 ac 6f 62  25 29 8c ff 28 22 53 41  |!>F.(.ob%)..("SA|
00002db0  56 45 20 22 2b 62 24 2b  22 20 22 2b c3 7e 77 62  |VE "+b$+" "+.~wb|
00002dc0  25 2b 22 20 2b 22 2b c3  7e 78 62 25 29 3a ff 28  |%+" +"+.~xb%):.(|
00002dd0  22 53 45 54 54 59 50 45  20 22 2b 62 24 2b 22 20  |"SETTYPE "+b$+" |
00002de0  41 46 46 22 29 0d 21 48  dd cc 3a 6b 3d a3 3a 48  |AFF").!H..:k=.:H|
00002df0  25 3d ae 28 62 24 29 3a  f1 23 48 25 2c 6d 61 2c  |%=.(b$):.#H%,ma,|
00002e00  69 2c 6d 2c 4f 61 25 2c  6e 2c 43 2c 44 25 2c 6b  |i,m,Oa%,n,C,D%,k|
00002e10  25 2c 6c 24 2c 71 25 2c  53 25 2c 47 61 25 3a f1  |%,l$,q%,S%,Ga%:.|
00002e20  23 48 25 2c 61 24 28 30  29 2c 61 24 28 31 29 2c  |#H%,a$(0),a$(1),|
00002e30  61 24 28 32 29 2c 42 61  25 2c 43 61 25 3a e3 61  |a$(2),Ba%,Ca%:.a|
00002e40  25 3d 30 b8 39 3a f1 23  48 25 2c 63 24 28 61 25  |%=0.9:.#H%,c$(a%|
00002e50  29 3a e3 62 25 3d 30 b8  39 39 3a f1 23 48 25 2c  |):.b%=0.99:.#H%,|
00002e60  61 28 61 25 2c 62 25 2c  30 29 3a f1 23 48 25 2c  |a(a%,b%,0):.#H%,|
00002e70  61 28 61 25 2c 62 25 2c  31 29 3a ed 3a ed 3a e3  |a(a%,b%,1):.:.:.|
00002e80  61 25 3d 30 b8 39 39 3a  f1 23 48 25 2c 64 25 28  |a%=0.99:.#H%,d%(|
00002e90  61 25 29 2c 62 24 28 61  25 29 3a ed 3a e3 61 25  |a%),b$(a%):.:.a%|
00002ea0  3d 30 b8 35 3a f1 23 48  25 2c 64 24 28 61 25 29  |=0.5:.#H%,d$(a%)|
00002eb0  2c 63 25 28 61 25 29 2c  63 25 28 61 25 2b 36 29  |,c%(a%),c%(a%+6)|
00002ec0  3a ed 0d 21 d4 16 e7 6b  25 3d 39 8c f1 23 48 25  |:..!...k%=9..#H%|
00002ed0  2c 44 61 25 2c 45 61 25  0d 21 de 26 d9 23 48 25  |,Da%,Ea%.!.&.#H%|
00002ee0  3a ff 28 22 53 45 54 54  59 50 45 20 22 2b 62 24  |:.("SETTYPE "+b$|
00002ef0  2b 22 20 32 30 30 22 29  3a 6a 24 3d 62 24 0d 22  |+" 200"):j$=b$."|
00002f00  06 05 cd 0d 22 06 05 e1  0d 22 10 6c dd f2 54 28  |...."....".l..T(|
00002f10  62 24 29 3a ea 79 61 25  3a e7 6b 8c 6b 3d a4 63  |b$):.ya%:.k.k=.c|
00002f20  28 22 54 68 65 20 63 75  72 72 65 6e 74 20 67 72  |("The current gr|
00002f30  61 70 68 20 68 61 73 20  6e 6f 74 20 62 65 65 6e  |aph has not been|
00002f40  20 73 61 76 65 64 20 2d  20 63 6f 6e 74 69 6e 75  | saved - continu|
00002f50  69 6e 67 20 77 69 6c 6c  20 70 65 72 6d 61 6e 65  |ing will permane|
00002f60  6e 74 6c 20 6c 6f 73 65  20 69 6e 2e 20 20 4f 6b  |ntl lose in.  Ok|
00002f70  20 3f 22 29 0d 22 2e 08  e7 ac 6b 8c 0d 22 38 26  | ?")."....k.."8&|
00002f80  6a 24 3d 22 20 22 2b 62  24 3a 48 25 3d 8e 28 62  |j$=" "+b$:H%=.(b|
00002f90  24 29 3a e8 23 48 25 2c  6e 61 3a e7 6e 61 3c 6d  |$):.#H%,na:.na<m|
00002fa0  61 8c 0d 22 60 92 79 61  25 3d a4 63 28 22 57 61  |a.."`.ya%=.c("Wa|
00002fb0  72 6e 69 6e 67 20 3a 20  54 68 65 20 64 61 74 61  |rning : The data|
00002fc0  20 69 6e 20 74 68 69 73  20 66 69 6c 65 20 69 73  | in this file is|
00002fd0  20 66 72 6f 6d 20 61 6e  20 6f 6c 64 65 72 20 76  | from an older v|
00002fe0  65 72 73 69 6f 6e 20 6f  66 20 21 47 72 61 70 68  |ersion of !Graph|
00002ff0  65 72 20 49 49 20 61 6e  64 20 6d 61 79 20 6e 6f  |er II and may no|
00003000  74 20 62 65 20 72 65 61  64 20 63 6f 72 72 65 63  |t be read correc|
00003010  74 6c 79 20 2d 20 77 69  6c 6c 20 74 72 79 20 61  |tly - will try a|
00003020  6e 79 77 61 79 22 29 3a  e7 ac 79 61 25 8c d9 23  |nyway"):..ya%..#|
00003030  48 25 3a e1 0d 22 74 05  cd 0d 22 7e cb e8 23 48  |H%:.."t..."~..#H|
00003040  25 2c 69 2c 6d 2c 4f 61  25 2c 6e 2c 43 2c 44 25  |%,i,m,Oa%,n,C,D%|
00003050  2c 6b 25 2c 6c 24 2c 71  25 2c 53 25 2c 47 61 25  |,k%,l$,q%,S%,Ga%|
00003060  3a e8 23 48 25 2c 61 24  28 30 29 2c 61 24 28 31  |:.#H%,a$(0),a$(1|
00003070  29 2c 61 24 28 32 29 2c  42 61 25 2c 43 61 25 3a  |),a$(2),Ba%,Ca%:|
00003080  e3 61 25 3d 30 b8 39 3a  e8 23 48 25 2c 63 24 28  |.a%=0.9:.#H%,c$(|
00003090  61 25 29 3a e3 62 25 3d  30 b8 39 39 3a e8 23 48  |a%):.b%=0.99:.#H|
000030a0  25 2c 61 28 61 25 2c 62  25 2c 30 29 3a e8 23 48  |%,a(a%,b%,0):.#H|
000030b0  25 2c 61 28 61 25 2c 62  25 2c 31 29 3a ed 3a ed  |%,a(a%,b%,1):.:.|
000030c0  3a e3 61 25 3d 30 b8 39  39 3a e8 23 48 25 2c 64  |:.a%=0.99:.#H%,d|
000030d0  25 28 61 25 29 2c 62 24  28 61 25 29 3a ed 3a e3  |%(a%),b$(a%):.:.|
000030e0  61 25 3d 30 b8 35 3a e8  23 48 25 2c 64 24 28 61  |a%=0.5:.#H%,d$(a|
000030f0  25 29 2c 63 25 28 61 25  29 2c 63 25 28 61 25 2b  |%),c%(a%),c%(a%+|
00003100  36 29 3a ed 0d 22 ec 16  e7 6b 25 3d 39 8c e8 23  |6):.."...k%=9..#|
00003110  48 25 2c 44 61 25 2c 45  61 25 0d 22 f6 15 d9 23  |H%,Da%,Ea%."...#|
00003120  48 25 3a e7 6d 25 3e 30  8c f2 65 28 6d 25 29 0d  |H%:.m%>0..e(m%).|
00003130  23 0a 10 e7 4d 25 3e 30  8c f2 65 28 4d 25 29 0d  |#...M%>0..e(M%).|
00003140  23 14 05 cd 0d 23 1e 08  f2 4d 3a e1 0d 23 32 29  |#....#...M:..#2)|
00003150  dd f2 72 61 28 62 24 29  3a c8 99 22 48 6f 75 72  |..ra(b$):.."Hour|
00003160  67 6c 61 73 73 5f 4f 6e  22 3a e7 ac 47 61 25 8c  |glass_On":..Ga%.|
00003170  53 25 3d 2d 31 0d 23 50  5a e7 6b 25 3c 31 32 8c  |S%=-1.#PZ.k%<12.|
00003180  78 62 25 3d a4 74 28 77  2c 68 2c 69 2c 6d 2c 4f  |xb%=.t(w,h,i,m,O|
00003190  61 25 2c 6b 25 2c 44 25  2c 71 25 2b 31 2c 64 25  |a%,k%,D%,q%+1,d%|
000031a0  28 29 2c 61 28 29 2c 62  24 28 29 2c 30 2c 63 24  |(),a(),b$(),0,c$|
000031b0  28 29 2c 62 24 2c 77 62  25 2c 6c 62 25 2c 64 24  |(),b$,wb%,lb%,d$|
000031c0  28 29 2c 63 25 28 29 2c  53 25 2c 4e 61 25 29 0d  |(),c%(),S%,Na%).|
000031d0  23 5a 4a e7 6b 25 3e 31  31 8c 78 62 25 3d a4 75  |#ZJ.k%>11.xb%=.u|
000031e0  28 61 28 29 2c 64 25 28  29 2c 64 24 28 29 2c 63  |(a(),d%(),d$(),c|
000031f0  25 28 29 2c 62 24 28 29  2c 61 28 30 2c 30 2c 30  |%(),b$(),a(0,0,0|
00003200  29 2c 77 2c 68 2c 42 61  25 2c 43 61 25 2c 77 62  |),w,h,Ba%,Ca%,wb|
00003210  25 2c 6c 62 25 2c 62 24  29 0d 23 64 21 c8 99 22  |%,lb%,b$).#d!.."|
00003220  48 6f 75 72 67 6c 61 73  73 5f 53 6d 61 73 68 22  |Hourglass_Smash"|
00003230  3a 79 62 25 3d 77 62 25  3a e1 0d 23 82 0f dd f2  |:yb%=wb%:..#....|
00003240  73 61 3a c8 8e 21 65 25  ca 0d 23 96 35 c9 33 3a  |sa:..!e%..#.5.3:|
00003250  85 32 30 30 33 2c 22 44  61 74 61 20 74 72 61 6e  |.2003,"Data tran|
00003260  73 66 65 72 20 66 61 69  6c 65 64 20 3a 20 72 65  |sfer failed : re|
00003270  63 69 65 76 65 72 20 64  69 65 64 20 3f 22 0d 23  |ciever died ?".#|
00003280  be 05 cb 0d 23 be 05 e1  0d 23 c8 86 dd f2 45 3a  |....#....#....E:|
00003290  4e 25 3d 30 3a 75 25 3d  31 3a 71 25 3d 30 3a 77  |N%=0:u%=1:q%=0:w|
000032a0  3d 32 33 3a 68 3d 31 38  3a 61 28 29 3d 30 3a 61  |=23:h=18:a()=0:a|
000032b0  24 28 29 3d 22 4e 6f 6e  65 22 3a e3 61 25 3d 30  |$()="None":.a%=0|
000032c0  b8 39 39 3a 62 24 28 61  25 29 3d 22 43 6f 6c 75  |.99:b$(a%)="Colu|
000032d0  6d 6e 20 22 2b c3 61 25  3a ed 3a e3 61 25 3d 30  |mn "+.a%:.:.a%=0|
000032e0  b8 39 3a 63 24 28 61 25  29 3d 22 44 61 74 61 73  |.9:c$(a%)="Datas|
000032f0  65 74 20 22 2b c3 61 25  3a ed 3a 47 61 25 3d a3  |et "+.a%:.:Ga%=.|
00003300  3a 44 61 25 3d a3 3a 45  61 25 3d a3 3a e1 0d 24  |:Da%=.:Ea%=.:..$|
00003310  18 ec dd f2 60 3a ea 43  62 25 2c 44 62 25 2c 45  |....`:.Cb%,Db%,E|
00003320  62 25 2c 46 62 25 2c 47  62 25 2c 61 25 2c 6c 25  |b%,Fb%,Gb%,a%,l%|
00003330  3a de 48 62 25 20 32 32  2a 31 30 32 34 3a de 64  |:.Hb% 22*1024:.d|
00003340  24 28 36 29 2c 63 25 28  31 32 29 2c 64 25 28 39  |$(6),c%(12),d%(9|
00003350  39 29 2c 61 28 39 2c 39  39 2c 31 29 2c 62 24 28  |9),a(9,99,1),b$(|
00003360  39 39 29 2c 63 24 28 39  29 2c 61 24 28 32 29 2c  |99),c$(9),a$(2),|
00003370  66 24 28 39 39 29 3a de  77 62 25 20 38 30 2a 31  |f$(99):.wb% 80*1|
00003380  30 32 34 2c 67 62 25 20  38 2a 31 30 32 34 3a 69  |024,gb% 8*1024:i|
00003390  3d 30 3a 6d 3d 31 30 30  3a 6e 3d 30 3a 43 3d 31  |=0:m=100:n=0:C=1|
000033a0  30 30 3a 6b 25 3d 30 3a  4f 61 25 3d 31 31 3a 44  |00:k%=0:Oa%=11:D|
000033b0  25 3d 35 3a 4e 61 25 3d  32 3a 6d 61 3d 32 33 34  |%=5:Na%=2:ma=234|
000033c0  3a 64 25 28 29 3d 2d 32  35 36 3a 53 25 3d 30 3a  |:d%()=-256:S%=0:|
000033d0  6c 24 3d 22 4f 76 65 72  6c 61 79 22 3a 64 24 28  |l$="Overlay":d$(|
000033e0  29 3d 22 54 72 69 6e 69  74 79 2e 4d 65 64 69 75  |)="Trinity.Mediu|
000033f0  6d 22 3a 63 25 28 29 3d  31 34 0d 24 68 de 64 24  |m":c%()=14.$h.d$|
00003400  28 30 29 3d 22 54 72 69  6e 69 74 79 2e 42 6f 6c  |(0)="Trinity.Bol|
00003410  64 22 3a 63 25 28 30 29  3d 33 36 3a 63 25 28 31  |d":c%(0)=36:c%(1|
00003420  29 3d 33 36 3a f2 45 3a  42 61 25 3d 30 3a 43 61  |)=36:.E:Ba%=0:Ca|
00003430  25 3d 30 3a 43 62 25 3d  32 5e 37 3a 45 62 25 3d  |%=0:Cb%=2^7:Eb%=|
00003440  32 3a 44 62 25 3d 31 3a  46 62 25 3d 34 3a 47 62  |2:Db%=1:Fb%=4:Gb|
00003450  25 3d 38 3a 49 62 25 3d  31 30 32 34 3a 4a 62 25  |%=8:Ib%=1024:Jb%|
00003460  3d 34 38 2a 49 62 25 3a  4b 62 25 3d 30 3a 56 61  |=48*Ib%:Kb%=0:Va|
00003470  25 3d a3 3a 66 61 3d 30  3a 4c 62 25 3d 34 3a 57  |%=.:fa=0:Lb%=4:W|
00003480  61 25 3d 31 3a 53 61 25  3d 32 3a 62 61 25 3d 36  |a%=1:Sa%=2:ba%=6|
00003490  31 39 33 3a 54 61 25 3d  37 3a f2 74 61 3a 6a 62  |193:Ta%=7:.ta:jb|
000034a0  25 3d 37 2a 49 62 25 3a  6c 62 25 3d 38 30 2a 49  |%=7*Ib%:lb%=80*I|
000034b0  62 25 3a 6f 62 25 3d a3  3a 69 62 25 3d 38 2a 31  |b%:ob%=.:ib%=8*1|
000034c0  30 32 34 3a f2 75 61 28  48 62 25 2c 32 32 2a 31  |024:.ua(Hb%,22*1|
000034d0  30 32 34 29 3a f2 76 61  0d 24 f4 d4 4a 25 3d 30  |024):.va.$..J%=0|
000034e0  3a 6b 3d a3 3a 57 25 3d  30 3a 4d 25 3d 30 3a 6d  |:k=.:W%=0:M%=0:m|
000034f0  25 3d 30 3a 6a 24 3d 22  47 72 61 70 68 44 65 66  |%=0:j$="GraphDef|
00003500  22 3a 74 24 3d 22 47 72  61 70 68 22 3a f2 77 61  |":t$="Graph":.wa|
00003510  3a f2 6e 61 3a c8 99 22  4f 53 5f 47 53 54 72 61  |:.na:.."OS_GSTra|
00003520  6e 73 22 2c 22 3c 46 6f  6e 74 24 50 61 74 68 3e  |ns","<Font$Path>|
00003530  22 2c 6a 25 2c 32 35 34  b8 2c 2c 6c 25 3a 6a 25  |",j%,254.,,l%:j%|
00003540  3f 6c 25 3d 33 32 3a 6a  25 3f 28 6c 25 2b 31 29  |?l%=32:j%?(l%+1)|
00003550  3d 31 33 3a 65 24 3d 28  24 6a 25 29 3a e7 a9 28  |=13:e$=($j%):..(|
00003560  65 24 29 3c 34 8c 85 39  39 2c 22 46 6f 6e 74 24  |e$)<4..99,"Font$|
00003570  50 61 74 68 20 4e 6f 74  20 44 65 66 69 6e 65 64  |Path Not Defined|
00003580  20 2d 20 4f 70 65 6e 20  44 69 72 65 63 74 6f 72  | - Open Director|
00003590  79 20 44 69 73 70 6c 61  79 20 43 6f 6e 74 61 69  |y Display Contai|
000035a0  6e 69 6e 67 20 21 46 6f  6e 74 73 22 0d 25 4e 08  |ning !Fonts".%N.|
000035b0  f2 50 3a e1 0d 25 62 af  dd f2 74 61 3a 21 65 25  |.P:..%b...ta:!e%|
000035c0  3d 2d 31 3a 65 25 21 34  3d 30 3a 65 25 21 38 3d  |=-1:e%!4=0:e%!8=|
000035d0  2d 36 3a 65 25 21 31 32  3d 31 31 2a 31 36 3a 65  |-6:e%!12=11*16:e|
000035e0  25 21 31 36 3d 39 38 3a  65 25 21 32 30 3d 33 38  |%!16=98:e%!20=38|
000035f0  35 38 38 38 35 32 33 3a  65 25 21 32 34 3d 4d 62  |5888523:e%!24=Mb|
00003600  25 3a 24 4d 62 25 3d 6c  24 2b bd 30 3a 24 28 4d  |%:$Mb%=l$+.0:$(M|
00003610  62 25 2b 31 35 29 3d 22  53 21 47 72 61 70 68 65  |b%+15)="S!Graphe|
00003620  72 a0 32 22 2b bd 30 3a  65 25 21 32 38 3d 4d 62  |r.2"+.0:e%!28=Mb|
00003630  25 2b 31 35 3a 65 25 21  33 32 3d 31 34 3a 76 61  |%+15:e%!32=14:va|
00003640  25 3d 4d 62 25 3a c8 99  22 57 69 6d 70 5f 43 72  |%=Mb%:.."Wimp_Cr|
00003650  65 61 74 65 49 63 6f 6e  22 2c 2c 65 25 b8 77 61  |eateIcon",,e%.wa|
00003660  25 3a e1 0d 25 e4 48 dd  f2 77 61 3a ea 4e 62 25  |%:..%.H..wa:.Nb%|
00003670  2c 67 24 3a c8 99 22 4f  53 5f 47 65 74 45 6e 76  |,g$:.."OS_GetEnv|
00003680  22 b8 4e 62 25 3a 67 24  3d a4 66 28 4e 62 25 29  |".Nb%:g$=.f(Nb%)|
00003690  3a 4e 62 25 3d a7 67 24  2c 22 2d 6c 6f 61 64 20  |:Nb%=.g$,"-load |
000036a0  22 29 3a e7 4e 62 25 3c  3e 30 8c 0d 26 20 34 6a  |"):.Nb%<>0..& 4j|
000036b0  24 3d c2 67 24 2c a9 28  67 24 29 2d 28 4e 62 25  |$=.g$,.(g$)-(Nb%|
000036c0  2b 34 29 29 3a f2 54 28  6a 24 29 3a c8 99 22 48  |+4)):.T(j$):.."H|
000036d0  6f 75 72 67 6c 61 73 73  5f 53 6d 61 73 68 22 0d  |ourglass_Smash".|
000036e0  26 48 05 cd 0d 26 48 05  e1 0d 26 52 c8 dd f2 76  |&H...&H...&R...v|
000036f0  61 3a ea 4f 62 25 3a 4f  62 25 3d 6f 61 3a f2 78  |a:.Ob%:Ob%=oa:.x|
00003700  61 28 22 3c 4f 62 65 79  24 44 69 72 3e 2e 54 65  |a("<Obey$Dir>.Te|
00003710  6d 70 6c 61 74 65 73 22  29 3a f2 71 28 73 2c 4f  |mplates"):.q(s,O|
00003720  62 25 2c 4b 2c 2d 31 2c  22 73 61 76 65 22 29 3a  |b%,K,-1,"save"):|
00003730  f2 71 28 6b 61 2c 4f 62  25 2c 4b 2c 2d 31 2c 22  |.q(ka,Ob%,K,-1,"|
00003740  69 6e 66 6f 22 29 3a f2  71 28 70 61 2c 4f 62 25  |info"):.q(pa,Ob%|
00003750  2c 4b 2c 2d 31 2c 22 71  75 65 72 79 22 29 3a f2  |,K,-1,"query"):.|
00003760  71 28 63 2c 4f 62 25 2c  4b 2c 2d 31 2c 22 64 65  |q(c,Ob%,K,-1,"de|
00003770  64 69 74 61 22 29 3a f2  71 28 65 2c 4f 62 25 2c  |dita"):.q(e,Ob%,|
00003780  4b 2c 2d 31 2c 22 61 78  69 73 64 65 74 73 22 29  |K,-1,"axisdets")|
00003790  3a f2 71 28 76 2c 4f 62  25 2c 4b 2c 2d 31 2c 22  |:.q(v,Ob%,K,-1,"|
000037a0  63 6f 6c 6f 75 72 73 65  6c 22 29 3a f2 79 61 3a  |coloursel"):.ya:|
000037b0  e1 0d 26 ca c7 dd f2 75  61 28 50 62 25 2c 51 62  |..&....ua(Pb%,Qb|
000037c0  25 29 3a 52 62 25 3d 38  3a 7a 62 25 3d 31 30 3a  |%):Rb%=8:zb%=10:|
000037d0  e3 53 62 25 3d 52 62 25  b8 7a 62 25 88 7a 62 25  |.Sb%=Rb%.zb%.zb%|
000037e0  2d 52 62 25 3a 50 25 3d  50 62 25 3a 4c 25 3d 50  |-Rb%:P%=Pb%:L%=P|
000037f0  62 25 2b 51 62 25 3a 5b  4f 50 54 20 53 62 25 3a  |b%+Qb%:[OPT Sb%:|
00003800  2e 71 61 20 73 74 72 32  2c 5b 30 5d 2c 23 34 3a  |.qa str2,[0],#4:|
00003810  73 75 62 73 31 2c 31 2c  23 34 3a 62 67 74 20 71  |subs1,1,#4:bgt q|
00003820  61 3a 6d 6f 76 31 35 2c  31 34 3a 2e 4e 20 45 51  |a:mov15,14:.N EQ|
00003830  55 53 22 47 72 61 70 68  65 72 20 49 49 22 2b bd  |US"Grapher II"+.|
00003840  30 2b 22 20 22 3a 45 51  55 42 37 3a 45 51 55 42  |0+" ":EQUB7:EQUB|
00003850  32 3a 45 51 55 42 37 3a  45 51 55 42 30 3a 2e 72  |2:EQUB7:EQUB0:.r|
00003860  61 20 45 51 55 44 31 31  2a 31 36 3a 45 51 55 44  |a EQUD11*16:EQUD|
00003870  34 34 3a 45 51 55 44 30  0d 27 b0 ec 2e 73 61 20  |44:EQUD0.'...sa |
00003880  45 51 55 44 20 47 62 25  3a 45 51 55 44 31 3a 45  |EQUD Gb%:EQUD1:E|
00003890  51 55 44 26 37 30 30 39  30 30 31 3a 45 51 55 53  |QUD&7009001:EQUS|
000038a0  22 49 6e 66 6f 22 2b bd  30 2b 22 20 20 20 20 20  |"Info"+.0+"     |
000038b0  20 20 22 3a 45 51 55 44  30 3a 45 51 55 44 20 74  |  ":EQUD0:EQUD t|
000038c0  61 3a 45 51 55 44 26 37  30 30 39 30 30 31 3a 45  |a:EQUD&7009001:E|
000038d0  51 55 53 22 47 72 61 70  68 20 54 79 70 65 22 2b  |QUS"Graph Type"+|
000038e0  bd 30 2b 22 20 22 3a 45  51 55 44 30 3a 45 51 55  |.0+" ":EQUD0:EQU|
000038f0  44 2d 31 3a 45 51 55 44  26 37 30 30 39 30 30 31  |D-1:EQUD&7009001|
00003900  3a 45 51 55 53 22 45 64  69 74 20 41 78 69 73 22  |:EQUS"Edit Axis"|
00003910  2b bd 30 2b 22 20 20 22  3a 45 51 55 44 30 3a 45  |+.0+"  ":EQUD0:E|
00003920  51 55 44 2d 31 3a 45 51  55 44 26 37 30 30 39 30  |QUD-1:EQUD&70090|
00003930  30 31 3a 45 51 55 53 22  45 64 69 74 20 44 61 74  |01:EQUS"Edit Dat|
00003940  61 22 2b bd 30 2b 22 20  20 22 3a 45 51 55 44 30  |a"+.0+"  ":EQUD0|
00003950  3a 45 51 55 44 2d 31 3a  45 51 55 44 26 37 30 30  |:EQUD-1:EQUD&700|
00003960  39 30 30 31 0d 28 78 d3  45 51 55 53 22 52 65 73  |9001.(x.EQUS"Res|
00003970  65 74 22 2b bd 30 2b 22  20 20 20 20 20 20 22 3a  |et"+.0+"      ":|
00003980  45 51 55 44 30 3a 45 51  55 44 20 75 61 3a 45 51  |EQUD0:EQUD ua:EQ|
00003990  55 44 26 37 30 30 39 30  30 31 3a 45 51 55 53 22  |UD&7009001:EQUS"|
000039a0  53 61 76 65 22 2b bd 30  2b 22 20 20 20 20 20 20  |Save"+.0+"      |
000039b0  20 22 3a 45 51 55 44 20  43 62 25 3a 45 51 55 44  | ":EQUD Cb%:EQUD|
000039c0  2d 31 3a 45 51 55 44 26  37 30 30 39 30 30 31 3a  |-1:EQUD&7009001:|
000039d0  45 51 55 53 22 51 75 69  74 22 2b bd 30 2b 22 20  |EQUS"Quit"+.0+" |
000039e0  20 20 20 20 20 20 22 3a  41 4c 49 47 4e 3a 2e 74  |      ":ALIGN:.t|
000039f0  61 20 45 51 55 53 22 47  72 61 70 68 20 54 79 70  |a EQUS"Graph Typ|
00003a00  65 22 2b bd 30 2b 22 20  22 3a 45 51 55 42 37 3a  |e"+.0+" ":EQUB7:|
00003a10  45 51 55 42 32 3a 45 51  55 42 37 3a 45 51 55 42  |EQUB2:EQUB7:EQUB|
00003a20  30 3a 45 51 55 44 38 2a  31 36 3a 45 51 55 44 34  |0:EQUD8*16:EQUD4|
00003a30  34 3a 45 51 55 44 30 0d  29 40 d6 45 51 55 44 30  |4:EQUD0.)@.EQUD0|
00003a40  3a 45 51 55 44 20 76 61  3a 45 51 55 44 26 37 30  |:EQUD va:EQUD&70|
00003a50  30 39 30 30 31 3a 45 51  55 53 22 42 61 72 22 2b  |09001:EQUS"Bar"+|
00003a60  bd 30 2b 22 20 20 20 20  20 20 20 20 22 3a 45 51  |.0+"        ":EQ|
00003a70  55 44 30 3a 45 51 55 44  20 77 61 3a 45 51 55 44  |UD0:EQUD wa:EQUD|
00003a80  26 37 30 30 39 30 30 31  3a 45 51 55 53 22 4c 69  |&7009001:EQUS"Li|
00003a90  6e 65 22 2b bd 30 2b 22  20 20 20 20 20 20 20 22  |ne"+.0+"       "|
00003aa0  3a 45 51 55 44 30 3a 45  51 55 44 2d 31 3a 45 51  |:EQUD0:EQUD-1:EQ|
00003ab0  55 44 26 37 30 30 39 30  30 31 3a 45 51 55 53 22  |UD&7009001:EQUS"|
00003ac0  53 63 61 74 74 65 72 22  2b bd 30 2b 22 20 20 20  |Scatter"+.0+"   |
00003ad0  20 22 3a 45 51 55 44 20  43 62 25 3a 45 51 55 44  | ":EQUD Cb%:EQUD|
00003ae0  2d 31 3a 45 51 55 44 26  37 30 30 39 30 30 31 3a  |-1:EQUD&7009001:|
00003af0  45 51 55 53 22 50 69 65  22 2b bd 30 2b 22 20 20  |EQUS"Pie"+.0+"  |
00003b00  20 20 20 20 20 20 22 3a  41 4c 49 47 4e 0d 29 f4  |      ":ALIGN.).|
00003b10  f1 2e 76 61 20 45 51 55  53 22 42 61 72 67 72 61  |..va EQUS"Bargra|
00003b20  70 68 22 2b bd 30 2b 22  20 20 20 22 3a 45 51 55  |ph"+.0+"   ":EQU|
00003b30  42 37 3a 45 51 55 42 32  3a 45 51 55 42 37 3a 45  |B7:EQUB2:EQUB7:E|
00003b40  51 55 42 30 3a 45 51 55  44 31 32 2a 31 36 3a 45  |QUB0:EQUD12*16:E|
00003b50  51 55 44 34 34 3a 45 51  55 44 30 3a 45 51 55 44  |QUD44:EQUD0:EQUD|
00003b60  30 3a 45 51 55 44 2d 31  3a 45 51 55 44 26 37 30  |0:EQUD-1:EQUD&70|
00003b70  30 39 30 30 31 3a 45 51  55 53 22 33 2d 44 22 2b  |09001:EQUS"3-D"+|
00003b80  bd 30 2b 22 20 20 20 20  20 20 20 20 22 3a 45 51  |.0+"        ":EQ|
00003b90  55 44 30 3a 45 51 55 44  2d 31 3a 45 51 55 44 26  |UD0:EQUD-1:EQUD&|
00003ba0  37 30 30 39 30 30 31 3a  45 51 55 53 22 53 69 64  |7009001:EQUS"Sid|
00003bb0  65 42 79 53 69 64 65 22  2b bd 30 2b 22 20 22 3a  |eBySide"+.0+" ":|
00003bc0  45 51 55 44 30 3a 45 51  55 44 2d 31 3a 45 51 55  |EQUD0:EQUD-1:EQU|
00003bd0  44 26 37 30 30 39 30 30  31 3a 45 51 55 53 22 4f  |D&7009001:EQUS"O|
00003be0  76 65 72 6c 61 79 22 2b  bd 30 2b 22 20 20 20 20  |verlay"+.0+"    |
00003bf0  22 3a 45 51 55 44 30 3a  45 51 55 44 2d 31 0d 2a  |":EQUD0:EQUD-1.*|
00003c00  e4 ed 45 51 55 44 26 37  30 30 39 30 30 31 3a 45  |..EQUD&7009001:E|
00003c10  51 55 53 22 43 6f 6d 70  6f 75 6e 64 22 2b bd 30  |QUS"Compound"+.0|
00003c20  2b 22 20 20 20 22 3a 45  51 55 44 30 3a 45 51 55  |+"   ":EQUD0:EQU|
00003c30  44 2d 31 3a 45 51 55 44  26 37 30 30 39 30 30 31  |D-1:EQUD&7009001|
00003c40  3a 45 51 55 53 22 33 44  20 43 6f 6d 70 6f 75 6e  |:EQUS"3D Compoun|
00003c50  64 22 2b bd 30 3a 45 51  55 44 30 3a 45 51 55 44  |d"+.0:EQUD0:EQUD|
00003c60  2d 31 3a 45 51 55 44 26  37 30 30 39 30 30 31 3a  |-1:EQUD&7009001:|
00003c70  45 51 55 53 22 43 6f 6d  70 6f 75 6e 64 20 25 22  |EQUS"Compound %"|
00003c80  2b bd 30 2b 22 20 22 3a  45 51 55 44 30 3a 45 51  |+.0+" ":EQUD0:EQ|
00003c90  55 44 2d 31 3a 45 51 55  44 26 37 30 30 39 30 30  |UD-1:EQUD&700900|
00003ca0  31 3a 45 51 55 53 22 33  44 20 43 6f 6d 70 20 25  |1:EQUS"3D Comp %|
00003cb0  22 2b bd 30 2b 22 20 20  22 3a 45 51 55 44 30 3a  |"+.0+"  ":EQUD0:|
00003cc0  45 51 55 44 2d 31 3a 45  51 55 44 26 37 30 30 39  |EQUD-1:EQUD&7009|
00003cd0  30 30 31 3a 45 51 55 53  22 4c 69 6e 65 22 2b bd  |001:EQUS"Line"+.|
00003ce0  30 2b 22 20 20 20 20 20  20 20 22 0d 2b 98 ea 45  |0+"       ".+..E|
00003cf0  51 55 44 20 43 62 25 3a  45 51 55 44 2d 31 3a 45  |QUD Cb%:EQUD-1:E|
00003d00  51 55 44 26 37 30 30 39  30 30 31 3a 45 51 55 53  |QUD&7009001:EQUS|
00003d10  22 4c 69 6e 65 2b 50 6f  69 6e 74 73 22 2b bd 30  |"Line+Points"+.0|
00003d20  3a 41 4c 49 47 4e 3a 2e  77 61 20 45 51 55 53 22  |:ALIGN:.wa EQUS"|
00003d30  4c 69 6e 65 67 72 61 70  68 22 2b bd 30 2b 22 20  |Linegraph"+.0+" |
00003d40  20 22 3a 45 51 55 42 37  3a 45 51 55 42 32 3a 45  | ":EQUB7:EQUB2:E|
00003d50  51 55 42 37 3a 45 51 55  42 30 3a 45 51 55 44 31  |QUB7:EQUB0:EQUD1|
00003d60  32 2a 31 36 3a 45 51 55  44 34 34 3a 45 51 55 44  |2*16:EQUD44:EQUD|
00003d70  30 3a 45 51 55 44 30 3a  45 51 55 44 2d 31 3a 45  |0:EQUD0:EQUD-1:E|
00003d80  51 55 44 26 37 30 30 39  30 30 31 3a 45 51 55 53  |QUD&7009001:EQUS|
00003d90  22 4c 69 6e 65 20 4f 6e  6c 79 22 2b bd 30 2b 22  |"Line Only"+.0+"|
00003da0  20 20 22 3a 45 51 55 44  20 43 62 25 3a 45 51 55  |  ":EQUD Cb%:EQU|
00003db0  44 2d 31 3a 45 51 55 44  26 37 30 30 39 30 30 31  |D-1:EQUD&7009001|
00003dc0  3a 45 51 55 53 22 4c 69  6e 65 2b 70 6f 69 6e 74  |:EQUS"Line+point|
00003dd0  73 22 2b bd 30 0d 2c 88  ef 2e 75 61 20 45 51 55  |s"+.0.,...ua EQU|
00003de0  53 22 53 61 76 65 22 2b  bd 30 2b 22 20 20 20 20  |S"Save"+.0+"    |
00003df0  20 20 20 22 3a 45 51 55  42 37 3a 45 51 55 42 32  |   ":EQUB7:EQUB2|
00003e00  3a 45 51 55 42 37 3a 45  51 55 42 30 3a 45 51 55  |:EQUB7:EQUB0:EQU|
00003e10  44 39 2a 31 36 3a 45 51  55 44 34 34 3a 45 51 55  |D9*16:EQUD44:EQU|
00003e20  44 30 3a 45 51 55 44 20  47 62 25 3a 45 51 55 44  |D0:EQUD Gb%:EQUD|
00003e30  31 3a 45 51 55 44 26 37  30 30 39 30 30 31 3a 45  |1:EQUD&7009001:E|
00003e40  51 55 53 22 47 72 61 70  68 22 2b bd 30 2b 22 20  |QUS"Graph"+.0+" |
00003e50  20 20 20 20 20 22 3a 45  51 55 44 20 43 62 25 20  |     ":EQUD Cb% |
00003e60  84 20 47 62 25 3a 45 51  55 44 31 3a 45 51 55 44  |. Gb%:EQUD1:EQUD|
00003e70  26 37 30 30 39 30 30 31  3a 45 51 55 53 22 44 61  |&7009001:EQUS"Da|
00003e80  74 61 46 69 6c 65 22 2b  bd 30 2b 22 20 20 20 22  |taFile"+.0+"   "|
00003e90  3a 41 4c 49 47 4e 3a 2e  65 61 20 45 51 55 53 22  |:ALIGN:.ea EQUS"|
00003ea0  46 6f 6e 74 22 2b bd 30  2b 22 20 20 20 20 20 20  |Font"+.0+"      |
00003eb0  20 22 3a 45 51 55 42 37  3a 45 51 55 42 32 3a 45  | ":EQUB7:EQUB2:E|
00003ec0  51 55 42 37 0d 2d 82 de  45 51 55 42 30 3a 2e 69  |QUB7.-..EQUB0:.i|
00003ed0  61 20 45 51 55 44 32 37  2a 31 36 3a 45 51 55 44  |a EQUD27*16:EQUD|
00003ee0  34 34 3a 45 51 55 44 30  3a 2e 68 61 a4 64 28 6a  |44:EQUD0:.ha.d(j|
00003ef0  62 25 2f 34 2c 30 29 3a  41 4c 49 47 4e 3a 45 51  |b%/4,0):ALIGN:EQ|
00003f00  55 44 30 3a 2e 73 a4 64  28 32 30 30 2f 34 2c 30  |UD0:.s.d(200/4,0|
00003f10  29 3a 45 51 55 44 30 3a  2e 6b 61 a4 64 28 30 2e  |):EQUD0:.ka.d(0.|
00003f20  35 2a 49 62 25 2f 34 2c  30 29 3a 45 51 55 44 30  |5*Ib%/4,0):EQUD0|
00003f30  3a 2e 70 61 a4 64 28 49  62 25 2f 34 2c 30 29 3a  |:.pa.d(Ib%/4,0):|
00003f40  45 51 55 44 30 3a 2e 63  a4 64 28 32 2a 49 62 25  |EQUD0:.c.d(2*Ib%|
00003f50  2f 34 2c 30 29 3a 45 51  55 44 30 3a 2e 65 a4 64  |/4,0):EQUD0:.e.d|
00003f60  28 33 2a 49 62 25 2f 34  2c 30 29 3a 45 51 55 44  |(3*Ib%/4,0):EQUD|
00003f70  30 3a 2e 76 a4 64 28 30  2e 35 2a 49 62 25 2f 34  |0:.v.d(0.5*Ib%/4|
00003f80  2c 30 29 3a 45 51 55 44  30 3a 2e 6f 61 a4 64 28  |,0):EQUD0:.oa.d(|
00003f90  35 2a 49 62 25 2f 34 2c  30 29 3a 2e 4b 3a 20 5d  |5*Ib%/4,0):.K: ]|
00003fa0  3a ed 0d 2e 9a 30 e7 28  50 25 2d 50 62 25 29 3e  |:....0.(P%-Pb%)>|
00003fb0  51 62 25 8c 85 39 39 2c  22 41 73 73 65 6d 62 6c  |Qb%..99,"Assembl|
00003fc0  65 72 20 6c 69 6d 69 74  20 65 78 63 65 65 64 65  |er limit exceede|
00003fd0  64 22 0d 2e a4 05 e1 0d  2e ae 18 dd a4 68 28 54  |d"...........h(T|
00003fe0  62 25 29 3a ea 5f 25 3a  e7 4b 62 25 3d 30 8c 0d  |b%):._%:.Kb%=0..|
00003ff0  2e cc 1b c8 99 22 57 69  6d 70 5f 50 6f 6c 6c 22  |....."Wimp_Poll"|
00004000  2c 62 61 25 2c 65 25 b8  5f 25 0d 2e e0 28 cc 3a  |,ba%,e%._%...(.:|
00004010  c8 99 22 57 69 6d 70 5f  50 6f 6c 6c 49 64 6c 65  |.."Wimp_PollIdle|
00004020  22 2c 62 61 25 2c 55 62  25 2c 4b 62 25 2b 91 b8  |",ba%,Ub%,Kb%+..|
00004030  5f 25 0d 2e f4 05 cd 0d  2e f4 07 3d 5f 25 0d 2f  |_%.........=_%./|
00004040  08 3e dd f2 78 61 28 76  24 29 3a ea 66 25 3a de  |.>..xa(v$):.f%:.|
00004050  66 25 20 31 30 30 3a 24  66 25 3d 76 24 2b bd 30  |f% 100:$f%=v$+.0|
00004060  3a c8 99 22 57 69 6d 70  5f 4f 70 65 6e 54 65 6d  |:.."Wimp_OpenTem|
00004070  70 6c 61 74 65 22 2c 2c  66 25 3a e1 0d 2f 3a 37  |plate",,f%:../:7|
00004080  dd f2 71 28 56 62 25 2c  f8 57 62 25 2c 58 62 25  |..q(Vb%,.Wb%,Xb%|
00004090  2c 59 62 25 2c 62 24 29  3a ea 6e 25 3a de 6e 25  |,Yb%,b$):.n%:.n%|
000040a0  20 31 32 3a e7 a9 28 62  24 29 3c 31 32 62 24 2b  | 12:..(b$)<12b$+|
000040b0  3d bd 30 0d 2f 62 52 24  6e 25 3d c0 62 24 2c 31  |=.0./bR$n%=.b$,1|
000040c0  32 29 2b c4 31 32 2d a9  28 62 24 29 2c 22 20 22  |2)+.12-.(b$)," "|
000040d0  29 3a c8 99 22 57 69 6d  70 5f 4c 6f 61 64 54 65  |):.."Wimp_LoadTe|
000040e0  6d 70 6c 61 74 65 22 2c  2c 56 62 25 2c 57 62 25  |mplate",,Vb%,Wb%|
000040f0  2c 58 62 25 2c 59 62 25  2c 6e 25 2c 30 b8 2c 2c  |,Xb%,Yb%,n%,0.,,|
00004100  57 62 25 3a e1 0d 2f 80  21 dd f2 79 61 3a c8 99  |Wb%:../.!..ya:..|
00004110  22 57 69 6d 70 5f 43 6c  6f 73 65 54 65 6d 70 6c  |"Wimp_CloseTempl|
00004120  61 74 65 22 3a e1 0d 2f  9e 3b dd f2 43 28 5a 62  |ate":../.;..C(Zb|
00004130  25 2c 78 25 2c 79 25 29  3a c8 99 22 57 69 6d 70  |%,x%,y%):.."Wimp|
00004140  5f 43 72 65 61 74 65 4d  65 6e 75 22 2c 2c 5a 62  |_CreateMenu",,Zb|
00004150  25 2c 78 25 2c 79 25 3a  56 61 25 3d 5a 62 25 3a  |%,x%,y%:Va%=Zb%:|
00004160  e1 0d 2f c6 1a dd f2 46  28 5f 62 25 29 3a e7 4a  |../....F(_b%):.J|
00004170  25 3c 3e 30 8c f2 65 28  4a 25 29 0d 2f da 3e 4a  |%<>0..e(J%)./.>J|
00004180  25 3d a4 71 28 5f 62 25  29 3a c8 99 22 57 69 6d  |%=.q(_b%):.."Wim|
00004190  70 5f 43 72 65 61 74 65  53 75 62 4d 65 6e 75 22  |p_CreateSubMenu"|
000041a0  2c 2c 4a 25 2c 65 25 21  32 34 2c 65 25 21 32 38  |,,J%,e%!24,e%!28|
000041b0  3a 57 25 3d 5f 62 25 3a  e1 0d 30 02 7b dd a4 69  |:W%=_b%:..0.{..i|
000041c0  28 60 62 25 2c 4b 25 29  3a ea 61 63 25 2c 62 63  |(`b%,K%):.ac%,bc|
000041d0  25 3a c8 99 22 57 69 6d  70 5f 57 68 69 63 68 49  |%:.."Wimp_WhichI|
000041e0  63 6f 6e 22 2c 60 62 25  2c 6a 25 2c 26 43 30 45  |con",`b%,j%,&C0E|
000041f0  30 30 30 2c 35 37 33 34  34 3a 61 63 25 3d 30 3a  |000,57344:ac%=0:|
00004200  c8 95 28 28 6a 25 21 61  63 25 29 3c 3e 2d 31 29  |..((j%!ac%)<>-1)|
00004210  80 28 28 6a 25 21 61 63  25 29 3c 3e 4b 25 29 3a  |.((j%!ac%)<>K%):|
00004220  61 63 25 2b 3d 34 3a ce  3a e7 6a 25 21 61 63 25  |ac%+=4:.:.j%!ac%|
00004230  3d 4b 25 8c 0d 30 3e 22  62 63 25 3d 6a 25 21 28  |=K%..0>"bc%=j%!(|
00004240  61 63 25 2b 34 29 3a e7  62 63 25 3c 3e 2d 31 8c  |ac%+4):.bc%<>-1.|
00004250  4b 25 3d 62 63 25 0d 30  52 05 cd 0d 30 5c 07 3d  |K%=bc%.0R...0\.=|
00004260  4b 25 0d 30 70 4c dd a4  71 28 63 63 25 29 3a ea  |K%.0pL..q(cc%):.|
00004270  41 62 25 3a c8 99 22 57  69 6d 70 5f 43 72 65 61  |Ab%:.."Wimp_Crea|
00004280  74 65 57 69 6e 64 6f 77  22 2c 2c 63 63 25 b8 41  |teWindow",,cc%.A|
00004290  62 25 3a 21 28 63 63 25  2d 34 29 3d 41 62 25 3a  |b%:!(cc%-4)=Ab%:|
000042a0  63 63 25 21 32 34 3d 2d  31 3a 3d 41 62 25 0d 30  |cc%!24=-1:=Ab%.0|
000042b0  a2 28 dd f2 7a 61 28 55  62 25 29 3a c8 99 22 57  |.(..za(Ub%):.."W|
000042c0  69 6d 70 5f 4f 70 65 6e  57 69 6e 64 6f 77 22 2c  |imp_OpenWindow",|
000042d0  2c 55 62 25 3a e1 0d 30  b6 21 dd f2 6f 28 63 63  |,Ub%:..0.!..o(cc|
000042e0  25 2c f8 64 63 25 29 3a  e7 64 63 25 3c 3e 30 8c  |%,.dc%):.dc%<>0.|
000042f0  f2 65 28 64 63 25 29 0d  30 ca 1c 64 63 25 3d a4  |.e(dc%).0..dc%=.|
00004300  71 28 63 63 25 29 3a f2  7a 61 28 63 63 25 2d 34  |q(cc%):.za(cc%-4|
00004310  29 3a e1 0d 30 e8 1f dd  f2 65 28 f8 60 25 29 3a  |):..0....e(.`%):|
00004320  ea 65 63 25 3a de 65 63  25 20 34 3a e7 60 25 3e  |.ec%:.ec% 4:.`%>|
00004330  30 8c 0d 31 10 1c 21 65  63 25 3d 60 25 3a e7 60  |0..1..!ec%=`%:.`|
00004340  25 3d 4a 25 3a 4a 25 3d  30 3a 57 25 3d 30 0d 31  |%=J%:J%=0:W%=0.1|
00004350  24 25 e7 65 63 25 3c 3e  30 c8 99 22 57 69 6d 70  |$%.ec%<>0.."Wimp|
00004360  5f 44 65 6c 65 74 65 57  69 6e 64 6f 77 22 2c 2c  |_DeleteWindow",,|
00004370  65 63 25 0d 31 2e 08 60  25 3d 30 0d 31 42 05 cd  |ec%.1..`%=0.1B..|
00004380  0d 31 42 05 e1 0d 31 4c  39 dd a4 6f 28 66 63 25  |.1B...1L9..o(fc%|
00004390  2c 67 63 25 29 3a c8 99  22 57 69 6d 70 5f 44 65  |,gc%):.."Wimp_De|
000043a0  63 6f 64 65 4d 65 6e 75  22 2c 2c 66 63 25 2c 67  |codeMenu",,fc%,g|
000043b0  63 25 2c 6a 25 3a 3d a4  70 28 24 6a 25 29 0d 31  |c%,j%:=.p($j%).1|
000043c0  74 41 dd a4 70 28 67 24  29 3a ea 70 25 2c 6f 25  |tA..p(g$):.p%,o%|
000043d0  2c 6f 24 3a 70 25 3d 30  3a f5 3a 6f 25 3d 70 25  |,o$:p%=0:.:o%=p%|
000043e0  2b 31 3a 70 25 3d a7 67  24 2c 22 2e 22 2c 6f 25  |+1:p%=.g$,".",o%|
000043f0  29 3a fd 70 25 3d 30 3a  e7 6f 25 3c 3e 30 8c 0d  |):.p%=0:.o%<>0..|
00004400  31 ba 16 6f 24 3d c2 67  24 2c a9 28 67 24 29 2d  |1..o$=.g$,.(g$)-|
00004410  6f 25 2b 31 29 0d 31 ce  0b cc 3a 6f 24 3d 22 22  |o%+1).1...:o$=""|
00004420  0d 31 e2 05 cd 0d 31 e2  07 3d 6f 24 0d 32 00 31  |.1....1..=o$.2.1|
00004430  dd f2 5a 3a ea 68 63 25  2c 69 63 25 2c 4f 2c 6d  |..Z:.hc%,ic%,O,m|
00004440  24 3a 68 63 25 3d 6a 63  25 3a 4f 3d a3 3a 78 61  |$:hc%=jc%:O=.:xa|
00004450  3d a3 3a 69 63 25 3d 30  3a c8 8e 9f ca 0d 32 1e  |=.:ic%=0:.....2.|
00004460  15 c9 36 37 37 39 37 2c  36 37 37 39 36 3a 78 61  |..67797,67796:xa|
00004470  3d b9 0d 32 32 0f c9 32  30 30 32 2c 36 37 37 38  |=..22..2002,6778|
00004480  32 0d 32 3c 0b c9 39 39  3a 4f 3d b9 0d 32 46 0d  |2.2<..99:O=..2F.|
00004490  7f 3a 68 63 25 3d 6b 63  25 0d 32 50 05 cb 0d 32  |.:hc%=kc%.2P...2|
000044a0  50 09 e7 ac 78 61 8c 0d  32 5a 4a 21 6c 63 25 3d  |P...xa..2ZJ!lc%=|
000044b0  9f 3a 6d 24 3d 22 49 6e  74 65 72 6e 61 6c 20 65  |.:m$="Internal e|
000044c0  72 72 6f 72 20 2d 20 22  2b f6 24 2b 22 20 2d 20  |rror - "+.$+" - |
000044d0  43 6f 64 65 20 22 2b c3  9e 2b 22 20 2d 20 22 3a  |Code "+..+" - ":|
000044e0  e7 28 ac 4f 29 80 28 6a  63 25 3c 3e 68 63 25 29  |.(.O).(jc%<>hc%)|
000044f0  8c 0d 32 78 31 6d 24 2b  3d 22 63 6c 69 63 6b 20  |..2x1m$+="click |
00004500  43 41 4e 43 45 4c 20 74  6f 20 71 75 69 74 20 6f  |CANCEL to quit o|
00004510  72 20 4f 4b 20 74 6f 20  63 6f 6e 74 69 6e 75 65  |r OK to continue|
00004520  2e 22 0d 32 8c 2b cc 3a  e7 4f 8c 6d 24 2b 3d 22  |.".2.+.:.O.m$+="|
00004530  28 46 41 54 41 4c 29 20  22 2b 70 24 2b 22 20 63  |(FATAL) "+p$+" c|
00004540  6c 6f 73 69 6e 67 20 64  6f 77 6e 2e 22 0d 32 96  |losing down.".2.|
00004550  05 cd 0d 32 a0 4a 24 28  6c 63 25 2b 34 29 3d 6d  |...2.J$(lc%+4)=m|
00004560  24 2b bd 30 3a c8 99 22  57 69 6d 70 5f 52 65 70  |$+.0:.."Wimp_Rep|
00004570  6f 72 74 45 72 72 6f 72  22 2c 6c 63 25 2c 68 63  |ortError",lc%,hc|
00004580  25 2c 6c 63 25 2b 32 38  30 b8 2c 69 63 25 3a e7  |%,lc%+280.,ic%:.|
00004590  28 69 63 25 3d 32 29 84  4f 8c f2 74 0d 32 be 05  |(ic%=2).O..t.2..|
000045a0  cd 0d 32 c8 08 f2 7a 3a  e1 0d 32 dc 2f dd f2 59  |..2...z:..2./..Y|
000045b0  3a de 6c 63 25 20 33 30  30 3a 6b 63 25 3d 33 3a  |:.lc% 300:kc%=3:|
000045c0  6a 63 25 3d 35 3a 24 28  6c 63 25 2b 32 38 30 29  |jc%=5:$(lc%+280)|
000045d0  3d 70 24 2b bd 30 3a e1  0d 33 18 58 dd f2 5f 3a  |=p$+.0:..3.X.._:|
000045e0  de 65 25 20 32 35 36 2c  6a 25 20 32 35 36 2c 74  |.e% 256,j% 256,t|
000045f0  25 20 32 35 36 2c 4d 62  25 20 34 38 3a c8 99 22  |% 256,Mb% 48:.."|
00004600  57 69 6d 70 5f 49 6e 69  74 69 61 6c 69 73 65 22  |Wimp_Initialise"|
00004610  2c 32 30 30 2c 26 34 42  35 33 34 31 35 34 2c 6c  |,200,&4B534154,l|
00004620  63 25 2b 32 38 30 b8 6d  63 25 2c 41 62 25 3a e1  |c%+280.mc%,Ab%:.|
00004630  0d 33 40 36 dd f2 74 3a  c8 99 22 57 69 6d 70 5f  |.3@6..t:.."Wimp_|
00004640  43 6c 6f 73 65 44 6f 77  6e 22 2c 41 62 25 2c 26  |CloseDown",Ab%,&|
00004650  34 42 35 33 34 31 35 34  3a c8 99 22 4f 53 5f 45  |4B534154:.."OS_E|
00004660  78 69 74 22 3a e1 0d 33  68 30 dd a4 6d 3a de 62  |xit":..3h0..m:.b|
00004670  25 20 32 30 3a c8 99 22  57 69 6d 70 5f 47 65 74  |% 20:.."Wimp_Get|
00004680  50 6f 69 6e 74 65 72 49  6e 66 6f 22 2c 2c 62 25  |PointerInfo",,b%|
00004690  3a 3d 62 25 21 38 0d 33  9a d7 dd a4 63 28 77 24  |:=b%!8.3....c(w$|
000046a0  29 3a ea 50 2c 5f 25 2c  65 25 2c 6e 63 25 2c 6f  |):.P,_%,e%,nc%,o|
000046b0  63 25 2c 70 63 25 2c 71  63 25 2c 72 63 25 2c 73  |c%,pc%,qc%,rc%,s|
000046c0  63 25 2c 74 63 25 3a 50  3d 32 3a 65 25 3d 6a 25  |c%,tc%:P=2:e%=j%|
000046d0  3a f2 64 28 70 61 2c 33  2c 77 24 29 3a f2 6f 28  |:.d(pa,3,w$):.o(|
000046e0  70 61 2c 75 63 25 29 3a  21 6a 25 3d 75 63 25 3a  |pa,uc%):!j%=uc%:|
000046f0  c8 99 22 57 69 6d 70 5f  47 65 74 57 69 6e 64 6f  |.."Wimp_GetWindo|
00004700  77 4f 75 74 6c 69 6e 65  22 2c 2c 6a 25 3a c8 97  |wOutline",,j%:..|
00004710  c8 93 6a 25 21 34 2c 6a  25 21 38 2c 28 6a 25 21  |..j%!4,j%!8,(j%!|
00004720  31 32 29 2d 28 6a 25 21  34 29 2d 31 30 2c 28 6a  |12)-(j%!4)-10,(j|
00004730  25 21 31 36 29 2d 28 6a  25 21 38 29 2d 31 30 3a  |%!16)-(j%!8)-10:|
00004740  c8 99 22 57 69 6d 70 5f  53 65 74 43 61 72 65 74  |.."Wimp_SetCaret|
00004750  50 6f 73 69 74 69 6f 6e  22 2c 75 63 25 2c 32 31  |Position",uc%,21|
00004760  2c 2d 31 2c 2d 31 2c 2d  31 2c 30 3a f5 0d 33 f4  |,-1,-1,-1,0:..3.|
00004770  1d 5f 25 3d a4 68 28 39  32 33 39 35 33 29 3a e7  |._%=.h(923953):.|
00004780  5f 25 3d 31 8c f2 4a 28  a3 29 0d 34 08 0a e7 5f  |_%=1..J(.).4..._|
00004790  25 3d 36 8c 0d 34 12 0f  e7 65 25 21 31 32 3d 75  |%=6..4...e%!12=u|
000047a0  63 25 8c 0d 34 1c 0d e7  65 25 21 31 36 3d 31 8c  |c%..4...e%!16=1.|
000047b0  0d 34 26 20 c8 99 22 57  69 6d 70 5f 42 6f 72 64  |.4& .."Wimp_Bord|
000047c0  65 72 49 63 6f 6e 22 2c  31 2c 65 25 3a 50 3d 30  |erIcon",1,e%:P=0|
000047d0  0d 34 44 2a cc 3a e7 65  25 21 31 36 3d 32 50 3d  |.4D*.:.e%!16=2P=|
000047e0  31 3a c8 99 22 57 69 6d  70 5f 42 6f 72 64 65 72  |1:.."Wimp_Border|
000047f0  49 63 6f 6e 22 2c 31 2c  65 25 0d 34 4e 05 cd 0d  |Icon",1,e%.4N...|
00004800  34 58 05 cd 0d 34 62 05  cd 0d 34 6c e8 fd 50 3c  |4X...4b...4l..P<|
00004810  3e 32 3a c8 99 22 57 69  6d 70 5f 42 6f 72 64 65  |>2:.."Wimp_Borde|
00004820  72 49 63 6f 6e 22 2c 2c  65 25 3a f2 65 28 75 63  |rIcon",,e%:.e(uc|
00004830  25 29 3a 75 63 25 3d 30  3a 65 25 21 30 3d 34 3a  |%):uc%=0:e%!0=4:|
00004840  65 25 21 34 3d 35 3a 65  25 21 38 3d 31 32 38 3a  |e%!4=5:e%!8=128:|
00004850  65 25 21 31 32 3d 31 32  39 3a 65 25 21 31 36 3d  |e%!12=129:e%!16=|
00004860  31 33 30 3a 65 25 21 32  30 3d 31 33 31 3a 65 25  |130:e%!20=131:e%|
00004870  21 32 34 3d 2d 31 3a 74  63 25 3d 65 25 2b 32 38  |!24=-1:tc%=e%+28|
00004880  3a c8 99 22 4f 53 5f 52  65 61 64 56 64 75 56 61  |:.."OS_ReadVduVa|
00004890  72 69 61 62 6c 65 73 22  2c 65 25 2c 74 63 25 3a  |riables",e%,tc%:|
000048a0  72 63 25 3d 21 74 63 25  3a 73 63 25 3d 74 63 25  |rc%=!tc%:sc%=tc%|
000048b0  21 34 3a 6e 63 25 3d 28  74 63 25 21 38 29 3c 3c  |!4:nc%=(tc%!8)<<|
000048c0  72 63 25 3a 71 63 25 3d  28 74 63 25 21 31 32 29  |rc%:qc%=(tc%!12)|
000048d0  3c 3c 73 63 25 3a 6f 63  25 3d 28 28 74 63 25 21  |<<sc%:oc%=((tc%!|
000048e0  31 36 29 2d 28 74 63 25  21 38 29 29 3c 3c 72 63  |16)-(tc%!8))<<rc|
000048f0  25 0d 35 16 39 70 63 25  3d 28 28 74 63 25 21 32  |%.5.9pc%=((tc%!2|
00004900  30 29 2d 28 74 63 25 21  31 32 29 29 3c 3c 73 63  |0)-(tc%!12))<<sc|
00004910  25 3a c8 97 c8 93 6e 63  25 2c 71 63 25 2c 6f 63  |%:....nc%,qc%,oc|
00004920  25 2c 70 63 25 3a 3d 50  2d 31 0d 35 3e 3b dd a4  |%,pc%:=P-1.5>;..|
00004930  6e 28 54 25 2c 4b 25 29  3a 21 6a 25 3d 54 25 3a  |n(T%,K%):!j%=T%:|
00004940  6a 25 21 34 3d 4b 25 3a  c8 99 22 57 69 6d 70 5f  |j%!4=K%:.."Wimp_|
00004950  47 65 74 49 63 6f 6e 53  74 61 74 65 22 2c 2c 6a  |GetIconState",,j|
00004960  25 3a 3d 6a 25 0d 35 70  3b dd a4 67 28 54 25 2c  |%:=j%.5p;..g(T%,|
00004970  46 25 29 3a ea 6b 62 25  3a 6b 62 25 3d a4 6e 28  |F%):.kb%:kb%=.n(|
00004980  54 25 2c 46 25 29 3a 6b  62 25 3d 6b 62 25 21 32  |T%,F%):kb%=kb%!2|
00004990  34 3a 3d 28 28 6b 62 25  3e 3e 32 31 29 80 31 29  |4:=((kb%>>21).1)|
000049a0  0d 35 a2 54 dd f2 6e 28  54 25 2c 4b 25 2c 76 63  |.5.T..n(T%,K%,vc|
000049b0  25 2c 77 63 25 29 3a 21  6a 25 3d 54 25 3a 6a 25  |%,wc%):!j%=T%:j%|
000049c0  21 34 3d 4b 25 3a 6a 25  21 38 3d 77 63 25 3a 6a  |!4=K%:j%!8=wc%:j|
000049d0  25 21 31 32 3d 76 63 25  3a c8 99 22 57 69 6d 70  |%!12=vc%:.."Wimp|
000049e0  5f 53 65 74 49 63 6f 6e  53 74 61 74 65 22 2c 2c  |_SetIconState",,|
000049f0  6a 25 3a e1 0d 35 de 1f  dd f2 71 61 28 77 25 2c  |j%:..5....qa(w%,|
00004a00  69 25 29 3a f2 6e 28 77  25 2c 69 25 2c 30 2c 30  |i%):.n(w%,i%,0,0|
00004a10  29 3a e1 0d 35 fc 30 dd  f2 62 28 54 25 2c 4b 25  |):..5.0..b(T%,K%|
00004a20  2c 78 63 25 29 3a f2 6e  28 54 25 2c 4b 25 2c 31  |,xc%):.n(T%,K%,1|
00004a30  3c 3c 32 32 2c 78 63 25  2a 28 31 3c 3c 32 32 29  |<<22,xc%*(1<<22)|
00004a40  29 3a e1 0d 36 1a 30 dd  f2 70 28 54 25 2c 4b 25  |):..6.0..p(T%,K%|
00004a50  2c 78 63 25 29 3a f2 6e  28 54 25 2c 4b 25 2c 31  |,xc%):.n(T%,K%,1|
00004a60  3c 3c 32 31 2c 78 63 25  2a 28 31 3c 3c 32 31 29  |<<21,xc%*(1<<21)|
00004a70  29 3a e1 0d 36 38 50 dd  a4 77 28 54 25 2c 79 63  |):..68P..w(T%,yc|
00004a80  25 29 3a c8 99 22 57 69  6d 70 5f 57 68 69 63 68  |%):.."Wimp_Which|
00004a90  49 63 6f 6e 22 2c 54 25  2c 6a 25 2c 28 33 31 3c  |Icon",T%,j%,(31<|
00004aa0  3c 31 36 29 84 28 31 3c  3c 32 31 29 2c 28 79 63  |<16).(1<<21),(yc|
00004ab0  25 3c 3c 31 36 29 84 28  31 3c 3c 32 31 29 3a 3d  |%<<16).(1<<21):=|
00004ac0  21 6a 25 0d 36 60 69 dd  a4 78 28 54 25 2c 4b 25  |!j%.6`i..x(T%,K%|
00004ad0  29 3a ea 7a 63 25 3a 21  6a 25 3d 54 25 3a 6a 25  |):.zc%:!j%=T%:j%|
00004ae0  21 34 3d 4b 25 3a c8 99  22 57 69 6d 70 5f 47 65  |!4=K%:.."Wimp_Ge|
00004af0  74 49 63 6f 6e 53 74 61  74 65 22 2c 2c 6a 25 3a  |tIconState",,j%:|
00004b00  7a 63 25 3d 6a 25 2b 32  38 3a 21 6a 25 3d 21 7a  |zc%=j%+28:!j%=!z|
00004b10  63 25 3a 6a 25 21 34 3d  7a 63 25 21 34 3a 6a 25  |c%:j%!4=zc%!4:j%|
00004b20  21 38 3d 7a 63 25 21 38  3a 3d 6a 25 0d 36 c4 3a  |!8=zc%!8:=j%.6.:|
00004b30  dd f2 53 28 41 63 25 2c  4b 25 2c 67 24 29 3a ea  |..S(Ac%,K%,g$):.|
00004b40  42 63 25 3a 42 63 25 3d  41 63 25 2b 38 38 2b 28  |Bc%:Bc%=Ac%+88+(|
00004b50  4b 25 2a 33 32 29 2b 32  30 3a 24 42 63 25 3d 67  |K%*32)+20:$Bc%=g|
00004b60  24 2b bd 30 3a e1 0d 36  ec 42 dd f2 64 28 41 63  |$+.0:..6.B..d(Ac|
00004b70  25 2c 4b 25 2c 67 24 29  3a ea 42 63 25 3a 42 63  |%,K%,g$):.Bc%:Bc|
00004b80  25 3d 41 63 25 2b 38 38  2b 28 4b 25 2a 33 32 29  |%=Ac%+88+(K%*32)|
00004b90  2b 32 30 3a 24 28 21 42  63 25 29 3d c0 67 24 2c  |+20:$(!Bc%)=.g$,|
00004ba0  42 63 25 21 38 29 3a e1  0d 37 1e 49 dd f2 41 61  |Bc%!8):..7.I..Aa|
00004bb0  28 77 25 29 3a 21 6a 25  3d 77 25 3a c8 99 22 57  |(w%):!j%=w%:.."W|
00004bc0  69 6d 70 5f 47 65 74 57  69 6e 64 6f 77 53 74 61  |imp_GetWindowSta|
00004bd0  74 65 22 2c 2c 6a 25 3a  c8 99 22 57 69 6d 70 5f  |te",,j%:.."Wimp_|
00004be0  4f 70 65 6e 57 69 6e 64  6f 77 22 2c 2c 6a 25 3a  |OpenWindow",,j%:|
00004bf0  e1 0d 37 50 47 dd f2 42  61 28 41 63 25 2c 4b 25  |..7PG..Ba(Ac%,K%|
00004c00  2c 43 63 25 2c 44 63 25  29 3a ea 45 63 25 3a 45  |,Cc%,Dc%):.Ec%:E|
00004c10  63 25 3d 41 63 25 2b 38  38 2b 28 4b 25 2a 33 32  |c%=Ac%+88+(K%*32|
00004c20  29 2b 32 30 2b 28 43 63  25 3c 3c 32 29 3a 21 45  |)+20+(Cc%<<2):!E|
00004c30  63 25 3d 44 63 25 3a e1  0d 37 82 29 dd a4 61 28  |c%=Dc%:..7.)..a(|
00004c40  41 63 25 2c 4b 25 29 3a  3d a4 66 28 21 28 41 63  |Ac%,K%):=.f(!(Ac|
00004c50  25 2b 38 38 2b 28 4b 25  2a 33 32 29 2b 32 30 29  |%+88+(K%*32)+20)|
00004c60  29 0d 37 a0 26 dd a4 79  28 41 63 25 2c 4b 25 29  |).7.&..y(Ac%,K%)|
00004c70  3a 3d a4 66 28 41 63 25  2b 38 38 2b 28 4b 25 2a  |:=.f(Ac%+88+(K%*|
00004c80  33 32 29 2b 32 30 29 0d  37 b4 33 dd a4 66 28 5a  |32)+20).7.3..f(Z|
00004c90  62 25 29 3a ea 61 24 3a  c8 95 3f 5a 62 25 3e 33  |b%):.a$:..?Zb%>3|
00004ca0  31 3a 61 24 2b 3d bd 28  3f 5a 62 25 29 3a 5a 62  |1:a$+=.(?Zb%):Zb|
00004cb0  25 2b 3d 31 3a ce 3a 3d  61 24 0d 37 fa 2e dd a4  |%+=1:.:=a$.7....|
00004cc0  64 28 46 63 25 2c 76 25  29 3a ea 58 25 3a 41 25  |d(Fc%,v%):.X%:A%|
00004cd0  3d 50 25 3a 50 25 2b 3d  46 63 25 3c 3c 32 3a e7  |=P%:P%+=Fc%<<2:.|
00004ce0  53 62 25 3d 7a 62 25 8c  0d 38 22 17 43 25 3d 76  |Sb%=zb%..8".C%=v|
00004cf0  25 3a 42 25 3d 46 63 25  3c 3c 32 3a d6 71 61 0d  |%:B%=Fc%<<2:.qa.|
00004d00  38 4a 05 cd 0d 38 4a 06  3d 30 0d 38 5e 3c dd f2  |8J...8J.=0.8^<..|
00004d10  43 61 28 47 63 25 2c 48  63 25 2c 6a 24 2c 62 28  |Ca(Gc%,Hc%,j$,b(|
00004d20  29 2c 63 28 29 2c 64 28  29 2c 65 28 29 2c 68 24  |),c(),d(),e(),h$|
00004d30  28 29 2c 65 25 28 29 3a  f2 44 61 28 47 63 25 2c  |(),e%():.Da(Gc%,|
00004d40  48 63 25 29 3a e1 0d 38  72 96 dd a4 74 28 77 2c  |Hc%):..8r...t(w,|
00004d50  68 2c 69 2c 6d 2c 49 63  25 2c 6b 25 2c 44 25 2c  |h,i,m,Ic%,k%,D%,|
00004d60  71 25 2c 62 25 28 29 2c  61 28 29 2c 62 24 28 29  |q%,b%(),a(),b$()|
00004d70  2c 6a 2c 63 24 28 29 2c  6a 24 2c 77 62 25 2c 4a  |,j,c$(),j$,wb%,J|
00004d80  63 25 2c 65 24 28 29 2c  61 25 28 29 2c 53 25 2c  |c%,e$(),a%(),S%,|
00004d90  55 25 29 3a ea 64 2c 59  2c 79 61 2c 4b 63 25 2c  |U%):.d,Y,ya,Kc%,|
00004da0  6f 2c 67 2c 7a 61 2c 63  25 3a f2 47 28 77 62 25  |o,g,za,c%:.G(wb%|
00004db0  2c 4a 63 25 29 3a f2 55  3a 6a 3d 30 3a e7 28 6b  |,Jc%):.U:j=0:.(k|
00004dc0  25 3d 35 29 84 28 6b 25  3d 36 29 8c 69 3d 30 3a  |%=5).(k%=6).i=0:|
00004dd0  6d 3d 31 30 30 3a 49 63  25 3d 31 31 0d 38 b8 0a  |m=100:Ic%=11.8..|
00004de0  e7 6b 25 3e 38 8c 0d 38  c2 3b 41 61 3d 6e 3a 42  |.k%>8..8.;Aa=n:B|
00004df0  61 3d 28 43 2d 6e 29 2f  44 25 3a e3 4c 63 25 3d  |a=(C-n)/D%:.Lc%=|
00004e00  31 b8 44 25 2b 31 3a 62  24 28 4c 63 25 29 3d a4  |1.D%+1:b$(Lc%)=.|
00004e10  65 28 41 61 2c 55 25 29  3a 41 61 2b 3d 42 61 3a  |e(Aa,U%):Aa+=Ba:|
00004e20  ed 0d 38 fe 05 cd 0d 38  fe 65 f2 6b 3a f2 45 61  |..8....8.e.k:.Ea|
00004e30  28 6f 2c 67 2c 77 2c 68  2c 69 2c 6d 2c 49 63 25  |(o,g,w,h,i,m,Ic%|
00004e40  2c 30 2c 30 2c 62 24 28  29 2c 61 25 28 29 2c 65  |,0,0,b$(),a%(),e|
00004e50  24 28 29 2c 6b 25 2c 44  25 2c 71 25 2c 61 24 28  |$(),k%,D%,q%,a$(|
00004e60  29 2c 55 25 2c 53 25 29  3a f2 56 28 7a 61 2b 31  |),U%,S%):.V(za+1|
00004e70  2c 67 2b 68 2c 71 25 2c  63 24 28 29 2c 61 25 28  |,g+h,q%,c$(),a%(|
00004e80  29 2c 30 29 3a e7 6b 25  3c 39 8c 0d 39 26 2c f2  |),0):.k%<9..9&,.|
00004e90  46 61 28 6b 25 2c 44 25  2c 71 25 2c 6f 2c 67 2c  |Fa(k%,D%,q%,o,g,|
00004ea0  77 2c 68 2c 64 2c 59 2c  69 2c 6d 2c 62 25 28 29  |w,h,d,Y,i,m,b%()|
00004eb0  2c 61 28 29 2c 6a 29 0d  39 3a 2b cc 3a f2 47 61  |,a(),j).9:+.:.Ga|
00004ec0  28 6f 2c 67 2c 77 2c 68  2c 6b 25 2c 69 2c 6d 2c  |(o,g,w,h,k%,i,m,|
00004ed0  6e 2c 43 2c 62 25 28 29  2c 61 28 29 2c 6a 2c 71  |n,C,b%(),a(),j,q|
00004ee0  25 29 0d 39 4e 05 cd 0d  39 4e 0e f2 6c 3a 3d a4  |%).9N...9N..l:=.|
00004ef0  72 28 22 22 29 0d 39 6c  5e dd f2 47 61 28 6f 2c  |r("").9l^..Ga(o,|
00004f00  67 2c 77 2c 68 2c 6b 25  2c 69 2c 6d 2c 6e 2c 43  |g,w,h,k%,i,m,n,C|
00004f10  2c 62 25 28 29 2c 61 28  29 2c 6a 2c 71 25 29 3a  |,b%(),a(),j,q%):|
00004f20  ea 47 25 2c 45 25 2c 71  2c 4c 3a f2 6b 3a 4c 3d  |.G%,E%,q,L:.k:L=|
00004f30  77 2f 28 43 2d 6e 29 3a  71 3d 68 2f 28 6d 2d 69  |w/(C-n):q=h/(m-i|
00004f40  29 3a e7 28 6b 25 3d 31  30 29 84 28 6b 25 3d 31  |):.(k%=10).(k%=1|
00004f50  31 29 8c 0d 39 9e 1c e3  45 25 3d 30 b8 71 25 2d  |1)..9...E%=0.q%-|
00004f60  31 3a e7 61 28 45 25 2c  30 2c 30 29 3e 30 8c 0d  |1:.a(E%,0,0)>0..|
00004f70  39 b2 2e f2 68 28 2d 31  2c 62 25 28 45 25 29 2c  |9...h(-1,b%(E%),|
00004f80  6a 2c 30 2c 30 29 3a e3  47 25 3d 31 b8 61 28 45  |j,0,0):.G%=1.a(E|
00004f90  25 2c 30 2c 30 29 3a e7  47 25 3d 31 8c 0d 39 d0  |%,0,0):.G%=1..9.|
00004fa0  31 f2 66 28 6f 2b 28 4c  2a 28 61 28 45 25 2c 47  |1.f(o+(L*(a(E%,G|
00004fb0  25 2c 31 29 2d 6e 29 29  2c 67 2b 28 71 2a 28 61  |%,1)-n)),g+(q*(a|
00004fc0  28 45 25 2c 47 25 2c 30  29 2d 69 29 29 29 0d 39  |(E%,G%,0)-i))).9|
00004fd0  e4 33 cc 3a f2 61 28 6f  2b 28 4c 2a 28 61 28 45  |.3.:.a(o+(L*(a(E|
00004fe0  25 2c 47 25 2c 31 29 2d  6e 29 29 2c 67 2b 28 71  |%,G%,1)-n)),g+(q|
00004ff0  2a 28 61 28 45 25 2c 47  25 2c 30 29 2d 69 29 29  |*(a(E%,G%,0)-i))|
00005000  29 0d 39 f8 05 cd 0d 39  f8 08 ed 3a f2 67 0d 3a  |).9....9...:.g.:|
00005010  16 05 cd 0d 3a 16 05 ed  0d 3a 2a 05 cd 0d 3a 2a  |....:....:*...:*|
00005020  14 e7 28 6b 25 3d 31 30  29 84 28 6b 25 3d 39 29  |..(k%=10).(k%=9)|
00005030  8c 0d 3a 34 1c e3 45 25  3d 30 b8 71 25 2d 31 3a  |..:4..E%=0.q%-1:|
00005040  e7 61 28 45 25 2c 30 2c  30 29 3e 30 8c 0d 3a 48  |.a(E%,0,0)>0..:H|
00005050  60 e3 47 25 3d 31 b8 61  28 45 25 2c 30 2c 30 29  |`.G%=1.a(E%,0,0)|
00005060  3a f2 6a 28 6f 2b 28 4c  2a 28 61 28 45 25 2c 47  |:.j(o+(L*(a(E%,G|
00005070  25 2c 31 29 2d 6e 29 29  2d 30 2e 31 35 2c 67 2b  |%,1)-n))-0.15,g+|
00005080  28 71 2a 28 61 28 45 25  2c 47 25 2c 30 29 2d 69  |(q*(a(E%,G%,0)-i|
00005090  29 29 2d 30 2e 31 35 2c  2e 33 2c 2e 33 2c 62 25  |))-0.15,.3,.3,b%|
000050a0  28 45 25 29 2c 30 2c 6a  2c 30 29 3a ed 0d 3a 70  |(E%),0,j,0):..:p|
000050b0  05 cd 0d 3a 70 05 ed 0d  3a 84 05 cd 0d 3a 84 10  |...:p...:....:..|
000050c0  e7 28 6b 25 3d 39 29 80  44 61 25 8c 0d 3a c0 1c  |.(k%=9).Da%..:..|
000050d0  e3 45 25 3d 30 b8 71 25  2d 31 3a e7 61 28 45 25  |.E%=0.q%-1:.a(E%|
000050e0  2c 30 2c 30 29 3e 30 8c  0d 3a d4 61 47 3d 30 3a  |,0,0)>0..:.aG=0:|
000050f0  5a 3d 2d 26 46 46 46 46  46 46 46 3a 4d 3d 30 3a  |Z=-&FFFFFFF:M=0:|
00005100  5f 3d 26 46 46 46 46 46  46 46 3a e3 47 25 3d 31  |_=&FFFFFFF:.G%=1|
00005110  b8 61 28 45 25 2c 30 2c  30 29 3a 51 3d 61 28 45  |.a(E%,0,0):Q=a(E|
00005120  25 2c 47 25 2c 31 29 3a  43 61 3d 61 28 45 25 2c  |%,G%,1):Ca=a(E%,|
00005130  47 25 2c 30 29 3a 47 2b  3d 51 3a 4d 2b 3d 43 61  |G%,0):G+=Q:M+=Ca|
00005140  3a e7 51 3c 5f 8c 5f 3d  51 0d 3b 24 0c e7 51 3e  |:.Q<_._=Q.;$..Q>|
00005150  5a 8c 5a 3d 51 0d 3b 2e  19 ed 3a e7 47 3c 3e 30  |Z.Z=Q.;...:.G<>0|
00005160  8c 47 3d 47 2f 61 28 45  25 2c 30 2c 30 29 0d 3b  |.G=G/a(E%,0,0).;|
00005170  42 17 e7 4d 3c 3e 30 8c  4d 3d 4d 2f 61 28 45 25  |B..M<>0.M=M/a(E%|
00005180  2c 30 2c 30 29 0d 3b 4c  65 44 61 3d 30 3a 45 61  |,0,0).;LeDa=0:Ea|
00005190  3d 30 3a e3 47 25 3d 31  b8 61 28 45 25 2c 30 2c  |=0:.G%=1.a(E%,0,|
000051a0  30 29 3a 45 61 2b 3d 28  61 28 45 25 2c 47 25 2c  |0):Ea+=(a(E%,G%,|
000051b0  31 29 2d 47 29 5e 32 3a  44 61 2b 3d 28 61 28 45  |1)-G)^2:Da+=(a(E|
000051c0  25 2c 47 25 2c 31 29 2d  47 29 2a 28 61 28 45 25  |%,G%,1)-G)*(a(E%|
000051d0  2c 47 25 2c 30 29 2d 4d  29 3a ed 3a e7 45 61 3c  |,G%,0)-M):.:.Ea<|
000051e0  3e 30 8c 62 3d 44 61 2f  45 61 0d 3b 92 6e 61 3d  |>0.b=Da/Ea.;.na=|
000051f0  4d 2d 28 62 2a 47 29 3a  f2 68 28 2d 31 2c 62 25  |M-(b*G):.h(-1,b%|
00005200  28 45 25 29 2c 6a 2c 30  2c 30 29 3a f2 66 28 6f  |(E%),j,0,0):.f(o|
00005210  2b 28 4c 2a 28 5f 2d 6e  29 29 2c 67 2b 28 71 2a  |+(L*(_-n)),g+(q*|
00005220  28 28 61 2b 62 2a 5f 29  2d 69 29 29 29 3a f2 61  |((a+b*_)-i))):.a|
00005230  28 6f 2b 28 4c 2a 28 5a  2d 6e 29 29 2c 67 2b 28  |(o+(L*(Z-n)),g+(|
00005240  71 2a 28 28 61 2b 62 2a  5a 29 2d 69 29 29 29 3a  |q*((a+b*Z)-i))):|
00005250  f2 67 3a e7 45 61 25 8c  0d 3b ce 7d f2 6a 28 46  |.g:.Ea%..;.}.j(F|
00005260  61 2c 47 61 2d 28 45 25  2a 48 61 29 2c 31 2c 48  |a,Ga-(E%*Ha),1,H|
00005270  61 2f 36 2a 34 2c 62 25  28 45 25 2b 4d 63 25 29  |a/6*4,b%(E%+Mc%)|
00005280  2c 30 2c 30 2c 30 29 3a  f2 69 28 22 59 20 3d 20  |,0,0,0):.i("Y = |
00005290  22 2b a4 65 28 61 2c 55  25 29 2b 22 20 2b 20 22  |"+.e(a,U%)+" + "|
000052a0  2b a4 65 28 62 2c 55 25  29 2b 22 58 22 2c 30 2c  |+.e(b,U%)+"X",0,|
000052b0  2d 32 35 36 2c 34 2c 61  25 28 36 29 2c 61 25 28  |-256,4,a%(6),a%(|
000052c0  37 29 2c 46 61 2b 31 2e  35 2c 47 61 2d 28 45 25  |7),Fa+1.5,Ga-(E%|
000052d0  2a 48 61 29 29 0d 3b ec  05 cd 0d 3b ec 05 cd 0d  |*Ha)).;....;....|
000052e0  3b f6 05 ed 0d 3c 0a 05  cd 0d 3c 0a 08 f2 6c 3a  |;....<....<...l:|
000052f0  e1 0d 3c 1e 8a dd f2 46  61 28 6b 25 2c 44 25 2c  |..<....Fa(k%,D%,|
00005300  71 25 2c 6f 2c 67 2c 49  61 2c 4a 61 2c 64 2c 59  |q%,o,g,Ia,Ja,d,Y|
00005310  2c 69 2c 6d 2c 62 25 28  29 2c 61 28 29 2c 6a 29  |,i,m,b%(),a(),j)|
00005320  3a ea 73 25 2c 78 2c 75  25 2c 71 2c 66 2c 6c 2c  |:.s%,x,u%,q,f,l,|
00005330  79 2c 4b 61 2c 4c 61 2c  60 3a c8 99 22 48 6f 75  |y,Ka,La,`:.."Hou|
00005340  72 67 6c 61 73 73 5f 4f  6e 22 3a 4b 61 3d 31 30  |rglass_On":Ka=10|
00005350  30 2f 28 28 44 25 2d 31  29 2a 71 25 29 3a 4c 61  |0/((D%-1)*q%):La|
00005360  3d 30 3a 71 3d 4a 61 2f  28 6d 2d 69 29 3a f2 6b  |=0:q=Ja/(m-i):.k|
00005370  3a 78 3d 6f 3a e7 6b 25  3c 37 8c 0d 3c 6e 2d 78  |:x=o:.k%<7..<n-x|
00005380  3d 6f 2b 30 2e 35 2a 64  3a e3 75 25 3d 31 b8 44  |=o+0.5*d:.u%=1.D|
00005390  25 3a 79 3d 67 3a f2 6b  3a e7 28 6b 25 3d 35 29  |%:y=g:.k:.(k%=5)|
000053a0  84 28 6b 25 3d 36 29 8c  0d 3c a0 37 60 3d 30 3a  |.(k%=6)..<.7`=0:|
000053b0  e3 73 25 3d 28 71 25 2d  31 29 b8 30 88 2d 31 3a  |.s%=(q%-1).0.-1:|
000053c0  60 2b 3d 61 28 73 25 2c  75 25 2c 30 29 3a ed 3a  |`+=a(s%,u%,0):.:|
000053d0  e7 60 3d 30 8c 71 3d 30  8b 71 3d 4a 61 2f 60 0d  |.`=0.q=0.q=Ja/`.|
000053e0  3c b4 05 cd 0d 3c be 56  e3 73 25 3d 28 71 25 2d  |<....<.V.s%=(q%-|
000053f0  31 29 b8 30 88 2d 31 3a  66 3d 28 61 28 73 25 2c  |1).0.-1:f=(a(s%,|
00005400  75 25 2c 30 29 2d 69 29  2a 71 3a 6c 3d 73 25 2a  |u%,0)-i)*q:l=s%*|
00005410  64 3a c8 99 22 48 6f 75  72 67 6c 61 73 73 5f 50  |d:.."Hourglass_P|
00005420  65 72 63 65 6e 74 61 67  65 22 2c 4c 61 3a 4c 61  |ercentage",La:La|
00005430  2b 3d 4b 61 3a c8 8e 6b  25 ca 0d 3c f0 21 c9 30  |+=Ka:..k%..<.!.0|
00005440  3a f2 6a 28 78 2b 6c 2c  67 2c 45 2c 66 2c 62 25  |:.j(x+l,g,E,f,b%|
00005450  28 73 25 29 2c 30 2c 6a  2c 30 29 0d 3d 0e 21 c9  |(s%),0,j,0).=.!.|
00005460  31 3a f2 6a 28 78 2b 6c  2c 67 2c 64 2c 66 2c 62  |1:.j(x+l,g,d,f,b|
00005470  25 28 73 25 29 2c 30 2c  6a 2c 30 29 0d 3d 22 df  |%(s%),0,j,0).=".|
00005480  c9 32 3a f2 6a 28 78 2b  6c 2c 67 2b 6c 2c 45 2c  |.2:.j(x+l,g+l,E,|
00005490  66 2c 62 25 28 73 25 29  2c 30 2c 6a 2c 30 29 3a  |f,b%(s%),0,j,0):|
000054a0  f2 68 28 62 25 28 73 25  29 2c 30 2c 6a 2c 30 2c  |.h(b%(s%),0,j,0,|
000054b0  30 29 3a f2 66 28 78 2b  6c 2c 67 2b 66 2b 6c 29  |0):.f(x+l,g+f+l)|
000054c0  3a f2 61 28 78 2b 6c 2b  64 2c 67 2b 66 2b 64 2b  |:.a(x+l+d,g+f+d+|
000054d0  6c 29 3a f2 61 28 78 2b  45 2b 6c 2b 64 2c 67 2b  |l):.a(x+E+l+d,g+|
000054e0  66 2b 64 2b 6c 29 3a f2  61 28 78 2b 45 2b 6c 2c  |f+d+l):.a(x+E+l,|
000054f0  67 2b 66 2b 6c 29 3a f2  61 28 78 2b 6c 2c 67 2b  |g+f+l):.a(x+l,g+|
00005500  66 2b 6c 29 3a f2 67 3a  f2 68 28 62 25 28 73 25  |f+l):.g:.h(b%(s%|
00005510  29 2c 30 2c 6a 2c 30 2c  30 29 3a f2 66 28 78 2b  |),0,j,0,0):.f(x+|
00005520  28 35 2b 73 25 29 2a 64  2c 67 2b 66 2b 6c 29 3a  |(5+s%)*d,g+f+l):|
00005530  f2 61 28 78 2b 28 36 2b  73 25 29 2a 64 2c 67 2b  |.a(x+(6+s%)*d,g+|
00005540  66 2b 64 2b 6c 29 3a f2  61 28 78 2b 28 36 2b 73  |f+d+l):.a(x+(6+s|
00005550  25 29 2a 64 2c 67 2b 6c  2b 64 29 0d 3d 9a 2e f2  |%)*d,g+l+d).=...|
00005560  61 28 78 2b 28 35 2b 73  25 29 2a 64 2c 67 2b 6c  |a(x+(5+s%)*d,g+l|
00005570  29 3a f2 61 28 78 2b 28  35 2b 73 25 29 2a 64 2c  |):.a(x+(5+s%)*d,|
00005580  67 2b 66 2b 6c 29 3a f2  67 0d 3d c2 26 c9 33 2c  |g+f+l):.g.=.&.3,|
00005590  35 3a f2 6a 28 78 2c 79  2c 45 2c 66 2c 62 25 28  |5:.j(x,y,E,f,b%(|
000055a0  73 25 29 2c 30 2c 6a 2c  30 29 3a 79 2b 3d 66 0d  |s%),0,j,0):y+=f.|
000055b0  3d e0 d6 c9 34 2c 36 3a  f2 6a 28 78 2c 79 2c 45  |=...4,6:.j(x,y,E|
000055c0  2c 66 2c 62 25 28 73 25  29 2c 30 2c 6a 2c 30 29  |,f,b%(s%),0,j,0)|
000055d0  3a f2 68 28 62 25 28 73  25 29 2c 30 2c 6a 2c 30  |:.h(b%(s%),0,j,0|
000055e0  2c 30 29 3a f2 66 28 78  2c 79 2b 66 29 3a f2 61  |,0):.f(x,y+f):.a|
000055f0  28 78 2b 64 2c 79 2b 66  2b 64 29 3a f2 61 28 78  |(x+d,y+f+d):.a(x|
00005600  2b 45 2b 64 2c 79 2b 66  2b 64 29 3a f2 61 28 78  |+E+d,y+f+d):.a(x|
00005610  2b 45 2c 79 2b 66 29 3a  f2 61 28 78 2c 79 2b 66  |+E,y+f):.a(x,y+f|
00005620  29 3a f2 67 3a f2 68 28  62 25 28 73 25 29 2c 30  |):.g:.h(b%(s%),0|
00005630  2c 6a 2c 30 2c 30 29 3a  f2 66 28 78 2b 35 2a 64  |,j,0,0):.f(x+5*d|
00005640  2c 79 2b 66 29 3a f2 61  28 78 2b 36 2a 64 2c 79  |,y+f):.a(x+6*d,y|
00005650  2b 66 2b 64 29 3a f2 61  28 78 2b 36 2a 64 2c 79  |+f+d):.a(x+6*d,y|
00005660  2b 64 29 3a f2 61 28 78  2b 35 2a 64 2c 79 29 3a  |+d):.a(x+5*d,y):|
00005670  f2 61 28 78 2b 35 2a 64  2c 79 2b 66 29 3a f2 67  |.a(x+5*d,y+f):.g|
00005680  3a 79 2b 3d 66 0d 3e 8a  05 cb 0d 3e 8a 13 ed 3a  |:y+=f.>....>...:|
00005690  78 2b 3d 28 59 2a 64 29  3a f2 6c 3a ed 0d 3e bc  |x+=(Y*d):.l:..>.|
000056a0  67 cc 3a e3 73 25 3d 28  71 25 2d 31 29 b8 30 88  |g.:.s%=(q%-1).0.|
000056b0  2d 31 3a f2 68 28 2d 31  2c 62 25 28 73 25 29 2c  |-1:.h(-1,b%(s%),|
000056c0  6a 2c 30 2c 30 29 3a 78  3d 6f 3a e3 75 25 3d 30  |j,0,0):x=o:.u%=0|
000056d0  b8 44 25 2d 31 3a 66 3d  28 61 28 73 25 2c 75 25  |.D%-1:f=(a(s%,u%|
000056e0  2b 31 2c 30 29 2d 69 29  2a 71 3a e7 75 25 3d 30  |+1,0)-i)*q:.u%=0|
000056f0  8c f2 66 28 78 2c 67 2b  66 29 8b f2 61 28 78 2c  |..f(x,g+f)..a(x,|
00005700  66 2b 67 29 0d 3e f8 1d  78 2b 3d 77 2f 28 44 25  |f+g).>..x+=w/(D%|
00005710  2d 31 29 3a ed 3a f2 67  3a ed 3a e7 6b 25 3d 38  |-1):.:.g:.:.k%=8|
00005720  8c 0d 3f 2a 70 e3 73 25  3d 28 71 25 2d 31 29 b8  |..?*p.s%=(q%-1).|
00005730  30 88 2d 31 3a 78 3d 6f  3a e3 75 25 3d 30 b8 44  |0.-1:x=o:.u%=0.D|
00005740  25 2d 31 3a 66 3d 28 61  28 73 25 2c 75 25 2b 31  |%-1:f=(a(s%,u%+1|
00005750  2c 30 29 2d 69 29 2a 71  3a f2 6a 28 78 2d 30 2e  |,0)-i)*q:.j(x-0.|
00005760  31 35 2c 67 2b 66 2d 30  2e 31 35 2c 30 2e 33 2c  |15,g+f-0.15,0.3,|
00005770  30 2e 33 2c 62 25 28 73  25 29 2c 30 2c 6a 2c 30  |0.3,b%(s%),0,j,0|
00005780  29 3a 78 2b 3d 77 2f 28  44 25 2d 31 29 3a ed 3a  |):x+=w/(D%-1):.:|
00005790  ed 0d 3f 84 05 cd 0d 3f  84 05 cd 0d 3f 8e 1a c8  |..?....?....?...|
000057a0  99 22 48 6f 75 72 67 6c  61 73 73 5f 4f 66 66 22  |."Hourglass_Off"|
000057b0  3a f2 6c 3a e1 0d 3f ac  29 dd f2 55 3a f2 57 3a  |:.l:..?.)..U:.W:|
000057c0  e3 58 25 3d 30 b8 35 3a  e7 65 24 28 58 25 29 3c  |.X%=0.5:.e$(X%)<|
000057d0  3e 22 22 8c f2 72 28 65  24 28 58 25 29 29 0d 3f  |>""..r(e$(X%)).?|
000057e0  d4 11 ed 3a f2 72 28 22  45 4e 44 22 29 3a e1 0d  |...:.r("END"):..|
000057f0  3f f2 71 dd f2 45 61 28  f8 78 2c f8 79 2c f8 77  |?.q..Ea(.x,.y,.w|
00005800  2c f8 68 2c 69 2c 6d 2c  52 2c 6e 2c 43 2c 62 24  |,.h,i,m,R,n,C,b$|
00005810  28 29 2c 61 25 28 29 2c  65 24 28 29 2c 6b 25 2c  |(),a%(),e$(),k%,|
00005820  44 25 2c 71 25 2c 61 24  28 29 2c 55 25 2c 53 25  |D%,q%,a$(),U%,S%|
00005830  29 3a ea 58 25 2c 7a 2c  72 2c 4d 61 2c 4e 63 25  |):.X%,z,r,Ma,Nc%|
00005840  2c 48 2c 41 2c 4e 61 2c  4f 61 2c 63 25 2c 50 61  |,H,A,Na,Oa,c%,Pa|
00005850  2c 4f 63 25 2c 51 61 3a  f2 6b 3a c8 8e 6b 25 ca  |,Oc%,Qa:.k:..k%.|
00005860  0d 40 1a 32 c9 30 2c 31  2c 32 2c 33 2c 34 2c 35  |.@.2.0,1,2,3,4,5|
00005870  2c 36 2c 37 2c 38 2c 39  2c 31 30 2c 31 31 3a e7  |,6,7,8,9,10,11:.|
00005880  28 6b 25 3d 34 29 84 28  6b 25 3d 36 29 8c 71 25  |(k%=4).(k%=6).q%|
00005890  3d 31 0d 40 2e df 52 61  3d 78 2b 28 28 61 25 28  |=1.@..Ra=x+((a%(|
000058a0  32 29 2a 56 25 2a 31 2e  35 29 2f 50 63 25 29 3a  |2)*V%*1.5)/Pc%):|
000058b0  f2 69 28 61 24 28 31 29  2c 30 2c 2d 31 2c 32 2c  |.i(a$(1),0,-1,2,|
000058c0  61 25 28 32 29 2c 61 25  28 33 29 2c 28 77 2f 32  |a%(2),a%(3),(w/2|
000058d0  29 2d 30 2e 33 33 2a a4  62 28 61 24 28 31 29 2c  |)-0.33*.b(a$(1),|
000058e0  61 25 28 34 29 29 2c 79  29 3a 79 2b 3d 28 31 2e  |a%(4)),y):y+=(1.|
000058f0  35 2a 61 25 28 33 29 2a  56 25 29 2f 50 63 25 3a  |5*a%(3)*V%)/Pc%:|
00005900  68 2d 3d 28 31 2e 35 2a  61 25 28 33 29 2a 56 25  |h-=(1.5*a%(3)*V%|
00005910  29 2f 50 63 25 3a 4e 61  3d 31 2e 32 2a 61 25 28  |)/Pc%:Na=1.2*a%(|
00005920  35 29 2a 56 25 2f 49 25  3a 63 25 3d 31 3a e3 4f  |5)*V%/I%:c%=1:.O|
00005930  61 3d 28 79 2b 28 30 2e  35 2a 68 29 2b 28 30 2e  |a=(y+(0.5*h)+(0.|
00005940  35 2a a9 28 61 24 28 32  29 29 2a 4e 61 29 29 b8  |5*.(a$(2))*Na)).|
00005950  28 79 2b 28 30 2e 35 2a  68 29 2d 28 30 2e 35 2a  |(y+(0.5*h)-(0.5*|
00005960  a9 28 61 24 28 32 29 29  2a 4e 61 29 29 88 2d 4e  |.(a$(2))*Na)).-N|
00005970  61 0d 40 6a 48 f2 69 28  c1 61 24 28 32 29 2c 63  |a.@jH.i(.a$(2),c|
00005980  25 2c 31 29 2c 30 2c 2d  32 35 36 2c 33 2c 61 25  |%,1),0,-256,3,a%|
00005990  28 34 29 2c 61 25 28 35  29 2c 78 2c 4f 61 29 3a  |(4),a%(5),x,Oa):|
000059a0  63 25 2b 3d 31 3a ed 3a  78 3d 52 61 3a e7 6d 3e  |c%+=1:.:x=Ra:.m>|
000059b0  69 8c 7a 3d 6d 8b 7a 3d  69 0d 40 9c 59 7a 3d 30  |i.z=m.z=i.@.Yz=0|
000059c0  2e 38 2a a4 62 28 a4 65  28 7a 2c 55 25 29 2c 61  |.8*.b(.e(z,U%),a|
000059d0  25 28 31 30 29 29 3a 53  61 3d 77 2d 7a 3a 4f 63  |%(10)):Sa=w-z:Oc|
000059e0  25 3d 44 25 3a 72 3d 78  2b 7a 3a e7 6b 25 3c 39  |%=D%:r=x+z:.k%<9|
000059f0  8c 51 63 25 3d 30 3a 72  2b 3d 30 2e 35 2a 7a 3a  |.Qc%=0:r+=0.5*z:|
00005a00  4f 63 25 2d 3d 31 3a 53  61 2d 3d 7a 8b 51 63 25  |Oc%-=1:Sa-=z.Qc%|
00005a10  3d 31 0d 40 ba b4 4d 61  3d 53 61 2f 4f 63 25 3a  |=1.@..Ma=Sa/Oc%:|
00005a20  e3 4e 63 25 3d 31 b8 44  25 2b 51 63 25 3a f2 69  |.Nc%=1.D%+Qc%:.i|
00005a30  28 62 24 28 4e 63 25 29  2c 30 2c 2d 31 2c 35 2c  |(b$(Nc%),0,-1,5,|
00005a40  61 25 28 38 29 2c 61 25  28 39 29 2c 72 2b 28 51  |a%(8),a%(9),r+(Q|
00005a50  61 2a 4d 61 29 2d 30 2e  33 2a a4 62 28 62 24 28  |a*Ma)-0.3*.b(b$(|
00005a60  4e 63 25 29 2c 61 25 28  38 29 29 2c 79 29 3a 72  |Nc%),a%(8)),y):r|
00005a70  2b 3d 4d 61 3a ed 3a 79  2b 3d 32 2a a4 62 28 22  |+=Ma:.:y+=2*.b("|
00005a80  20 22 2c 61 25 28 39 29  29 3a 68 2d 3d 32 2a a4  | ",a%(9)):h-=2*.|
00005a90  62 28 22 20 22 2c 61 25  28 39 29 29 3a 48 3d 69  |b(" ",a%(9)):H=i|
00005aa0  3a 41 3d 28 6d 2d 69 29  2f 28 52 2d 31 29 3a 49  |:A=(m-i)/(R-1):I|
00005ab0  3d 79 3a 54 61 3d 68 2f  28 52 2d 31 29 3a e3 52  |=y:Ta=h/(R-1):.R|
00005ac0  63 25 3d 31 b8 52 0d 41  1e 53 f2 69 28 a4 65 28  |c%=1.R.A.S.i(.e(|
00005ad0  48 2c 55 25 29 2c 30 2c  2d 31 2c 36 2c 61 25 28  |H,U%),0,-1,6,a%(|
00005ae0  31 30 29 2c 61 25 28 31  31 29 2c 78 2c 49 29 3a  |10),a%(11),x,I):|
00005af0  49 2b 3d 54 61 3a 48 2b  3d 41 3a ed 3a 78 2b 3d  |I+=Ta:H+=A:.:x+=|
00005b00  7a 3a 77 2d 3d 7a 3a e7  6b 25 3c 33 8c 4b 63 25  |z:w-=z:.k%<3.Kc%|
00005b10  3d 71 25 8b 4b 63 25 3d  31 0d 41 50 47 79 61 3d  |=q%.Kc%=1.APGya=|
00005b20  44 25 2a 28 36 2b 4b 63  25 29 3a 64 3d 77 2f 79  |D%*(6+Kc%):d=w/y|
00005b30  61 3a 59 3d 36 2b 4b 63  25 3a 45 3d 35 2a 64 3a  |a:Y=6+Kc%:E=5*d:|
00005b40  f2 73 28 a3 2c a3 29 3a  e7 28 28 6b 25 3d 32 29  |.s(.,.):.((k%=2)|
00005b50  84 28 6b 25 3d 34 29 84  28 6b 25 3d 36 29 29 8c  |.(k%=4).(k%=6)).|
00005b60  0d 41 8c 0b e7 53 25 3c  3e 30 8c 0d 41 a0 6f f2  |.A...S%<>0..A.o.|
00005b70  68 28 53 25 2c 30 2c 30  2c 30 2c 30 29 3a f2 66  |h(S%,0,0,0,0):.f|
00005b80  28 78 2c 79 29 3a f2 61  28 78 2c 79 2b 68 29 3a  |(x,y):.a(x,y+h):|
00005b90  f2 61 28 78 2b 71 25 2a  64 2c 79 2b 68 2b 71 25  |.a(x+q%*d,y+h+q%|
00005ba0  2a 64 29 3a f2 61 28 78  2b 71 25 2a 64 2b 77 2c  |*d):.a(x+q%*d+w,|
00005bb0  79 2b 68 2b 71 25 2a 64  29 3a f2 61 28 78 2b 71  |y+h+q%*d):.a(x+q|
00005bc0  25 2a 64 2b 77 2c 79 2b  71 25 2a 64 29 3a f2 61  |%*d+w,y+q%*d):.a|
00005bd0  28 78 2b 77 2c 79 29 3a  f2 67 0d 41 fa 05 cd 0d  |(x+w,y):.g.A....|
00005be0  41 fa ab f2 68 28 2d 31  2c 30 2c 30 2c 30 2c 30  |A...h(-1,0,0,0,0|
00005bf0  2e 32 29 3a 41 3d 78 3a  52 61 3d 68 2f 28 52 2d  |.2):A=x:Ra=h/(R-|
00005c00  31 29 3a e3 48 3d 79 b8  79 2b 71 25 2a 64 88 64  |1):.H=y.y+q%*d.d|
00005c10  3a f2 66 28 41 2c 48 2b  68 29 3a f2 61 28 41 2c  |:.f(A,H+h):.a(A,|
00005c20  48 29 3a f2 61 28 41 2b  77 2c 48 29 3a 41 2b 3d  |H):.a(A+w,H):A+=|
00005c30  64 3a ed 3a 50 61 3d 79  2b 68 2b 71 25 2a 64 3a  |d:.:Pa=y+h+q%*d:|
00005c40  7a 61 3d 78 2b 71 25 2a  64 2b 77 3a e3 72 3d 79  |za=x+q%*d+w:.r=y|
00005c50  b8 79 2b 68 88 52 61 3a  f2 66 28 78 2c 72 29 3a  |.y+h.Ra:.f(x,r):|
00005c60  f2 61 28 78 2b 71 25 2a  64 2c 72 2b 71 25 2a 64  |.a(x+q%*d,r+q%*d|
00005c70  29 3a f2 61 28 78 2b 71  25 2a 64 2b 77 2c 72 2b  |):.a(x+q%*d+w,r+|
00005c80  71 25 2a 64 29 3a ed 3a  f2 67 0d 42 a4 4d cc 3a  |q%*d):.:.g.B.M.:|
00005c90  f2 68 28 53 25 2c 30 2c  30 2c 30 2c 30 29 3a f2  |.h(S%,0,0,0,0):.|
00005ca0  66 28 78 2c 79 29 3a f2  61 28 78 2c 79 2b 68 29  |f(x,y):.a(x,y+h)|
00005cb0  3a f2 61 28 78 2b 77 2c  79 2b 68 29 3a f2 61 28  |:.a(x+w,y+h):.a(|
00005cc0  78 2b 77 2c 79 29 3a f2  67 3a 7a 61 3d 78 2b 77  |x+w,y):.g:za=x+w|
00005cd0  3a 50 61 3d 79 2b 68 0d  42 fe 05 cd 0d 42 fe 64  |:Pa=y+h.B....B.d|
00005ce0  f2 68 28 2d 31 2c 30 2c  30 2c 30 2c 30 29 3a f2  |.h(-1,0,0,0,0):.|
00005cf0  73 28 a3 2c a3 29 3a f2  66 28 78 2b 77 2c 79 29  |s(.,.):.f(x+w,y)|
00005d00  3a f2 61 28 78 2c 79 29  3a f2 61 28 78 2c 79 2b  |:.a(x,y):.a(x,y+|
00005d10  68 29 3a f2 66 28 78 2c  79 29 3a f2 67 3a e7 28  |h):.f(x,y):.g:.(|
00005d20  28 6b 25 3c 3e 32 29 80  28 6b 25 3c 3e 34 29 80  |(k%<>2).(k%<>4).|
00005d30  28 6b 25 3c 3e 36 29 29  8c 41 3d 77 8b 41 3d 30  |(k%<>6)).A=w.A=0|
00005d40  0d 43 44 35 f2 68 28 2d  31 2c 30 2c 30 2c 30 2c  |.CD5.h(-1,0,0,0,|
00005d50  30 2e 32 29 3a 49 3d 30  2e 35 2a a4 62 28 22 20  |0.2):I=0.5*.b(" |
00005d60  22 2c 61 25 28 35 29 29  3a e7 6b 25 3c 39 8c 4f  |",a%(5)):.k%<9.O|
00005d70  63 25 2b 3d 31 0d 43 62  64 e3 72 3d 78 b8 78 2b  |c%+=1.Cbd.r=x.x+|
00005d80  77 88 77 2f 4f 63 25 3a  f2 66 28 72 2c 79 2d 49  |w.w/Oc%:.f(r,y-I|
00005d90  29 3a f2 61 28 72 2c 79  29 3a ed 3a 72 3d 30 2e  |):.a(r,y):.:r=0.|
00005da0  35 2a a4 62 28 22 20 22  2c 61 25 28 34 29 29 3a  |5*.b(" ",a%(4)):|
00005db0  e3 49 3d 79 b8 79 2b 68  88 68 2f 28 52 2d 31 29  |.I=y.y+h.h/(R-1)|
00005dc0  3a f2 66 28 78 2d 72 2c  49 29 3a f2 61 28 78 2b  |:.f(x-r,I):.a(x+|
00005dd0  41 2c 49 29 3a ed 3a f2  67 0d 43 d0 05 cb 0d 43  |A,I):.:.g.C....C|
00005de0  d0 4c f2 69 28 61 24 28  30 29 2c 30 2c 2d 32 35  |.L.i(a$(0),0,-25|
00005df0  36 2c 31 2c 61 25 28 30  29 2c 61 25 28 31 29 2c  |6,1,a%(0),a%(1),|
00005e00  78 2b 28 30 2e 35 2a 77  29 2d 28 30 2e 33 2a a4  |x+(0.5*w)-(0.3*.|
00005e10  62 28 61 24 28 30 29 2c  61 25 28 30 29 29 29 2c  |b(a$(0),a%(0))),|
00005e20  50 61 2b 31 29 3a f2 6c  3a e1 0d 43 ee 05 e0 0d  |Pa+1):.l:..C....|
00005e30  43 f8 81 dd a4 75 28 61  28 29 2c 62 25 28 29 2c  |C....u(a(),b%(),|
00005e40  65 24 28 29 2c 61 25 28  29 2c 67 24 28 29 2c 53  |e$(),a%(),g$(),S|
00005e50  63 25 2c 77 2c 68 2c 54  63 25 2c 55 63 25 2c 77  |c%,w,h,Tc%,Uc%,w|
00005e60  62 25 2c 4a 63 25 2c 63  24 29 3a ea 53 2c 55 61  |b%,Jc%,c$):.S,Ua|
00005e70  2c 56 61 2c 64 25 2c 54  2c 57 61 2c 58 61 2c 56  |,Va,d%,T,Wa,Xa,V|
00005e80  63 25 2c 59 61 2c 5a 61  2c 5f 61 2c 57 63 25 3a  |c%,Ya,Za,_a,Wc%:|
00005e90  5f 61 3d 30 3a 57 63 25  3d 30 3a f2 47 28 77 62  |_a=0:Wc%=0:.G(wb|
00005ea0  25 2c 4a 63 25 29 3a 6a  3d 30 3a f2 55 3a f2 6b  |%,Jc%):j=0:.U:.k|
00005eb0  0d 44 3e 57 f2 69 28 61  24 28 30 29 2c 30 2c 2d  |.D>W.i(a$(0),0,-|
00005ec0  31 2c 31 2c 61 25 28 30  29 2c 61 25 28 31 29 2c  |1,1,a%(0),a%(1),|
00005ed0  30 2e 35 2a 28 77 2d 30  2e 33 2a a4 62 28 61 24  |0.5*(w-0.3*.b(a$|
00005ee0  28 30 29 2c 61 25 28 30  29 29 29 2c 68 2b 61 25  |(0),a%(0))),h+a%|
00005ef0  28 31 29 2a 56 25 2f 49  25 29 3a e7 77 3c 68 8c  |(1)*V%/I%):.w<h.|
00005f00  53 3d 77 8b 53 3d 68 0d  44 52 79 55 61 3d 53 2f  |S=w.S=h.DRyUa=S/|
00005f10  32 3a 56 61 3d 55 61 3a  54 3d 30 3a e3 64 25 3d  |2:Va=Ua:T=0:.d%=|
00005f20  31 b8 53 63 25 3a 54 2b  3d 61 28 30 2c 64 25 2c  |1.Sc%:T+=a(0,d%,|
00005f30  30 29 3a ed 3a e7 54 3d  30 8c 85 32 30 30 32 2c  |0):.:.T=0..2002,|
00005f40  22 44 61 74 61 20 73 75  6d 73 20 74 6f 20 7a 65  |"Data sums to ze|
00005f50  72 6f 20 2d 20 63 61 6e  6e 6f 74 20 67 65 6e 65  |ro - cannot gene|
00005f60  72 61 74 65 20 70 69 65  20 77 68 65 72 65 20 61  |rate pie where a|
00005f70  6c 6c 20 64 61 74 61 20  69 73 20 7a 65 72 6f 22  |ll data is zero"|
00005f80  0d 44 84 4c 57 61 3d 33  36 30 2f 54 3a 58 61 3d  |.D.LWa=360/T:Xa=|
00005f90  31 30 30 2f 54 3a e3 64  25 3d 31 b8 53 63 25 3a  |100/T:.d%=1.Sc%:|
00005fa0  e7 54 63 25 3d 31 8c 66  24 28 64 25 29 3d a4 65  |.Tc%=1.f$(d%)=.e|
00005fb0  28 58 61 2a 61 28 30 2c  64 25 2c 30 29 2c 30 29  |(Xa*a(0,d%,0),0)|
00005fc0  2b 22 25 20 22 2b 67 24  28 64 25 29 0d 44 a2 2c  |+"% "+g$(d%).D.,|
00005fd0  e7 55 63 25 3d 31 8c 66  24 28 64 25 29 3d a4 65  |.Uc%=1.f$(d%)=.e|
00005fe0  28 61 28 30 2c 64 25 2c  30 29 2c 30 29 2b 22 20  |(a(0,d%,0),0)+" |
00005ff0  22 2b 66 24 28 64 25 29  0d 44 ac 6d ed 3a f2 56  |"+f$(d%).D.m.:.V|
00006000  28 53 2b a4 62 28 22 20  20 22 2c 61 25 28 36 29  |(S+.b("  ",a%(6)|
00006010  29 2c 68 2c 53 63 25 2c  66 24 28 29 2c 61 25 28  |),h,Sc%,f$(),a%(|
00006020  29 2c 31 29 3a 70 3d 30  3a 46 3d 53 2f 32 3a f2  |),1):p=0:F=S/2:.|
00006030  6b 3a e3 56 63 25 3d 31  b8 53 63 25 3a 59 61 3d  |k:.Vc%=1.Sc%:Ya=|
00006040  a4 62 28 62 24 28 56 63  25 29 2c 61 25 28 30 29  |.b(b$(Vc%),a%(0)|
00006050  29 3a e7 70 3e af 8c 5a  61 3d 30 2e 35 2a 59 61  |):.p>..Za=0.5*Ya|
00006060  8b 5a 61 3d 30 0d 44 fc  7b 44 3d b2 28 57 61 2a  |.Za=0.D.{D=.(Wa*|
00006070  61 28 30 2c 56 63 25 2c  30 29 29 3a c8 95 44 3e  |a(0,Vc%,0)):..D>|
00006080  28 af 2f 32 29 3a f2 58  28 af 2f 32 2c 70 2c 46  |(./2):.X(./2,p,F|
00006090  2c 55 61 2c 56 61 2c 62  25 28 56 63 25 29 2c a3  |,Ua,Va,b%(Vc%),.|
000060a0  29 3a 70 2b 3d af 2f 32  3a 44 2d 3d af 2f 32 3a  |):p+=./2:D-=./2:|
000060b0  ce 3a f2 58 28 44 2c 70  2c 46 2c 55 61 2c 56 61  |.:.X(D,p,F,Ua,Va|
000060c0  2c 62 25 28 56 63 25 29  2c b9 29 3a 70 2b 3d 44  |,b%(Vc%),.):p+=D|
000060d0  3a ed 3a f2 6c 3a f2 6c  3a 3d a4 72 28 22 22 29  |:.:.l:.l:=.r("")|
000060e0  0d 45 7e d2 dd f2 58 28  44 2c 70 2c 46 2c 74 2c  |.E~...X(D,p,F,t,|
000060f0  75 2c 58 63 25 2c 60 61  29 3a ea 55 2c 56 2c 61  |u,Xc%,`a):.U,V,a|
00006100  62 2c 62 62 2c 63 62 2c  64 62 2c 65 62 2c 66 62  |b,bb,cb,db,eb,fb|
00006110  2c 67 62 2c 68 62 2c 69  62 2c 57 3a 57 3d 46 3a  |,gb,hb,ib,W:W=F:|
00006120  55 3d 44 2f 31 32 38 2a  34 31 3a 56 3d 46 2f 9b  |U=D/128*41:V=F/.|
00006130  55 3a 61 62 3d 57 2f b5  55 3a 62 62 3d 74 2b 46  |U:ab=W/.U:bb=t+F|
00006140  2a b5 28 70 2b 44 29 3a  63 62 3d 75 2b 57 2a 9b  |*.(p+D):cb=u+W*.|
00006150  28 70 2b 44 29 3a 64 62  3d 70 2b 55 3a 65 62 3d  |(p+D):db=p+U:eb=|
00006160  70 2b 44 2d 55 3a 66 62  3d 74 2b 56 2a b5 64 62  |p+D-U:fb=t+V*.db|
00006170  3a 67 62 3d 75 2b 56 2a  9b 64 62 3a 68 62 3d 74  |:gb=u+V*.db:hb=t|
00006180  2b 56 2a b5 65 62 3a 69  62 3d 75 2b 56 2a 9b 65  |+V*.eb:ib=u+V*.e|
00006190  62 3a f2 73 28 b9 2c b9  29 3a f2 68 28 58 63 25  |b:.s(.,.):.h(Xc%|
000061a0  2c 2d 31 2c 6a 2c 30 2c  30 29 3a f2 66 28 74 2c  |,-1,j,0,0):.f(t,|
000061b0  75 29 0d 46 1e 81 f2 61  28 74 2b 46 2a b5 70 2c  |u).F...a(t+F*.p,|
000061c0  75 2b 57 2a 9b 70 29 3a  f2 48 28 62 62 2c 63 62  |u+W*.p):.H(bb,cb|
000061d0  2c 66 62 2c 67 62 2c 68  62 2c 69 62 29 3a f2 61  |,fb,gb,hb,ib):.a|
000061e0  28 74 2c 75 29 3a f2 67  3a f2 73 28 a3 2c b9 29  |(t,u):.g:.s(.,.)|
000061f0  3a f2 68 28 2d 31 2c 30  2c 6a 2c 30 2c 30 29 3a  |:.h(-1,0,j,0,0):|
00006200  f2 66 28 74 2b 46 2a b5  70 2c 75 2b 57 2a 9b 70  |.f(t+F*.p,u+W*.p|
00006210  29 3a f2 48 28 62 62 2c  63 62 2c 66 62 2c 67 62  |):.H(bb,cb,fb,gb|
00006220  2c 68 62 2c 69 62 29 3a  e7 60 61 8c f2 61 28 74  |,hb,ib):.`a..a(t|
00006230  2c 75 29 0d 46 78 10 f2  67 3a f2 73 28 b9 2c b9  |,u).Fx..g:.s(.,.|
00006240  29 3a e1 0d 46 96 2d dd  a4 7a 28 61 29 3a e7 61  |):..F.-..z(a):.a|
00006250  3e 28 33 2a af 2f 34 29  8c 3d 33 2a af 2f 34 8b  |>(3*./4).=3*./4.|
00006260  e7 61 3c 28 af 2f 32 29  8c 3d af 2f 32 8b 3d 61  |.a<(./2).=./2.=a|
00006270  0d 46 aa 05 e0 0d 46 b4  27 dd a4 41 28 61 29 3a  |.F....F.'..A(a):|
00006280  e7 28 61 3e 28 af 2f 32  29 29 80 28 61 3c 28 33  |.(a>(./2)).(a<(3|
00006290  2a af 2f 34 29 29 8c 3d  b9 8b 3d a3 0d 46 c8 05  |*./4)).=..=..F..|
000062a0  e0 0d 46 d2 d9 dd f2 56  28 78 2c 79 2c 71 25 2c  |..F....V(x,y,q%,|
000062b0  63 24 28 29 2c 61 25 28  29 2c 5a 61 25 29 3a f2  |c$(),a%(),Za%):.|
000062c0  6b 3a 6a 62 3d 61 25 28  36 29 3a 6b 62 3d 61 25  |k:jb=a%(6):kb=a%|
000062d0  28 37 29 3a 66 24 3d 65  24 28 33 29 3a 4a 3d 31  |(7):f$=e$(3):J=1|
000062e0  2e 34 2a 28 6b 62 2a 56  25 2f 49 25 29 3a 79 2d  |.4*(kb*V%/I%):y-|
000062f0  3d 71 25 2a 4a 3a f2 69  28 22 4b 45 59 22 2c 30  |=q%*J:.i("KEY",0|
00006300  2c 2d 32 35 36 2c 34 2c  6a 62 2c 6b 62 2c 78 2c  |,-256,4,jb,kb,x,|
00006310  79 2b 71 25 2a 4a 29 3a  e3 64 25 3d 30 b8 28 71  |y+q%*J):.d%=0.(q|
00006320  25 2d 31 29 3a f2 6a 28  78 2c 79 2b 64 25 2a 4a  |%-1):.j(x,y+d%*J|
00006330  2c 31 2c 4a 2f 36 2a 34  2c 62 25 28 64 25 2b 5a  |,1,J/6*4,b%(d%+Z|
00006340  61 25 29 2c 30 2c 30 2c  30 29 3a f2 69 28 63 24  |a%),0,0,0):.i(c$|
00006350  28 64 25 2b 5a 61 25 29  2c 30 2c 2d 32 35 36 2c  |(d%+Za%),0,-256,|
00006360  34 2c 6a 62 2c 6b 62 2c  78 2b 31 2e 35 2c 79 2b  |4,jb,kb,x+1.5,y+|
00006370  64 25 2a 4a 29 3a ed 3a  f2 6c 0d 47 5e 1e 46 61  |d%*J):.:.l.G^.Fa|
00006380  3d 78 3a 47 61 3d 79 2d  4a 3a 48 61 3d 4a 3a 4d  |=x:Ga=y-J:Ha=J:M|
00006390  63 25 3d 5a 61 25 3a e1  0d 47 9a 24 dd a4 62 28  |c%=Za%:..G.$..b(|
000063a0  6b 24 2c 6c 62 29 3a 3d  28 a9 28 6b 24 29 2a 30  |k$,lb):=(.(k$)*0|
000063b0  2e 38 2a 6c 62 2a 56 25  29 2f 49 25 0d 47 b8 30  |.8*lb*V%)/I%.G.0|
000063c0  dd a4 65 28 6d 62 2c 55  25 29 3a ea 64 24 2c 73  |..e(mb,U%):.d$,s|
000063d0  25 3a 64 24 3d c3 6d 62  3a 73 25 3d a7 64 24 2c  |%:d$=.mb:s%=.d$,|
000063e0  22 2e 22 29 3a e7 73 25  3c 3e 30 8c 0d 47 e0 0b  |"."):.s%<>0..G..|
000063f0  e7 55 25 3c 3e 30 8c 0d  47 ea 38 64 24 3d c0 64  |.U%<>0..G.8d$=.d|
00006400  24 2c 73 25 2b 55 25 29  3a e7 28 a9 28 64 24 29  |$,s%+U%):.(.(d$)|
00006410  2d 73 25 29 3c 55 25 8c  64 24 2b 3d c4 55 25 2d  |-s%)<U%.d$+=.U%-|
00006420  28 a9 28 64 24 29 2d 73  25 29 2c 22 30 22 29 0d  |(.(d$)-s%),"0").|
00006430  47 fe 12 cc 3a 64 24 3d  c0 64 24 2c 73 25 2d 31  |G...:d$=.d$,s%-1|
00006440  29 0d 48 1c 05 cd 0d 48  1c 1d cc 3a e7 55 25 3c  |).H....H...:.U%<|
00006450  3e 30 8c 64 24 2b 3d 22  2e 22 2b c4 55 25 2c 22  |>0.d$+="."+.U%,"|
00006460  30 22 29 0d 48 30 05 cd  0d 48 3a 07 3d 64 24 0d  |0").H0...H:.=d$.|
00006470  48 4e e5 dd f2 48 61 3a  de 59 63 25 20 31 30 30  |HN...Ha:.Yc% 100|
00006480  30 30 3a f2 47 28 59 63  25 2c 31 30 30 30 30 29  |00:.G(Yc%,10000)|
00006490  3a f2 57 3a f2 72 28 22  54 72 69 6e 69 74 79 2e  |:.W:.r("Trinity.|
000064a0  4d 65 64 69 75 6d 22 29  3a f2 72 28 22 52 65 76  |Medium"):.r("Rev|
000064b0  75 65 22 29 3a f2 72 28  22 48 6f 6d 65 72 74 6f  |ue"):.r("Homerto|
000064c0  6e 2e 4d 65 64 69 75 6d  22 29 3a f2 72 28 22 45  |n.Medium"):.r("E|
000064d0  4e 44 22 29 3a f2 69 28  22 54 65 73 74 69 6e 67  |ND"):.i("Testing|
000064e0  22 2c 30 2c 26 44 44 44  44 44 44 44 44 2c 32 2c  |",0,&DDDDDDDD,2,|
000064f0  34 38 2c 31 30 2c 31 2c  32 2e 35 29 3a f2 6b 3a  |48,10,1,2.5):.k:|
00006500  f2 69 28 22 48 65 6c 6c  6f 22 2c 30 2c 2d 31 2c  |.i("Hello",0,-1,|
00006510  31 2c 33 36 2c 33 36 2c  30 2c 36 29 3a f2 68 28  |1,36,36,0,6):.h(|
00006520  2d 31 2c 30 2c 31 2c 30  2c 2e 33 29 3a f2 66 28  |-1,0,1,0,.3):.f(|
00006530  30 2c 30 29 3a f2 61 28  30 2c 32 29 3a f2 61 28  |0,0):.a(0,2):.a(|
00006540  32 2c 32 29 3a f2 61 28  32 2c 30 29 3a f2 66 28  |2,2):.a(2,0):.f(|
00006550  35 2c 35 29 0d 48 ee 47  f2 48 28 31 30 2c 31 30  |5,5).H.G.H(10,10|
00006560  2c 36 2c 36 2c 39 2c 39  29 3a f2 67 3a f2 6c 3a  |,6,6,9,9):.g:.l:|
00006570  f2 6a 28 34 2c 31 31 2c  32 2c 31 2c 2d 31 2c 30  |.j(4,11,2,1,-1,0|
00006580  2c 31 2c 30 29 3a f2 49  61 28 22 52 41 4d 3a 54  |,1,0):.Ia("RAM:T|
00006590  45 53 54 46 49 4c 45 22  29 3a e1 0d 49 2a 05 e0  |ESTFILE"):..I*..|
000065a0  0d 49 34 a8 dd f2 47 28  50 62 25 2c 51 62 25 29  |.I4...G(Pb%,Qb%)|
000065b0  3a 50 63 25 3d 31 38 31  34 32 3a 5a 63 25 3d 34  |:Pc%=18142:Zc%=4|
000065c0  36 30 38 30 3a 56 25 3d  36 34 30 3a 49 25 3d 50  |6080:V%=640:I%=P|
000065d0  63 25 3a 5f 63 25 3d a3  3a 59 25 3d 30 3a 60 63  |c%:_c%=.:Y%=0:`c|
000065e0  25 3d a3 3a f2 73 28 b9  2c b9 29 3a 5f 63 25 3d  |%=.:.s(.,.):_c%=|
000065f0  b9 3a 61 64 25 3d 50 62  25 3a 62 64 25 3d 51 62  |.:ad%=Pb%:bd%=Qb|
00006600  25 3a 63 64 25 3d 61 64  25 2b 62 64 25 2d 31 30  |%:cd%=ad%+bd%-10|
00006610  32 34 3a 64 64 25 3d 63  64 25 3a 65 64 25 3d 61  |24:dd%=cd%:ed%=a|
00006620  64 25 2b 62 64 25 2d 35  31 32 3a 5a 25 3d 65 64  |d%+bd%-512:Z%=ed|
00006630  25 3a 66 64 25 3d 63 64  25 2d 34 3a 7a 25 3d 61  |%:fd%=cd%-4:z%=a|
00006640  64 25 3a f2 4a 61 3a e1  0d 49 b6 14 dd f2 4b 61  |d%:.Ja:..I....Ka|
00006650  28 67 64 25 29 3a c8 8e  67 64 25 ca 0d 49 ca 0d  |(gd%):..gd%..I..|
00006660  c9 31 3a 49 25 3d 5a 63  25 0d 49 de 0c c9 32 3a  |.1:I%=Zc%.I...2:|
00006670  49 25 3d 56 25 0d 49 e8  0c 7f 3a 49 25 3d 50 63  |I%=V%.I...:I%=Pc|
00006680  25 0d 49 f2 05 cb 0d 49  f2 05 e1 0d 49 fc 40 dd  |%.I....I....I.@.|
00006690  f2 4a 61 3a e7 ac 5f 63  25 8c 85 34 31 31 33 2c  |.Ja:.._c%..4113,|
000066a0  22 4e 6f 20 62 75 66 66  65 72 20 61 6c 6c 6f 63  |"No buffer alloc|
000066b0  61 74 65 64 20 66 6f 72  20 64 72 61 77 66 69 6c  |ated for drawfil|
000066c0  65 20 63 72 65 61 74 69  6f 6e 22 0d 4a 10 38 f2  |e creation".J.8.|
000066d0  75 28 22 44 72 61 77 22  2c a3 29 3a f2 63 28 32  |u("Draw",.):.c(2|
000066e0  30 31 29 3a f2 63 28 30  29 3a f2 75 28 22 44 72  |01):.c(0):.u("Dr|
000066f0  61 77 4c 69 62 20 20 20  20 20 22 2c a3 29 3a f2  |awLib     ",.):.|
00006700  76 3a e1 0d 4a 4c 59 dd  f2 63 28 68 64 25 29 3a  |v:..JLY..c(hd%):|
00006710  21 7a 25 3d 68 64 25 3a  7a 25 2b 3d 34 3a 59 25  |!z%=hd%:z%+=4:Y%|
00006720  2b 3d 34 3a e7 7a 25 3e  3d 66 64 25 8c 85 34 31  |+=4:.z%>=fd%..41|
00006730  31 32 2c 22 44 72 61 77  66 69 6c 65 20 74 6f 6f  |12,"Drawfile too|
00006740  20 6c 61 72 67 65 20 66  6f 72 20 61 6c 6c 6f 63  | large for alloc|
00006750  61 74 65 64 20 62 75 66  66 65 72 22 0d 4a 74 05  |ated buffer".Jt.|
00006760  e1 0d 4a 7e 5a dd f2 4c  61 28 69 64 25 29 3a 3f  |..J~Z..La(id%):?|
00006770  7a 25 3d 69 64 25 3a 7a  25 2b 3d 31 3a 59 25 2b  |z%=id%:z%+=1:Y%+|
00006780  3d 31 3a e7 7a 25 3e 3d  66 64 25 8c 85 34 31 31  |=1:.z%>=fd%..411|
00006790  32 2c 22 44 72 61 77 66  69 6c 65 20 74 6f 6f 20  |2,"Drawfile too |
000067a0  6c 61 72 67 65 20 66 6f  72 20 61 6c 6c 6f 63 61  |large for alloca|
000067b0  74 65 64 20 62 75 66 66  65 72 22 0d 4a a6 05 e1  |ted buffer".J...|
000067c0  0d 4a b0 4f dd f2 75 28  64 24 2c 6a 64 25 29 3a  |.J.O..u(d$,jd%):|
000067d0  e7 28 7a 25 2b a9 28 64  24 29 29 3e 66 64 25 8c  |.(z%+.(d$))>fd%.|
000067e0  85 34 31 31 32 2c 22 44  72 61 77 66 69 6c 65 20  |.4112,"Drawfile |
000067f0  74 6f 6f 20 6c 61 72 67  65 20 66 6f 72 20 61 6c  |too large for al|
00006800  6c 6f 63 61 74 65 64 20  62 75 66 66 65 72 22 0d  |located buffer".|
00006810  4a c4 30 24 7a 25 3d 64  24 3a 7a 25 2b 3d a9 28  |J.0$z%=d$:z%+=.(|
00006820  64 24 29 3a 59 25 2b 3d  a9 28 64 24 29 3a e7 6a  |d$):Y%+=.(d$):.j|
00006830  64 25 80 28 28 7a 25 80  33 29 3c 3e 30 29 8c 0d  |d%.((z%.3)<>0)..|
00006840  4a e2 2a e3 6b 64 25 3d  31 b8 34 2d 28 7a 25 80  |J.*.kd%=1.4-(z%.|
00006850  33 29 3a 7a 25 3f 6b 64  25 3d 30 3a 7a 25 2b 3d  |3):z%?kd%=0:z%+=|
00006860  31 3a 59 25 2b 3d 31 3a  ed 0d 4b 14 05 cd 0d 4b  |1:Y%+=1:..K....K|
00006870  14 05 e1 0d 4b 1e 1f dd  f2 77 28 50 62 25 29 3a  |....K....w(Pb%):|
00006880  e7 5a 25 3c 3e 65 64 25  8c 21 28 21 5a 25 29 3d  |.Z%<>ed%.!(!Z%)=|
00006890  59 25 0d 4b 32 1f 59 25  3d 30 3a 21 50 62 25 3d  |Y%.K2.Y%=0:!Pb%=|
000068a0  30 3a 5a 25 2b 3d 34 3a  21 5a 25 3d 50 62 25 3a  |0:Z%+=4:!Z%=Pb%:|
000068b0  e1 0d 4b 46 11 dd f2 78  3a e7 5a 25 3c 3e 65 64  |..KF...x:.Z%<>ed|
000068c0  25 8c 0d 4b 5a 13 21 28  21 5a 25 29 3d 59 25 3a  |%..KZ.!(!Z%)=Y%:|
000068d0  5a 25 2d 3d 34 0d 4b 78  05 cd 0d 4b 78 29 e7 5a  |Z%-=4.Kx...Kx).Z|
000068e0  25 3c 3e 65 64 25 8c 21  28 21 5a 25 29 3d 28 21  |%<>ed%.!(!Z%)=(!|
000068f0  28 21 5a 25 29 29 2b 59  25 3a 59 25 3d 21 28 21  |(!Z%))+Y%:Y%=!(!|
00006900  5a 25 29 0d 4b 82 05 e1  0d 4b 8c 1c dd f2 49 28  |Z%).K....K....I(|
00006910  47 25 29 3a e7 21 47 25  3e 6c 64 25 8c 21 47 25  |G%):.!G%>ld%.!G%|
00006920  3d 6c 64 25 0d 4b a0 16  e7 47 25 21 34 3e 6d 64  |=ld%.K...G%!4>md|
00006930  25 8c 47 25 21 34 3d 6d  64 25 0d 4b aa 16 e7 47  |%.G%!4=md%.K...G|
00006940  25 21 38 3c 6e 64 25 8c  47 25 21 38 3d 6e 64 25  |%!8<nd%.G%!8=nd%|
00006950  0d 4b b4 18 e7 47 25 21  31 32 3c 6f 64 25 8c 47  |.K...G%!12<od%.G|
00006960  25 21 31 32 3d 6f 64 25  0d 4b be 05 e1 0d 4b c8  |%!12=od%.K....K.|
00006970  19 dd f2 6d 28 78 2c 79  29 3a e7 6c 64 25 3e 78  |...m(x,y):.ld%>x|
00006980  8c 6c 64 25 3d 78 0d 4b  dc 10 e7 6e 64 25 3c 78  |.ld%=x.K...nd%<x|
00006990  8c 6e 64 25 3d 78 0d 4b  e6 10 e7 6d 64 25 3e 79  |.nd%=x.K...md%>y|
000069a0  8c 6d 64 25 3d 79 0d 4b  f0 10 e7 6f 64 25 3c 79  |.md%=y.K...od%<y|
000069b0  8c 6f 64 25 3d 79 0d 4b  fa 05 e1 0d 4c 04 1a dd  |.od%=y.K....L...|
000069c0  f2 76 3a e7 64 64 25 3c  3e 63 64 25 8c f2 49 28  |.v:.dd%<>cd%..I(|
000069d0  21 64 64 25 29 0d 4c 18  6f 64 64 25 2b 3d 34 3a  |!dd%).L.odd%+=4:|
000069e0  21 64 64 25 3d 7a 25 3a  6c 64 25 3d 26 46 46 46  |!dd%=z%:ld%=&FFF|
000069f0  46 46 46 3a 6d 64 25 3d  6c 64 25 3a 21 7a 25 3d  |FFF:md%=ld%:!z%=|
00006a00  6c 64 25 3a 7a 25 21 34  3d 6d 64 25 3a 6e 64 25  |ld%:z%!4=md%:nd%|
00006a10  3d 2d 26 46 46 46 46 46  46 3a 6f 64 25 3d 6e 64  |=-&FFFFFF:od%=nd|
00006a20  25 3a 7a 25 21 38 3d 6e  64 25 3a 7a 25 21 31 32  |%:z%!8=nd%:z%!12|
00006a30  3d 6f 64 25 3a 7a 25 2b  3d 31 36 3a 59 25 2b 3d  |=od%:z%+=16:Y%+=|
00006a40  31 36 3a e1 0d 4c 4a 17  dd f2 79 3a ea 70 64 25  |16:..LJ...y:.pd%|
00006a50  3a e7 64 64 25 3c 3e 63  64 25 8c 0d 4c 68 1e f2  |:.dd%<>cd%..Lh..|
00006a60  49 28 21 64 64 25 29 3a  64 64 25 2d 3d 34 3a e7  |I(!dd%):dd%-=4:.|
00006a70  64 64 25 3c 3e 63 64 25  8c 0d 4c 86 3c 70 64 25  |dd%<>cd%..L.<pd%|
00006a80  3d 21 64 64 25 3a f2 49  28 70 64 25 29 3a 6c 64  |=!dd%:.I(pd%):ld|
00006a90  25 3d 21 70 64 25 3a 6d  64 25 3d 70 64 25 21 34  |%=!pd%:md%=pd%!4|
00006aa0  3a 6e 64 25 3d 70 64 25  21 38 3a 6f 64 25 3d 70  |:nd%=pd%!8:od%=p|
00006ab0  64 25 21 31 32 0d 4c b8  30 cc 3a 6c 64 25 3d 26  |d%!12.L.0.:ld%=&|
00006ac0  46 46 46 46 46 46 46 3a  6d 64 25 3d 6c 64 25 3a  |FFFFFFF:md%=ld%:|
00006ad0  6e 64 25 3d 2d 26 46 46  46 46 46 46 46 3a 6f 64  |nd%=-&FFFFFFF:od|
00006ae0  25 3d 6e 64 25 0d 4c d6  05 cd 0d 4c d6 26 cc 3a  |%=nd%.L....L.&.:|
00006af0  85 34 31 31 34 2c 22 4e  6f 20 61 63 74 69 76 65  |.4114,"No active|
00006b00  20 62 6f 75 6e 64 69 6e  67 20 62 6f 78 65 73 22  | bounding boxes"|
00006b10  0d 4c f4 05 cd 0d 4c f4  05 e1 0d 4c fe 1e dd f2  |.L....L....L....|
00006b20  73 28 61 25 2c 62 25 29  3a 71 64 25 3d 62 25 3a  |s(a%,b%):qd%=b%:|
00006b30  72 64 25 3d 61 25 3a e1  0d 4d 1c 22 dd f2 68 28  |rd%=a%:..M."..h(|
00006b40  73 64 25 2c 74 64 25 2c  6e 62 2c 75 64 25 2c 6f  |sd%,td%,nb,ud%,o|
00006b50  62 29 3a e7 60 63 25 8c  f2 67 0d 4d 30 48 f2 77  |b):.`c%..g.M0H.w|
00006b60  28 7a 25 2b 34 29 3a f2  63 28 32 29 3a f2 63 28  |(z%+4):.c(2):.c(|
00006b70  30 29 3a f2 76 3a f2 63  28 73 64 25 29 3a f2 63  |0):.v:.c(sd%):.c|
00006b80  28 74 64 25 29 3a f2 63  28 6e 62 2a 56 25 29 3a  |(td%):.c(nb*V%):|
00006b90  e7 6f 62 3c 3e 30 8c 75  64 25 3d 75 64 25 84 32  |.ob<>0.ud%=ud%.2|
00006ba0  5e 37 0d 4d 80 13 f2 63  28 75 64 25 29 3a e7 6f  |^7.M...c(ud%):.o|
00006bb0  62 3c 3e 30 8c 0d 4d 94  23 f2 63 28 30 29 3a f2  |b<>0..M.#.c(0):.|
00006bc0  63 28 32 29 3a f2 63 28  6f 62 2a 49 25 29 3a f2  |c(2):.c(ob*I%):.|
00006bd0  63 28 6f 62 2a 49 25 29  0d 4d c6 05 cd 0d 4d c6  |c(ob*I%).M....M.|
00006be0  0b 60 63 25 3d a3 3a e1  0d 4d da 0d dd f2 67 3a  |.`c%=.:..M....g:|
00006bf0  e7 72 64 25 8c 0d 4d ee  14 e7 71 64 25 8c f2 63  |.rd%..M...qd%..c|
00006c00  28 35 29 8b f2 63 28 34  29 0d 4d f8 05 cd 0d 4e  |(5)..c(4).M....N|
00006c10  02 17 f2 63 28 30 29 3a  60 63 25 3d a3 3a f2 79  |...c(0):`c%=.:.y|
00006c20  3a f2 78 3a e1 0d 4e 34  3c dd f2 61 28 78 2c 79  |:.x:..N4<..a(x,y|
00006c30  29 3a 78 3d 78 2a 49 25  3a 79 3d 79 2a 49 25 3a  |):x=x*I%:y=y*I%:|
00006c40  f2 6d 28 78 2c 79 29 3a  f2 63 28 38 29 3a f2 63  |.m(x,y):.c(8):.c|
00006c50  28 78 29 3a f2 63 28 79  29 3a 60 63 25 3d b9 3a  |(x):.c(y):`c%=.:|
00006c60  e1 0d 4e 84 2e dd f2 66  28 78 2c 79 29 3a 78 3d  |..N....f(x,y):x=|
00006c70  78 2a 49 25 3a 79 3d 79  2a 49 25 3a f2 6d 28 78  |x*I%:y=y*I%:.m(x|
00006c80  2c 79 29 3a e7 28 60 63  25 80 72 64 25 29 8c 0d  |,y):.(`c%.rd%)..|
00006c90  4e ac 14 e7 71 64 25 8c  f2 63 28 35 29 8b f2 63  |N...qd%..c(5)..c|
00006ca0  28 34 29 0d 4e b6 05 cd  0d 4e c0 1d 60 63 25 3d  |(4).N....N..`c%=|
00006cb0  b9 3a f2 63 28 32 29 3a  f2 63 28 78 29 3a f2 63  |.:.c(2):.c(x):.c|
00006cc0  28 79 29 3a e1 0d 4e f2  9c dd f2 48 28 78 2c 79  |(y):..N....H(x,y|
00006cd0  2c 70 62 2c 71 62 2c 72  62 2c 73 62 29 3a 78 3d  |,pb,qb,rb,sb):x=|
00006ce0  78 2a 49 25 3a 79 3d 79  2a 49 25 3a 70 62 3d 70  |x*I%:y=y*I%:pb=p|
00006cf0  62 2a 49 25 3a 71 62 3d  71 62 2a 49 25 3a 72 62  |b*I%:qb=qb*I%:rb|
00006d00  3d 72 62 2a 49 25 3a 73  62 3d 73 62 2a 49 25 3a  |=rb*I%:sb=sb*I%:|
00006d10  f2 6d 28 78 2c 79 29 3a  f2 6d 28 70 62 2c 71 62  |.m(x,y):.m(pb,qb|
00006d20  29 3a f2 6d 28 72 62 2c  73 62 29 3a f2 63 28 36  |):.m(rb,sb):.c(6|
00006d30  29 3a f2 63 28 70 62 29  3a f2 63 28 71 62 29 3a  |):.c(pb):.c(qb):|
00006d40  f2 63 28 72 62 29 3a f2  63 28 73 62 29 3a f2 63  |.c(rb):.c(sb):.c|
00006d50  28 78 29 3a f2 63 28 79  29 3a 60 63 25 3d b9 3a  |(x):.c(y):`c%=.:|
00006d60  e1 0d 4f 92 27 dd f2 6b  3a e7 28 7a 25 80 33 29  |..O.'..k:.(z%.3)|
00006d70  3c 3e 30 8c 85 31 2c 22  41 6c 69 67 6e 6d 65 6e  |<>0..1,"Alignmen|
00006d80  74 20 65 72 72 6f 72 22  0d 4f a6 32 f2 77 28 7a  |t error".O.2.w(z|
00006d90  25 2b 34 29 3a f2 63 28  36 29 3a f2 63 28 30 29  |%+4):.c(6):.c(0)|
00006da0  3a f2 76 3a f2 75 28 22  20 20 20 20 20 20 20 20  |:.v:.u("        |
00006db0  20 20 20 20 22 2c a3 29  3a e1 0d 4f e2 0f dd f2  |    ",.):..O....|
00006dc0  6c 3a f2 79 3a f2 78 3a  e1 0d 50 0a 24 dd f2 57  |l:.y:.x:..P.$..W|
00006dd0  3a f2 77 28 7a 25 2b 34  29 3a f2 63 28 30 29 3a  |:.w(z%+4):.c(0):|
00006de0  f2 63 28 30 29 3a 76 64  25 3d 31 3a e1 0d 50 46  |.c(0):vd%=1:..PF|
00006df0  1b dd f2 72 28 62 24 29  3a ea 6b 64 25 3a e7 62  |...r(b$):.kd%:.b|
00006e00  24 3d 22 45 4e 44 22 8c  0d 50 64 0f e7 28 7a 25  |$="END"..Pd..(z%|
00006e10  80 33 29 3c 3e 30 8c 0d  50 6e 2c e3 6b 64 25 3d  |.3)<>0..Pn,.kd%=|
00006e20  31 b8 28 34 2d 28 7a 25  80 33 29 29 3a 7a 25 3f  |1.(4-(z%.3)):z%?|
00006e30  6b 64 25 3d 30 3a 7a 25  2b 3d 31 3a 59 25 2b 3d  |kd%=0:z%+=1:Y%+=|
00006e40  31 3a ed 0d 50 a0 05 cd  0d 50 a0 06 f2 78 0d 50  |1:..P....P...x.P|
00006e50  b4 21 cc 3a f2 4c 61 28  76 64 25 29 3a 76 64 25  |.!.:.La(vd%):vd%|
00006e60  2b 3d 31 3a f2 75 28 62  24 2b bd 30 2c a3 29 0d  |+=1:.u(b$+.0,.).|
00006e70  50 dc 05 cd 0d 50 dc 05  e1 0d 50 e6 c9 dd f2 69  |P....P....P....i|
00006e80  28 6b 24 2c 58 63 25 2c  53 25 2c 75 64 25 2c 74  |(k$,Xc%,S%,ud%,t|
00006e90  62 2c 75 62 2c 74 2c 75  29 3a 6b 24 3d 6b 24 2b  |b,ub,t,u):k$=k$+|
00006ea0  bd 30 3a f2 77 28 7a 25  2b 34 29 3a f2 63 28 31  |.0:.w(z%+4):.c(1|
00006eb0  29 3a f2 63 28 30 29 3a  f2 76 3a f2 63 28 58 63  |):.c(0):.v:.c(Xc|
00006ec0  25 29 3a f2 63 28 53 25  29 3a f2 63 28 75 64 25  |%):.c(S%):.c(ud%|
00006ed0  80 32 35 35 29 3a f2 63  28 74 62 2a 56 25 29 3a  |.255):.c(tb*V%):|
00006ee0  f2 63 28 75 62 2a 56 25  29 3a f2 63 28 74 2a 49  |.c(ub*V%):.c(t*I|
00006ef0  25 29 3a f2 63 28 75 2a  49 25 29 3a f2 75 28 6b  |%):.c(u*I%):.u(k|
00006f00  24 2c b9 29 3a f2 6d 28  28 74 2a 49 25 29 2b 28  |$,.):.m((t*I%)+(|
00006f10  74 62 2a 56 25 2a a9 28  6b 24 29 29 2c 28 75 2a  |tb*V%*.(k$)),(u*|
00006f20  49 25 29 2b 28 75 62 2a  56 25 29 29 3a f2 6d 28  |I%)+(ub*V%)):.m(|
00006f30  74 2a 49 25 2c 75 2a 49  25 29 3a f2 79 3a f2 78  |t*I%,u*I%):.y:.x|
00006f40  3a e1 0d 51 a4 67 dd f2  6a 28 78 2c 79 2c 77 2c  |:..Q.g..j(x,y,w,|
00006f50  68 2c 73 64 25 2c 74 64  25 2c 76 62 2c 77 62 29  |h,sd%,td%,vb,wb)|
00006f60  3a f2 68 28 73 64 25 2c  74 64 25 2c 76 62 2c 30  |:.h(sd%,td%,vb,0|
00006f70  2c 77 62 29 3a f2 66 28  78 2c 79 29 3a f2 61 28  |,wb):.f(x,y):.a(|
00006f80  78 2c 79 2b 68 29 3a f2  61 28 78 2b 77 2c 79 2b  |x,y+h):.a(x+w,y+|
00006f90  68 29 3a f2 61 28 78 2b  77 2c 79 29 3a f2 61 28  |h):.a(x+w,y):.a(|
00006fa0  78 2c 79 29 3a f2 67 3a  e1 0d 51 fe 19 dd a4 72  |x,y):.g:..Q....r|
00006fb0  28 62 24 29 3a f2 79 3a  e7 28 62 24 3c 3e 22 22  |(b$):.y:.(b$<>""|
00006fc0  29 8c 0d 52 1c 3c ff 28  22 53 41 56 45 20 22 2b  |)..R.<.("SAVE "+|
00006fd0  62 24 2b 22 20 22 2b c3  7e 61 64 25 2b 22 20 22  |b$+" "+.~ad%+" "|
00006fe0  2b c3 7e 7a 25 29 3a ff  28 22 53 45 54 54 59 50  |+.~z%):.("SETTYP|
00006ff0  45 20 22 2b 62 24 2b 22  20 41 46 46 22 29 0d 52  |E "+b$+" AFF").R|
00007000  3a 05 cd 0d 52 3a 0d 5f  63 25 3d a3 3a 3d a4 76  |:...R:._c%=.:=.v|
00007010  0d 52 58 0f dd a4 76 3a  3d 7a 25 2d 61 64 25 0d  |.RX...v:=z%-ad%.|
00007020  ff                                                |.|
00007021