� >$.!Crossword.!RunImage
4�z("Crossword",600,2600):�A:�B:�C:�p(�o,"CD"):�q
��q
(M�D:�I%�笤f("Quit","Unsaved crossword in memory. Are you sure?")� � �Th@
2�E:�
<���A:�Y% 1024*38:�"load <Obey$Dir>.DrawFile "+�~Y%:�b%(16,16):�a%(1):�e%(15,15):�d%(30,16):d%()=�:�b$(30,1):i$="Evol Snix           ":�c$(10):�c%(30,1):O%=�:T%=�:I%=�:�f%(16,16):�a$(30,1,2):�g%(30,1):w%=�:E%=�:�23,200,112,80,80,80,112,0,0,0
F��23,201,32,32,32,32,32,0,0,0,23,202,112,16,112,64,112,0,0,0,23,203,112,16,112,16,112,0,0,0,23,204,80,80,112,16,16,0,0,0,23,205,112,64,112,16,112,0,0,0,23,206,64,64,112,80,112,0,0,0,23,207,112,16,16,16,16,0,0,0,23,208,112,80,112,80,112,0,0,0,23,209,112
P�80,112,16,16,0,0,0:�
ZS��e:aa%=w%:g%()=�:�j:�i:�G%=1�15:�J%=1�15:�b%(G%,J%)>0�f%(G%,J%)=32�f%(G%,J%)=0
dH�:�:�t%=15�1�-1:�d%=1�15:�(b%(d%,t%)>0�b%(d%+1,t%)>0�b%(d%-1,t%)=0)�
n-w%=�:k$=�g(d%-1,t%-1):�k$<>"Not on word"�
x
�a%(1)>0�
�.�o%=1�a%(1):�k$=b$(o%,1)c%(o%,1)=e%(d%,t%)
��
��
��
��
�/�(b%(d%,t%)>0�b%(d%,t%-1)>0�b%(d%,t%+1)=0)�
�-w%=�:k$=�g(d%-1,t%-1):�k$<>"Not on word"�
�
�a%(0)>0�
�.�o%=1�a%(0):�k$=b$(o%,0)c%(o%,0)=e%(d%,t%)
��
��
��
��

M�:�:C%=�:ȕC%:C%=�:�d%=1�29:�a%=0�1:�c%(d%,a%)>c%(d%+1,a%)�c%(d%+1,a%)>0�

�Ȕc%(d%,a%),c%(d%+1,a%):Ȕb$(d%,a%),b$(d%+1,a%):Ȕa$(d%,a%,0),a$(d%+1,a%,0):Ȕa$(d%,a%,1),a$(d%+1,a%,1):Ȕa$(d%,a%,2),a$(d%+1,a%,2):C%=�

�

"�:�:�:w%=aa%:�

,���i:ba%=1:e%()=0:�t%=15�1�-1:�d%=1�15:�(b%(d%,t%)>0�b%(d%,t%-1)>0�b%(d%,t%+1)=0)�(b%(d%,t%)>0�b%(d%+1,t%)>0�b%(d%-1,t%)=0)�e%(d%,t%)=ba%:ba%+=1

6	�:�:�

@���B:ca%=�a("Info"):P%=�a("Crossword"):u%=�a("Input"):Z%=�a("Clues"):_%=�a("Name"):`%=�a("GCrossword"):p%=�a("GInput"):da%=�a("GClues"):ea%=�a("Savex"):fa%=�a("Saveb"):ga%=�a("Savea"):ha%=�a("Saved"):ia%=�a("Savead")

JNja%=�a("Saveaw"):ka%=�a("Savedw"):la%=�a("Saveadw"):ma%=�p("!crossword"):�

Tݤl(e%):Ȏe%�

^�ea%:=�

h�fa%:=�

r�ga%:=�

|�ha%:=�

��ia%:=�

��ja%:=�

��ka%:=�

��la%:=�

�:=�

��

�ݤq(e%)=na%

̉��C:b$="Task\Info>ca%\Save>ea%\Design\Quit":U%=�d(b$):oa%=�d("Delete\............"):pa%=�d("Clues\All Clues>ia%\Across>ga%\Down>ha%")

֋qa%=�d("Words\All>la%\Across>ja%\Down>ka%"):ra%=�d("Save\Crossword>ea%\Clues>pa%\Words>qa%\Grid>fa%"):sa%=�d("Written by\Evol Snix   ")

�ta%=�d("Solved_by\            \\\\\\\\\"):ua%=�d("Crossword\Author>sa%\Solved by>ta%\Reset"):va%=�d("Crossword\Delete>oa%\Save>ra%\Clear\Protected"):�

�ݤr(e%):Ȏe%�

��wa%:=U%

��`%:=ua%
D�P%:ȗK%,L%,xa%:ya%=w%:�k(K%,L%):l$=�g(K%,L%):�l$="Not on word"�
�w%=� w%=� � w%=�
l$=�g(K%,L%)
&�
0�r(oa%,1,l$):=va%
::=�
D�
NJݤg(x%,y%):g$="":x%+=1:y%+=1:�b%(x%,y%)=0�e%(x%,y%)=0�g$="Not on word"
X	Ȏw%�
b%ɹ:�b%(x%-1,y%)>0g$="Not on word"
l&� �:�b%(x%,y%+1)>0g$="Not on word"
v�
��g$=""�
�=ȕb%(x%,y%)>0�x%<16�y%>-1:g$+=�(b%(x%,y%)):�w%x%+=1�y%-=1
��
��
��(g$)<2�g$="Not on word"
�=g$
���F(e%,za%):Ȏe%�
��
��
�+��l(e%,Q%,B%,Aa%,R%,Ba%,S%,v%,m%):Ȏe%�
��P%:�G:Ca%=v%:Da%=m%
��Z%:�H:Ea%=v%:Fa%=m%
��`%:�I:Ca%=v%:Da%=m%
�da%:�J:Ga%=v%:Ha%=m%
�
�
 ��G:�23,17,7,6,16;8|
*~m%-=2:m%-=780:B%=S%-m%:Ia%=(Q%�52):Ja%=(B%�52):Ka%=((Q%+Aa%)�52):H%=((B%+R%)�52):�F%=Ia%�Ka%:�h%=H%�Ja%�-1:�d%(F%+1,h%+1)�
4�b%(F%+1,h%+1)>0�
>�ș"Wimp_SetColour",0:ȓȐv%+(F%*52)+2,m%+(h%*52)+4,47,43:ș"Wimp_SetColour",7:�v%+(F%*52)+14,m%+(h%*52)+32:�(b%(F%+1,h%+1)):ș"Wimp_SetColour",11:h$=�(e%(F%+1,h%+1)):�h$<>"0"�
HG�l%=1��(h$):�v%+(F%*52)+(14*(l%-1)),m%+(h%*52)+44:�200+�(�h$,l%,1))
R�
\�
f>�:ș"Wimp_SetColour",6:ȓȐv%+(F%*52)+2,m%+(h%*52)+4,47,43
p�
z�
��:�:�23,17,7,6,8;8|
�d%()=�:�
�>��m:d%()=�:�La%=1�15:�Ma%=1�15:�e%(La%,Ma%)>0d%(La%,Ma%)=�
�	�:�:�
���I:�23,17,7,6,16;8|
��m%-=2:m%-=780:B%=S%-m%:Ia%=(Q%�52):Ja%=(B%�52):Ka%=((Q%+Aa%)�52):H%=((B%+R%)�52):�F%=Ia%�Ka%:�h%=H%�Ja%�-1:�f%(F%+1,h%+1)>0�d%(F%+1,h%+1)�
��ș"Wimp_SetColour",0:ȓȐv%+(F%*52)+2,m%+(h%*52)+4,47,43:ș"Wimp_SetColour",7:�v%+(F%*52)+14,m%+(h%*52)+32:�(f%(F%+1,h%+1)):ș"Wimp_SetColour",11:h$=�(e%(F%+1,h%+1)):�h$<>"0"�
�G�l%=1��(h$):�v%+(F%*52)+(14*(l%-1)),m%+(h%*52)+44:�200+�(�h$,l%,1))
��
��
��
��
��:�:d%()=�:�23,17,7,6,8;8|
�
I��H:m%-=2:m%-=3904:B%=S%-m%:Ja%=(B%�128):H%=((B%+R%)�128):�H%<29H%+=1
&�h%=Ja%�H%:�a%=0�1:�a%(a%)>=30-h%�
$�ș"Wimp_SetColour",11:�v%+634-(608*a%),m%+(h%*128)+96:�b$(30-h%,a%):ș"Wimp_SetColour",7:�v%+634-(608*a%),m%+(h%*128)+64:�a$(30-h%,a%,0):�v%+634-(608*a%),m%+(h%*128)+32:�a$(30-h%,a%,1):�v%+634-(608*a%),m%+(h%*128)+0:�a$(30-h%,a%,2)
.�
8	�:�:�
BG��J:m%-=2:m%-=2944:B%=S%-m%:Ja%=(B%�96):H%=((B%+R%)�96):�H%>29H%=29
L�H%<29H%+=1
V3�h%=Ja%�H%:�a%=0�1:�a%(a%)>=30-h%�d%(30-h%,a%)�
`�g%(30-h%,a%)�
jș"Wimp_SetColour",3
t�:ș"Wimp_SetColour",11
~�
�E�v%+634-(608*a%),m%+(h%*96)+64:o$=�c%(30-h%,a%):�(o$)=1o$=" "+o$
��"";o$:�g%(30-h%,a%)�
�ș"Wimp_SetColour",3
��:ș"Wimp_SetColour",7
��
���v%+690-(608*a%),m%+(h%*96)+64:�a$(30-h%,a%,0):�v%+634-(608*a%),m%+(h%*96)+32:�a$(30-h%,a%,1):�v%+634-(608*a%),m%+(h%*96)+0:�a$(30-h%,a%,2)
��
��:�:d%()=�:�
���K(e%,g%,q%,x%,y%):Ȏe%�
��wa%:�n
��P%:�L(q%,g%)
��u%:�M(q%,g%)
�Z%:�N(q%,g%)

�`%:�O(q%,g%)
�p%:�P(q%,g%)
�da%:�Q(q%,g%)
(�_%:�s(q%,g%)
2�
<�
Fb��n:Na%=�:�T%�O%�笤f("Play Crossword","Crossword protected and unsaved. Are you sure?")�Na%=�
P�
Z	�Na%�
d
�T%��e
nPT%=�:�f(P%):�f(u%):�f(Z%):�f(_%):�g(`%):�g(da%):�g(p%):�O%��o(U%,3)��t(U%,3)
x�
��
�Z��L(q%,g%):f%=w%*w%:c$=�c(u%,0):�m(c$)��b("Crossword","Word already in crossword."):�
�2�a%(f%)=30��b("Crossword","Crossword full."):�
��k(x%,y%):�q%=4�
�7Oa%=�(c$):�Oa%<2�b("Crossword","Word too short."):�
�	Ȏw%�
�ɹ:�x%+Oa%>15�
�9�b("Crossword","Word too long to fit in this space.")
��:C%=�:�b%(x%,y%+1)>0�C%=�
�^�l%=1�Oa%:�(b%(x%+l%,y%+1)=0�b%(x%+l%,y%+2)=0�b%(x%+l%,y%)=0)�b%(x%+l%,y%+1)=�(�c$,l%,1))�
�
�:C%=�
��
��:�b%(x%+l%,y%+1)>0�C%=�
�C%=� �
`�m:�l%=1�Oa%:b%(x%+l%,y%+1)=�(�c$,l%,1)):d%(x%+l%,y%+1)=�:�:�i:I%=�:�u(c$):Pa%=�k(c$):�h(P%)
8�:�b("Crossword","Word will not fit in this space.")
"�
,�
6ɣ:�y%-Oa%<-1�
@9�b("Crossword","Word too long to fit in this space.")
J �:C%=�:�b%(x%+1,y%+2)>0�C%=�
Tf�l%=1�Oa%:�(b%(x%+1,y%-l%+2)=0�b%(x%,y%-l%+2)=0�b%(x%+2,y%-l%+2)=0)�b%(x%+1,y%-l%+2)=�(�c$,l%,1))�
^
�:C%=�
h�
r�:�b%(x%+1,y%-l%+2)>0�C%=�
|�C%=� �
�d�m:�l%=1�Oa%:b%(x%+1,y%-l%+2)=�(�c$,l%,1)):d%(x%+1,y%-l%+2)=�:�:�i:�u(c$):I%=�:Pa%=�k(c$):�h(P%)
�8�:�b("Crossword","Word will not fit in this space.")
��
��
��
��
��
���s(q%,g%):�q%=4�g%=1�
�	ȎT%�
�ɹ:i$=�c(_%,0)
�3ɣ:�Qa%=1�10:�c$(Qa%)=""c$(Qa%)=�c(_%,0):Qa%=10
��:�j
��

�f(_%)
�
�
&��j:�r(sa%,1,i$):�Ra%=1�10
'2� �(c$(Ra%))>0 � �r(ta%,Ra%,c$(Ra%)):�:� � �:�
:��O(q%,g%):Sa%=0:�k(x%,y%)
D+Sa%+=1:f%=E%*E%:Ta%=�:�e%(x%+1,y%+1)=0�
N
�q%=4�
X*�o%=1�a%(f%):�c%(o%,f%)=e%(x%+1,y%+1)�
bb�a(p%,3,a$(o%,f%,0)):�a(p%,4,a$(o%,f%,1)):�a(p%,7,a$(o%,f%,2)):�a(p%,2,�(e%(x%+1,y%+1))):Ȏf%�
l�0:E%=�:�a(p%,1,"Down")
v�1:E%=�:�a(p%,1,"Across")
��
�	Ta%=�
��
��
��
�-�(Sa%=1�Ta%=� �q%=4)�(Sa%=2�Ta%=� �q%=4)�
��E%=� �E%=� �E%=�
��
�#� Sa%=1 � Ta%=� � q%=4 � � �DDG
��
�/��v:f%=E%*E%:Ua%=�:Va%=�(�c(p%,2)):�Va%>30�
�d$=�c(p%,0):�a%(f%)>0�
�0�Wa%=1�a%(f%):�d$=b$(Wa%,f%)�c%(Wa%,f%)=Va%�
0�d%=1�15:�t%=1�15:�e%(d%,t%)=Va%�x%=d%:y%=t%
�:�:d%()=�:Ȏf%�
=�1:�o%=0��d$-1:f%(x%+o%,y%)=b%(x%+o%,y%):d%(x%+o%,y%)=�:�
 =�0:�o%=0��d$-1:f%(x%,y%-o%)=b%(x%,y%-o%):d%(x%,y%-o%)=�:�
*�
4�g%(Wa%,f%)=� �
>g�h(`%):Ua%=�:I%=�:�a(p%,0,""):�c(p%,0,0):g%(Wa%,f%)=�:d%(Wa%,f%)=�:�w(da%):Xa%=�:�a%=0�1:�a%(a%)>0�
H"�G%=1�a%(a%):�g%(G%,a%)=�Xa%=�
R�
\�
fC�:�Xa%��b("Crossword","Crossword Completed - Well Done"):�g(_%)
p�
z�
��
��
�+�Ua%��b("Crossword","Incorrect Guess.")
��
�'ݤm(d$):�f%:C%=�:�f%=0�1:�a%(f%)>0�
�"�o%=1�a%(f%):�d$=b$(o%,f%)C%=�
��
��
�	�:=C%
�(��u(d$):a%(f%)+=1:b$(a%(f%),f%)=d$:�
�$��R(d$):C%=�:f%=w%*w%:�a%(f%)>0�
��o%=1�a%(f%):�d$=b$(o%,f%)�
�yb$(o%,f%)=b$(a%(f%),f%):a$(o%,f%,0)=a$(a%(f%),f%,0):a$(o%,f%,1)=a$(a%(f%),f%,1):a$(o%,f%,2)=a$(a%(f%),f%,2):a%(f%)-=1
	�
	�
	�
	$�
	.>��k(�z%,�A%):z%-=Ca%:A%-=Da%:z%=z%�52:A%=A%�52:�z%>14z%=14
	8�A%>14A%=14
	B
�z%<0z%=0
	L
�A%<0A%=0
	V�
	`A��S(�z%,�A%):z%-=Ea%:A%-=Fa%:A%+=32:z%=z%�624:�z%=1�z%=0�z%=1
	jA%=A%�128:A%=30-A%:�
	tA��T(�z%,�A%):z%-=Ga%:A%-=Ha%:A%+=32:z%=z%�624:�z%=1�z%=0�z%=1
	~A%=A%�96:A%=30-A%:�
	���M(q%,g%):�q%�5�
	�	Ȏg%�
	��1:Ȏw%�
	�ɹ:w%=�:�a(u%,1,"Down")
	�ɣ:w%=�:�a(u%,1,"Across")
	��
	��6:�k(�c(u%,0))�
	�#�b("Crossword","Clue changed.")
	�.�:�b("Crossword","Word not in crossword.")
	��
	�6�2:�a(u%,0,""):�a(u%,3,""):�a(u%,4,""):�a(u%,7,"")
	��
�

�
ݤk(v$):笤m(v$)=�
Ua%=�:�f%=0�1:�a%(f%)>0�
(�o%=1�a%(f%):�v$=b$(o%,f%)�
2MI%=�:Ua%=�:a$(o%,f%,0)=�c(u%,3):a$(o%,f%,1)=�c(u%,4):a$(o%,f%,2)=�c(u%,7)
<�
F�
P�
Z�:�d(Z%):=Ua%
d��P(q%,g%):�q%�5�
n	Ȏg%�
x�1:ȎE%�
�ɹ:E%=�:�a(p%,1,"Down")
�ɣ:E%=�:�a(p%,1,"Across")
��
�	�5:�v
��
��
��
�*��N(q%,g%):�S(x%,y%):�y%>0�y%<=a%(x%)�
�U�a(u%,0,b$(y%,x%)):�a(u%,3,a$(y%,x%,0)):�a(u%,4,a$(y%,x%,1)):�a(u%,7,a$(y%,x%,2))
��
�	Ȏx%�
��0:w%=�:�a(u%,1,"Down")
��1:w%=�:�a(u%,1,"Across")
�
�
*��Q(q%,g%):�T(x%,y%):�y%>0�y%<=a%(x%)�
"^�a(p%,3,a$(y%,x%,0)):�a(p%,4,a$(y%,x%,1)):�a(p%,7,a$(y%,x%,2)):�a(p%,2,�(c%(y%,x%))):Ȏx%�
,�0:E%=�:�a(p%,1,"Down")
6�1:E%=�:�a(p%,1,"Across")
@�
J�
T�
^��U(e%,g%,D%):Ȏe%�
h�u%:�V(g%,D%)
r�p%:�W(g%,D%)
|�_%:�X(g%,D%)
��
��
���X(g%,D%):�D%=398�D%=13�
��g%=0�s(4,1)
��
��
��
���V(g%,D%):�D%=398�D%=13�
�	Ȏg%�
��0:�c(u%,3,0)
��3:�c(u%,4,0)
��4:�c(u%,7,0)
��7
�
�
�D%=399�
&	Ȏg%�
0�0
:�3:�c(u%,0,0)
D�4:�c(u%,3,0)
N�7:�c(u%,4,0)
X�
b�
l�
v��W(g%,D%):�D%=398�D%=13�
�	Ȏg%�
�	�0:�v
�%�2:�c(p%,0,0):f%=E%*E%:�a%(f%)>0�
�(�o%=1�a%(f%):�c%(o%,f%)=�(�c(p%,2))�
�Q�a(p%,3,a$(o%,f%,0)):�a(p%,4,a$(o%,f%,1)):�a(p%,7,a$(o%,f%,2)):�a(p%,2,�(o%))
��
��
��
��
��
��D%=399�
�	Ȏg%�
��0:�c(p%,2,0)

�

�

�

 ��Y(r%):Ȏr%�

*
�U%:�Z

4�va%:�_

>�ua%:�`

H�

R�

\��`:Ȏ�h(0)�

f�3:�T%�

p+�f("Reset Crossword","Are you sure?")�

z.�G%=1�15:�J%=1�15:�f%(G%,J%)>0f%(G%,J%)=32

��:�:g%()=�:�h(`%):�w(da%)

��

��

��

��

���_:Ȏ�h(0)�

��1:�h(1)=1�

��l$="Not on word"�

��:K%+=1:L%+=1:Ȏw%�

�ɹ:Ya%=0:Za%=1

�ɣ:Ya%=1:Za%=0

��

�f�m:ȕb%(K%,L%)>0�K%<16�L%>-1:I%=�:�b%(K%+Ya%,L%+Za%)=0�b%(K%-Ya%,L%-Za%)=0�b%(K%,L%)=0:d%(K%,L%)=�
�w%K%+=1�L%-=1
�:�i:w%=ya%:Ȏw%�
ɹ:�a(p%,1,"Across")
$ɣ:�a(p%,1,"Down")
.�
8�R(l$):�d(Z%):�h(P%)
B�
L�
VT�3:�I%�笤f("Clear Crossword","Unsaved crossword in memory. Are you sure?")��:�
`5a%(0)=0:a%(1)=0:b%()=0:c$()="":I%=�:�h(P%):�d(Z%)
j�4:�x(va%,4):O%=�O%
t�
~�
���Z:Ȏ�h(0)�
��1
��2
��3:�O%�
�:�f(`%):�f(p%):�f(da%):�g(P%):�g(u%):�g(Z%):�g(_%):T%=�
��
��4:_a%=�
��
��
���p(a$,q$):�a$=""�
�D�I%�笤f("Load","Unsaved crossword in memory. Are you sure?")��
�
�q$="CD"�
�I%=�:X=�(a$):�d%=1�15:�t%=1�15:b%(d%,t%)=�#X:f%(d%,t%)=�#X:b%(d%,t%)-=1:�:�:�#X,i$:i$=�b(i$):�d%=1�10:�#X,c$(d%):c$(d%)=�b(c$(d%)):�:`a%=O%:O%=�#X:�a%=0�1:a%(a%)=�#X:�a%(a%)>0�

��d%=1�a%(a%):�#X,b$(d%,a%):�#X,a$(d%,a%,0):�#X,a$(d%,a%,1):�#X,a$(d%,a%,2):�#X,g%(d%,a%):�#X,c%(d%,a%):b$(d%,a%)=�b(b$(d%,a%)):a$(d%,a%,0)=�b(a$(d%,a%,0)):a$(d%,a%,1)=�b(a$(d%,a%,1)):a$(d%,a%,2)=�b(a$(d%,a%,2)):�
�
	�:�#X
(/�:�b("Crossword","File is not a crossword")
2�
<�i:�j:�O%<>`a%��x(va%,4)
F�O%�T%��n:�o(U%,3)��t(U%,3)
P�T%�
Z�d(P%):�d(u%):�d(Z%)
d�:�d(`%):�d(p%):�d(da%):�n
n�
x�
���y(a$,e%):Ȏe%�
��ea%:I%=�:�T%��e
��X=�(a$):�d%=1�15:�t%=1�15:�#X,b%(d%,t%)+1:�#X,f%(d%,t%):�:�:�#X,�b(i$):�d%=1�10:�#X,�b(c$(d%)):�:�#X,O%:�a%=0�1:�#X,a%(a%):�a%(a%)>0�
�|�d%=1�a%(a%):�#X,�b(b$(d%,a%)):�#X,�b(a$(d%,a%,0)):�#X,�b(a$(d%,a%,1)):�#X,�b(a$(d%,a%,2)):�#X,g%(d%,a%):�#X,c%(d%,a%):�
��
��:�#X:�"settype "+a$+" CD"
�y�fa%:�J%=1�15:�G%=1�15:ab%=(Y%+124)+((G%-1)*108)+((J%-1)*1656):bb%=Y%+24969+23+((G%-1)*56)+((J%-1)*840):�b%(G%,J%)=0�
�/!ab%=0:?bb%=32:?(bb%+1)=32:�G%>9?(bb%+2)=32
�,�:!ab%=-1:j$=�(e%(G%,J%)):�j$="0"j$="  "
��(j$)=1j$=" "+j$
�:�cb%=1�2:?(bb%+cb%-1)=�(�j$,cb%,1)):�:�G%>9?(bb%+2)=32
��
�>�:�:�"SAVE "+a$+" "+�~(Y%)+" + 92A4":�"settype "+a$+" AFF"
*�ga%:�e:X=�(a$):�#X,"ACROSS":�a%(1)>0�
Z�d%=1�a%(1):�#X,�(c%(d%,1))+" "+�e(a$(d%,1,0))+" "+�e(a$(d%,1,1))+" "+�e(a$(d%,1,2)):�
�
"�#X:�"settype "+a$+" text"
,(�ha%:�e:X=�(a$):�#X,"DOWN":�a%(0)>0�
6Z�d%=1�a%(0):�#X,�(c%(d%,0))+" "+�e(a$(d%,0,0))+" "+�e(a$(d%,0,1))+" "+�e(a$(d%,0,2)):�
@�
J�#X:�"settype "+a$+" text"
T;�ia%:�e:X=�(a$):�a%=1�0�-1:�a%=1�#X,"ACROSS"��#X,"DOWN"
^�a%(a%)>0�
h_�d%=1�a%(a%):�#X,�(c%(d%,a%))+" "+�e(a$(d%,a%,0))+" "+�e(a$(d%,a%,1))+" "+�e(a$(d%,a%,2)):�
r�
| �:�#X:�"settype "+a$+" text"
�*�ja%:�e:X=�(a$):�#X,"ACROSS":�a%(1)>0�
�.�d%=1�a%(1):�#X,�(c%(d%,1))+" "+b$(d%,1):�
��
��#X:�"settype "+a$+" text"
�(�ka%:�e:X=�(a$):�#X,"DOWN":�a%(0)>0�
�.�d%=1�a%(0):�#X,�(c%(d%,0))+" "+b$(d%,0):�
��
��#X:�"settype "+a$+" text"
�;�la%:�e:X=�(a$):�a%=1�0�-1:�a%=1�#X,"ACROSS"��#X,"DOWN"
��a%(a%)>0�
�1�d%=1�a%(a%):�#X,�(c%(d%,a%))+" "+b$(d%,a%):�
��
� �:�#X:�"settype "+a$+" text"
�
�
Mݤe(e$):ȕ�e$,1)=" ":e$=�e$,�(e$)-1):�:ȕ�e$,1)=" ":e$=�e$,�(e$)-1):�:=e$
&�ݤb(p$):�db%=1��p$:�p$,db%,1)=�(�(�p$,db%,1))�170):�:=p$:eb%=0:�l%=0�24*1024:�Y%?l%=255�Y%?(l%+1)=255�Y%?(l%+2)=255�Y%?(l%+3)=255�
0�l%-eb%:eb%=l%
:�
D�
NZݤo:�i,b,a:�a 100:ș"OS_GetEnv"�a:i=0:ȕa?i<>0:i+=1:�:a?i=13:b=0:i=0:ȕb<3:�a?i=32b+=1
Xi+=1:�:=$(a+i)
b���h(e%):�M%:b%!0=e%:b%!4=0:b%!8=-780:b%!12=780:b%!16=0:ș"Wimp_UpdateWindow",,b%�M%:ȕM%:Aa%=b%!36-b%!28:R%=b%!40-b%!32:Q%=b%!28+b%!20-b%!4:B%=b%!32-b%!24-b%!8:v%=b%!4-b%!20:m%=b%!16-b%!24:Ba%=b%!28:S%=b%!32
lE�l(e%,Q%,B%,Aa%,R%,Ba%,S%,v%,m%):ș"Wimp_GetRectangle",,b%�M%:�:�
v���w(e%):�M%:b%!0=e%:b%!4=0:b%!8=-2944:b%!12=1248:b%!16=0:ș"Wimp_UpdateWindow",,b%�M%:ȕM%:Aa%=b%!36-b%!28:R%=b%!40-b%!32:Q%=b%!28+b%!20-b%!4:B%=b%!32-b%!24-b%!8:v%=b%!4-b%!20:m%=b%!16-b%!24:Ba%=b%!28:S%=b%!32
�E�l(e%,Q%,B%,Aa%,R%,Ba%,S%,v%,m%):ș"Wimp_GetRectangle",,b%�M%:�:�
���b(m$,n$):�aa(m$,n$,0):�
�'��aa(m$,n$,q%):�N%:$(b%+4)=n$:Ȏq%�
��2:N%=1
��1:N%=15
��3:N%=(1<<5)+16
��4:N%=(1<<6)+16
�:N%=16
��
�'ș"Wimp_ReportError",b%,N%,m$�,N%:�
�Gݤf(m$,n$):$(b%+4)=n$:N%=23:ș"Wimp_ReportError",b%,N%,m$�,N%:=N%-2
�*ݤa(r$):=�s(r$,"<Obey$Dir>.Templates")
�rݤs(r$,y$):�c%,i%,n%,j%,t$,u$:ș"Wimp_OpenTemplate",,y$:ș"Wimp_LoadTemplate",,b%,fb%,gb%,-1,r$,0�,,fb%:Ȏna%�
�1:b%!64=na%
:b%!64=�q(e%)
�
 pș"Wimp_CreateWindow",,b%�c%:ș"Wimp_CloseTemplate":ș"Wimp_WhichIcon",c%,b%+40,1+2+(1<<8),2+(1<<8):Ȏb%!40�
*�-1
4f:i%=40:�:b%!4=b%!i%:b%!0=c%:ș"Wimp_GetIconState",,b%:t$=�i(b%!28):ș"Wimp_DeleteIcon",,b%:Ȏna%�
>�1:b%!32=1
H�:ș"OS_SpriteOp",264,na%�,,,n%:j%=0:�:j%+=1:ș"OS_SpriteOp",269,na%,hb%,20,j%:u$=�i(hb%):�j%=n%�t$=u$:�t$=u$�b%!32=na%�b%!32=1
R�
\;b%!4=c%:ș"Wimp_CreateIcon",,b%+4�ib%:i%+=4:�(b%!i%)=-1
f�
p=c%
zQ��g(e%):!b%=e%:ș"Wimp_GetWindowState",,b%:b%!28=-1:ș"Wimp_OpenWindow",,b%:�
�-��f(e%):!b%=e%:ș"Wimp_CloseWindow",,b%:�
���d(e%):Ȏe%�
�1�-1:ș"Wimp_ForceRedraw",-1,0,0,2*1280,2*1024
�0:ș"Wimp_ForceRedraw",e%,0,-2*1024,2*1280,0
��
��
�nݤp(z$):�g%:b%!0=-1:b%!4=0:b%!8=0:b%!12=68:b%!16=68:b%!20=12290:$(b%+24)=z$:ș"Wimp_CreateIcon",,b%�g%:=g%
�=��c(e%,g%,jb%):ș"Wimp_SetCaretPosition",e%,g%,,,-1,jb%:�
�cݤc(e%,g%):b%!0=e%:b%!4=g%:ș"Wimp_GetIconState",,b%:�((b%!24)�256)=0�1,"Icon isn't indirected"
�
=$(b%!28)
�f��a(e%,g%,A$):b%!0=e%:b%!4=g%:ș"Wimp_GetIconState",,b%:�((b%!24)�256)=0�1,"Icon isn't indirected"
�J$(b%!28)=A$:b%!0=e%:b%!4=g%:b%!8=0:b%!12=0:ș"Wimp_SetIconState",,b%:�
�ݤh(kb%):=(b%!(4*kb%))+1
�ݤd(b$):�r%,V%,lb%,mb%,k%,s%:�r% 28+�t(b$)*24:r%?12=7:r%?13=2:r%?14=7:r%?15=0:r%!16=140:r%!20=44:r%!24=0:V%=r%+28:$r%=�b$,�b$,"\")-1):lb%=�(�b$,�b$,"\")-1)):b$+="\":nb%=0:ȕb$<>"":b$=�b$,�b$,"\")+1):Ȏb$�
�""
H:!V%=0:V%!4=-1:V%!8=&7000021:mb%=�b$,"\")-1:k%=��b$,mb%),">"):Ȏk%�
$�0
.-:s%=�(�b$,k%+1,mb%-k%)):V%!4=s%:mb%=k%-1
8�
B&$(V%+12)=�b$,mb%):�mb%>lb%�lb%=mb%
L
V%+=24
V�
`,�:r%!16=16*(lb%+1):V%!-24=V%!-24�128:=r%
j<ݤt(b$):�n%,j%:n%=0:j%=0:�:j%=�b$,"\",j%+1):�j%<>0�n%+=1
t
�j%=0:=n%
~<��o(r%,W%):r%!(36+(W%-1)*24)=r%!(36+(W%-1)*24)�(1<<22):�
�F��t(r%,W%):�o(r%,W%):r%!(36+(W%-1)*24)=r%!(36+(W%-1)*24)�(1<<22):�
�8��x(r%,W%):r%!(28+(W%-1)*24)=(r%!(28+(W%-1)*24))�1:�
�ݤn(ob%)
�=�~(ob%)
�Aݤi(X%):�s$:s$="":ȕ(?X%<>13)�(?X%<>0):s$+=�(?X%):X%+=1:�:=s$
�ݤj(f$):Ȏ�f$,".")�
�
�0:=f$
�:=�j(�f$,�(f$)-�f$,".")))
��
�2��z(w$,pb%,g%):�b% pb%,fb% g%:�pb%<256�pb%=256
�!gb%=fb%+g%:x$=w$:�ba:��ca:�q
�2ș"Wimp_Initialise",200,&4B534154,w$�qb%,rb%:�
W��ba:�hb% 20:D%=1<<8:r%=1<<9:na%=1:qb%=0:rb%=0:wa%=-2:ma%=0:U%=0:v%=0:m%=0:sb%=-3:�

"��ca:�#0:�X$:X$=�$:�b(x$,X$):�
'��E:ș"Wimp_CloseDown",rb%,"TASK":�
��da:_a%=�:�
(A��D:�tb%,ub%:_a%=�:tb%=3609:�:ș"Wimp_Poll",tb%,b%�ub%:Ȏub%�
2�0
<
�1:�ea
F�2:ș"Wimp_OpenWindow",,b%
P
�3:�fa
Z�4
d�5
n
�6:�ga
x
�7:�ha
�
�8:�ia
�
�9:�Y(r%)
��10
��11
��12
��17,18:�ja
��19
��
�
�_a%:�
����ea:�M%:ș"Wimp_RedrawWindow",,b%�M%:e%=b%!0:ȕM%:Aa%=b%!36-b%!28:R%=b%!40-b%!32:Q%=b%!28+b%!20-b%!4:B%=b%!32-b%!24-b%!8:v%=b%!4-b%!20:m%=b%!16-b%!24:Ba%=b%!28:S%=b%!32:�l(e%,Q%,B%,Aa%,R%,Ba%,S%,v%,m%):ș"Wimp_GetRectangle",,b%�M%:�:�
�c��fa:ș"Wimp_GetPointerInfo",,b%:e%=b%!12:za%=b%!8:�F(e%,za%):!b%=e%:ș"Wimp_CloseWindow",,b%:�
�8��ga:q%=b%!8:e%=b%!12:g%=b%!16:x%=b%!0:y%=b%!4:Ȏq%�
�
�2:�ka
:Ȏ�l(e%)�

ɹ:�la

ɣ:�ma
"�
,�
6�
@��ka:r%=�r(e%):Ȏr%�
Jɣ
T:Ȏe%�
^U�-2:n%=0:ȕ((U%!(28+n%*24))�128)=0:n%+=1:�:ș"Wimp_CreateMenu",,U%,x%-64,96+n%*44
h):ș"Wimp_CreateMenu",,r%,x%-64,y%+20
r�
|�
��
���la:Ȏg%�
��0:�q%�80��na(e%)
��2:�q%�5��oa(e%)
��
��
���ma:�K(e%,g%,q%,x%,y%):�
�Q��oa(e%):�a$:b%!0=e%:b%!4=1:ș"Wimp_GetIconState",,b%:a$=$(b%!28):Ȏ�a$,".")�
�[�0:$(b%+4)="To save, drag the icon to a directory window":ș"Wimp_ReportError",b%,16,x$
�:�y(a$,e%)
��
��
����na(e%):�x%,y%:vb%=e%:!b%=e%:ș"Wimp_GetWindowState",,b%:x%=b%!4-b%!20:y%=b%!16-b%!24:b%!4=0:ș"Wimp_GetIconState",,b%:!b%=e%:b%!4=5:b%!8=x%+b%!8:b%!12=y%+b%!12:b%!16=x%+b%!16:b%!20=y%+b%!20:b%!24=0:b%!28=0
:b%!32=&7FFFFFFF:b%!36=&7FFFFFFF:ș"Wimp_DragBox",,b%:�
+��ia:e%=b%!0:g%=b%!4:D%=b%!24:Ȏ�l(e%)�
ɣ:�U(e%,g%,D%)
&�
0�
:���ha:�a$,e%,g%,x%,y%:ș"Wimp_GetPointerInfo",,b%:e%=b%!12:g%=b%!16:x%=b%!0:y%=b%!4:b%!0=vb%:b%!4=1:ș"Wimp_GetIconState",,b%:a$=$(b%!28):a$=�j(a$):b%!20=e%:b%!24=g%:b%!28=x%:b%!32=y%:b%!36=mb%:b%!0=64:b%!12=0:b%!16=1:b%!40=4095
D8$(b%+44)=a$:ș"Wimp_SendMessage",17,b%,b%!20,b%!24:�
N"��ja:�a$:a$=�i(b%+44):Ȏb%!16�
X�0:_a%=�
b�1
l��2:b%!0=vb%:b%!4=1:ș"Wimp_GetIconState",,b%:$(b%!28)=a$:b%!0=vb%:b%!4=1:b%!8=0:b%!12=0:ș"Wimp_SetIconState",,b%:ș"Wimp_SetCaretPosition",vb%,1,,,-1,�a$:�y(a$,vb%)
v�3:q$=�n(b%!40):�p(a$,q$)
��
��
�Aݤi(X%):�s$:s$="":ȕ(?X%<>13)�(?X%<>0):s$+=�(?X%):X%+=1:�:=s$
�ݤj(f$):Ȏ�f$,".")�
�
�0:=f$
�:=�j(�f$,�(f$)-�f$,".")))
��
�ݤn(ob%)
�=�~(ob%)
3��r(h%,z%,E$):$(h%+(40+(z%-1)*24))=�E$,12)+�0:�
�

00000000  0d 00 0a 1d f4 20 3e 24  2e 21 43 72 6f 73 73 77  |..... >$.!Crossw|
00000010  6f 72 64 2e 21 52 75 6e  49 6d 61 67 65 0d 00 14  |ord.!RunImage...|
00000020  34 f2 7a 28 22 43 72 6f  73 73 77 6f 72 64 22 2c  |4.z("Crossword",|
00000030  36 30 30 2c 32 36 30 30  29 3a f2 41 3a f2 42 3a  |600,2600):.A:.B:|
00000040  f2 43 3a f2 70 28 a4 6f  2c 22 43 44 22 29 3a f2  |.C:.p(.o,"CD"):.|
00000050  71 0d 00 1e 07 dd f2 71  0d 00 28 4d f2 44 3a e7  |q......q..(M.D:.|
00000060  ac 49 25 8c e7 ac a4 66  28 22 51 75 69 74 22 2c  |.I%....f("Quit",|
00000070  22 55 6e 73 61 76 65 64  20 63 72 6f 73 73 77 6f  |"Unsaved crosswo|
00000080  72 64 20 69 6e 20 6d 65  6d 6f 72 79 2e 20 41 72  |rd in memory. Ar|
00000090  65 20 79 6f 75 20 73 75  72 65 3f 22 29 8c 20 e5  |e you sure?"). .|
000000a0  20 8d 54 68 40 0d 00 32  08 f2 45 3a e0 0d 00 3c  | .Th@..2..E:...<|
000000b0  f3 dd f2 41 3a de 59 25  20 31 30 32 34 2a 33 38  |...A:.Y% 1024*38|
000000c0  3a ff 22 6c 6f 61 64 20  3c 4f 62 65 79 24 44 69  |:."load <Obey$Di|
000000d0  72 3e 2e 44 72 61 77 46  69 6c 65 20 22 2b c3 7e  |r>.DrawFile "+.~|
000000e0  59 25 3a de 62 25 28 31  36 2c 31 36 29 3a de 61  |Y%:.b%(16,16):.a|
000000f0  25 28 31 29 3a de 65 25  28 31 35 2c 31 35 29 3a  |%(1):.e%(15,15):|
00000100  de 64 25 28 33 30 2c 31  36 29 3a 64 25 28 29 3d  |.d%(30,16):d%()=|
00000110  b9 3a de 62 24 28 33 30  2c 31 29 3a 69 24 3d 22  |.:.b$(30,1):i$="|
00000120  45 76 6f 6c 20 53 6e 69  78 20 20 20 20 20 20 20  |Evol Snix       |
00000130  20 20 20 20 22 3a de 63  24 28 31 30 29 3a de 63  |    ":.c$(10):.c|
00000140  25 28 33 30 2c 31 29 3a  4f 25 3d a3 3a 54 25 3d  |%(30,1):O%=.:T%=|
00000150  a3 3a 49 25 3d b9 3a de  66 25 28 31 36 2c 31 36  |.:I%=.:.f%(16,16|
00000160  29 3a de 61 24 28 33 30  2c 31 2c 32 29 3a de 67  |):.a$(30,1,2):.g|
00000170  25 28 33 30 2c 31 29 3a  77 25 3d b9 3a 45 25 3d  |%(30,1):w%=.:E%=|
00000180  b9 3a ef 32 33 2c 32 30  30 2c 31 31 32 2c 38 30  |.:.23,200,112,80|
00000190  2c 38 30 2c 38 30 2c 31  31 32 2c 30 2c 30 2c 30  |,80,80,112,0,0,0|
000001a0  0d 00 46 ff ef 32 33 2c  32 30 31 2c 33 32 2c 33  |..F..23,201,32,3|
000001b0  32 2c 33 32 2c 33 32 2c  33 32 2c 30 2c 30 2c 30  |2,32,32,32,0,0,0|
000001c0  2c 32 33 2c 32 30 32 2c  31 31 32 2c 31 36 2c 31  |,23,202,112,16,1|
000001d0  31 32 2c 36 34 2c 31 31  32 2c 30 2c 30 2c 30 2c  |12,64,112,0,0,0,|
000001e0  32 33 2c 32 30 33 2c 31  31 32 2c 31 36 2c 31 31  |23,203,112,16,11|
000001f0  32 2c 31 36 2c 31 31 32  2c 30 2c 30 2c 30 2c 32  |2,16,112,0,0,0,2|
00000200  33 2c 32 30 34 2c 38 30  2c 38 30 2c 31 31 32 2c  |3,204,80,80,112,|
00000210  31 36 2c 31 36 2c 30 2c  30 2c 30 2c 32 33 2c 32  |16,16,0,0,0,23,2|
00000220  30 35 2c 31 31 32 2c 36  34 2c 31 31 32 2c 31 36  |05,112,64,112,16|
00000230  2c 31 31 32 2c 30 2c 30  2c 30 2c 32 33 2c 32 30  |,112,0,0,0,23,20|
00000240  36 2c 36 34 2c 36 34 2c  31 31 32 2c 38 30 2c 31  |6,64,64,112,80,1|
00000250  31 32 2c 30 2c 30 2c 30  2c 32 33 2c 32 30 37 2c  |12,0,0,0,23,207,|
00000260  31 31 32 2c 31 36 2c 31  36 2c 31 36 2c 31 36 2c  |112,16,16,16,16,|
00000270  30 2c 30 2c 30 2c 32 33  2c 32 30 38 2c 31 31 32  |0,0,0,23,208,112|
00000280  2c 38 30 2c 31 31 32 2c  38 30 2c 31 31 32 2c 30  |,80,112,80,112,0|
00000290  2c 30 2c 30 2c 32 33 2c  32 30 39 2c 31 31 32 0d  |,0,0,23,209,112.|
000002a0  00 50 19 ef 38 30 2c 31  31 32 2c 31 36 2c 31 36  |.P..80,112,16,16|
000002b0  2c 30 2c 30 2c 30 3a e1  0d 00 5a 53 dd f2 65 3a  |,0,0,0:...ZS..e:|
000002c0  61 61 25 3d 77 25 3a 67  25 28 29 3d a3 3a f2 6a  |aa%=w%:g%()=.:.j|
000002d0  3a f2 69 3a e3 47 25 3d  31 b8 31 35 3a e3 4a 25  |:.i:.G%=1.15:.J%|
000002e0  3d 31 b8 31 35 3a e7 62  25 28 47 25 2c 4a 25 29  |=1.15:.b%(G%,J%)|
000002f0  3e 30 8c 66 25 28 47 25  2c 4a 25 29 3d 33 32 8b  |>0.f%(G%,J%)=32.|
00000300  66 25 28 47 25 2c 4a 25  29 3d 30 0d 00 64 48 ed  |f%(G%,J%)=0..dH.|
00000310  3a ed 3a e3 74 25 3d 31  35 b8 31 88 2d 31 3a e3  |:.:.t%=15.1.-1:.|
00000320  64 25 3d 31 b8 31 35 3a  e7 28 62 25 28 64 25 2c  |d%=1.15:.(b%(d%,|
00000330  74 25 29 3e 30 80 62 25  28 64 25 2b 31 2c 74 25  |t%)>0.b%(d%+1,t%|
00000340  29 3e 30 80 62 25 28 64  25 2d 31 2c 74 25 29 3d  |)>0.b%(d%-1,t%)=|
00000350  30 29 8c 0d 00 6e 2d 77  25 3d b9 3a 6b 24 3d a4  |0)...n-w%=.:k$=.|
00000360  67 28 64 25 2d 31 2c 74  25 2d 31 29 3a e7 6b 24  |g(d%-1,t%-1):.k$|
00000370  3c 3e 22 4e 6f 74 20 6f  6e 20 77 6f 72 64 22 8c  |<>"Not on word".|
00000380  0d 00 78 0d e7 61 25 28  31 29 3e 30 8c 0d 00 82  |..x..a%(1)>0....|
00000390  2e e3 6f 25 3d 31 b8 61  25 28 31 29 3a e7 6b 24  |..o%=1.a%(1):.k$|
000003a0  3d 62 24 28 6f 25 2c 31  29 63 25 28 6f 25 2c 31  |=b$(o%,1)c%(o%,1|
000003b0  29 3d 65 25 28 64 25 2c  74 25 29 0d 00 8c 05 ed  |)=e%(d%,t%).....|
000003c0  0d 00 96 05 cd 0d 00 a0  05 cd 0d 00 aa 05 cd 0d  |................|
000003d0  00 b4 2f e7 28 62 25 28  64 25 2c 74 25 29 3e 30  |../.(b%(d%,t%)>0|
000003e0  80 62 25 28 64 25 2c 74  25 2d 31 29 3e 30 80 62  |.b%(d%,t%-1)>0.b|
000003f0  25 28 64 25 2c 74 25 2b  31 29 3d 30 29 8c 0d 00  |%(d%,t%+1)=0)...|
00000400  be 2d 77 25 3d a3 3a 6b  24 3d a4 67 28 64 25 2d  |.-w%=.:k$=.g(d%-|
00000410  31 2c 74 25 2d 31 29 3a  e7 6b 24 3c 3e 22 4e 6f  |1,t%-1):.k$<>"No|
00000420  74 20 6f 6e 20 77 6f 72  64 22 8c 0d 00 c8 0d e7  |t on word"......|
00000430  61 25 28 30 29 3e 30 8c  0d 00 d2 2e e3 6f 25 3d  |a%(0)>0......o%=|
00000440  31 b8 61 25 28 30 29 3a  e7 6b 24 3d 62 24 28 6f  |1.a%(0):.k$=b$(o|
00000450  25 2c 30 29 63 25 28 6f  25 2c 30 29 3d 65 25 28  |%,0)c%(o%,0)=e%(|
00000460  64 25 2c 74 25 29 0d 00  dc 05 ed 0d 00 e6 05 cd  |d%,t%)..........|
00000470  0d 00 f0 05 cd 0d 00 fa  05 cd 0d 01 04 4d ed 3a  |.............M.:|
00000480  ed 3a 43 25 3d b9 3a c8  95 43 25 3a 43 25 3d a3  |.:C%=.:..C%:C%=.|
00000490  3a e3 64 25 3d 31 b8 32  39 3a e3 61 25 3d 30 b8  |:.d%=1.29:.a%=0.|
000004a0  31 3a e7 63 25 28 64 25  2c 61 25 29 3e 63 25 28  |1:.c%(d%,a%)>c%(|
000004b0  64 25 2b 31 2c 61 25 29  80 63 25 28 64 25 2b 31  |d%+1,a%).c%(d%+1|
000004c0  2c 61 25 29 3e 30 8c 0d  01 0e 8c c8 94 63 25 28  |,a%)>0.......c%(|
000004d0  64 25 2c 61 25 29 2c 63  25 28 64 25 2b 31 2c 61  |d%,a%),c%(d%+1,a|
000004e0  25 29 3a c8 94 62 24 28  64 25 2c 61 25 29 2c 62  |%):..b$(d%,a%),b|
000004f0  24 28 64 25 2b 31 2c 61  25 29 3a c8 94 61 24 28  |$(d%+1,a%):..a$(|
00000500  64 25 2c 61 25 2c 30 29  2c 61 24 28 64 25 2b 31  |d%,a%,0),a$(d%+1|
00000510  2c 61 25 2c 30 29 3a c8  94 61 24 28 64 25 2c 61  |,a%,0):..a$(d%,a|
00000520  25 2c 31 29 2c 61 24 28  64 25 2b 31 2c 61 25 2c  |%,1),a$(d%+1,a%,|
00000530  31 29 3a c8 94 61 24 28  64 25 2c 61 25 2c 32 29  |1):..a$(d%,a%,2)|
00000540  2c 61 24 28 64 25 2b 31  2c 61 25 2c 32 29 3a 43  |,a$(d%+1,a%,2):C|
00000550  25 3d b9 0d 01 18 05 cd  0d 01 22 12 ed 3a ed 3a  |%=........"..:.:|
00000560  ce 3a 77 25 3d 61 61 25  3a e1 0d 01 2c 93 dd f2  |.:w%=aa%:...,...|
00000570  69 3a 62 61 25 3d 31 3a  65 25 28 29 3d 30 3a e3  |i:ba%=1:e%()=0:.|
00000580  74 25 3d 31 35 b8 31 88  2d 31 3a e3 64 25 3d 31  |t%=15.1.-1:.d%=1|
00000590  b8 31 35 3a e7 28 62 25  28 64 25 2c 74 25 29 3e  |.15:.(b%(d%,t%)>|
000005a0  30 80 62 25 28 64 25 2c  74 25 2d 31 29 3e 30 80  |0.b%(d%,t%-1)>0.|
000005b0  62 25 28 64 25 2c 74 25  2b 31 29 3d 30 29 84 28  |b%(d%,t%+1)=0).(|
000005c0  62 25 28 64 25 2c 74 25  29 3e 30 80 62 25 28 64  |b%(d%,t%)>0.b%(d|
000005d0  25 2b 31 2c 74 25 29 3e  30 80 62 25 28 64 25 2d  |%+1,t%)>0.b%(d%-|
000005e0  31 2c 74 25 29 3d 30 29  8c 65 25 28 64 25 2c 74  |1,t%)=0).e%(d%,t|
000005f0  25 29 3d 62 61 25 3a 62  61 25 2b 3d 31 0d 01 36  |%)=ba%:ba%+=1..6|
00000600  09 ed 3a ed 3a e1 0d 01  40 db dd f2 42 3a 63 61  |..:.:...@...B:ca|
00000610  25 3d a4 61 28 22 49 6e  66 6f 22 29 3a 50 25 3d  |%=.a("Info"):P%=|
00000620  a4 61 28 22 43 72 6f 73  73 77 6f 72 64 22 29 3a  |.a("Crossword"):|
00000630  75 25 3d a4 61 28 22 49  6e 70 75 74 22 29 3a 5a  |u%=.a("Input"):Z|
00000640  25 3d a4 61 28 22 43 6c  75 65 73 22 29 3a 5f 25  |%=.a("Clues"):_%|
00000650  3d a4 61 28 22 4e 61 6d  65 22 29 3a 60 25 3d a4  |=.a("Name"):`%=.|
00000660  61 28 22 47 43 72 6f 73  73 77 6f 72 64 22 29 3a  |a("GCrossword"):|
00000670  70 25 3d a4 61 28 22 47  49 6e 70 75 74 22 29 3a  |p%=.a("GInput"):|
00000680  64 61 25 3d a4 61 28 22  47 43 6c 75 65 73 22 29  |da%=.a("GClues")|
00000690  3a 65 61 25 3d a4 61 28  22 53 61 76 65 78 22 29  |:ea%=.a("Savex")|
000006a0  3a 66 61 25 3d a4 61 28  22 53 61 76 65 62 22 29  |:fa%=.a("Saveb")|
000006b0  3a 67 61 25 3d a4 61 28  22 53 61 76 65 61 22 29  |:ga%=.a("Savea")|
000006c0  3a 68 61 25 3d a4 61 28  22 53 61 76 65 64 22 29  |:ha%=.a("Saved")|
000006d0  3a 69 61 25 3d a4 61 28  22 53 61 76 65 61 64 22  |:ia%=.a("Savead"|
000006e0  29 0d 01 4a 4e 6a 61 25  3d a4 61 28 22 53 61 76  |)..JNja%=.a("Sav|
000006f0  65 61 77 22 29 3a 6b 61  25 3d a4 61 28 22 53 61  |eaw"):ka%=.a("Sa|
00000700  76 65 64 77 22 29 3a 6c  61 25 3d a4 61 28 22 53  |vedw"):la%=.a("S|
00000710  61 76 65 61 64 77 22 29  3a 6d 61 25 3d a4 70 28  |aveadw"):ma%=.p(|
00000720  22 21 63 72 6f 73 73 77  6f 72 64 22 29 3a e1 0d  |"!crossword"):..|
00000730  01 54 11 dd a4 6c 28 65  25 29 3a c8 8e 65 25 ca  |.T...l(e%):..e%.|
00000740  0d 01 5e 0b c9 65 61 25  3a 3d b9 0d 01 68 0b c9  |..^..ea%:=...h..|
00000750  66 61 25 3a 3d b9 0d 01  72 0b c9 67 61 25 3a 3d  |fa%:=...r..ga%:=|
00000760  b9 0d 01 7c 0b c9 68 61  25 3a 3d b9 0d 01 86 0b  |...|..ha%:=.....|
00000770  c9 69 61 25 3a 3d b9 0d  01 90 0b c9 6a 61 25 3a  |.ia%:=......ja%:|
00000780  3d b9 0d 01 9a 0b c9 6b  61 25 3a 3d b9 0d 01 a4  |=......ka%:=....|
00000790  0b c9 6c 61 25 3a 3d b9  0d 01 ae 08 7f 3a 3d a3  |..la%:=......:=.|
000007a0  0d 01 b8 05 cb 0d 01 c2  0f dd a4 71 28 65 25 29  |...........q(e%)|
000007b0  3d 6e 61 25 0d 01 cc 89  dd f2 43 3a 62 24 3d 22  |=na%......C:b$="|
000007c0  54 61 73 6b 5c 49 6e 66  6f 3e 63 61 25 5c 53 61  |Task\Info>ca%\Sa|
000007d0  76 65 3e 65 61 25 5c 44  65 73 69 67 6e 5c 51 75  |ve>ea%\Design\Qu|
000007e0  69 74 22 3a 55 25 3d a4  64 28 62 24 29 3a 6f 61  |it":U%=.d(b$):oa|
000007f0  25 3d a4 64 28 22 44 65  6c 65 74 65 5c 2e 2e 2e  |%=.d("Delete\...|
00000800  2e 2e 2e 2e 2e 2e 2e 2e  2e 22 29 3a 70 61 25 3d  |........."):pa%=|
00000810  a4 64 28 22 43 6c 75 65  73 5c 41 6c 6c 20 43 6c  |.d("Clues\All Cl|
00000820  75 65 73 3e 69 61 25 5c  41 63 72 6f 73 73 3e 67  |ues>ia%\Across>g|
00000830  61 25 5c 44 6f 77 6e 3e  68 61 25 22 29 0d 01 d6  |a%\Down>ha%")...|
00000840  8b 71 61 25 3d a4 64 28  22 57 6f 72 64 73 5c 41  |.qa%=.d("Words\A|
00000850  6c 6c 3e 6c 61 25 5c 41  63 72 6f 73 73 3e 6a 61  |ll>la%\Across>ja|
00000860  25 5c 44 6f 77 6e 3e 6b  61 25 22 29 3a 72 61 25  |%\Down>ka%"):ra%|
00000870  3d a4 64 28 22 53 61 76  65 5c 43 72 6f 73 73 77  |=.d("Save\Crossw|
00000880  6f 72 64 3e 65 61 25 5c  43 6c 75 65 73 3e 70 61  |ord>ea%\Clues>pa|
00000890  25 5c 57 6f 72 64 73 3e  71 61 25 5c 47 72 69 64  |%\Words>qa%\Grid|
000008a0  3e 66 61 25 22 29 3a 73  61 25 3d a4 64 28 22 57  |>fa%"):sa%=.d("W|
000008b0  72 69 74 74 65 6e 20 62  79 5c 45 76 6f 6c 20 53  |ritten by\Evol S|
000008c0  6e 69 78 20 20 20 22 29  0d 01 e0 9a 74 61 25 3d  |nix   ")....ta%=|
000008d0  a4 64 28 22 53 6f 6c 76  65 64 5f 62 79 5c 20 20  |.d("Solved_by\  |
000008e0  20 20 20 20 20 20 20 20  20 20 5c 5c 5c 5c 5c 5c  |          \\\\\\|
000008f0  5c 5c 5c 22 29 3a 75 61  25 3d a4 64 28 22 43 72  |\\\"):ua%=.d("Cr|
00000900  6f 73 73 77 6f 72 64 5c  41 75 74 68 6f 72 3e 73  |ossword\Author>s|
00000910  61 25 5c 53 6f 6c 76 65  64 20 62 79 3e 74 61 25  |a%\Solved by>ta%|
00000920  5c 52 65 73 65 74 22 29  3a 76 61 25 3d a4 64 28  |\Reset"):va%=.d(|
00000930  22 43 72 6f 73 73 77 6f  72 64 5c 44 65 6c 65 74  |"Crossword\Delet|
00000940  65 3e 6f 61 25 5c 53 61  76 65 3e 72 61 25 5c 43  |e>oa%\Save>ra%\C|
00000950  6c 65 61 72 5c 50 72 6f  74 65 63 74 65 64 22 29  |lear\Protected")|
00000960  3a e1 0d 01 ea 11 dd a4  72 28 65 25 29 3a c8 8e  |:.......r(e%):..|
00000970  65 25 ca 0d 01 f4 0c c9  77 61 25 3a 3d 55 25 0d  |e%......wa%:=U%.|
00000980  01 fe 0c c9 60 25 3a 3d  75 61 25 0d 02 08 44 c9  |....`%:=ua%...D.|
00000990  50 25 3a c8 97 4b 25 2c  4c 25 2c 78 61 25 3a 79  |P%:..K%,L%,xa%:y|
000009a0  61 25 3d 77 25 3a f2 6b  28 4b 25 2c 4c 25 29 3a  |a%=w%:.k(K%,L%):|
000009b0  6c 24 3d a4 67 28 4b 25  2c 4c 25 29 3a e7 6c 24  |l$=.g(K%,L%):.l$|
000009c0  3d 22 4e 6f 74 20 6f 6e  20 77 6f 72 64 22 8c 0d  |="Not on word"..|
000009d0  02 12 15 e7 77 25 3d b9  20 77 25 3d a3 20 8b 20  |....w%=. w%=. . |
000009e0  77 25 3d b9 0d 02 1c 10  6c 24 3d a4 67 28 4b 25  |w%=.....l$=.g(K%|
000009f0  2c 4c 25 29 0d 02 26 05  cd 0d 02 30 15 f2 72 28  |,L%)..&....0..r(|
00000a00  6f 61 25 2c 31 2c 6c 24  29 3a 3d 76 61 25 0d 02  |oa%,1,l$):=va%..|
00000a10  3a 08 7f 3a 3d a3 0d 02  44 05 cb 0d 02 4e 4a dd  |:..:=...D....NJ.|
00000a20  a4 67 28 78 25 2c 79 25  29 3a 67 24 3d 22 22 3a  |.g(x%,y%):g$="":|
00000a30  78 25 2b 3d 31 3a 79 25  2b 3d 31 3a e7 62 25 28  |x%+=1:y%+=1:.b%(|
00000a40  78 25 2c 79 25 29 3d 30  84 65 25 28 78 25 2c 79  |x%,y%)=0.e%(x%,y|
00000a50  25 29 3d 30 8c 67 24 3d  22 4e 6f 74 20 6f 6e 20  |%)=0.g$="Not on |
00000a60  77 6f 72 64 22 0d 02 58  09 c8 8e 77 25 ca 0d 02  |word"..X...w%...|
00000a70  62 25 c9 b9 3a e7 62 25  28 78 25 2d 31 2c 79 25  |b%..:.b%(x%-1,y%|
00000a80  29 3e 30 67 24 3d 22 4e  6f 74 20 6f 6e 20 77 6f  |)>0g$="Not on wo|
00000a90  72 64 22 0d 02 6c 26 c9  20 a3 3a e7 62 25 28 78  |rd"..l&. .:.b%(x|
00000aa0  25 2c 79 25 2b 31 29 3e  30 67 24 3d 22 4e 6f 74  |%,y%+1)>0g$="Not|
00000ab0  20 6f 6e 20 77 6f 72 64  22 0d 02 76 05 cb 0d 02  | on word"..v....|
00000ac0  80 0b e7 67 24 3d 22 22  8c 0d 02 8a 3d c8 95 62  |...g$=""....=..b|
00000ad0  25 28 78 25 2c 79 25 29  3e 30 80 78 25 3c 31 36  |%(x%,y%)>0.x%<16|
00000ae0  80 79 25 3e 2d 31 3a 67  24 2b 3d bd 28 62 25 28  |.y%>-1:g$+=.(b%(|
00000af0  78 25 2c 79 25 29 29 3a  e7 77 25 78 25 2b 3d 31  |x%,y%)):.w%x%+=1|
00000b00  8b 79 25 2d 3d 31 0d 02  94 05 ce 0d 02 9e 05 cd  |.y%-=1..........|
00000b10  0d 02 a8 1d e7 a9 28 67  24 29 3c 32 8c 67 24 3d  |......(g$)<2.g$=|
00000b20  22 4e 6f 74 20 6f 6e 20  77 6f 72 64 22 0d 02 b2  |"Not on word"...|
00000b30  07 3d 67 24 0d 02 bc 15  dd f2 46 28 65 25 2c 7a  |.=g$......F(e%,z|
00000b40  61 25 29 3a c8 8e 65 25  ca 0d 02 c6 05 cb 0d 02  |a%):..e%........|
00000b50  d0 05 e1 0d 02 da 2b dd  f2 6c 28 65 25 2c 51 25  |......+..l(e%,Q%|
00000b60  2c 42 25 2c 41 61 25 2c  52 25 2c 42 61 25 2c 53  |,B%,Aa%,R%,Ba%,S|
00000b70  25 2c 76 25 2c 6d 25 29  3a c8 8e 65 25 ca 0d 02  |%,v%,m%):..e%...|
00000b80  e4 18 c9 50 25 3a f2 47  3a 43 61 25 3d 76 25 3a  |...P%:.G:Ca%=v%:|
00000b90  44 61 25 3d 6d 25 0d 02  ee 18 c9 5a 25 3a f2 48  |Da%=m%.....Z%:.H|
00000ba0  3a 45 61 25 3d 76 25 3a  46 61 25 3d 6d 25 0d 02  |:Ea%=v%:Fa%=m%..|
00000bb0  f8 18 c9 60 25 3a f2 49  3a 43 61 25 3d 76 25 3a  |...`%:.I:Ca%=v%:|
00000bc0  44 61 25 3d 6d 25 0d 03  02 19 c9 64 61 25 3a f2  |Da%=m%.....da%:.|
00000bd0  4a 3a 47 61 25 3d 76 25  3a 48 61 25 3d 6d 25 0d  |J:Ga%=v%:Ha%=m%.|
00000be0  03 0c 05 cb 0d 03 16 05  e1 0d 03 20 18 dd f2 47  |........... ...G|
00000bf0  3a ef 32 33 2c 31 37 2c  37 2c 36 2c 31 36 3b 38  |:.23,17,7,6,16;8|
00000c00  7c 0d 03 2a 7e 6d 25 2d  3d 32 3a 6d 25 2d 3d 37  ||..*~m%-=2:m%-=7|
00000c10  38 30 3a 42 25 3d 53 25  2d 6d 25 3a 49 61 25 3d  |80:B%=S%-m%:Ia%=|
00000c20  28 51 25 81 35 32 29 3a  4a 61 25 3d 28 42 25 81  |(Q%.52):Ja%=(B%.|
00000c30  35 32 29 3a 4b 61 25 3d  28 28 51 25 2b 41 61 25  |52):Ka%=((Q%+Aa%|
00000c40  29 81 35 32 29 3a 48 25  3d 28 28 42 25 2b 52 25  |).52):H%=((B%+R%|
00000c50  29 81 35 32 29 3a e3 46  25 3d 49 61 25 b8 4b 61  |).52):.F%=Ia%.Ka|
00000c60  25 3a e3 68 25 3d 48 25  b8 4a 61 25 88 2d 31 3a  |%:.h%=H%.Ja%.-1:|
00000c70  e7 64 25 28 46 25 2b 31  2c 68 25 2b 31 29 8c 0d  |.d%(F%+1,h%+1)..|
00000c80  03 34 15 e7 62 25 28 46  25 2b 31 2c 68 25 2b 31  |.4..b%(F%+1,h%+1|
00000c90  29 3e 30 8c 0d 03 3e b4  c8 99 22 57 69 6d 70 5f  |)>0...>..."Wimp_|
00000ca0  53 65 74 43 6f 6c 6f 75  72 22 2c 30 3a c8 93 c8  |SetColour",0:...|
00000cb0  90 76 25 2b 28 46 25 2a  35 32 29 2b 32 2c 6d 25  |.v%+(F%*52)+2,m%|
00000cc0  2b 28 68 25 2a 35 32 29  2b 34 2c 34 37 2c 34 33  |+(h%*52)+4,47,43|
00000cd0  3a c8 99 22 57 69 6d 70  5f 53 65 74 43 6f 6c 6f  |:.."Wimp_SetColo|
00000ce0  75 72 22 2c 37 3a ec 76  25 2b 28 46 25 2a 35 32  |ur",7:.v%+(F%*52|
00000cf0  29 2b 31 34 2c 6d 25 2b  28 68 25 2a 35 32 29 2b  |)+14,m%+(h%*52)+|
00000d00  33 32 3a f1 bd 28 62 25  28 46 25 2b 31 2c 68 25  |32:..(b%(F%+1,h%|
00000d10  2b 31 29 29 3a c8 99 22  57 69 6d 70 5f 53 65 74  |+1)):.."Wimp_Set|
00000d20  43 6f 6c 6f 75 72 22 2c  31 31 3a 68 24 3d c3 28  |Colour",11:h$=.(|
00000d30  65 25 28 46 25 2b 31 2c  68 25 2b 31 29 29 3a e7  |e%(F%+1,h%+1)):.|
00000d40  68 24 3c 3e 22 30 22 8c  0d 03 48 47 e3 6c 25 3d  |h$<>"0"...HG.l%=|
00000d50  31 b8 a9 28 68 24 29 3a  ec 76 25 2b 28 46 25 2a  |1..(h$):.v%+(F%*|
00000d60  35 32 29 2b 28 31 34 2a  28 6c 25 2d 31 29 29 2c  |52)+(14*(l%-1)),|
00000d70  6d 25 2b 28 68 25 2a 35  32 29 2b 34 34 3a ef 32  |m%+(h%*52)+44:.2|
00000d80  30 30 2b bb 28 c1 68 24  2c 6c 25 2c 31 29 29 0d  |00+.(.h$,l%,1)).|
00000d90  03 52 05 ed 0d 03 5c 05  cd 0d 03 66 3e cc 3a c8  |.R....\....f>.:.|
00000da0  99 22 57 69 6d 70 5f 53  65 74 43 6f 6c 6f 75 72  |."Wimp_SetColour|
00000db0  22 2c 36 3a c8 93 c8 90  76 25 2b 28 46 25 2a 35  |",6:....v%+(F%*5|
00000dc0  32 29 2b 32 2c 6d 25 2b  28 68 25 2a 35 32 29 2b  |2)+2,m%+(h%*52)+|
00000dd0  34 2c 34 37 2c 34 33 0d  03 70 05 cd 0d 03 7a 05  |4,47,43..p....z.|
00000de0  cd 0d 03 84 17 ed 3a ed  3a ef 32 33 2c 31 37 2c  |......:.:.23,17,|
00000df0  37 2c 36 2c 38 3b 38 7c  0d 03 8e 0c 64 25 28 29  |7,6,8;8|....d%()|
00000e00  3d b9 3a e1 0d 03 98 3e  dd f2 6d 3a 64 25 28 29  |=.:....>..m:d%()|
00000e10  3d a3 3a e3 4c 61 25 3d  31 b8 31 35 3a e3 4d 61  |=.:.La%=1.15:.Ma|
00000e20  25 3d 31 b8 31 35 3a e7  65 25 28 4c 61 25 2c 4d  |%=1.15:.e%(La%,M|
00000e30  61 25 29 3e 30 64 25 28  4c 61 25 2c 4d 61 25 29  |a%)>0d%(La%,Ma%)|
00000e40  3d b9 0d 03 a2 09 ed 3a  ed 3a e1 0d 03 ac 18 dd  |=......:.:......|
00000e50  f2 49 3a ef 32 33 2c 31  37 2c 37 2c 36 2c 31 36  |.I:.23,17,7,6,16|
00000e60  3b 38 7c 0d 03 b6 8e 6d  25 2d 3d 32 3a 6d 25 2d  |;8|....m%-=2:m%-|
00000e70  3d 37 38 30 3a 42 25 3d  53 25 2d 6d 25 3a 49 61  |=780:B%=S%-m%:Ia|
00000e80  25 3d 28 51 25 81 35 32  29 3a 4a 61 25 3d 28 42  |%=(Q%.52):Ja%=(B|
00000e90  25 81 35 32 29 3a 4b 61  25 3d 28 28 51 25 2b 41  |%.52):Ka%=((Q%+A|
00000ea0  61 25 29 81 35 32 29 3a  48 25 3d 28 28 42 25 2b  |a%).52):H%=((B%+|
00000eb0  52 25 29 81 35 32 29 3a  e3 46 25 3d 49 61 25 b8  |R%).52):.F%=Ia%.|
00000ec0  4b 61 25 3a e3 68 25 3d  48 25 b8 4a 61 25 88 2d  |Ka%:.h%=H%.Ja%.-|
00000ed0  31 3a e7 66 25 28 46 25  2b 31 2c 68 25 2b 31 29  |1:.f%(F%+1,h%+1)|
00000ee0  3e 30 80 64 25 28 46 25  2b 31 2c 68 25 2b 31 29  |>0.d%(F%+1,h%+1)|
00000ef0  8c 0d 03 c0 b4 c8 99 22  57 69 6d 70 5f 53 65 74  |......."Wimp_Set|
00000f00  43 6f 6c 6f 75 72 22 2c  30 3a c8 93 c8 90 76 25  |Colour",0:....v%|
00000f10  2b 28 46 25 2a 35 32 29  2b 32 2c 6d 25 2b 28 68  |+(F%*52)+2,m%+(h|
00000f20  25 2a 35 32 29 2b 34 2c  34 37 2c 34 33 3a c8 99  |%*52)+4,47,43:..|
00000f30  22 57 69 6d 70 5f 53 65  74 43 6f 6c 6f 75 72 22  |"Wimp_SetColour"|
00000f40  2c 37 3a ec 76 25 2b 28  46 25 2a 35 32 29 2b 31  |,7:.v%+(F%*52)+1|
00000f50  34 2c 6d 25 2b 28 68 25  2a 35 32 29 2b 33 32 3a  |4,m%+(h%*52)+32:|
00000f60  f1 bd 28 66 25 28 46 25  2b 31 2c 68 25 2b 31 29  |..(f%(F%+1,h%+1)|
00000f70  29 3a c8 99 22 57 69 6d  70 5f 53 65 74 43 6f 6c  |):.."Wimp_SetCol|
00000f80  6f 75 72 22 2c 31 31 3a  68 24 3d c3 28 65 25 28  |our",11:h$=.(e%(|
00000f90  46 25 2b 31 2c 68 25 2b  31 29 29 3a e7 68 24 3c  |F%+1,h%+1)):.h$<|
00000fa0  3e 22 30 22 8c 0d 03 ca  47 e3 6c 25 3d 31 b8 a9  |>"0"....G.l%=1..|
00000fb0  28 68 24 29 3a ec 76 25  2b 28 46 25 2a 35 32 29  |(h$):.v%+(F%*52)|
00000fc0  2b 28 31 34 2a 28 6c 25  2d 31 29 29 2c 6d 25 2b  |+(14*(l%-1)),m%+|
00000fd0  28 68 25 2a 35 32 29 2b  34 34 3a ef 32 30 30 2b  |(h%*52)+44:.200+|
00000fe0  bb 28 c1 68 24 2c 6c 25  2c 31 29 29 0d 03 d4 05  |.(.h$,l%,1))....|
00000ff0  ed 0d 03 de 05 cd 0d 03  e8 05 cc 0d 03 f2 05 cd  |................|
00001000  0d 03 fc 1e ed 3a ed 3a  64 25 28 29 3d b9 3a ef  |.....:.:d%()=.:.|
00001010  32 33 2c 31 37 2c 37 2c  36 2c 38 3b 38 7c 0d 04  |23,17,7,6,8;8|..|
00001020  06 05 e1 0d 04 10 49 dd  f2 48 3a 6d 25 2d 3d 32  |......I..H:m%-=2|
00001030  3a 6d 25 2d 3d 33 39 30  34 3a 42 25 3d 53 25 2d  |:m%-=3904:B%=S%-|
00001040  6d 25 3a 4a 61 25 3d 28  42 25 81 31 32 38 29 3a  |m%:Ja%=(B%.128):|
00001050  48 25 3d 28 28 42 25 2b  52 25 29 81 31 32 38 29  |H%=((B%+R%).128)|
00001060  3a e7 48 25 3c 32 39 48  25 2b 3d 31 0d 04 1a 26  |:.H%<29H%+=1...&|
00001070  e3 68 25 3d 4a 61 25 b8  48 25 3a e3 61 25 3d 30  |.h%=Ja%.H%:.a%=0|
00001080  b8 31 3a e7 61 25 28 61  25 29 3e 3d 33 30 2d 68  |.1:.a%(a%)>=30-h|
00001090  25 8c 0d 04 24 eb c8 99  22 57 69 6d 70 5f 53 65  |%...$..."Wimp_Se|
000010a0  74 43 6f 6c 6f 75 72 22  2c 31 31 3a ec 76 25 2b  |tColour",11:.v%+|
000010b0  36 33 34 2d 28 36 30 38  2a 61 25 29 2c 6d 25 2b  |634-(608*a%),m%+|
000010c0  28 68 25 2a 31 32 38 29  2b 39 36 3a f1 62 24 28  |(h%*128)+96:.b$(|
000010d0  33 30 2d 68 25 2c 61 25  29 3a c8 99 22 57 69 6d  |30-h%,a%):.."Wim|
000010e0  70 5f 53 65 74 43 6f 6c  6f 75 72 22 2c 37 3a ec  |p_SetColour",7:.|
000010f0  76 25 2b 36 33 34 2d 28  36 30 38 2a 61 25 29 2c  |v%+634-(608*a%),|
00001100  6d 25 2b 28 68 25 2a 31  32 38 29 2b 36 34 3a f1  |m%+(h%*128)+64:.|
00001110  61 24 28 33 30 2d 68 25  2c 61 25 2c 30 29 3a ec  |a$(30-h%,a%,0):.|
00001120  76 25 2b 36 33 34 2d 28  36 30 38 2a 61 25 29 2c  |v%+634-(608*a%),|
00001130  6d 25 2b 28 68 25 2a 31  32 38 29 2b 33 32 3a f1  |m%+(h%*128)+32:.|
00001140  61 24 28 33 30 2d 68 25  2c 61 25 2c 31 29 3a ec  |a$(30-h%,a%,1):.|
00001150  76 25 2b 36 33 34 2d 28  36 30 38 2a 61 25 29 2c  |v%+634-(608*a%),|
00001160  6d 25 2b 28 68 25 2a 31  32 38 29 2b 30 3a f1 61  |m%+(h%*128)+0:.a|
00001170  24 28 33 30 2d 68 25 2c  61 25 2c 32 29 0d 04 2e  |$(30-h%,a%,2)...|
00001180  05 cd 0d 04 38 09 ed 3a  ed 3a e1 0d 04 42 47 dd  |....8..:.:...BG.|
00001190  f2 4a 3a 6d 25 2d 3d 32  3a 6d 25 2d 3d 32 39 34  |.J:m%-=2:m%-=294|
000011a0  34 3a 42 25 3d 53 25 2d  6d 25 3a 4a 61 25 3d 28  |4:B%=S%-m%:Ja%=(|
000011b0  42 25 81 39 36 29 3a 48  25 3d 28 28 42 25 2b 52  |B%.96):H%=((B%+R|
000011c0  25 29 81 39 36 29 3a e7  48 25 3e 32 39 48 25 3d  |%).96):.H%>29H%=|
000011d0  32 39 0d 04 4c 0f e7 48  25 3c 32 39 48 25 2b 3d  |29..L..H%<29H%+=|
000011e0  31 0d 04 56 33 e3 68 25  3d 4a 61 25 b8 48 25 3a  |1..V3.h%=Ja%.H%:|
000011f0  e3 61 25 3d 30 b8 31 3a  e7 61 25 28 61 25 29 3e  |.a%=0.1:.a%(a%)>|
00001200  3d 33 30 2d 68 25 80 64  25 28 33 30 2d 68 25 2c  |=30-h%.d%(30-h%,|
00001210  61 25 29 8c 0d 04 60 12  e7 67 25 28 33 30 2d 68  |a%)...`..g%(30-h|
00001220  25 2c 61 25 29 8c 0d 04  6a 18 c8 99 22 57 69 6d  |%,a%)...j..."Wim|
00001230  70 5f 53 65 74 43 6f 6c  6f 75 72 22 2c 33 0d 04  |p_SetColour",3..|
00001240  74 1b cc 3a c8 99 22 57  69 6d 70 5f 53 65 74 43  |t..:.."Wimp_SetC|
00001250  6f 6c 6f 75 72 22 2c 31  31 0d 04 7e 05 cd 0d 04  |olour",11..~....|
00001260  88 45 ec 76 25 2b 36 33  34 2d 28 36 30 38 2a 61  |.E.v%+634-(608*a|
00001270  25 29 2c 6d 25 2b 28 68  25 2a 39 36 29 2b 36 34  |%),m%+(h%*96)+64|
00001280  3a 6f 24 3d c3 63 25 28  33 30 2d 68 25 2c 61 25  |:o$=.c%(30-h%,a%|
00001290  29 3a e7 a9 28 6f 24 29  3d 31 6f 24 3d 22 20 22  |):..(o$)=1o$=" "|
000012a0  2b 6f 24 0d 04 92 19 f1  22 22 3b 6f 24 3a e7 67  |+o$....."";o$:.g|
000012b0  25 28 33 30 2d 68 25 2c  61 25 29 8c 0d 04 9c 18  |%(30-h%,a%).....|
000012c0  c8 99 22 57 69 6d 70 5f  53 65 74 43 6f 6c 6f 75  |.."Wimp_SetColou|
000012d0  72 22 2c 33 0d 04 a6 1a  cc 3a c8 99 22 57 69 6d  |r",3.....:.."Wim|
000012e0  70 5f 53 65 74 43 6f 6c  6f 75 72 22 2c 37 0d 04  |p_SetColour",7..|
000012f0  b0 05 cd 0d 04 ba 8f ec  76 25 2b 36 39 30 2d 28  |........v%+690-(|
00001300  36 30 38 2a 61 25 29 2c  6d 25 2b 28 68 25 2a 39  |608*a%),m%+(h%*9|
00001310  36 29 2b 36 34 3a f1 61  24 28 33 30 2d 68 25 2c  |6)+64:.a$(30-h%,|
00001320  61 25 2c 30 29 3a ec 76  25 2b 36 33 34 2d 28 36  |a%,0):.v%+634-(6|
00001330  30 38 2a 61 25 29 2c 6d  25 2b 28 68 25 2a 39 36  |08*a%),m%+(h%*96|
00001340  29 2b 33 32 3a f1 61 24  28 33 30 2d 68 25 2c 61  |)+32:.a$(30-h%,a|
00001350  25 2c 31 29 3a ec 76 25  2b 36 33 34 2d 28 36 30  |%,1):.v%+634-(60|
00001360  38 2a 61 25 29 2c 6d 25  2b 28 68 25 2a 39 36 29  |8*a%),m%+(h%*96)|
00001370  2b 30 3a f1 61 24 28 33  30 2d 68 25 2c 61 25 2c  |+0:.a$(30-h%,a%,|
00001380  32 29 0d 04 c4 05 cd 0d  04 ce 10 ed 3a ed 3a 64  |2)..........:.:d|
00001390  25 28 29 3d b9 3a e1 0d  04 d8 1d dd f2 4b 28 65  |%()=.:.......K(e|
000013a0  25 2c 67 25 2c 71 25 2c  78 25 2c 79 25 29 3a c8  |%,g%,q%,x%,y%):.|
000013b0  8e 65 25 ca 0d 04 e2 0b  c9 77 61 25 3a f2 6e 0d  |.e%......wa%:.n.|
000013c0  04 ec 11 c9 50 25 3a f2  4c 28 71 25 2c 67 25 29  |....P%:.L(q%,g%)|
000013d0  0d 04 f6 11 c9 75 25 3a  f2 4d 28 71 25 2c 67 25  |.....u%:.M(q%,g%|
000013e0  29 0d 05 00 11 c9 5a 25  3a f2 4e 28 71 25 2c 67  |).....Z%:.N(q%,g|
000013f0  25 29 0d 05 0a 11 c9 60  25 3a f2 4f 28 71 25 2c  |%).....`%:.O(q%,|
00001400  67 25 29 0d 05 14 11 c9  70 25 3a f2 50 28 71 25  |g%).....p%:.P(q%|
00001410  2c 67 25 29 0d 05 1e 12  c9 64 61 25 3a f2 51 28  |,g%).....da%:.Q(|
00001420  71 25 2c 67 25 29 0d 05  28 11 c9 5f 25 3a f2 73  |q%,g%)..(.._%:.s|
00001430  28 71 25 2c 67 25 29 0d  05 32 05 cb 0d 05 3c 05  |(q%,g%)..2....<.|
00001440  e1 0d 05 46 62 dd f2 6e  3a 4e 61 25 3d b9 3a e7  |...Fb..n:Na%=.:.|
00001450  54 25 80 4f 25 8c e7 ac  a4 66 28 22 50 6c 61 79  |T%.O%....f("Play|
00001460  20 43 72 6f 73 73 77 6f  72 64 22 2c 22 43 72 6f  | Crossword","Cro|
00001470  73 73 77 6f 72 64 20 70  72 6f 74 65 63 74 65 64  |ssword protected|
00001480  20 61 6e 64 20 75 6e 73  61 76 65 64 2e 20 41 72  | and unsaved. Ar|
00001490  65 20 79 6f 75 20 73 75  72 65 3f 22 29 8c 4e 61  |e you sure?").Na|
000014a0  25 3d a3 0d 05 50 05 cd  0d 05 5a 09 e7 4e 61 25  |%=...P....Z..Na%|
000014b0  8c 0d 05 64 0a e7 54 25  8c f2 65 0d 05 6e 50 54  |...d..T%..e..nPT|
000014c0  25 3d a3 3a f2 66 28 50  25 29 3a f2 66 28 75 25  |%=.:.f(P%):.f(u%|
000014d0  29 3a f2 66 28 5a 25 29  3a f2 66 28 5f 25 29 3a  |):.f(Z%):.f(_%):|
000014e0  f2 67 28 60 25 29 3a f2  67 28 64 61 25 29 3a f2  |.g(`%):.g(da%):.|
000014f0  67 28 70 25 29 3a e7 4f  25 8c f2 6f 28 55 25 2c  |g(p%):.O%..o(U%,|
00001500  33 29 8b f2 74 28 55 25  2c 33 29 0d 05 78 05 cd  |3)..t(U%,3)..x..|
00001510  0d 05 82 05 e1 0d 05 8c  5a dd f2 4c 28 71 25 2c  |........Z..L(q%,|
00001520  67 25 29 3a 66 25 3d 77  25 2a 77 25 3a 63 24 3d  |g%):f%=w%*w%:c$=|
00001530  a4 63 28 75 25 2c 30 29  3a e7 a4 6d 28 63 24 29  |.c(u%,0):..m(c$)|
00001540  8c f2 62 28 22 43 72 6f  73 73 77 6f 72 64 22 2c  |..b("Crossword",|
00001550  22 57 6f 72 64 20 61 6c  72 65 61 64 79 20 69 6e  |"Word already in|
00001560  20 63 72 6f 73 73 77 6f  72 64 2e 22 29 3a e1 0d  | crossword."):..|
00001570  05 96 32 e7 61 25 28 66  25 29 3d 33 30 8c f2 62  |..2.a%(f%)=30..b|
00001580  28 22 43 72 6f 73 73 77  6f 72 64 22 2c 22 43 72  |("Crossword","Cr|
00001590  6f 73 73 77 6f 72 64 20  66 75 6c 6c 2e 22 29 3a  |ossword full."):|
000015a0  e1 0d 05 a0 14 f2 6b 28  78 25 2c 79 25 29 3a e7  |......k(x%,y%):.|
000015b0  71 25 3d 34 8c 0d 05 aa  37 4f 61 25 3d a9 28 63  |q%=4....7Oa%=.(c|
000015c0  24 29 3a e7 4f 61 25 3c  32 f2 62 28 22 43 72 6f  |$):.Oa%<2.b("Cro|
000015d0  73 73 77 6f 72 64 22 2c  22 57 6f 72 64 20 74 6f  |ssword","Word to|
000015e0  6f 20 73 68 6f 72 74 2e  22 29 3a e1 0d 05 b4 09  |o short."):.....|
000015f0  c8 8e 77 25 ca 0d 05 be  12 c9 b9 3a e7 78 25 2b  |..w%.......:.x%+|
00001600  4f 61 25 3e 31 35 8c 0d  05 c8 39 f2 62 28 22 43  |Oa%>15....9.b("C|
00001610  72 6f 73 73 77 6f 72 64  22 2c 22 57 6f 72 64 20  |rossword","Word |
00001620  74 6f 6f 20 6c 6f 6e 67  20 74 6f 20 66 69 74 20  |too long to fit |
00001630  69 6e 20 74 68 69 73 20  73 70 61 63 65 2e 22 29  |in this space.")|
00001640  0d 05 d2 1e cc 3a 43 25  3d b9 3a e7 62 25 28 78  |.....:C%=.:.b%(x|
00001650  25 2c 79 25 2b 31 29 3e  30 8c 43 25 3d a3 0d 05  |%,y%+1)>0.C%=...|
00001660  dc 5e e3 6c 25 3d 31 b8  4f 61 25 3a e7 28 62 25  |.^.l%=1.Oa%:.(b%|
00001670  28 78 25 2b 6c 25 2c 79  25 2b 31 29 3d 30 80 62  |(x%+l%,y%+1)=0.b|
00001680  25 28 78 25 2b 6c 25 2c  79 25 2b 32 29 3d 30 80  |%(x%+l%,y%+2)=0.|
00001690  62 25 28 78 25 2b 6c 25  2c 79 25 29 3d 30 29 84  |b%(x%+l%,y%)=0).|
000016a0  62 25 28 78 25 2b 6c 25  2c 79 25 2b 31 29 3d 97  |b%(x%+l%,y%+1)=.|
000016b0  28 c1 63 24 2c 6c 25 2c  31 29 29 8c 0d 05 e6 0a  |(.c$,l%,1)).....|
000016c0  cc 3a 43 25 3d a3 0d 05  f0 05 cd 0d 05 fa 1c ed  |.:C%=...........|
000016d0  3a e7 62 25 28 78 25 2b  6c 25 2c 79 25 2b 31 29  |:.b%(x%+l%,y%+1)|
000016e0  3e 30 8c 43 25 3d a3 0d  06 04 0b e7 43 25 3d b9  |>0.C%=......C%=.|
000016f0  20 8c 0d 06 0e 60 f2 6d  3a e3 6c 25 3d 31 b8 4f  | ....`.m:.l%=1.O|
00001700  61 25 3a 62 25 28 78 25  2b 6c 25 2c 79 25 2b 31  |a%:b%(x%+l%,y%+1|
00001710  29 3d 97 28 c1 63 24 2c  6c 25 2c 31 29 29 3a 64  |)=.(.c$,l%,1)):d|
00001720  25 28 78 25 2b 6c 25 2c  79 25 2b 31 29 3d b9 3a  |%(x%+l%,y%+1)=.:|
00001730  ed 3a f2 69 3a 49 25 3d  a3 3a f2 75 28 63 24 29  |.:.i:I%=.:.u(c$)|
00001740  3a 50 61 25 3d a4 6b 28  63 24 29 3a f2 68 28 50  |:Pa%=.k(c$):.h(P|
00001750  25 29 0d 06 18 38 cc 3a  f2 62 28 22 43 72 6f 73  |%)...8.:.b("Cros|
00001760  73 77 6f 72 64 22 2c 22  57 6f 72 64 20 77 69 6c  |sword","Word wil|
00001770  6c 20 6e 6f 74 20 66 69  74 20 69 6e 20 74 68 69  |l not fit in thi|
00001780  73 20 73 70 61 63 65 2e  22 29 0d 06 22 05 cd 0d  |s space.").."...|
00001790  06 2c 05 cd 0d 06 36 12  c9 a3 3a e7 79 25 2d 4f  |.,....6...:.y%-O|
000017a0  61 25 3c 2d 31 8c 0d 06  40 39 f2 62 28 22 43 72  |a%<-1...@9.b("Cr|
000017b0  6f 73 73 77 6f 72 64 22  2c 22 57 6f 72 64 20 74  |ossword","Word t|
000017c0  6f 6f 20 6c 6f 6e 67 20  74 6f 20 66 69 74 20 69  |oo long to fit i|
000017d0  6e 20 74 68 69 73 20 73  70 61 63 65 2e 22 29 0d  |n this space.").|
000017e0  06 4a 20 cc 3a 43 25 3d  b9 3a e7 62 25 28 78 25  |.J .:C%=.:.b%(x%|
000017f0  2b 31 2c 79 25 2b 32 29  3e 30 8c 43 25 3d a3 0d  |+1,y%+2)>0.C%=..|
00001800  06 54 66 e3 6c 25 3d 31  b8 4f 61 25 3a e7 28 62  |.Tf.l%=1.Oa%:.(b|
00001810  25 28 78 25 2b 31 2c 79  25 2d 6c 25 2b 32 29 3d  |%(x%+1,y%-l%+2)=|
00001820  30 80 62 25 28 78 25 2c  79 25 2d 6c 25 2b 32 29  |0.b%(x%,y%-l%+2)|
00001830  3d 30 80 62 25 28 78 25  2b 32 2c 79 25 2d 6c 25  |=0.b%(x%+2,y%-l%|
00001840  2b 32 29 3d 30 29 84 62  25 28 78 25 2b 31 2c 79  |+2)=0).b%(x%+1,y|
00001850  25 2d 6c 25 2b 32 29 3d  97 28 c1 63 24 2c 6c 25  |%-l%+2)=.(.c$,l%|
00001860  2c 31 29 29 8c 0d 06 5e  0a cc 3a 43 25 3d a3 0d  |,1))...^..:C%=..|
00001870  06 68 05 cd 0d 06 72 1e  ed 3a e7 62 25 28 78 25  |.h....r..:.b%(x%|
00001880  2b 31 2c 79 25 2d 6c 25  2b 32 29 3e 30 8c 43 25  |+1,y%-l%+2)>0.C%|
00001890  3d a3 0d 06 7c 0b e7 43  25 3d b9 20 8c 0d 06 86  |=...|..C%=. ....|
000018a0  64 f2 6d 3a e3 6c 25 3d  31 b8 4f 61 25 3a 62 25  |d.m:.l%=1.Oa%:b%|
000018b0  28 78 25 2b 31 2c 79 25  2d 6c 25 2b 32 29 3d 97  |(x%+1,y%-l%+2)=.|
000018c0  28 c1 63 24 2c 6c 25 2c  31 29 29 3a 64 25 28 78  |(.c$,l%,1)):d%(x|
000018d0  25 2b 31 2c 79 25 2d 6c  25 2b 32 29 3d b9 3a ed  |%+1,y%-l%+2)=.:.|
000018e0  3a f2 69 3a f2 75 28 63  24 29 3a 49 25 3d a3 3a  |:.i:.u(c$):I%=.:|
000018f0  50 61 25 3d a4 6b 28 63  24 29 3a f2 68 28 50 25  |Pa%=.k(c$):.h(P%|
00001900  29 0d 06 90 38 cc 3a f2  62 28 22 43 72 6f 73 73  |)...8.:.b("Cross|
00001910  77 6f 72 64 22 2c 22 57  6f 72 64 20 77 69 6c 6c  |word","Word will|
00001920  20 6e 6f 74 20 66 69 74  20 69 6e 20 74 68 69 73  | not fit in this|
00001930  20 73 70 61 63 65 2e 22  29 0d 06 9a 05 cd 0d 06  | space.").......|
00001940  a4 05 cd 0d 06 ae 05 cb  0d 06 b8 05 cd 0d 06 c2  |................|
00001950  05 e1 0d 06 cc 1a dd f2  73 28 71 25 2c 67 25 29  |........s(q%,g%)|
00001960  3a e7 71 25 3d 34 80 67  25 3d 31 8c 0d 06 d6 09  |:.q%=4.g%=1.....|
00001970  c8 8e 54 25 ca 0d 06 e0  12 c9 b9 3a 69 24 3d a4  |..T%.......:i$=.|
00001980  63 28 5f 25 2c 30 29 0d  06 ea 33 c9 a3 3a e3 51  |c(_%,0)...3..:.Q|
00001990  61 25 3d 31 b8 31 30 3a  e7 63 24 28 51 61 25 29  |a%=1.10:.c$(Qa%)|
000019a0  3d 22 22 63 24 28 51 61  25 29 3d a4 63 28 5f 25  |=""c$(Qa%)=.c(_%|
000019b0  2c 30 29 3a 51 61 25 3d  31 30 0d 06 f4 08 ed 3a  |,0):Qa%=10.....:|
000019c0  f2 6a 0d 06 fe 05 cb 0d  07 08 0a f2 66 28 5f 25  |.j..........f(_%|
000019d0  29 0d 07 12 05 cd 0d 07  1c 05 e1 0d 07 26 1e dd  |)............&..|
000019e0  f2 6a 3a f2 72 28 73 61  25 2c 31 2c 69 24 29 3a  |.j:.r(sa%,1,i$):|
000019f0  e3 52 61 25 3d 31 b8 31  30 0d 07 27 32 e7 20 a9  |.Ra%=1.10..'2. .|
00001a00  28 63 24 28 52 61 25 29  29 3e 30 20 8c 20 f2 72  |(c$(Ra%))>0 . .r|
00001a10  28 74 61 25 2c 52 61 25  2c 63 24 28 52 61 25 29  |(ta%,Ra%,c$(Ra%)|
00001a20  29 3a ed 3a e1 20 8b 20  ed 3a e1 0d 07 3a 1e dd  |):.:. . .:...:..|
00001a30  f2 4f 28 71 25 2c 67 25  29 3a 53 61 25 3d 30 3a  |.O(q%,g%):Sa%=0:|
00001a40  f2 6b 28 78 25 2c 79 25  29 0d 07 44 2b 53 61 25  |.k(x%,y%)..D+Sa%|
00001a50  2b 3d 31 3a 66 25 3d 45  25 2a 45 25 3a 54 61 25  |+=1:f%=E%*E%:Ta%|
00001a60  3d a3 3a e7 65 25 28 78  25 2b 31 2c 79 25 2b 31  |=.:.e%(x%+1,y%+1|
00001a70  29 3d 30 e1 0d 07 4e 0a  e7 71 25 3d 34 8c 0d 07  |)=0...N..q%=4...|
00001a80  58 2a e3 6f 25 3d 31 b8  61 25 28 66 25 29 3a e7  |X*.o%=1.a%(f%):.|
00001a90  63 25 28 6f 25 2c 66 25  29 3d 65 25 28 78 25 2b  |c%(o%,f%)=e%(x%+|
00001aa0  31 2c 79 25 2b 31 29 8c  0d 07 62 62 f2 61 28 70  |1,y%+1)...bb.a(p|
00001ab0  25 2c 33 2c 61 24 28 6f  25 2c 66 25 2c 30 29 29  |%,3,a$(o%,f%,0))|
00001ac0  3a f2 61 28 70 25 2c 34  2c 61 24 28 6f 25 2c 66  |:.a(p%,4,a$(o%,f|
00001ad0  25 2c 31 29 29 3a f2 61  28 70 25 2c 37 2c 61 24  |%,1)):.a(p%,7,a$|
00001ae0  28 6f 25 2c 66 25 2c 32  29 29 3a f2 61 28 70 25  |(o%,f%,2)):.a(p%|
00001af0  2c 32 2c c3 28 65 25 28  78 25 2b 31 2c 79 25 2b  |,2,.(e%(x%+1,y%+|
00001b00  31 29 29 29 3a c8 8e 66  25 ca 0d 07 6c 1b c9 30  |1))):..f%...l..0|
00001b10  3a 45 25 3d a3 3a f2 61  28 70 25 2c 31 2c 22 44  |:E%=.:.a(p%,1,"D|
00001b20  6f 77 6e 22 29 0d 07 76  1d c9 31 3a 45 25 3d b9  |own")..v..1:E%=.|
00001b30  3a f2 61 28 70 25 2c 31  2c 22 41 63 72 6f 73 73  |:.a(p%,1,"Across|
00001b40  22 29 0d 07 80 05 cb 0d  07 8a 09 54 61 25 3d b9  |").........Ta%=.|
00001b50  0d 07 94 05 cd 0d 07 9e  05 ed 0d 07 a8 05 cd 0d  |................|
00001b60  07 b2 2d e7 28 53 61 25  3d 31 80 54 61 25 3d a3  |..-.(Sa%=1.Ta%=.|
00001b70  20 80 71 25 3d 34 29 84  28 53 61 25 3d 32 80 54  | .q%=4).(Sa%=2.T|
00001b80  61 25 3d a3 20 80 71 25  3d 34 29 8c 0d 07 bc 15  |a%=. .q%=4).....|
00001b90  e7 45 25 3d a3 20 8c 45  25 3d b9 20 8b 45 25 3d  |.E%=. .E%=. .E%=|
00001ba0  a3 0d 07 c6 05 cd 0d 07  d0 23 e7 20 53 61 25 3d  |.........#. Sa%=|
00001bb0  31 20 80 20 54 61 25 3d  a3 20 80 20 71 25 3d 34  |1 . Ta%=. . q%=4|
00001bc0  20 8c 20 e5 20 8d 44 44  47 0d 07 da 05 e1 0d 07  | . . .DDG.......|
00001bd0  e4 2f dd f2 76 3a 66 25  3d 45 25 2a 45 25 3a 55  |./..v:f%=E%*E%:U|
00001be0  61 25 3d b9 3a 56 61 25  3d bb 28 a4 63 28 70 25  |a%=.:Va%=.(.c(p%|
00001bf0  2c 32 29 29 3a e7 56 61  25 3e 33 30 e1 0d 07 ee  |,2)):.Va%>30....|
00001c00  1a 64 24 3d a4 63 28 70  25 2c 30 29 3a e7 61 25  |.d$=.c(p%,0):.a%|
00001c10  28 66 25 29 3e 30 8c 0d  07 f8 30 e3 57 61 25 3d  |(f%)>0....0.Wa%=|
00001c20  31 b8 61 25 28 66 25 29  3a e7 64 24 3d 62 24 28  |1.a%(f%):.d$=b$(|
00001c30  57 61 25 2c 66 25 29 80  63 25 28 57 61 25 2c 66  |Wa%,f%).c%(Wa%,f|
00001c40  25 29 3d 56 61 25 8c 0d  08 02 30 e3 64 25 3d 31  |%)=Va%....0.d%=1|
00001c50  b8 31 35 3a e3 74 25 3d  31 b8 31 35 3a e7 65 25  |.15:.t%=1.15:.e%|
00001c60  28 64 25 2c 74 25 29 3d  56 61 25 8c 78 25 3d 64  |(d%,t%)=Va%.x%=d|
00001c70  25 3a 79 25 3d 74 25 0d  08 0c 14 ed 3a ed 3a 64  |%:y%=t%.....:.:d|
00001c80  25 28 29 3d a3 3a c8 8e  66 25 ca 0d 08 16 3d c9  |%()=.:..f%....=.|
00001c90  31 3a e3 6f 25 3d 30 b8  a9 64 24 2d 31 3a 66 25  |1:.o%=0..d$-1:f%|
00001ca0  28 78 25 2b 6f 25 2c 79  25 29 3d 62 25 28 78 25  |(x%+o%,y%)=b%(x%|
00001cb0  2b 6f 25 2c 79 25 29 3a  64 25 28 78 25 2b 6f 25  |+o%,y%):d%(x%+o%|
00001cc0  2c 79 25 29 3d b9 3a ed  0d 08 20 3d c9 30 3a e3  |,y%)=.:... =.0:.|
00001cd0  6f 25 3d 30 b8 a9 64 24  2d 31 3a 66 25 28 78 25  |o%=0..d$-1:f%(x%|
00001ce0  2c 79 25 2d 6f 25 29 3d  62 25 28 78 25 2c 79 25  |,y%-o%)=b%(x%,y%|
00001cf0  2d 6f 25 29 3a 64 25 28  78 25 2c 79 25 2d 6f 25  |-o%):d%(x%,y%-o%|
00001d00  29 3d b9 3a ed 0d 08 2a  05 cb 0d 08 34 13 e7 67  |)=.:...*....4..g|
00001d10  25 28 57 61 25 2c 66 25  29 3d a3 20 8c 0d 08 3e  |%(Wa%,f%)=. ...>|
00001d20  67 f2 68 28 60 25 29 3a  55 61 25 3d a3 3a 49 25  |g.h(`%):Ua%=.:I%|
00001d30  3d a3 3a f2 61 28 70 25  2c 30 2c 22 22 29 3a f2  |=.:.a(p%,0,""):.|
00001d40  63 28 70 25 2c 30 2c 30  29 3a 67 25 28 57 61 25  |c(p%,0,0):g%(Wa%|
00001d50  2c 66 25 29 3d b9 3a 64  25 28 57 61 25 2c 66 25  |,f%)=.:d%(Wa%,f%|
00001d60  29 3d b9 3a f2 77 28 64  61 25 29 3a 58 61 25 3d  |)=.:.w(da%):Xa%=|
00001d70  b9 3a e3 61 25 3d 30 b8  31 3a e7 61 25 28 61 25  |.:.a%=0.1:.a%(a%|
00001d80  29 3e 30 8c 0d 08 48 22  e3 47 25 3d 31 b8 61 25  |)>0...H".G%=1.a%|
00001d90  28 61 25 29 3a e7 67 25  28 47 25 2c 61 25 29 3d  |(a%):.g%(G%,a%)=|
00001da0  a3 58 61 25 3d a3 0d 08  52 05 ed 0d 08 5c 05 cd  |.Xa%=...R....\..|
00001db0  0d 08 66 43 ed 3a e7 58  61 25 8c f2 62 28 22 43  |..fC.:.Xa%..b("C|
00001dc0  72 6f 73 73 77 6f 72 64  22 2c 22 43 72 6f 73 73  |rossword","Cross|
00001dd0  77 6f 72 64 20 43 6f 6d  70 6c 65 74 65 64 20 2d  |word Completed -|
00001de0  20 57 65 6c 6c 20 44 6f  6e 65 22 29 3a f2 67 28  | Well Done"):.g(|
00001df0  5f 25 29 0d 08 70 05 cd  0d 08 7a 05 cd 0d 08 84  |_%)..p....z.....|
00001e00  05 ed 0d 08 8e 05 cd 0d  08 98 2b e7 55 61 25 8c  |..........+.Ua%.|
00001e10  f2 62 28 22 43 72 6f 73  73 77 6f 72 64 22 2c 22  |.b("Crossword","|
00001e20  49 6e 63 6f 72 72 65 63  74 20 47 75 65 73 73 2e  |Incorrect Guess.|
00001e30  22 29 0d 08 a2 05 e1 0d  08 ac 27 dd a4 6d 28 64  |")........'..m(d|
00001e40  24 29 3a ea 66 25 3a 43  25 3d a3 3a e3 66 25 3d  |$):.f%:C%=.:.f%=|
00001e50  30 b8 31 3a e7 61 25 28  66 25 29 3e 30 8c 0d 08  |0.1:.a%(f%)>0...|
00001e60  b6 22 e3 6f 25 3d 31 b8  61 25 28 66 25 29 3a e7  |.".o%=1.a%(f%):.|
00001e70  64 24 3d 62 24 28 6f 25  2c 66 25 29 43 25 3d b9  |d$=b$(o%,f%)C%=.|
00001e80  0d 08 c0 05 ed 0d 08 ca  05 cd 0d 08 d4 09 ed 3a  |...............:|
00001e90  3d 43 25 0d 08 de 28 dd  f2 75 28 64 24 29 3a 61  |=C%...(..u(d$):a|
00001ea0  25 28 66 25 29 2b 3d 31  3a 62 24 28 61 25 28 66  |%(f%)+=1:b$(a%(f|
00001eb0  25 29 2c 66 25 29 3d 64  24 3a e1 0d 08 e8 24 dd  |%),f%)=d$:....$.|
00001ec0  f2 52 28 64 24 29 3a 43  25 3d a3 3a 66 25 3d 77  |.R(d$):C%=.:f%=w|
00001ed0  25 2a 77 25 3a e7 61 25  28 66 25 29 3e 30 8c 0d  |%*w%:.a%(f%)>0..|
00001ee0  08 f2 1f e3 6f 25 3d 31  b8 61 25 28 66 25 29 3a  |....o%=1.a%(f%):|
00001ef0  e7 64 24 3d 62 24 28 6f  25 2c 66 25 29 8c 0d 08  |.d$=b$(o%,f%)...|
00001f00  fc 79 62 24 28 6f 25 2c  66 25 29 3d 62 24 28 61  |.yb$(o%,f%)=b$(a|
00001f10  25 28 66 25 29 2c 66 25  29 3a 61 24 28 6f 25 2c  |%(f%),f%):a$(o%,|
00001f20  66 25 2c 30 29 3d 61 24  28 61 25 28 66 25 29 2c  |f%,0)=a$(a%(f%),|
00001f30  66 25 2c 30 29 3a 61 24  28 6f 25 2c 66 25 2c 31  |f%,0):a$(o%,f%,1|
00001f40  29 3d 61 24 28 61 25 28  66 25 29 2c 66 25 2c 31  |)=a$(a%(f%),f%,1|
00001f50  29 3a 61 24 28 6f 25 2c  66 25 2c 32 29 3d 61 24  |):a$(o%,f%,2)=a$|
00001f60  28 61 25 28 66 25 29 2c  66 25 2c 32 29 3a 61 25  |(a%(f%),f%,2):a%|
00001f70  28 66 25 29 2d 3d 31 0d  09 06 05 cd 0d 09 10 05  |(f%)-=1.........|
00001f80  ed 0d 09 1a 05 cd 0d 09  24 05 e1 0d 09 2e 3e dd  |........$.....>.|
00001f90  f2 6b 28 f8 7a 25 2c f8  41 25 29 3a 7a 25 2d 3d  |.k(.z%,.A%):z%-=|
00001fa0  43 61 25 3a 41 25 2d 3d  44 61 25 3a 7a 25 3d 7a  |Ca%:A%-=Da%:z%=z|
00001fb0  25 81 35 32 3a 41 25 3d  41 25 81 35 32 3a e7 7a  |%.52:A%=A%.52:.z|
00001fc0  25 3e 31 34 7a 25 3d 31  34 0d 09 38 0f e7 41 25  |%>14z%=14..8..A%|
00001fd0  3e 31 34 41 25 3d 31 34  0d 09 42 0d e7 7a 25 3c  |>14A%=14..B..z%<|
00001fe0  30 7a 25 3d 30 0d 09 4c  0d e7 41 25 3c 30 41 25  |0z%=0..L..A%<0A%|
00001ff0  3d 30 0d 09 56 05 e1 0d  09 60 41 dd f2 53 28 f8  |=0..V....`A..S(.|
00002000  7a 25 2c f8 41 25 29 3a  7a 25 2d 3d 45 61 25 3a  |z%,.A%):z%-=Ea%:|
00002010  41 25 2d 3d 46 61 25 3a  41 25 2b 3d 33 32 3a 7a  |A%-=Fa%:A%+=32:z|
00002020  25 3d 7a 25 81 36 32 34  3a e7 7a 25 3d 31 8c 7a  |%=z%.624:.z%=1.z|
00002030  25 3d 30 8b 7a 25 3d 31  0d 09 6a 18 41 25 3d 41  |%=0.z%=1..j.A%=A|
00002040  25 81 31 32 38 3a 41 25  3d 33 30 2d 41 25 3a e1  |%.128:A%=30-A%:.|
00002050  0d 09 74 41 dd f2 54 28  f8 7a 25 2c f8 41 25 29  |..tA..T(.z%,.A%)|
00002060  3a 7a 25 2d 3d 47 61 25  3a 41 25 2d 3d 48 61 25  |:z%-=Ga%:A%-=Ha%|
00002070  3a 41 25 2b 3d 33 32 3a  7a 25 3d 7a 25 81 36 32  |:A%+=32:z%=z%.62|
00002080  34 3a e7 7a 25 3d 31 8c  7a 25 3d 30 8b 7a 25 3d  |4:.z%=1.z%=0.z%=|
00002090  31 0d 09 7e 17 41 25 3d  41 25 81 39 36 3a 41 25  |1..~.A%=A%.96:A%|
000020a0  3d 33 30 2d 41 25 3a e1  0d 09 88 15 dd f2 4d 28  |=30-A%:.......M(|
000020b0  71 25 2c 67 25 29 3a e7  71 25 80 35 8c 0d 09 92  |q%,g%):.q%.5....|
000020c0  09 c8 8e 67 25 ca 0d 09  9c 0c c9 31 3a c8 8e 77  |...g%......1:..w|
000020d0  25 ca 0d 09 a6 1b c9 b9  3a 77 25 3d a3 3a f2 61  |%.......:w%=.:.a|
000020e0  28 75 25 2c 31 2c 22 44  6f 77 6e 22 29 0d 09 b0  |(u%,1,"Down")...|
000020f0  1d c9 a3 3a 77 25 3d b9  3a f2 61 28 75 25 2c 31  |...:w%=.:.a(u%,1|
00002100  2c 22 41 63 72 6f 73 73  22 29 0d 09 ba 05 cb 0d  |,"Across")......|
00002110  09 c4 15 c9 36 3a e7 a4  6b 28 a4 63 28 75 25 2c  |....6:..k(.c(u%,|
00002120  30 29 29 8c 0d 09 ce 23  f2 62 28 22 43 72 6f 73  |0))....#.b("Cros|
00002130  73 77 6f 72 64 22 2c 22  43 6c 75 65 20 63 68 61  |sword","Clue cha|
00002140  6e 67 65 64 2e 22 29 0d  09 d8 2e cc 3a f2 62 28  |nged.").....:.b(|
00002150  22 43 72 6f 73 73 77 6f  72 64 22 2c 22 57 6f 72  |"Crossword","Wor|
00002160  64 20 6e 6f 74 20 69 6e  20 63 72 6f 73 73 77 6f  |d not in crosswo|
00002170  72 64 2e 22 29 0d 09 e2  05 cd 0d 09 ec 36 c9 32  |rd.")........6.2|
00002180  3a f2 61 28 75 25 2c 30  2c 22 22 29 3a f2 61 28  |:.a(u%,0,""):.a(|
00002190  75 25 2c 33 2c 22 22 29  3a f2 61 28 75 25 2c 34  |u%,3,""):.a(u%,4|
000021a0  2c 22 22 29 3a f2 61 28  75 25 2c 37 2c 22 22 29  |,""):.a(u%,7,"")|
000021b0  0d 09 f6 05 cb 0d 0a 00  05 cd 0d 0a 0a 05 e1 0d  |................|
000021c0  0a 14 16 dd a4 6b 28 76  24 29 3a e7 ac a4 6d 28  |.....k(v$):...m(|
000021d0  76 24 29 3d a3 0d 0a 1e  1c 55 61 25 3d a3 3a e3  |v$)=.....Ua%=.:.|
000021e0  66 25 3d 30 b8 31 3a e7  61 25 28 66 25 29 3e 30  |f%=0.1:.a%(f%)>0|
000021f0  8c 0d 0a 28 1f e3 6f 25  3d 31 b8 61 25 28 66 25  |...(..o%=1.a%(f%|
00002200  29 3a e7 76 24 3d 62 24  28 6f 25 2c 66 25 29 8c  |):.v$=b$(o%,f%).|
00002210  0d 0a 32 4d 49 25 3d a3  3a 55 61 25 3d b9 3a 61  |..2MI%=.:Ua%=.:a|
00002220  24 28 6f 25 2c 66 25 2c  30 29 3d a4 63 28 75 25  |$(o%,f%,0)=.c(u%|
00002230  2c 33 29 3a 61 24 28 6f  25 2c 66 25 2c 31 29 3d  |,3):a$(o%,f%,1)=|
00002240  a4 63 28 75 25 2c 34 29  3a 61 24 28 6f 25 2c 66  |.c(u%,4):a$(o%,f|
00002250  25 2c 32 29 3d a4 63 28  75 25 2c 37 29 0d 0a 3c  |%,2)=.c(u%,7)..<|
00002260  05 cd 0d 0a 46 05 ed 0d  0a 50 05 cd 0d 0a 5a 11  |....F....P....Z.|
00002270  ed 3a f2 64 28 5a 25 29  3a 3d 55 61 25 0d 0a 64  |.:.d(Z%):=Ua%..d|
00002280  15 dd f2 50 28 71 25 2c  67 25 29 3a e7 71 25 80  |...P(q%,g%):.q%.|
00002290  35 8c 0d 0a 6e 09 c8 8e  67 25 ca 0d 0a 78 0c c9  |5...n...g%...x..|
000022a0  31 3a c8 8e 45 25 ca 0d  0a 82 1b c9 b9 3a 45 25  |1:..E%.......:E%|
000022b0  3d a3 3a f2 61 28 70 25  2c 31 2c 22 44 6f 77 6e  |=.:.a(p%,1,"Down|
000022c0  22 29 0d 0a 8c 1d c9 a3  3a 45 25 3d b9 3a f2 61  |")......:E%=.:.a|
000022d0  28 70 25 2c 31 2c 22 41  63 72 6f 73 73 22 29 0d  |(p%,1,"Across").|
000022e0  0a 96 05 cb 0d 0a a0 09  c9 35 3a f2 76 0d 0a aa  |.........5:.v...|
000022f0  05 cb 0d 0a b4 05 cd 0d  0a be 05 e1 0d 0a c8 2a  |...............*|
00002300  dd f2 4e 28 71 25 2c 67  25 29 3a f2 53 28 78 25  |..N(q%,g%):.S(x%|
00002310  2c 79 25 29 3a e7 79 25  3e 30 80 79 25 3c 3d 61  |,y%):.y%>0.y%<=a|
00002320  25 28 78 25 29 8c 0d 0a  d2 55 f2 61 28 75 25 2c  |%(x%)....U.a(u%,|
00002330  30 2c 62 24 28 79 25 2c  78 25 29 29 3a f2 61 28  |0,b$(y%,x%)):.a(|
00002340  75 25 2c 33 2c 61 24 28  79 25 2c 78 25 2c 30 29  |u%,3,a$(y%,x%,0)|
00002350  29 3a f2 61 28 75 25 2c  34 2c 61 24 28 79 25 2c  |):.a(u%,4,a$(y%,|
00002360  78 25 2c 31 29 29 3a f2  61 28 75 25 2c 37 2c 61  |x%,1)):.a(u%,7,a|
00002370  24 28 79 25 2c 78 25 2c  32 29 29 0d 0a dc 05 cd  |$(y%,x%,2)).....|
00002380  0d 0a e6 09 c8 8e 78 25  ca 0d 0a f0 1b c9 30 3a  |......x%......0:|
00002390  77 25 3d a3 3a f2 61 28  75 25 2c 31 2c 22 44 6f  |w%=.:.a(u%,1,"Do|
000023a0  77 6e 22 29 0d 0a fa 1d  c9 31 3a 77 25 3d b9 3a  |wn").....1:w%=.:|
000023b0  f2 61 28 75 25 2c 31 2c  22 41 63 72 6f 73 73 22  |.a(u%,1,"Across"|
000023c0  29 0d 0b 04 05 cb 0d 0b  0e 05 e1 0d 0b 18 2a dd  |).............*.|
000023d0  f2 51 28 71 25 2c 67 25  29 3a f2 54 28 78 25 2c  |.Q(q%,g%):.T(x%,|
000023e0  79 25 29 3a e7 79 25 3e  30 80 79 25 3c 3d 61 25  |y%):.y%>0.y%<=a%|
000023f0  28 78 25 29 8c 0d 0b 22  5e f2 61 28 70 25 2c 33  |(x%)..."^.a(p%,3|
00002400  2c 61 24 28 79 25 2c 78  25 2c 30 29 29 3a f2 61  |,a$(y%,x%,0)):.a|
00002410  28 70 25 2c 34 2c 61 24  28 79 25 2c 78 25 2c 31  |(p%,4,a$(y%,x%,1|
00002420  29 29 3a f2 61 28 70 25  2c 37 2c 61 24 28 79 25  |)):.a(p%,7,a$(y%|
00002430  2c 78 25 2c 32 29 29 3a  f2 61 28 70 25 2c 32 2c  |,x%,2)):.a(p%,2,|
00002440  c3 28 63 25 28 79 25 2c  78 25 29 29 29 3a c8 8e  |.(c%(y%,x%))):..|
00002450  78 25 ca 0d 0b 2c 1b c9  30 3a 45 25 3d a3 3a f2  |x%...,..0:E%=.:.|
00002460  61 28 70 25 2c 31 2c 22  44 6f 77 6e 22 29 0d 0b  |a(p%,1,"Down")..|
00002470  36 1d c9 31 3a 45 25 3d  b9 3a f2 61 28 70 25 2c  |6..1:E%=.:.a(p%,|
00002480  31 2c 22 41 63 72 6f 73  73 22 29 0d 0b 40 05 cb  |1,"Across")..@..|
00002490  0d 0b 4a 05 cd 0d 0b 54  05 e1 0d 0b 5e 17 dd f2  |..J....T....^...|
000024a0  55 28 65 25 2c 67 25 2c  44 25 29 3a c8 8e 65 25  |U(e%,g%,D%):..e%|
000024b0  ca 0d 0b 68 11 c9 75 25  3a f2 56 28 67 25 2c 44  |...h..u%:.V(g%,D|
000024c0  25 29 0d 0b 72 11 c9 70  25 3a f2 57 28 67 25 2c  |%)..r..p%:.W(g%,|
000024d0  44 25 29 0d 0b 7c 11 c9  5f 25 3a f2 58 28 67 25  |D%)..|.._%:.X(g%|
000024e0  2c 44 25 29 0d 0b 86 05  cb 0d 0b 90 05 e1 0d 0b  |,D%)............|
000024f0  9a 1d dd f2 58 28 67 25  2c 44 25 29 3a e7 44 25  |....X(g%,D%):.D%|
00002500  3d 33 39 38 84 44 25 3d  31 33 8c 0d 0b a4 10 e7  |=398.D%=13......|
00002510  67 25 3d 30 f2 73 28 34  2c 31 29 0d 0b ae 05 cb  |g%=0.s(4,1).....|
00002520  0d 0b b8 05 cd 0d 0b c2  05 e1 0d 0b cc 1d dd f2  |................|
00002530  56 28 67 25 2c 44 25 29  3a e7 44 25 3d 33 39 38  |V(g%,D%):.D%=398|
00002540  84 44 25 3d 31 33 8c 0d  0b d6 09 c8 8e 67 25 ca  |.D%=13.......g%.|
00002550  0d 0b e0 11 c9 30 3a f2  63 28 75 25 2c 33 2c 30  |.....0:.c(u%,3,0|
00002560  29 0d 0b ea 11 c9 33 3a  f2 63 28 75 25 2c 34 2c  |).....3:.c(u%,4,|
00002570  30 29 0d 0b f4 11 c9 34  3a f2 63 28 75 25 2c 37  |0).....4:.c(u%,7|
00002580  2c 30 29 0d 0b fe 06 c9  37 0d 0c 08 05 cb 0d 0c  |,0).....7.......|
00002590  12 05 cd 0d 0c 1c 0c e7  44 25 3d 33 39 39 8c 0d  |........D%=399..|
000025a0  0c 26 09 c8 8e 67 25 ca  0d 0c 30 06 c9 30 0d 0c  |.&...g%...0..0..|
000025b0  3a 11 c9 33 3a f2 63 28  75 25 2c 30 2c 30 29 0d  |:..3:.c(u%,0,0).|
000025c0  0c 44 11 c9 34 3a f2 63  28 75 25 2c 33 2c 30 29  |.D..4:.c(u%,3,0)|
000025d0  0d 0c 4e 11 c9 37 3a f2  63 28 75 25 2c 34 2c 30  |..N..7:.c(u%,4,0|
000025e0  29 0d 0c 58 05 cb 0d 0c  62 05 cd 0d 0c 6c 05 e1  |)..X....b....l..|
000025f0  0d 0c 76 1d dd f2 57 28  67 25 2c 44 25 29 3a e7  |..v...W(g%,D%):.|
00002600  44 25 3d 33 39 38 84 44  25 3d 31 33 8c 0d 0c 80  |D%=398.D%=13....|
00002610  09 c8 8e 67 25 ca 0d 0c  8a 09 c9 30 3a f2 76 0d  |...g%......0:.v.|
00002620  0c 94 25 c9 32 3a f2 63  28 70 25 2c 30 2c 30 29  |..%.2:.c(p%,0,0)|
00002630  3a 66 25 3d 45 25 2a 45  25 3a e7 61 25 28 66 25  |:f%=E%*E%:.a%(f%|
00002640  29 3e 30 8c 0d 0c 9e 28  e3 6f 25 3d 31 b8 61 25  |)>0....(.o%=1.a%|
00002650  28 66 25 29 3a e7 63 25  28 6f 25 2c 66 25 29 3d  |(f%):.c%(o%,f%)=|
00002660  bb 28 a4 63 28 70 25 2c  32 29 29 8c 0d 0c a8 51  |.(.c(p%,2))....Q|
00002670  f2 61 28 70 25 2c 33 2c  61 24 28 6f 25 2c 66 25  |.a(p%,3,a$(o%,f%|
00002680  2c 30 29 29 3a f2 61 28  70 25 2c 34 2c 61 24 28  |,0)):.a(p%,4,a$(|
00002690  6f 25 2c 66 25 2c 31 29  29 3a f2 61 28 70 25 2c  |o%,f%,1)):.a(p%,|
000026a0  37 2c 61 24 28 6f 25 2c  66 25 2c 32 29 29 3a f2  |7,a$(o%,f%,2)):.|
000026b0  61 28 70 25 2c 32 2c c3  28 6f 25 29 29 0d 0c b2  |a(p%,2,.(o%))...|
000026c0  05 cd 0d 0c bc 05 ed 0d  0c c6 05 cd 0d 0c d0 05  |................|
000026d0  cb 0d 0c da 05 cd 0d 0c  e4 0c e7 44 25 3d 33 39  |...........D%=39|
000026e0  39 8c 0d 0c ee 09 c8 8e  67 25 ca 0d 0c f8 11 c9  |9.......g%......|
000026f0  30 3a f2 63 28 70 25 2c  32 2c 30 29 0d 0d 02 05  |0:.c(p%,2,0)....|
00002700  cb 0d 0d 0c 05 cd 0d 0d  16 05 e1 0d 0d 20 11 dd  |............. ..|
00002710  f2 59 28 72 25 29 3a c8  8e 72 25 ca 0d 0d 2a 0a  |.Y(r%):..r%...*.|
00002720  c9 55 25 3a f2 5a 0d 0d  34 0b c9 76 61 25 3a f2  |.U%:.Z..4..va%:.|
00002730  5f 0d 0d 3e 0b c9 75 61  25 3a f2 60 0d 0d 48 05  |_..>..ua%:.`..H.|
00002740  cb 0d 0d 52 05 e1 0d 0d  5c 10 dd f2 60 3a c8 8e  |...R....\...`:..|
00002750  a4 68 28 30 29 ca 0d 0d  66 0c c9 33 3a e7 ac 54  |.h(0)...f..3:..T|
00002760  25 8c 0d 0d 70 2b e7 a4  66 28 22 52 65 73 65 74  |%...p+..f("Reset|
00002770  20 43 72 6f 73 73 77 6f  72 64 22 2c 22 41 72 65  | Crossword","Are|
00002780  20 79 6f 75 20 73 75 72  65 3f 22 29 8c 0d 0d 7a  | you sure?")...z|
00002790  2e e3 47 25 3d 31 b8 31  35 3a e3 4a 25 3d 31 b8  |..G%=1.15:.J%=1.|
000027a0  31 35 3a e7 66 25 28 47  25 2c 4a 25 29 3e 30 66  |15:.f%(G%,J%)>0f|
000027b0  25 28 47 25 2c 4a 25 29  3d 33 32 0d 0d 84 1d ed  |%(G%,J%)=32.....|
000027c0  3a ed 3a 67 25 28 29 3d  a3 3a f2 68 28 60 25 29  |:.:g%()=.:.h(`%)|
000027d0  3a f2 77 28 64 61 25 29  0d 0d 8e 05 cd 0d 0d 98  |:.w(da%)........|
000027e0  05 cd 0d 0d a2 05 cb 0d  0d ac 05 e1 0d 0d b6 10  |................|
000027f0  dd f2 5f 3a c8 8e a4 68  28 30 29 ca 0d 0d c0 10  |.._:...h(0).....|
00002800  c9 31 3a e7 a4 68 28 31  29 3d 31 8c 0d 0d ca 16  |.1:..h(1)=1.....|
00002810  e7 6c 24 3d 22 4e 6f 74  20 6f 6e 20 77 6f 72 64  |.l$="Not on word|
00002820  22 8c 0d 0d d4 17 cc 3a  4b 25 2b 3d 31 3a 4c 25  |"......:K%+=1:L%|
00002830  2b 3d 31 3a c8 8e 77 25  ca 0d 0d de 12 c9 b9 3a  |+=1:..w%.......:|
00002840  59 61 25 3d 30 3a 5a 61  25 3d 31 0d 0d e8 12 c9  |Ya%=0:Za%=1.....|
00002850  a3 3a 59 61 25 3d 31 3a  5a 61 25 3d 30 0d 0d f2  |.:Ya%=1:Za%=0...|
00002860  05 cb 0d 0d fc 66 f2 6d  3a c8 95 62 25 28 4b 25  |.....f.m:..b%(K%|
00002870  2c 4c 25 29 3e 30 80 4b  25 3c 31 36 80 4c 25 3e  |,L%)>0.K%<16.L%>|
00002880  2d 31 3a 49 25 3d a3 3a  e7 62 25 28 4b 25 2b 59  |-1:I%=.:.b%(K%+Y|
00002890  61 25 2c 4c 25 2b 5a 61  25 29 3d 30 80 62 25 28  |a%,L%+Za%)=0.b%(|
000028a0  4b 25 2d 59 61 25 2c 4c  25 2d 5a 61 25 29 3d 30  |K%-Ya%,L%-Za%)=0|
000028b0  8c 62 25 28 4b 25 2c 4c  25 29 3d 30 3a 64 25 28  |.b%(K%,L%)=0:d%(|
000028c0  4b 25 2c 4c 25 29 3d b9  0d 0e 06 12 e7 77 25 4b  |K%,L%)=......w%K|
000028d0  25 2b 3d 31 8b 4c 25 2d  3d 31 0d 0e 10 15 ce 3a  |%+=1.L%-=1.....:|
000028e0  f2 69 3a 77 25 3d 79 61  25 3a c8 8e 77 25 ca 0d  |.i:w%=ya%:..w%..|
000028f0  0e 1a 18 c9 b9 3a f2 61  28 70 25 2c 31 2c 22 41  |.....:.a(p%,1,"A|
00002900  63 72 6f 73 73 22 29 0d  0e 24 16 c9 a3 3a f2 61  |cross")..$...:.a|
00002910  28 70 25 2c 31 2c 22 44  6f 77 6e 22 29 0d 0e 2e  |(p%,1,"Down")...|
00002920  05 cb 0d 0e 38 18 f2 52  28 6c 24 29 3a f2 64 28  |....8..R(l$):.d(|
00002930  5a 25 29 3a f2 68 28 50  25 29 0d 0e 42 05 cd 0d  |Z%):.h(P%)..B...|
00002940  0e 4c 05 cd 0d 0e 56 54  c9 33 3a e7 ac 49 25 8c  |.L....VT.3:..I%.|
00002950  e7 ac a4 66 28 22 43 6c  65 61 72 20 43 72 6f 73  |...f("Clear Cros|
00002960  73 77 6f 72 64 22 2c 22  55 6e 73 61 76 65 64 20  |sword","Unsaved |
00002970  63 72 6f 73 73 77 6f 72  64 20 69 6e 20 6d 65 6d  |crossword in mem|
00002980  6f 72 79 2e 20 41 72 65  20 79 6f 75 20 73 75 72  |ory. Are you sur|
00002990  65 3f 22 29 8c cb 3a e1  0d 0e 60 35 61 25 28 30  |e?")..:...`5a%(0|
000029a0  29 3d 30 3a 61 25 28 31  29 3d 30 3a 62 25 28 29  |)=0:a%(1)=0:b%()|
000029b0  3d 30 3a 63 24 28 29 3d  22 22 3a 49 25 3d b9 3a  |=0:c$()="":I%=.:|
000029c0  f2 68 28 50 25 29 3a f2  64 28 5a 25 29 0d 0e 6a  |.h(P%):.d(Z%)..j|
000029d0  17 c9 34 3a f2 78 28 76  61 25 2c 34 29 3a 4f 25  |..4:.x(va%,4):O%|
000029e0  3d ac 4f 25 0d 0e 74 05  cb 0d 0e 7e 05 e1 0d 0e  |=.O%..t....~....|
000029f0  88 10 dd f2 5a 3a c8 8e  a4 68 28 30 29 ca 0d 0e  |....Z:...h(0)...|
00002a00  92 06 c9 31 0d 0e 9c 06  c9 32 0d 0e a6 0c c9 33  |...1.....2.....3|
00002a10  3a e7 ac 4f 25 8c 0d 0e  b0 3a f2 66 28 60 25 29  |:..O%....:.f(`%)|
00002a20  3a f2 66 28 70 25 29 3a  f2 66 28 64 61 25 29 3a  |:.f(p%):.f(da%):|
00002a30  f2 67 28 50 25 29 3a f2  67 28 75 25 29 3a f2 67  |.g(P%):.g(u%):.g|
00002a40  28 5a 25 29 3a f2 67 28  5f 25 29 3a 54 25 3d b9  |(Z%):.g(_%):T%=.|
00002a50  0d 0e ba 05 cd 0d 0e c4  0c c9 34 3a 5f 61 25 3d  |..........4:_a%=|
00002a60  b9 0d 0e ce 05 cb 0d 0e  d8 05 e1 0d 0e e2 16 dd  |................|
00002a70  f2 70 28 61 24 2c 71 24  29 3a e7 61 24 3d 22 22  |.p(a$,q$):.a$=""|
00002a80  e1 0d 0e ec 44 e7 ac 49  25 8c e7 ac a4 66 28 22  |....D..I%....f("|
00002a90  4c 6f 61 64 22 2c 22 55  6e 73 61 76 65 64 20 63  |Load","Unsaved c|
00002aa0  72 6f 73 73 77 6f 72 64  20 69 6e 20 6d 65 6d 6f  |rossword in memo|
00002ab0  72 79 2e 20 41 72 65 20  79 6f 75 20 73 75 72 65  |ry. Are you sure|
00002ac0  3f 22 29 8c e1 0d 0e f6  0d e7 71 24 3d 22 43 44  |?").......q$="CD|
00002ad0  22 8c 0d 0f 00 b4 49 25  3d b9 3a 58 3d 8e 28 61  |".....I%=.:X=.(a|
00002ae0  24 29 3a e3 64 25 3d 31  b8 31 35 3a e3 74 25 3d  |$):.d%=1.15:.t%=|
00002af0  31 b8 31 35 3a 62 25 28  64 25 2c 74 25 29 3d 9a  |1.15:b%(d%,t%)=.|
00002b00  23 58 3a 66 25 28 64 25  2c 74 25 29 3d 9a 23 58  |#X:f%(d%,t%)=.#X|
00002b10  3a 62 25 28 64 25 2c 74  25 29 2d 3d 31 3a ed 3a  |:b%(d%,t%)-=1:.:|
00002b20  ed 3a e8 23 58 2c 69 24  3a 69 24 3d a4 62 28 69  |.:.#X,i$:i$=.b(i|
00002b30  24 29 3a e3 64 25 3d 31  b8 31 30 3a e8 23 58 2c  |$):.d%=1.10:.#X,|
00002b40  63 24 28 64 25 29 3a 63  24 28 64 25 29 3d a4 62  |c$(d%):c$(d%)=.b|
00002b50  28 63 24 28 64 25 29 29  3a ed 3a 60 61 25 3d 4f  |(c$(d%)):.:`a%=O|
00002b60  25 3a 4f 25 3d 9a 23 58  3a e3 61 25 3d 30 b8 31  |%:O%=.#X:.a%=0.1|
00002b70  3a 61 25 28 61 25 29 3d  9a 23 58 3a e7 61 25 28  |:a%(a%)=.#X:.a%(|
00002b80  61 25 29 3e 30 8c 0d 0f  0a d8 e3 64 25 3d 31 b8  |a%)>0......d%=1.|
00002b90  61 25 28 61 25 29 3a e8  23 58 2c 62 24 28 64 25  |a%(a%):.#X,b$(d%|
00002ba0  2c 61 25 29 3a e8 23 58  2c 61 24 28 64 25 2c 61  |,a%):.#X,a$(d%,a|
00002bb0  25 2c 30 29 3a e8 23 58  2c 61 24 28 64 25 2c 61  |%,0):.#X,a$(d%,a|
00002bc0  25 2c 31 29 3a e8 23 58  2c 61 24 28 64 25 2c 61  |%,1):.#X,a$(d%,a|
00002bd0  25 2c 32 29 3a e8 23 58  2c 67 25 28 64 25 2c 61  |%,2):.#X,g%(d%,a|
00002be0  25 29 3a e8 23 58 2c 63  25 28 64 25 2c 61 25 29  |%):.#X,c%(d%,a%)|
00002bf0  3a 62 24 28 64 25 2c 61  25 29 3d a4 62 28 62 24  |:b$(d%,a%)=.b(b$|
00002c00  28 64 25 2c 61 25 29 29  3a 61 24 28 64 25 2c 61  |(d%,a%)):a$(d%,a|
00002c10  25 2c 30 29 3d a4 62 28  61 24 28 64 25 2c 61 25  |%,0)=.b(a$(d%,a%|
00002c20  2c 30 29 29 3a 61 24 28  64 25 2c 61 25 2c 31 29  |,0)):a$(d%,a%,1)|
00002c30  3d a4 62 28 61 24 28 64  25 2c 61 25 2c 31 29 29  |=.b(a$(d%,a%,1))|
00002c40  3a 61 24 28 64 25 2c 61  25 2c 32 29 3d a4 62 28  |:a$(d%,a%,2)=.b(|
00002c50  61 24 28 64 25 2c 61 25  2c 32 29 29 3a ed 0d 0f  |a$(d%,a%,2)):...|
00002c60  14 05 cd 0d 0f 1e 09 ed  3a d9 23 58 0d 0f 28 2f  |........:.#X..(/|
00002c70  cc 3a f2 62 28 22 43 72  6f 73 73 77 6f 72 64 22  |.:.b("Crossword"|
00002c80  2c 22 46 69 6c 65 20 69  73 20 6e 6f 74 20 61 20  |,"File is not a |
00002c90  63 72 6f 73 73 77 6f 72  64 22 29 0d 0f 32 05 cd  |crossword")..2..|
00002ca0  0d 0f 3c 1c f2 69 3a f2  6a 3a e7 4f 25 3c 3e 60  |..<..i:.j:.O%<>`|
00002cb0  61 25 8c f2 78 28 76 61  25 2c 34 29 0d 0f 46 1f  |a%..x(va%,4)..F.|
00002cc0  e7 4f 25 80 54 25 8c f2  6e 3a f2 6f 28 55 25 2c  |.O%.T%..n:.o(U%,|
00002cd0  33 29 8b f2 74 28 55 25  2c 33 29 0d 0f 50 08 e7  |3)..t(U%,3)..P..|
00002ce0  54 25 8c 0d 0f 5a 18 f2  64 28 50 25 29 3a f2 64  |T%...Z..d(P%):.d|
00002cf0  28 75 25 29 3a f2 64 28  5a 25 29 0d 0f 64 1e cc  |(u%):.d(Z%)..d..|
00002d00  3a f2 64 28 60 25 29 3a  f2 64 28 70 25 29 3a f2  |:.d(`%):.d(p%):.|
00002d10  64 28 64 61 25 29 3a f2  6e 0d 0f 6e 05 cd 0d 0f  |d(da%):.n..n....|
00002d20  78 05 e1 0d 0f 82 14 dd  f2 79 28 61 24 2c 65 25  |x........y(a$,e%|
00002d30  29 3a c8 8e 65 25 ca 0d  0f 8c 14 c9 65 61 25 3a  |):..e%......ea%:|
00002d40  49 25 3d b9 3a e7 54 25  8c f2 65 0d 0f 96 89 58  |I%=.:.T%..e....X|
00002d50  3d ae 28 61 24 29 3a e3  64 25 3d 31 b8 31 35 3a  |=.(a$):.d%=1.15:|
00002d60  e3 74 25 3d 31 b8 31 35  3a d5 23 58 2c 62 25 28  |.t%=1.15:.#X,b%(|
00002d70  64 25 2c 74 25 29 2b 31  3a d5 23 58 2c 66 25 28  |d%,t%)+1:.#X,f%(|
00002d80  64 25 2c 74 25 29 3a ed  3a ed 3a f1 23 58 2c a4  |d%,t%):.:.:.#X,.|
00002d90  62 28 69 24 29 3a e3 64  25 3d 31 b8 31 30 3a f1  |b(i$):.d%=1.10:.|
00002da0  23 58 2c a4 62 28 63 24  28 64 25 29 29 3a ed 3a  |#X,.b(c$(d%)):.:|
00002db0  d5 23 58 2c 4f 25 3a e3  61 25 3d 30 b8 31 3a d5  |.#X,O%:.a%=0.1:.|
00002dc0  23 58 2c 61 25 28 61 25  29 3a e7 61 25 28 61 25  |#X,a%(a%):.a%(a%|
00002dd0  29 3e 30 8c 0d 0f a0 7c  e3 64 25 3d 31 b8 61 25  |)>0....|.d%=1.a%|
00002de0  28 61 25 29 3a f1 23 58  2c a4 62 28 62 24 28 64  |(a%):.#X,.b(b$(d|
00002df0  25 2c 61 25 29 29 3a f1  23 58 2c a4 62 28 61 24  |%,a%)):.#X,.b(a$|
00002e00  28 64 25 2c 61 25 2c 30  29 29 3a f1 23 58 2c a4  |(d%,a%,0)):.#X,.|
00002e10  62 28 61 24 28 64 25 2c  61 25 2c 31 29 29 3a f1  |b(a$(d%,a%,1)):.|
00002e20  23 58 2c a4 62 28 61 24  28 64 25 2c 61 25 2c 32  |#X,.b(a$(d%,a%,2|
00002e30  29 29 3a f1 23 58 2c 67  25 28 64 25 2c 61 25 29  |)):.#X,g%(d%,a%)|
00002e40  3a f1 23 58 2c 63 25 28  64 25 2c 61 25 29 3a ed  |:.#X,c%(d%,a%):.|
00002e50  0d 0f aa 05 cd 0d 0f b4  1e ed 3a d9 23 58 3a ff  |..........:.#X:.|
00002e60  22 73 65 74 74 79 70 65  20 22 2b 61 24 2b 22 20  |"settype "+a$+" |
00002e70  43 44 22 0d 0f be 79 c9  66 61 25 3a e3 4a 25 3d  |CD"...y.fa%:.J%=|
00002e80  31 b8 31 35 3a e3 47 25  3d 31 b8 31 35 3a 61 62  |1.15:.G%=1.15:ab|
00002e90  25 3d 28 59 25 2b 31 32  34 29 2b 28 28 47 25 2d  |%=(Y%+124)+((G%-|
00002ea0  31 29 2a 31 30 38 29 2b  28 28 4a 25 2d 31 29 2a  |1)*108)+((J%-1)*|
00002eb0  31 36 35 36 29 3a 62 62  25 3d 59 25 2b 32 34 39  |1656):bb%=Y%+249|
00002ec0  36 39 2b 32 33 2b 28 28  47 25 2d 31 29 2a 35 36  |69+23+((G%-1)*56|
00002ed0  29 2b 28 28 4a 25 2d 31  29 2a 38 34 30 29 3a e7  |)+((J%-1)*840):.|
00002ee0  62 25 28 47 25 2c 4a 25  29 3d 30 8c 0d 0f c8 2f  |b%(G%,J%)=0..../|
00002ef0  21 61 62 25 3d 30 3a 3f  62 62 25 3d 33 32 3a 3f  |!ab%=0:?bb%=32:?|
00002f00  28 62 62 25 2b 31 29 3d  33 32 3a e7 47 25 3e 39  |(bb%+1)=32:.G%>9|
00002f10  3f 28 62 62 25 2b 32 29  3d 33 32 0d 0f d2 2c cc  |?(bb%+2)=32...,.|
00002f20  3a 21 61 62 25 3d 2d 31  3a 6a 24 3d c3 28 65 25  |:!ab%=-1:j$=.(e%|
00002f30  28 47 25 2c 4a 25 29 29  3a e7 6a 24 3d 22 30 22  |(G%,J%)):.j$="0"|
00002f40  6a 24 3d 22 20 20 22 0d  0f dc 15 e7 a9 28 6a 24  |j$="  "......(j$|
00002f50  29 3d 31 6a 24 3d 22 20  22 2b 6a 24 0d 0f e6 3a  |)=1j$=" "+j$...:|
00002f60  e3 63 62 25 3d 31 b8 32  3a 3f 28 62 62 25 2b 63  |.cb%=1.2:?(bb%+c|
00002f70  62 25 2d 31 29 3d 97 28  c1 6a 24 2c 63 62 25 2c  |b%-1)=.(.j$,cb%,|
00002f80  31 29 29 3a ed 3a e7 47  25 3e 39 3f 28 62 62 25  |1)):.:.G%>9?(bb%|
00002f90  2b 32 29 3d 33 32 0d 0f  f0 05 cd 0d 0f fa 3e ed  |+2)=32........>.|
00002fa0  3a ed 3a ff 22 53 41 56  45 20 22 2b 61 24 2b 22  |:.:."SAVE "+a$+"|
00002fb0  20 22 2b c3 7e 28 59 25  29 2b 22 20 2b 20 39 32  | "+.~(Y%)+" + 92|
00002fc0  41 34 22 3a ff 22 73 65  74 74 79 70 65 20 22 2b  |A4":."settype "+|
00002fd0  61 24 2b 22 20 41 46 46  22 0d 10 04 2a c9 67 61  |a$+" AFF"...*.ga|
00002fe0  25 3a f2 65 3a 58 3d ae  28 61 24 29 3a d5 23 58  |%:.e:X=.(a$):.#X|
00002ff0  2c 22 41 43 52 4f 53 53  22 3a e7 61 25 28 31 29  |,"ACROSS":.a%(1)|
00003000  3e 30 8c 0d 10 0e 5a e3  64 25 3d 31 b8 61 25 28  |>0....Z.d%=1.a%(|
00003010  31 29 3a d5 23 58 2c c3  28 63 25 28 64 25 2c 31  |1):.#X,.(c%(d%,1|
00003020  29 29 2b 22 20 22 2b a4  65 28 61 24 28 64 25 2c  |))+" "+.e(a$(d%,|
00003030  31 2c 30 29 29 2b 22 20  22 2b a4 65 28 61 24 28  |1,0))+" "+.e(a$(|
00003040  64 25 2c 31 2c 31 29 29  2b 22 20 22 2b a4 65 28  |d%,1,1))+" "+.e(|
00003050  61 24 28 64 25 2c 31 2c  32 29 29 3a ed 0d 10 18  |a$(d%,1,2)):....|
00003060  05 cd 0d 10 22 1e d9 23  58 3a ff 22 73 65 74 74  |...."..#X:."sett|
00003070  79 70 65 20 22 2b 61 24  2b 22 20 74 65 78 74 22  |ype "+a$+" text"|
00003080  0d 10 2c 28 c9 68 61 25  3a f2 65 3a 58 3d ae 28  |..,(.ha%:.e:X=.(|
00003090  61 24 29 3a d5 23 58 2c  22 44 4f 57 4e 22 3a e7  |a$):.#X,"DOWN":.|
000030a0  61 25 28 30 29 3e 30 8c  0d 10 36 5a e3 64 25 3d  |a%(0)>0...6Z.d%=|
000030b0  31 b8 61 25 28 30 29 3a  d5 23 58 2c c3 28 63 25  |1.a%(0):.#X,.(c%|
000030c0  28 64 25 2c 30 29 29 2b  22 20 22 2b a4 65 28 61  |(d%,0))+" "+.e(a|
000030d0  24 28 64 25 2c 30 2c 30  29 29 2b 22 20 22 2b a4  |$(d%,0,0))+" "+.|
000030e0  65 28 61 24 28 64 25 2c  30 2c 31 29 29 2b 22 20  |e(a$(d%,0,1))+" |
000030f0  22 2b a4 65 28 61 24 28  64 25 2c 30 2c 32 29 29  |"+.e(a$(d%,0,2))|
00003100  3a ed 0d 10 40 05 cd 0d  10 4a 1e d9 23 58 3a ff  |:...@....J..#X:.|
00003110  22 73 65 74 74 79 70 65  20 22 2b 61 24 2b 22 20  |"settype "+a$+" |
00003120  74 65 78 74 22 0d 10 54  3b c9 69 61 25 3a f2 65  |text"..T;.ia%:.e|
00003130  3a 58 3d ae 28 61 24 29  3a e3 61 25 3d 31 b8 30  |:X=.(a$):.a%=1.0|
00003140  88 2d 31 3a e7 61 25 3d  31 d5 23 58 2c 22 41 43  |.-1:.a%=1.#X,"AC|
00003150  52 4f 53 53 22 8b d5 23  58 2c 22 44 4f 57 4e 22  |ROSS"..#X,"DOWN"|
00003160  0d 10 5e 0e e7 61 25 28  61 25 29 3e 30 8c 0d 10  |..^..a%(a%)>0...|
00003170  68 5f e3 64 25 3d 31 b8  61 25 28 61 25 29 3a d5  |h_.d%=1.a%(a%):.|
00003180  23 58 2c c3 28 63 25 28  64 25 2c 61 25 29 29 2b  |#X,.(c%(d%,a%))+|
00003190  22 20 22 2b a4 65 28 61  24 28 64 25 2c 61 25 2c  |" "+.e(a$(d%,a%,|
000031a0  30 29 29 2b 22 20 22 2b  a4 65 28 61 24 28 64 25  |0))+" "+.e(a$(d%|
000031b0  2c 61 25 2c 31 29 29 2b  22 20 22 2b a4 65 28 61  |,a%,1))+" "+.e(a|
000031c0  24 28 64 25 2c 61 25 2c  32 29 29 3a ed 0d 10 72  |$(d%,a%,2)):...r|
000031d0  05 cd 0d 10 7c 20 ed 3a  d9 23 58 3a ff 22 73 65  |....| .:.#X:."se|
000031e0  74 74 79 70 65 20 22 2b  61 24 2b 22 20 74 65 78  |ttype "+a$+" tex|
000031f0  74 22 0d 10 86 2a c9 6a  61 25 3a f2 65 3a 58 3d  |t"...*.ja%:.e:X=|
00003200  ae 28 61 24 29 3a d5 23  58 2c 22 41 43 52 4f 53  |.(a$):.#X,"ACROS|
00003210  53 22 3a e7 61 25 28 31  29 3e 30 8c 0d 10 90 2e  |S":.a%(1)>0.....|
00003220  e3 64 25 3d 31 b8 61 25  28 31 29 3a d5 23 58 2c  |.d%=1.a%(1):.#X,|
00003230  c3 28 63 25 28 64 25 2c  31 29 29 2b 22 20 22 2b  |.(c%(d%,1))+" "+|
00003240  62 24 28 64 25 2c 31 29  3a ed 0d 10 9a 05 cd 0d  |b$(d%,1):.......|
00003250  10 a4 1e d9 23 58 3a ff  22 73 65 74 74 79 70 65  |....#X:."settype|
00003260  20 22 2b 61 24 2b 22 20  74 65 78 74 22 0d 10 ae  | "+a$+" text"...|
00003270  28 c9 6b 61 25 3a f2 65  3a 58 3d ae 28 61 24 29  |(.ka%:.e:X=.(a$)|
00003280  3a d5 23 58 2c 22 44 4f  57 4e 22 3a e7 61 25 28  |:.#X,"DOWN":.a%(|
00003290  30 29 3e 30 8c 0d 10 b8  2e e3 64 25 3d 31 b8 61  |0)>0......d%=1.a|
000032a0  25 28 30 29 3a d5 23 58  2c c3 28 63 25 28 64 25  |%(0):.#X,.(c%(d%|
000032b0  2c 30 29 29 2b 22 20 22  2b 62 24 28 64 25 2c 30  |,0))+" "+b$(d%,0|
000032c0  29 3a ed 0d 10 c2 05 cd  0d 10 cc 1e d9 23 58 3a  |):...........#X:|
000032d0  ff 22 73 65 74 74 79 70  65 20 22 2b 61 24 2b 22  |."settype "+a$+"|
000032e0  20 74 65 78 74 22 0d 10  d6 3b c9 6c 61 25 3a f2  | text"...;.la%:.|
000032f0  65 3a 58 3d ae 28 61 24  29 3a e3 61 25 3d 31 b8  |e:X=.(a$):.a%=1.|
00003300  30 88 2d 31 3a e7 61 25  3d 31 d5 23 58 2c 22 41  |0.-1:.a%=1.#X,"A|
00003310  43 52 4f 53 53 22 8b d5  23 58 2c 22 44 4f 57 4e  |CROSS"..#X,"DOWN|
00003320  22 0d 10 e0 0e e7 61 25  28 61 25 29 3e 30 8c 0d  |".....a%(a%)>0..|
00003330  10 ea 31 e3 64 25 3d 31  b8 61 25 28 61 25 29 3a  |..1.d%=1.a%(a%):|
00003340  d5 23 58 2c c3 28 63 25  28 64 25 2c 61 25 29 29  |.#X,.(c%(d%,a%))|
00003350  2b 22 20 22 2b 62 24 28  64 25 2c 61 25 29 3a ed  |+" "+b$(d%,a%):.|
00003360  0d 10 f4 05 cd 0d 10 fe  20 ed 3a d9 23 58 3a ff  |........ .:.#X:.|
00003370  22 73 65 74 74 79 70 65  20 22 2b 61 24 2b 22 20  |"settype "+a$+" |
00003380  74 65 78 74 22 0d 11 08  05 cb 0d 11 12 05 e1 0d  |text"...........|
00003390  11 1c 4d dd a4 65 28 65  24 29 3a c8 95 c2 65 24  |..M..e(e$):...e$|
000033a0  2c 31 29 3d 22 20 22 3a  65 24 3d c0 65 24 2c a9  |,1)=" ":e$=.e$,.|
000033b0  28 65 24 29 2d 31 29 3a  ce 3a c8 95 c0 65 24 2c  |(e$)-1):.:...e$,|
000033c0  31 29 3d 22 20 22 3a 65  24 3d c2 65 24 2c a9 28  |1)=" ":e$=.e$,.(|
000033d0  65 24 29 2d 31 29 3a ce  3a 3d 65 24 0d 11 26 86  |e$)-1):.:=e$..&.|
000033e0  dd a4 62 28 70 24 29 3a  e3 64 62 25 3d 31 b8 a9  |..b(p$):.db%=1..|
000033f0  70 24 3a c1 70 24 2c 64  62 25 2c 31 29 3d bd 28  |p$:.p$,db%,1)=.(|
00003400  97 28 c1 70 24 2c 64 62  25 2c 31 29 29 82 31 37  |.(.p$,db%,1)).17|
00003410  30 29 3a ed 3a 3d 70 24  3a 65 62 25 3d 30 3a e3  |0):.:=p$:eb%=0:.|
00003420  6c 25 3d 30 b8 32 34 2a  31 30 32 34 3a e7 59 25  |l%=0.24*1024:.Y%|
00003430  3f 6c 25 3d 32 35 35 80  59 25 3f 28 6c 25 2b 31  |?l%=255.Y%?(l%+1|
00003440  29 3d 32 35 35 80 59 25  3f 28 6c 25 2b 32 29 3d  |)=255.Y%?(l%+2)=|
00003450  32 35 35 80 59 25 3f 28  6c 25 2b 33 29 3d 32 35  |255.Y%?(l%+3)=25|
00003460  35 8c 0d 11 30 12 f1 6c  25 2d 65 62 25 3a 65 62  |5...0..l%-eb%:eb|
00003470  25 3d 6c 25 0d 11 3a 05  cd 0d 11 44 05 ed 0d 11  |%=l%..:....D....|
00003480  4e 5a dd a4 6f 3a ea 69  2c 62 2c 61 3a de 61 20  |NZ..o:.i,b,a:.a |
00003490  31 30 30 3a c8 99 22 4f  53 5f 47 65 74 45 6e 76  |100:.."OS_GetEnv|
000034a0  22 b8 61 3a 69 3d 30 3a  c8 95 61 3f 69 3c 3e 30  |".a:i=0:..a?i<>0|
000034b0  3a 69 2b 3d 31 3a ce 3a  61 3f 69 3d 31 33 3a 62  |:i+=1:.:a?i=13:b|
000034c0  3d 30 3a 69 3d 30 3a c8  95 62 3c 33 3a e7 61 3f  |=0:i=0:..b<3:.a?|
000034d0  69 3d 33 32 62 2b 3d 31  0d 11 58 12 69 2b 3d 31  |i=32b+=1..X.i+=1|
000034e0  3a ce 3a 3d 24 28 61 2b  69 29 0d 11 62 d3 dd f2  |:.:=$(a+i)..b...|
000034f0  68 28 65 25 29 3a ea 4d  25 3a 62 25 21 30 3d 65  |h(e%):.M%:b%!0=e|
00003500  25 3a 62 25 21 34 3d 30  3a 62 25 21 38 3d 2d 37  |%:b%!4=0:b%!8=-7|
00003510  38 30 3a 62 25 21 31 32  3d 37 38 30 3a 62 25 21  |80:b%!12=780:b%!|
00003520  31 36 3d 30 3a c8 99 22  57 69 6d 70 5f 55 70 64  |16=0:.."Wimp_Upd|
00003530  61 74 65 57 69 6e 64 6f  77 22 2c 2c 62 25 b8 4d  |ateWindow",,b%.M|
00003540  25 3a c8 95 4d 25 3a 41  61 25 3d 62 25 21 33 36  |%:..M%:Aa%=b%!36|
00003550  2d 62 25 21 32 38 3a 52  25 3d 62 25 21 34 30 2d  |-b%!28:R%=b%!40-|
00003560  62 25 21 33 32 3a 51 25  3d 62 25 21 32 38 2b 62  |b%!32:Q%=b%!28+b|
00003570  25 21 32 30 2d 62 25 21  34 3a 42 25 3d 62 25 21  |%!20-b%!4:B%=b%!|
00003580  33 32 2d 62 25 21 32 34  2d 62 25 21 38 3a 76 25  |32-b%!24-b%!8:v%|
00003590  3d 62 25 21 34 2d 62 25  21 32 30 3a 6d 25 3d 62  |=b%!4-b%!20:m%=b|
000035a0  25 21 31 36 2d 62 25 21  32 34 3a 42 61 25 3d 62  |%!16-b%!24:Ba%=b|
000035b0  25 21 32 38 3a 53 25 3d  62 25 21 33 32 0d 11 6c  |%!28:S%=b%!32..l|
000035c0  45 f2 6c 28 65 25 2c 51  25 2c 42 25 2c 41 61 25  |E.l(e%,Q%,B%,Aa%|
000035d0  2c 52 25 2c 42 61 25 2c  53 25 2c 76 25 2c 6d 25  |,R%,Ba%,S%,v%,m%|
000035e0  29 3a c8 99 22 57 69 6d  70 5f 47 65 74 52 65 63  |):.."Wimp_GetRec|
000035f0  74 61 6e 67 6c 65 22 2c  2c 62 25 b8 4d 25 3a ce  |tangle",,b%.M%:.|
00003600  3a e1 0d 11 76 d5 dd f2  77 28 65 25 29 3a ea 4d  |:...v...w(e%):.M|
00003610  25 3a 62 25 21 30 3d 65  25 3a 62 25 21 34 3d 30  |%:b%!0=e%:b%!4=0|
00003620  3a 62 25 21 38 3d 2d 32  39 34 34 3a 62 25 21 31  |:b%!8=-2944:b%!1|
00003630  32 3d 31 32 34 38 3a 62  25 21 31 36 3d 30 3a c8  |2=1248:b%!16=0:.|
00003640  99 22 57 69 6d 70 5f 55  70 64 61 74 65 57 69 6e  |."Wimp_UpdateWin|
00003650  64 6f 77 22 2c 2c 62 25  b8 4d 25 3a c8 95 4d 25  |dow",,b%.M%:..M%|
00003660  3a 41 61 25 3d 62 25 21  33 36 2d 62 25 21 32 38  |:Aa%=b%!36-b%!28|
00003670  3a 52 25 3d 62 25 21 34  30 2d 62 25 21 33 32 3a  |:R%=b%!40-b%!32:|
00003680  51 25 3d 62 25 21 32 38  2b 62 25 21 32 30 2d 62  |Q%=b%!28+b%!20-b|
00003690  25 21 34 3a 42 25 3d 62  25 21 33 32 2d 62 25 21  |%!4:B%=b%!32-b%!|
000036a0  32 34 2d 62 25 21 38 3a  76 25 3d 62 25 21 34 2d  |24-b%!8:v%=b%!4-|
000036b0  62 25 21 32 30 3a 6d 25  3d 62 25 21 31 36 2d 62  |b%!20:m%=b%!16-b|
000036c0  25 21 32 34 3a 42 61 25  3d 62 25 21 32 38 3a 53  |%!24:Ba%=b%!28:S|
000036d0  25 3d 62 25 21 33 32 0d  11 80 45 f2 6c 28 65 25  |%=b%!32...E.l(e%|
000036e0  2c 51 25 2c 42 25 2c 41  61 25 2c 52 25 2c 42 61  |,Q%,B%,Aa%,R%,Ba|
000036f0  25 2c 53 25 2c 76 25 2c  6d 25 29 3a c8 99 22 57  |%,S%,v%,m%):.."W|
00003700  69 6d 70 5f 47 65 74 52  65 63 74 61 6e 67 6c 65  |imp_GetRectangle|
00003710  22 2c 2c 62 25 b8 4d 25  3a ce 3a e1 0d 11 8a 1d  |",,b%.M%:.:.....|
00003720  dd f2 62 28 6d 24 2c 6e  24 29 3a f2 61 61 28 6d  |..b(m$,n$):.aa(m|
00003730  24 2c 6e 24 2c 30 29 3a  e1 0d 11 94 27 dd f2 61  |$,n$,0):....'..a|
00003740  61 28 6d 24 2c 6e 24 2c  71 25 29 3a ea 4e 25 3a  |a(m$,n$,q%):.N%:|
00003750  24 28 62 25 2b 34 29 3d  6e 24 3a c8 8e 71 25 ca  |$(b%+4)=n$:..q%.|
00003760  0d 11 9e 0b c9 32 3a 4e  25 3d 31 0d 11 a8 0c c9  |.....2:N%=1.....|
00003770  31 3a 4e 25 3d 31 35 0d  11 b2 13 c9 33 3a 4e 25  |1:N%=15.....3:N%|
00003780  3d 28 31 3c 3c 35 29 2b  31 36 0d 11 bc 13 c9 34  |=(1<<5)+16.....4|
00003790  3a 4e 25 3d 28 31 3c 3c  36 29 2b 31 36 0d 11 c6  |:N%=(1<<6)+16...|
000037a0  0b 7f 3a 4e 25 3d 31 36  0d 11 d0 05 cb 0d 11 da  |..:N%=16........|
000037b0  27 c8 99 22 57 69 6d 70  5f 52 65 70 6f 72 74 45  |'.."Wimp_ReportE|
000037c0  72 72 6f 72 22 2c 62 25  2c 4e 25 2c 6d 24 b8 2c  |rror",b%,N%,m$.,|
000037d0  4e 25 3a e1 0d 11 e4 47  dd a4 66 28 6d 24 2c 6e  |N%:....G..f(m$,n|
000037e0  24 29 3a 24 28 62 25 2b  34 29 3d 6e 24 3a 4e 25  |$):$(b%+4)=n$:N%|
000037f0  3d 32 33 3a c8 99 22 57  69 6d 70 5f 52 65 70 6f  |=23:.."Wimp_Repo|
00003800  72 74 45 72 72 6f 72 22  2c 62 25 2c 4e 25 2c 6d  |rtError",b%,N%,m|
00003810  24 b8 2c 4e 25 3a 3d 4e  25 2d 32 0d 11 ee 2a dd  |$.,N%:=N%-2...*.|
00003820  a4 61 28 72 24 29 3a 3d  a4 73 28 72 24 2c 22 3c  |.a(r$):=.s(r$,"<|
00003830  4f 62 65 79 24 44 69 72  3e 2e 54 65 6d 70 6c 61  |Obey$Dir>.Templa|
00003840  74 65 73 22 29 0d 11 f8  72 dd a4 73 28 72 24 2c  |tes")...r..s(r$,|
00003850  79 24 29 3a ea 63 25 2c  69 25 2c 6e 25 2c 6a 25  |y$):.c%,i%,n%,j%|
00003860  2c 74 24 2c 75 24 3a c8  99 22 57 69 6d 70 5f 4f  |,t$,u$:.."Wimp_O|
00003870  70 65 6e 54 65 6d 70 6c  61 74 65 22 2c 2c 79 24  |penTemplate",,y$|
00003880  3a c8 99 22 57 69 6d 70  5f 4c 6f 61 64 54 65 6d  |:.."Wimp_LoadTem|
00003890  70 6c 61 74 65 22 2c 2c  62 25 2c 66 62 25 2c 67  |plate",,b%,fb%,g|
000038a0  62 25 2c 2d 31 2c 72 24  2c 30 b8 2c 2c 66 62 25  |b%,-1,r$,0.,,fb%|
000038b0  3a c8 8e 6e 61 25 ca 0d  12 02 10 c9 31 3a 62 25  |:..na%......1:b%|
000038c0  21 36 34 3d 6e 61 25 0d  12 0c 12 7f 3a 62 25 21  |!64=na%.....:b%!|
000038d0  36 34 3d a4 71 28 65 25  29 0d 12 16 05 cb 0d 12  |64=.q(e%).......|
000038e0  20 70 c8 99 22 57 69 6d  70 5f 43 72 65 61 74 65  | p.."Wimp_Create|
000038f0  57 69 6e 64 6f 77 22 2c  2c 62 25 b8 63 25 3a c8  |Window",,b%.c%:.|
00003900  99 22 57 69 6d 70 5f 43  6c 6f 73 65 54 65 6d 70  |."Wimp_CloseTemp|
00003910  6c 61 74 65 22 3a c8 99  22 57 69 6d 70 5f 57 68  |late":.."Wimp_Wh|
00003920  69 63 68 49 63 6f 6e 22  2c 63 25 2c 62 25 2b 34  |ichIcon",c%,b%+4|
00003930  30 2c 31 2b 32 2b 28 31  3c 3c 38 29 2c 32 2b 28  |0,1+2+(1<<8),2+(|
00003940  31 3c 3c 38 29 3a c8 8e  62 25 21 34 30 ca 0d 12  |1<<8):..b%!40...|
00003950  2a 07 c9 2d 31 0d 12 34  66 7f 3a 69 25 3d 34 30  |*..-1..4f.:i%=40|
00003960  3a f5 3a 62 25 21 34 3d  62 25 21 69 25 3a 62 25  |:.:b%!4=b%!i%:b%|
00003970  21 30 3d 63 25 3a c8 99  22 57 69 6d 70 5f 47 65  |!0=c%:.."Wimp_Ge|
00003980  74 49 63 6f 6e 53 74 61  74 65 22 2c 2c 62 25 3a  |tIconState",,b%:|
00003990  74 24 3d a4 69 28 62 25  21 32 38 29 3a c8 99 22  |t$=.i(b%!28):.."|
000039a0  57 69 6d 70 5f 44 65 6c  65 74 65 49 63 6f 6e 22  |Wimp_DeleteIcon"|
000039b0  2c 2c 62 25 3a c8 8e 6e  61 25 ca 0d 12 3e 0e c9  |,,b%:..na%...>..|
000039c0  31 3a 62 25 21 33 32 3d  31 0d 12 48 83 7f 3a c8  |1:b%!32=1..H..:.|
000039d0  99 22 4f 53 5f 53 70 72  69 74 65 4f 70 22 2c 32  |."OS_SpriteOp",2|
000039e0  36 34 2c 6e 61 25 b8 2c  2c 2c 6e 25 3a 6a 25 3d  |64,na%.,,,n%:j%=|
000039f0  30 3a f5 3a 6a 25 2b 3d  31 3a c8 99 22 4f 53 5f  |0:.:j%+=1:.."OS_|
00003a00  53 70 72 69 74 65 4f 70  22 2c 32 36 39 2c 6e 61  |SpriteOp",269,na|
00003a10  25 2c 68 62 25 2c 32 30  2c 6a 25 3a 75 24 3d a4  |%,hb%,20,j%:u$=.|
00003a20  69 28 68 62 25 29 3a fd  6a 25 3d 6e 25 84 74 24  |i(hb%):.j%=n%.t$|
00003a30  3d 75 24 3a e7 74 24 3d  75 24 8c 62 25 21 33 32  |=u$:.t$=u$.b%!32|
00003a40  3d 6e 61 25 8b 62 25 21  33 32 3d 31 0d 12 52 05  |=na%.b%!32=1..R.|
00003a50  cb 0d 12 5c 3b 62 25 21  34 3d 63 25 3a c8 99 22  |...\;b%!4=c%:.."|
00003a60  57 69 6d 70 5f 43 72 65  61 74 65 49 63 6f 6e 22  |Wimp_CreateIcon"|
00003a70  2c 2c 62 25 2b 34 b8 69  62 25 3a 69 25 2b 3d 34  |,,b%+4.ib%:i%+=4|
00003a80  3a fd 28 62 25 21 69 25  29 3d 2d 31 0d 12 66 05  |:.(b%!i%)=-1..f.|
00003a90  cb 0d 12 70 07 3d 63 25  0d 12 7a 51 dd f2 67 28  |...p.=c%..zQ..g(|
00003aa0  65 25 29 3a 21 62 25 3d  65 25 3a c8 99 22 57 69  |e%):!b%=e%:.."Wi|
00003ab0  6d 70 5f 47 65 74 57 69  6e 64 6f 77 53 74 61 74  |mp_GetWindowStat|
00003ac0  65 22 2c 2c 62 25 3a 62  25 21 32 38 3d 2d 31 3a  |e",,b%:b%!28=-1:|
00003ad0  c8 99 22 57 69 6d 70 5f  4f 70 65 6e 57 69 6e 64  |.."Wimp_OpenWind|
00003ae0  6f 77 22 2c 2c 62 25 3a  e1 0d 12 84 2d dd f2 66  |ow",,b%:....-..f|
00003af0  28 65 25 29 3a 21 62 25  3d 65 25 3a c8 99 22 57  |(e%):!b%=e%:.."W|
00003b00  69 6d 70 5f 43 6c 6f 73  65 57 69 6e 64 6f 77 22  |imp_CloseWindow"|
00003b10  2c 2c 62 25 3a e1 0d 12  8e 11 dd f2 64 28 65 25  |,,b%:.......d(e%|
00003b20  29 3a c8 8e 65 25 ca 0d  12 98 31 c9 2d 31 3a c8  |):..e%....1.-1:.|
00003b30  99 22 57 69 6d 70 5f 46  6f 72 63 65 52 65 64 72  |."Wimp_ForceRedr|
00003b40  61 77 22 2c 2d 31 2c 30  2c 30 2c 32 2a 31 32 38  |aw",-1,0,0,2*128|
00003b50  30 2c 32 2a 31 30 32 34  0d 12 a2 30 7f 3a c8 99  |0,2*1024...0.:..|
00003b60  22 57 69 6d 70 5f 46 6f  72 63 65 52 65 64 72 61  |"Wimp_ForceRedra|
00003b70  77 22 2c 65 25 2c 30 2c  2d 32 2a 31 30 32 34 2c  |w",e%,0,-2*1024,|
00003b80  32 2a 31 32 38 30 2c 30  0d 12 ac 05 cb 0d 12 b6  |2*1280,0........|
00003b90  05 e1 0d 12 c0 6e dd a4  70 28 7a 24 29 3a ea 67  |.....n..p(z$):.g|
00003ba0  25 3a 62 25 21 30 3d 2d  31 3a 62 25 21 34 3d 30  |%:b%!0=-1:b%!4=0|
00003bb0  3a 62 25 21 38 3d 30 3a  62 25 21 31 32 3d 36 38  |:b%!8=0:b%!12=68|
00003bc0  3a 62 25 21 31 36 3d 36  38 3a 62 25 21 32 30 3d  |:b%!16=68:b%!20=|
00003bd0  31 32 32 39 30 3a 24 28  62 25 2b 32 34 29 3d 7a  |12290:$(b%+24)=z|
00003be0  24 3a c8 99 22 57 69 6d  70 5f 43 72 65 61 74 65  |$:.."Wimp_Create|
00003bf0  49 63 6f 6e 22 2c 2c 62  25 b8 67 25 3a 3d 67 25  |Icon",,b%.g%:=g%|
00003c00  0d 12 ca 3d dd f2 63 28  65 25 2c 67 25 2c 6a 62  |...=..c(e%,g%,jb|
00003c10  25 29 3a c8 99 22 57 69  6d 70 5f 53 65 74 43 61  |%):.."Wimp_SetCa|
00003c20  72 65 74 50 6f 73 69 74  69 6f 6e 22 2c 65 25 2c  |retPosition",e%,|
00003c30  67 25 2c 2c 2c 2d 31 2c  6a 62 25 3a e1 0d 12 d4  |g%,,,-1,jb%:....|
00003c40  63 dd a4 63 28 65 25 2c  67 25 29 3a 62 25 21 30  |c..c(e%,g%):b%!0|
00003c50  3d 65 25 3a 62 25 21 34  3d 67 25 3a c8 99 22 57  |=e%:b%!4=g%:.."W|
00003c60  69 6d 70 5f 47 65 74 49  63 6f 6e 53 74 61 74 65  |imp_GetIconState|
00003c70  22 2c 2c 62 25 3a e7 28  28 62 25 21 32 34 29 80  |",,b%:.((b%!24).|
00003c80  32 35 36 29 3d 30 85 31  2c 22 49 63 6f 6e 20 69  |256)=0.1,"Icon i|
00003c90  73 6e 27 74 20 69 6e 64  69 72 65 63 74 65 64 22  |sn't indirected"|
00003ca0  0d 12 de 0d 3d 24 28 62  25 21 32 38 29 0d 12 e8  |....=$(b%!28)...|
00003cb0  66 dd f2 61 28 65 25 2c  67 25 2c 41 24 29 3a 62  |f..a(e%,g%,A$):b|
00003cc0  25 21 30 3d 65 25 3a 62  25 21 34 3d 67 25 3a c8  |%!0=e%:b%!4=g%:.|
00003cd0  99 22 57 69 6d 70 5f 47  65 74 49 63 6f 6e 53 74  |."Wimp_GetIconSt|
00003ce0  61 74 65 22 2c 2c 62 25  3a e7 28 28 62 25 21 32  |ate",,b%:.((b%!2|
00003cf0  34 29 80 32 35 36 29 3d  30 85 31 2c 22 49 63 6f  |4).256)=0.1,"Ico|
00003d00  6e 20 69 73 6e 27 74 20  69 6e 64 69 72 65 63 74  |n isn't indirect|
00003d10  65 64 22 0d 12 f2 4a 24  28 62 25 21 32 38 29 3d  |ed"...J$(b%!28)=|
00003d20  41 24 3a 62 25 21 30 3d  65 25 3a 62 25 21 34 3d  |A$:b%!0=e%:b%!4=|
00003d30  67 25 3a 62 25 21 38 3d  30 3a 62 25 21 31 32 3d  |g%:b%!8=0:b%!12=|
00003d40  30 3a c8 99 22 57 69 6d  70 5f 53 65 74 49 63 6f  |0:.."Wimp_SetIco|
00003d50  6e 53 74 61 74 65 22 2c  2c 62 25 3a e1 0d 12 fc  |nState",,b%:....|
00003d60  1c dd a4 68 28 6b 62 25  29 3a 3d 28 62 25 21 28  |...h(kb%):=(b%!(|
00003d70  34 2a 6b 62 25 29 29 2b  31 0d 13 06 d0 dd a4 64  |4*kb%))+1......d|
00003d80  28 62 24 29 3a ea 72 25  2c 56 25 2c 6c 62 25 2c  |(b$):.r%,V%,lb%,|
00003d90  6d 62 25 2c 6b 25 2c 73  25 3a de 72 25 20 32 38  |mb%,k%,s%:.r% 28|
00003da0  2b a4 74 28 62 24 29 2a  32 34 3a 72 25 3f 31 32  |+.t(b$)*24:r%?12|
00003db0  3d 37 3a 72 25 3f 31 33  3d 32 3a 72 25 3f 31 34  |=7:r%?13=2:r%?14|
00003dc0  3d 37 3a 72 25 3f 31 35  3d 30 3a 72 25 21 31 36  |=7:r%?15=0:r%!16|
00003dd0  3d 31 34 30 3a 72 25 21  32 30 3d 34 34 3a 72 25  |=140:r%!20=44:r%|
00003de0  21 32 34 3d 30 3a 56 25  3d 72 25 2b 32 38 3a 24  |!24=0:V%=r%+28:$|
00003df0  72 25 3d c0 62 24 2c a7  62 24 2c 22 5c 22 29 2d  |r%=.b$,.b$,"\")-|
00003e00  31 29 3a 6c 62 25 3d a9  28 c0 62 24 2c a7 62 24  |1):lb%=.(.b$,.b$|
00003e10  2c 22 5c 22 29 2d 31 29  29 3a 62 24 2b 3d 22 5c  |,"\")-1)):b$+="\|
00003e20  22 3a 6e 62 25 3d 30 3a  c8 95 62 24 3c 3e 22 22  |":nb%=0:..b$<>""|
00003e30  3a 62 24 3d c1 62 24 2c  a7 62 24 2c 22 5c 22 29  |:b$=.b$,.b$,"\")|
00003e40  2b 31 29 3a c8 8e 62 24  ca 0d 13 10 07 c9 22 22  |+1):..b$......""|
00003e50  0d 13 1a 48 7f 3a 21 56  25 3d 30 3a 56 25 21 34  |...H.:!V%=0:V%!4|
00003e60  3d 2d 31 3a 56 25 21 38  3d 26 37 30 30 30 30 32  |=-1:V%!8=&700002|
00003e70  31 3a 6d 62 25 3d a7 62  24 2c 22 5c 22 29 2d 31  |1:mb%=.b$,"\")-1|
00003e80  3a 6b 25 3d a7 c0 62 24  2c 6d 62 25 29 2c 22 3e  |:k%=..b$,mb%),">|
00003e90  22 29 3a c8 8e 6b 25 ca  0d 13 24 06 c9 30 0d 13  |"):..k%...$..0..|
00003ea0  2e 2d 7f 3a 73 25 3d a0  28 c1 62 24 2c 6b 25 2b  |.-.:s%=.(.b$,k%+|
00003eb0  31 2c 6d 62 25 2d 6b 25  29 29 3a 56 25 21 34 3d  |1,mb%-k%)):V%!4=|
00003ec0  73 25 3a 6d 62 25 3d 6b  25 2d 31 0d 13 38 05 cb  |s%:mb%=k%-1..8..|
00003ed0  0d 13 42 26 24 28 56 25  2b 31 32 29 3d c0 62 24  |..B&$(V%+12)=.b$|
00003ee0  2c 6d 62 25 29 3a e7 6d  62 25 3e 6c 62 25 8c 6c  |,mb%):.mb%>lb%.l|
00003ef0  62 25 3d 6d 62 25 0d 13  4c 0a 56 25 2b 3d 32 34  |b%=mb%..L.V%+=24|
00003f00  0d 13 56 05 cb 0d 13 60  2c ce 3a 72 25 21 31 36  |..V....`,.:r%!16|
00003f10  3d 31 36 2a 28 6c 62 25  2b 31 29 3a 56 25 21 2d  |=16*(lb%+1):V%!-|
00003f20  32 34 3d 56 25 21 2d 32  34 84 31 32 38 3a 3d 72  |24=V%!-24.128:=r|
00003f30  25 0d 13 6a 3c dd a4 74  28 62 24 29 3a ea 6e 25  |%..j<..t(b$):.n%|
00003f40  2c 6a 25 3a 6e 25 3d 30  3a 6a 25 3d 30 3a f5 3a  |,j%:n%=0:j%=0:.:|
00003f50  6a 25 3d a7 62 24 2c 22  5c 22 2c 6a 25 2b 31 29  |j%=.b$,"\",j%+1)|
00003f60  3a e7 6a 25 3c 3e 30 8c  6e 25 2b 3d 31 0d 13 74  |:.j%<>0.n%+=1..t|
00003f70  0d fd 6a 25 3d 30 3a 3d  6e 25 0d 13 7e 3c dd f2  |..j%=0:=n%..~<..|
00003f80  6f 28 72 25 2c 57 25 29  3a 72 25 21 28 33 36 2b  |o(r%,W%):r%!(36+|
00003f90  28 57 25 2d 31 29 2a 32  34 29 3d 72 25 21 28 33  |(W%-1)*24)=r%!(3|
00003fa0  36 2b 28 57 25 2d 31 29  2a 32 34 29 84 28 31 3c  |6+(W%-1)*24).(1<|
00003fb0  3c 32 32 29 3a e1 0d 13  88 46 dd f2 74 28 72 25  |<22):....F..t(r%|
00003fc0  2c 57 25 29 3a f2 6f 28  72 25 2c 57 25 29 3a 72  |,W%):.o(r%,W%):r|
00003fd0  25 21 28 33 36 2b 28 57  25 2d 31 29 2a 32 34 29  |%!(36+(W%-1)*24)|
00003fe0  3d 72 25 21 28 33 36 2b  28 57 25 2d 31 29 2a 32  |=r%!(36+(W%-1)*2|
00003ff0  34 29 82 28 31 3c 3c 32  32 29 3a e1 0d 13 92 38  |4).(1<<22):....8|
00004000  dd f2 78 28 72 25 2c 57  25 29 3a 72 25 21 28 32  |..x(r%,W%):r%!(2|
00004010  38 2b 28 57 25 2d 31 29  2a 32 34 29 3d 28 72 25  |8+(W%-1)*24)=(r%|
00004020  21 28 32 38 2b 28 57 25  2d 31 29 2a 32 34 29 29  |!(28+(W%-1)*24))|
00004030  82 31 3a e1 0d 13 9c 0c  dd a4 6e 28 6f 62 25 29  |.1:.......n(ob%)|
00004040  0d 13 a6 0c 3d c3 7e 28  6f 62 25 29 0d 13 b0 41  |....=.~(ob%)...A|
00004050  dd a4 69 28 58 25 29 3a  ea 73 24 3a 73 24 3d 22  |..i(X%):.s$:s$="|
00004060  22 3a c8 95 28 3f 58 25  3c 3e 31 33 29 80 28 3f  |":..(?X%<>13).(?|
00004070  58 25 3c 3e 30 29 3a 73  24 2b 3d bd 28 3f 58 25  |X%<>0):s$+=.(?X%|
00004080  29 3a 58 25 2b 3d 31 3a  ce 3a 3d 73 24 0d 13 ba  |):X%+=1:.:=s$...|
00004090  17 dd a4 6a 28 66 24 29  3a c8 8e a7 66 24 2c 22  |...j(f$):...f$,"|
000040a0  2e 22 29 ca 0d 13 c4 0a  c9 30 3a 3d 66 24 0d 13  |.")......0:=f$..|
000040b0  ce 1e 7f 3a 3d a4 6a 28  c2 66 24 2c a9 28 66 24  |...:=.j(.f$,.(f$|
000040c0  29 2d a7 66 24 2c 22 2e  22 29 29 29 0d 13 d8 05  |)-.f$,".")))....|
000040d0  cb 0d 13 e2 32 dd f2 7a  28 77 24 2c 70 62 25 2c  |....2..z(w$,pb%,|
000040e0  67 25 29 3a de 62 25 20  70 62 25 2c 66 62 25 20  |g%):.b% pb%,fb% |
000040f0  67 25 3a e7 70 62 25 3c  32 35 36 8c 70 62 25 3d  |g%:.pb%<256.pb%=|
00004100  32 35 36 0d 13 ec 21 67  62 25 3d 66 62 25 2b 67  |256...!gb%=fb%+g|
00004110  25 3a 78 24 3d 77 24 3a  f2 62 61 3a ee 85 f2 63  |%:x$=w$:.ba:...c|
00004120  61 3a f2 71 0d 13 f6 32  c8 99 22 57 69 6d 70 5f  |a:.q...2.."Wimp_|
00004130  49 6e 69 74 69 61 6c 69  73 65 22 2c 32 30 30 2c  |Initialise",200,|
00004140  26 34 42 35 33 34 31 35  34 2c 77 24 b8 71 62 25  |&4B534154,w$.qb%|
00004150  2c 72 62 25 3a e1 0d 14  00 57 dd f2 62 61 3a de  |,rb%:....W..ba:.|
00004160  68 62 25 20 32 30 3a 44  25 3d 31 3c 3c 38 3a 72  |hb% 20:D%=1<<8:r|
00004170  25 3d 31 3c 3c 39 3a 6e  61 25 3d 31 3a 71 62 25  |%=1<<9:na%=1:qb%|
00004180  3d 30 3a 72 62 25 3d 30  3a 77 61 25 3d 2d 32 3a  |=0:rb%=0:wa%=-2:|
00004190  6d 61 25 3d 30 3a 55 25  3d 30 3a 76 25 3d 30 3a  |ma%=0:U%=0:v%=0:|
000041a0  6d 25 3d 30 3a 73 62 25  3d 2d 33 3a e1 0d 14 0a  |m%=0:sb%=-3:....|
000041b0  22 dd f2 63 61 3a d9 23  30 3a ea 58 24 3a 58 24  |"..ca:.#0:.X$:X$|
000041c0  3d f6 24 3a f2 62 28 78  24 2c 58 24 29 3a e1 0d  |=.$:.b(x$,X$):..|
000041d0  14 14 27 dd f2 45 3a c8  99 22 57 69 6d 70 5f 43  |..'..E:.."Wimp_C|
000041e0  6c 6f 73 65 44 6f 77 6e  22 2c 72 62 25 2c 22 54  |loseDown",rb%,"T|
000041f0  41 53 4b 22 3a e1 0d 14  1e 10 dd f2 64 61 3a 5f  |ASK":.......da:_|
00004200  61 25 3d b9 3a e1 0d 14  28 41 dd f2 44 3a ea 74  |a%=.:...(A..D:.t|
00004210  62 25 2c 75 62 25 3a 5f  61 25 3d a3 3a 74 62 25  |b%,ub%:_a%=.:tb%|
00004220  3d 33 36 30 39 3a f5 3a  c8 99 22 57 69 6d 70 5f  |=3609:.:.."Wimp_|
00004230  50 6f 6c 6c 22 2c 74 62  25 2c 62 25 b8 75 62 25  |Poll",tb%,b%.ub%|
00004240  3a c8 8e 75 62 25 ca 0d  14 32 06 c9 30 0d 14 3c  |:..ub%...2..0..<|
00004250  0a c9 31 3a f2 65 61 0d  14 46 1e c9 32 3a c8 99  |..1:.ea..F..2:..|
00004260  22 57 69 6d 70 5f 4f 70  65 6e 57 69 6e 64 6f 77  |"Wimp_OpenWindow|
00004270  22 2c 2c 62 25 0d 14 50  0a c9 33 3a f2 66 61 0d  |",,b%..P..3:.fa.|
00004280  14 5a 06 c9 34 0d 14 64  06 c9 35 0d 14 6e 0a c9  |.Z..4..d..5..n..|
00004290  36 3a f2 67 61 0d 14 78  0a c9 37 3a f2 68 61 0d  |6:.ga..x..7:.ha.|
000042a0  14 82 0a c9 38 3a f2 69  61 0d 14 8c 0d c9 39 3a  |....8:.ia.....9:|
000042b0  f2 59 28 72 25 29 0d 14  96 07 c9 31 30 0d 14 a0  |.Y(r%).....10...|
000042c0  07 c9 31 31 0d 14 aa 07  c9 31 32 0d 14 b4 0e c9  |..11.....12.....|
000042d0  31 37 2c 31 38 3a f2 6a  61 0d 14 be 07 c9 31 39  |17,18:.ja.....19|
000042e0  0d 14 c8 05 cb 0d 14 d2  0a fd 5f 61 25 3a e1 0d  |.........._a%:..|
000042f0  14 dc ef dd f2 65 61 3a  ea 4d 25 3a c8 99 22 57  |.....ea:.M%:.."W|
00004300  69 6d 70 5f 52 65 64 72  61 77 57 69 6e 64 6f 77  |imp_RedrawWindow|
00004310  22 2c 2c 62 25 b8 4d 25  3a 65 25 3d 62 25 21 30  |",,b%.M%:e%=b%!0|
00004320  3a c8 95 4d 25 3a 41 61  25 3d 62 25 21 33 36 2d  |:..M%:Aa%=b%!36-|
00004330  62 25 21 32 38 3a 52 25  3d 62 25 21 34 30 2d 62  |b%!28:R%=b%!40-b|
00004340  25 21 33 32 3a 51 25 3d  62 25 21 32 38 2b 62 25  |%!32:Q%=b%!28+b%|
00004350  21 32 30 2d 62 25 21 34  3a 42 25 3d 62 25 21 33  |!20-b%!4:B%=b%!3|
00004360  32 2d 62 25 21 32 34 2d  62 25 21 38 3a 76 25 3d  |2-b%!24-b%!8:v%=|
00004370  62 25 21 34 2d 62 25 21  32 30 3a 6d 25 3d 62 25  |b%!4-b%!20:m%=b%|
00004380  21 31 36 2d 62 25 21 32  34 3a 42 61 25 3d 62 25  |!16-b%!24:Ba%=b%|
00004390  21 32 38 3a 53 25 3d 62  25 21 33 32 3a f2 6c 28  |!28:S%=b%!32:.l(|
000043a0  65 25 2c 51 25 2c 42 25  2c 41 61 25 2c 52 25 2c  |e%,Q%,B%,Aa%,R%,|
000043b0  42 61 25 2c 53 25 2c 76  25 2c 6d 25 29 3a c8 99  |Ba%,S%,v%,m%):..|
000043c0  22 57 69 6d 70 5f 47 65  74 52 65 63 74 61 6e 67  |"Wimp_GetRectang|
000043d0  6c 65 22 2c 2c 62 25 b8  4d 25 3a ce 3a e1 0d 14  |le",,b%.M%:.:...|
000043e0  e6 63 dd f2 66 61 3a c8  99 22 57 69 6d 70 5f 47  |.c..fa:.."Wimp_G|
000043f0  65 74 50 6f 69 6e 74 65  72 49 6e 66 6f 22 2c 2c  |etPointerInfo",,|
00004400  62 25 3a 65 25 3d 62 25  21 31 32 3a 7a 61 25 3d  |b%:e%=b%!12:za%=|
00004410  62 25 21 38 3a f2 46 28  65 25 2c 7a 61 25 29 3a  |b%!8:.F(e%,za%):|
00004420  21 62 25 3d 65 25 3a c8  99 22 57 69 6d 70 5f 43  |!b%=e%:.."Wimp_C|
00004430  6c 6f 73 65 57 69 6e 64  6f 77 22 2c 2c 62 25 3a  |loseWindow",,b%:|
00004440  e1 0d 14 f0 38 dd f2 67  61 3a 71 25 3d 62 25 21  |....8..ga:q%=b%!|
00004450  38 3a 65 25 3d 62 25 21  31 32 3a 67 25 3d 62 25  |8:e%=b%!12:g%=b%|
00004460  21 31 36 3a 78 25 3d 62  25 21 30 3a 79 25 3d 62  |!16:x%=b%!0:y%=b|
00004470  25 21 34 3a c8 8e 71 25  ca 0d 14 fa 0a c9 32 3a  |%!4:..q%......2:|
00004480  f2 6b 61 0d 15 04 0f 7f  3a c8 8e a4 6c 28 65 25  |.ka.....:...l(e%|
00004490  29 ca 0d 15 0e 0a c9 b9  3a f2 6c 61 0d 15 18 0a  |).......:.la....|
000044a0  c9 a3 3a f2 6d 61 0d 15  22 05 cb 0d 15 2c 05 cb  |..:.ma.."....,..|
000044b0  0d 15 36 05 e1 0d 15 40  18 dd f2 6b 61 3a 72 25  |..6....@...ka:r%|
000044c0  3d a4 72 28 65 25 29 3a  c8 8e 72 25 ca 0d 15 4a  |=.r(e%):..r%...J|
000044d0  06 c9 a3 0d 15 54 0b 7f  3a c8 8e 65 25 ca 0d 15  |.....T..:..e%...|
000044e0  5e 55 c9 2d 32 3a 6e 25  3d 30 3a c8 95 28 28 55  |^U.-2:n%=0:..((U|
000044f0  25 21 28 32 38 2b 6e 25  2a 32 34 29 29 80 31 32  |%!(28+n%*24)).12|
00004500  38 29 3d 30 3a 6e 25 2b  3d 31 3a ce 3a c8 99 22  |8)=0:n%+=1:.:.."|
00004510  57 69 6d 70 5f 43 72 65  61 74 65 4d 65 6e 75 22  |Wimp_CreateMenu"|
00004520  2c 2c 55 25 2c 78 25 2d  36 34 2c 39 36 2b 6e 25  |,,U%,x%-64,96+n%|
00004530  2a 34 34 0d 15 68 29 7f  3a c8 99 22 57 69 6d 70  |*44..h).:.."Wimp|
00004540  5f 43 72 65 61 74 65 4d  65 6e 75 22 2c 2c 72 25  |_CreateMenu",,r%|
00004550  2c 78 25 2d 36 34 2c 79  25 2b 32 30 0d 15 72 05  |,x%-64,y%+20..r.|
00004560  cb 0d 15 7c 05 cb 0d 15  86 05 e1 0d 15 90 0e dd  |...|............|
00004570  f2 6c 61 3a c8 8e 67 25  ca 0d 15 9a 15 c9 30 3a  |.la:..g%......0:|
00004580  e7 71 25 80 38 30 8c f2  6e 61 28 65 25 29 0d 15  |.q%.80..na(e%)..|
00004590  a4 14 c9 32 3a e7 71 25  80 35 8c f2 6f 61 28 65  |...2:.q%.5..oa(e|
000045a0  25 29 0d 15 ae 05 cb 0d  15 b8 05 e1 0d 15 c2 1d  |%)..............|
000045b0  dd f2 6d 61 3a f2 4b 28  65 25 2c 67 25 2c 71 25  |..ma:.K(e%,g%,q%|
000045c0  2c 78 25 2c 79 25 29 3a  e1 0d 15 cc 51 dd f2 6f  |,x%,y%):....Q..o|
000045d0  61 28 65 25 29 3a ea 61  24 3a 62 25 21 30 3d 65  |a(e%):.a$:b%!0=e|
000045e0  25 3a 62 25 21 34 3d 31  3a c8 99 22 57 69 6d 70  |%:b%!4=1:.."Wimp|
000045f0  5f 47 65 74 49 63 6f 6e  53 74 61 74 65 22 2c 2c  |_GetIconState",,|
00004600  62 25 3a 61 24 3d 24 28  62 25 21 32 38 29 3a c8  |b%:a$=$(b%!28):.|
00004610  8e a7 61 24 2c 22 2e 22  29 ca 0d 15 d6 5b c9 30  |..a$,".")....[.0|
00004620  3a 24 28 62 25 2b 34 29  3d 22 54 6f 20 73 61 76  |:$(b%+4)="To sav|
00004630  65 2c 20 64 72 61 67 20  74 68 65 20 69 63 6f 6e  |e, drag the icon|
00004640  20 74 6f 20 61 20 64 69  72 65 63 74 6f 72 79 20  | to a directory |
00004650  77 69 6e 64 6f 77 22 3a  c8 99 22 57 69 6d 70 5f  |window":.."Wimp_|
00004660  52 65 70 6f 72 74 45 72  72 6f 72 22 2c 62 25 2c  |ReportError",b%,|
00004670  31 36 2c 78 24 0d 15 e0  0f 7f 3a f2 79 28 61 24  |16,x$.....:.y(a$|
00004680  2c 65 25 29 0d 15 ea 05  cb 0d 15 f4 05 e1 0d 15  |,e%)............|
00004690  fe d3 dd f2 6e 61 28 65  25 29 3a ea 78 25 2c 79  |....na(e%):.x%,y|
000046a0  25 3a 76 62 25 3d 65 25  3a 21 62 25 3d 65 25 3a  |%:vb%=e%:!b%=e%:|
000046b0  c8 99 22 57 69 6d 70 5f  47 65 74 57 69 6e 64 6f  |.."Wimp_GetWindo|
000046c0  77 53 74 61 74 65 22 2c  2c 62 25 3a 78 25 3d 62  |wState",,b%:x%=b|
000046d0  25 21 34 2d 62 25 21 32  30 3a 79 25 3d 62 25 21  |%!4-b%!20:y%=b%!|
000046e0  31 36 2d 62 25 21 32 34  3a 62 25 21 34 3d 30 3a  |16-b%!24:b%!4=0:|
000046f0  c8 99 22 57 69 6d 70 5f  47 65 74 49 63 6f 6e 53  |.."Wimp_GetIconS|
00004700  74 61 74 65 22 2c 2c 62  25 3a 21 62 25 3d 65 25  |tate",,b%:!b%=e%|
00004710  3a 62 25 21 34 3d 35 3a  62 25 21 38 3d 78 25 2b  |:b%!4=5:b%!8=x%+|
00004720  62 25 21 38 3a 62 25 21  31 32 3d 79 25 2b 62 25  |b%!8:b%!12=y%+b%|
00004730  21 31 32 3a 62 25 21 31  36 3d 78 25 2b 62 25 21  |!12:b%!16=x%+b%!|
00004740  31 36 3a 62 25 21 32 30  3d 79 25 2b 62 25 21 32  |16:b%!20=y%+b%!2|
00004750  30 3a 62 25 21 32 34 3d  30 3a 62 25 21 32 38 3d  |0:b%!24=0:b%!28=|
00004760  30 0d 16 08 3a 62 25 21  33 32 3d 26 37 46 46 46  |0...:b%!32=&7FFF|
00004770  46 46 46 46 3a 62 25 21  33 36 3d 26 37 46 46 46  |FFFF:b%!36=&7FFF|
00004780  46 46 46 46 3a c8 99 22  57 69 6d 70 5f 44 72 61  |FFFF:.."Wimp_Dra|
00004790  67 42 6f 78 22 2c 2c 62  25 3a e1 0d 16 12 2b dd  |gBox",,b%:....+.|
000047a0  f2 69 61 3a 65 25 3d 62  25 21 30 3a 67 25 3d 62  |.ia:e%=b%!0:g%=b|
000047b0  25 21 34 3a 44 25 3d 62  25 21 32 34 3a c8 8e a4  |%!4:D%=b%!24:...|
000047c0  6c 28 65 25 29 ca 0d 16  1c 13 c9 a3 3a f2 55 28  |l(e%).......:.U(|
000047d0  65 25 2c 67 25 2c 44 25  29 0d 16 26 05 cb 0d 16  |e%,g%,D%)..&....|
000047e0  30 05 e1 0d 16 3a e7 dd  f2 68 61 3a ea 61 24 2c  |0....:...ha:.a$,|
000047f0  65 25 2c 67 25 2c 78 25  2c 79 25 3a c8 99 22 57  |e%,g%,x%,y%:.."W|
00004800  69 6d 70 5f 47 65 74 50  6f 69 6e 74 65 72 49 6e  |imp_GetPointerIn|
00004810  66 6f 22 2c 2c 62 25 3a  65 25 3d 62 25 21 31 32  |fo",,b%:e%=b%!12|
00004820  3a 67 25 3d 62 25 21 31  36 3a 78 25 3d 62 25 21  |:g%=b%!16:x%=b%!|
00004830  30 3a 79 25 3d 62 25 21  34 3a 62 25 21 30 3d 76  |0:y%=b%!4:b%!0=v|
00004840  62 25 3a 62 25 21 34 3d  31 3a c8 99 22 57 69 6d  |b%:b%!4=1:.."Wim|
00004850  70 5f 47 65 74 49 63 6f  6e 53 74 61 74 65 22 2c  |p_GetIconState",|
00004860  2c 62 25 3a 61 24 3d 24  28 62 25 21 32 38 29 3a  |,b%:a$=$(b%!28):|
00004870  61 24 3d a4 6a 28 61 24  29 3a 62 25 21 32 30 3d  |a$=.j(a$):b%!20=|
00004880  65 25 3a 62 25 21 32 34  3d 67 25 3a 62 25 21 32  |e%:b%!24=g%:b%!2|
00004890  38 3d 78 25 3a 62 25 21  33 32 3d 79 25 3a 62 25  |8=x%:b%!32=y%:b%|
000048a0  21 33 36 3d 6d 62 25 3a  62 25 21 30 3d 36 34 3a  |!36=mb%:b%!0=64:|
000048b0  62 25 21 31 32 3d 30 3a  62 25 21 31 36 3d 31 3a  |b%!12=0:b%!16=1:|
000048c0  62 25 21 34 30 3d 34 30  39 35 0d 16 44 38 24 28  |b%!40=4095..D8$(|
000048d0  62 25 2b 34 34 29 3d 61  24 3a c8 99 22 57 69 6d  |b%+44)=a$:.."Wim|
000048e0  70 5f 53 65 6e 64 4d 65  73 73 61 67 65 22 2c 31  |p_SendMessage",1|
000048f0  37 2c 62 25 2c 62 25 21  32 30 2c 62 25 21 32 34  |7,b%,b%!20,b%!24|
00004900  3a e1 0d 16 4e 22 dd f2  6a 61 3a ea 61 24 3a 61  |:...N"..ja:.a$:a|
00004910  24 3d a4 69 28 62 25 2b  34 34 29 3a c8 8e 62 25  |$=.i(b%+44):..b%|
00004920  21 31 36 ca 0d 16 58 0c  c9 30 3a 5f 61 25 3d b9  |!16...X..0:_a%=.|
00004930  0d 16 62 06 c9 31 0d 16  6c a9 c9 32 3a 62 25 21  |..b..1..l..2:b%!|
00004940  30 3d 76 62 25 3a 62 25  21 34 3d 31 3a c8 99 22  |0=vb%:b%!4=1:.."|
00004950  57 69 6d 70 5f 47 65 74  49 63 6f 6e 53 74 61 74  |Wimp_GetIconStat|
00004960  65 22 2c 2c 62 25 3a 24  28 62 25 21 32 38 29 3d  |e",,b%:$(b%!28)=|
00004970  61 24 3a 62 25 21 30 3d  76 62 25 3a 62 25 21 34  |a$:b%!0=vb%:b%!4|
00004980  3d 31 3a 62 25 21 38 3d  30 3a 62 25 21 31 32 3d  |=1:b%!8=0:b%!12=|
00004990  30 3a c8 99 22 57 69 6d  70 5f 53 65 74 49 63 6f  |0:.."Wimp_SetIco|
000049a0  6e 53 74 61 74 65 22 2c  2c 62 25 3a c8 99 22 57  |nState",,b%:.."W|
000049b0  69 6d 70 5f 53 65 74 43  61 72 65 74 50 6f 73 69  |imp_SetCaretPosi|
000049c0  74 69 6f 6e 22 2c 76 62  25 2c 31 2c 2c 2c 2d 31  |tion",vb%,1,,,-1|
000049d0  2c a9 61 24 3a f2 79 28  61 24 2c 76 62 25 29 0d  |,.a$:.y(a$,vb%).|
000049e0  16 76 1d c9 33 3a 71 24  3d a4 6e 28 62 25 21 34  |.v..3:q$=.n(b%!4|
000049f0  30 29 3a f2 70 28 61 24  2c 71 24 29 0d 16 80 05  |0):.p(a$,q$)....|
00004a00  cb 0d 16 8a 05 e1 0d 16  94 41 dd a4 69 28 58 25  |.........A..i(X%|
00004a10  29 3a ea 73 24 3a 73 24  3d 22 22 3a c8 95 28 3f  |):.s$:s$="":..(?|
00004a20  58 25 3c 3e 31 33 29 80  28 3f 58 25 3c 3e 30 29  |X%<>13).(?X%<>0)|
00004a30  3a 73 24 2b 3d bd 28 3f  58 25 29 3a 58 25 2b 3d  |:s$+=.(?X%):X%+=|
00004a40  31 3a ce 3a 3d 73 24 0d  16 9e 17 dd a4 6a 28 66  |1:.:=s$......j(f|
00004a50  24 29 3a c8 8e a7 66 24  2c 22 2e 22 29 ca 0d 16  |$):...f$,".")...|
00004a60  a8 0a c9 30 3a 3d 66 24  0d 16 b2 1e 7f 3a 3d a4  |...0:=f$.....:=.|
00004a70  6a 28 c2 66 24 2c a9 28  66 24 29 2d a7 66 24 2c  |j(.f$,.(f$)-.f$,|
00004a80  22 2e 22 29 29 29 0d 16  bc 05 cb 0d 16 c6 0c dd  |".")))..........|
00004a90  a4 6e 28 6f 62 25 29 0d  16 d0 0c 3d c3 7e 28 6f  |.n(ob%)....=.~(o|
00004aa0  62 25 29 0d 17 0c 33 dd  f2 72 28 68 25 2c 7a 25  |b%)...3..r(h%,z%|
00004ab0  2c 45 24 29 3a 24 28 68  25 2b 28 34 30 2b 28 7a  |,E$):$(h%+(40+(z|
00004ac0  25 2d 31 29 2a 32 34 29  29 3d c0 45 24 2c 31 32  |%-1)*24))=.E$,12|
00004ad0  29 2b bd 30 3a e1 0d ff                           |)+.0:...|
00004ad8