� � �FN
>� Book Reader Version 1.0 by Mike Cook Musbury Consultants

IF%=&8000

� LN% IF%
(�ON
20OR%=&400C5:PI%=&400DB:TO%=&400C1:ABS%=&400C6
<'ACS%=&40700:AND%=&40702:ASC%=&40704
FASN%=200
P� CLG% 4:$CLG%="TASK"
ZO� CLS% &300,COS% 20,DEF% 512,DEG% 256, DIM% 16, DIV% 64, END% 256, EOR% 300
d
� EOF%(3)
n7� ERL$(ASN%),ERR%(ASN%,4),EXP%(ASN%,4,3), EXT% 2000
x=� FOR%(4),GET%(4), INT% 2000,LEN% 2000, LET% 100, LOG% 30
�/MOD%=-1:NEW%=0:NOT%=10:OFF%=0:OLD%=0:OPT%=0
�2� POS%(NOT%), PTR%(NOT%),RAD%(NOT%),REM%(NOT%)
�3ș "OS_ReadVarVal","Br$Dir",LEN%,256,0,0 � ,,A%
�LEN%!A%=13
�RND$=$LEN%
�
RUN$=RND$
�B%=1
��
�A%-=1:B%+=1
�� LEN%?A%=�("!")
�RND$=�RND$,B%-2)
�;ș "Wimp_Initialise",200,!CLG%,"BookReader" � SGN%,SIN%
�0ș "Wimp_OpenTemplate",,"<Br$Dir>.Templates"

#� � ș "Wimp_CloseTemplate":�FN

*ș PI%,,CLS%,END%,END%+256,-1,"Save",0

4SPC%=CLS%!0:SQR%=CLS%!4:TAN%=CLS%!8:USR%=CLS%!12

"$(CLS%+72)=RND$

,ș TO%,,CLS% � VAL%

6-ș PI%,,CLS%,LOG%,LOG%+30,-1,"BookMark",0

@.VDU%=CLS%!0:a%=CLS%!4:b%=CLS%!8:c%=CLS%!12

J$(CLS%+72)=RND$

Tș TO%,,CLS% � d%

^*ș PI%,,CLS%,EOR%,EOR%+300,-1,"Info",0

hș TO%,,CLS% � e%

r,ș PI%,,CLS%,EXT%,EXT%+2000,-1,"About",0

|ș TO%,,CLS% � f%

�)ș PI%,,CLS%,COS%,COS%+20,-1,"page",0

�,g%=CLS%!0:h%=CLS%!4:i%=CLS%!8:j%=CLS%!12

�k%=0:l%=0:m%=-1

�$(CLS%+72)=RND$

�ș TO%,,CLS% � n%

�)ș PI%,,CLS%,LET%,LET%+100,-1,"Rip",0

�,o%=CLS%!0:p%=CLS%!4:q%=CLS%!8:r%=CLS%!12

�$(CLS%+72)=RND$

�ș TO%,,CLS% � s%

�ș "Wimp_CloseTemplate"

�,ș "Wimp_OpenTemplate",,"<Br$Dir>.About"

�,ș PI%,,CLS%,EXT%,EXT%+2000,-1,"About",0

�ș TO%,,CLS% � f%
ș "Wimp_CloseTemplate"
t%=0
� � �FN
&u%=0
0�v
:w%=�:x%=�:y%=�
Dz%=�
NA0%=�:B0%=�
X�C0
b�D0(d%,CLS%)
l�
vș "Wimp_Poll",%1,CLS% � A%
�Ȏ A% �
�� 1:�E0(CLS%)
�� 2:�F0(CLS%)
�� 3:�G0
�� 4:�H0
�� 5:�I0
�=� 6:�J0(CLS%,!CLS%,CLS%!4,CLS%!8,CLS%!12,CLS%!16,CLS%!20)
�� 7:�K0(CLS%)
�� 9:�L0(CLS%)
�� 17,18:�M0(CLS%)
��
�� �
�	� �G0
�D0(VAL%,CLS%)
�
� �L0(CLS%)
 Ȏ !CLS% �
*� 2:�G0
4�
>�
H�
R
� �N0(P$)
\�O0
fș "Hourglass_On"
p�P0(P$,LN%,LN%+IF%)
zș "Hourglass_Off"
��Q0(n%)
��
�� �Q0(R0%)
��S0(R0%)
�:ș "Wimp_ForceRedraw",-1,CLS%!4,CLS%!8,CLS%!12,CLS%!16
��
�'� �J0(CLS%,T0%,U0%,V0%,W0%,X0%,Y0%)
�� z% � z%=�
�Ȏ W0% �
�� n% :� V0%=2 � �Z0 � �a0
�� s%  :�b0
�� VAL% :�c0
�
� d% :�d0
�
�
�
$	� �d0
.	� e0%
8/ș "Wimp_WhichIcon",d%,CLS%,&3F0000,&210000
Bf0%=ERR%(1,0)
L
e0%=!CLS%
V
� e0%=2 �
`#e0%=�(RUN$+".Pages.!BookMark!")
j� e0%<>0 � � #e0%,f0%
t
� #e0%
~�
�!CLS%=d%
�ș ABS%,,CLS%
��D0(n%,CLS%)
�P$=RUN$+".Pages."+ERL$(f0%)
��N0(P$)
�ȗ ȓ 0,0,3000,3000
��
�	� �c0
�	� e0%
�1ș "Wimp_WhichIcon",VAL%,CLS%,&3F0000,&210000
�
e0%=!CLS%
�
� e0%=1 �
#e0%=�(RUN$+".Pages.!BookMark!")

� #e0%,f0%

� #e0%
�
(!CLS%=n%
2ș ABS%,,CLS%
<!CLS%=VAL%
Fș ABS%,,CLS%
P�g0
Z�
d	� �b0
n	� e0%
x/ș "Wimp_WhichIcon",s%,CLS%,&3F0000,&210000
�
e0%=!CLS%
�� e0%=-1 � � 7:�
�!� ERR%(f0%,e0%-2)= 0 � � 7: �
�
u%=f0%
�f0%=ERR%(f0%,e0%-2)
�!CLS%=s%
�ș ABS%,,CLS%
��D0(n%,CLS%)
�P$=RUN$+".Pages."+ERL$(f0%)
��N0(P$)
�ȗ ȓ 0,0,3000,3000
��
�	� �h0

� X0%=2 �
CLS%!0=i0%
�G0
"CLS%!0=j0%
,ș ABS%,,CLS%
6#� k0% � ȗ ȓ 0,0,3000,3000:�g0
@�
J
� X0%=1 �
T	l0%=�
^CLS%!0=j0%
hș ABS%,,CLS%
r�m0
|\CLS%!0=VAL%:CLS%!4=200:CLS%!8=200:CLS%!12=450:CLS%!16=380:CLS%!20=0:CLS%!24=0:CLS%!28=-1
�ș OR%,,CLS%
��
�ȗ ȓ 0,0,3000,3000
��
�	� �a0
�!� n0%,o0%,p0%,q0%,B%,r0%,RND$
�%ș "Wimp_GetPointerInfo",,CLS%+40
�p0%=((CLS%!40)<<8)-(s0%!16)
�q0%=((CLS%!44)<<8)-(s0%!20)
�o0%=0:n0%=�
�NEW%=LN%+40
��
�<� p0%>NEW%!8 � p0%<NEW%!16 � q0%>NEW%!12 � q0%<NEW%!20 �
� B%=0 � 4
h� EXP%(f0%,B%,0)=NEW%!8 � EXP%(f0%,B%,1)=NEW%!12 � EXP%(f0%,B%,2)=NEW%!16 � EXP%(f0%,B%,3)=NEW%!20 �
	n0%=�
&r0%=ERR%(f0%,B%)
0�
:�
D�
NNEW%+=NEW%!4
X� NEW%>=OLD%
b� n0% � f0%=r0%
l� f0%=2 � �g0
v� n0% �
�"RND$=RUN$+".Pages."+ERL$(f0%):
� � RND$<>P$ � P$=RND$:�N0(P$)
��
��
�	� �Z0
�� T0%,U0%,V0%
�ȗ T0%,U0%,V0%
�(ș"Wimp_CreateMenu",,DEG%,T0%-68,U0%
�z%=�
��
�� �t0(u0%)
�� RND%,MOD%
�RND%=(DIV%+3) � (�(3))
� MOD%=0 � 16
?(RND%+MOD%)=0
�
 MOD%=(DIM%+3) � (�(3))
*:$MOD%="ptr_turn":?(RND%+7)=3:?(RND%+12)=2:?(RND%+14)=1
4-ș "Wimp_SpriteOp",36,,MOD%,2,25,0,0,RND%
>=� 19,3,25,0,0,0:� 19,2,25,255,187,0:� 19,1,25,224,224,176
H�("POINTER 2")
R�
\	� �I0
f� CLS%!0=n% � �t0(1)
p)� CLS%!0=s% � ȗ ȓ o%,p%,q%-o%,r%-p%
z7� CLS%!0=VAL% � ȗ ȓ SPC%,SQR%,TAN%-SPC%,USR%-SQR%
�-� CLS%!0=d% � ȗ ȓ VDU%,a%,b%-VDU%,c%-a%
��
�	� �H0
�� CLS%!0=n% � �("POINTER")
��
�� �D0(v0%,CLS%)
�Ȏ v0% �
�]� n% :!CLS%=n%:CLS%!4=g%:CLS%!8=h%:CLS%!12=i%:CLS%!16=j%:CLS%!20=k%:CLS%!24=l%:CLS%!28=m%
�s� s% :!CLS%=s%:CLS%!4=o%:CLS%!8=p%:CLS%!12=q%:CLS%!16=r%:CLS%!20=0:CLS%!24=0:CLS%!28=-1:ȗ ȓ o%,p%,q%-o%,r%-p%
ފ� VAL%:!CLS%=VAL%:CLS%!4=SPC%:CLS%!8=SQR%:CLS%!12=TAN%:CLS%!16=USR%:CLS%!20=0:CLS%!24=0:CLS%!28=-1:ȗ ȓ SPC%,SQR%,TAN%-SPC%,USR%-SQR%
�x� d%:!CLS%=d%:CLS%!4=VDU%:CLS%!8=a%:CLS%!12=b%:CLS%!16=c%:CLS%!20=0:CLS%!24=0:CLS%!28=-1:ȗ ȓ VDU%,a%,b%-VDU%,c%-a%
�
�	v0%=0
	�
	� v0%<>0 � ș OR%,,CLS%
	�
	$� �F0(CLS%)
	.	� W0%
	8W0%=CLS%!0
	B� W0%=-1 � �
	L� W0%=n% � W0%=s% �
	Vș OR%,,CLS%
	`�
	j�
	t	� �C0
	~� F%,w0%
	�!F%=�(RUN$+".Pages.!Binding!")
	�+� F%=0 � �99,"This book has no binding"
	�� #F%,x0%,w0%
	�
� w0%=1 �
	�
� #F%,f0%
	�� A%=1 � x0%
	�� #F%,ERL$(A%)
	�� B%=0 � 4
	�� #F%,ERR%(A%,B%)
	�� C%=0 � 3
	�� #F%,EXP%(A%,B%,C%)
	��:�
�

�
	� #F%
�
(	� �y0
2!CLS%=n%
<!ș "Wimp_GetWindowInfo",,CLS%
F-g%=CLS%!4:h%=CLS%!8:i%=CLS%!12:j%=CLS%!16
P$k%=CLS%!20:l%=CLS%!24:m%=CLS%!28
Z�D0(s%,CLS%)
d!CLS%=n%
nș ABS%,,CLS%
xȗ ȓ o%,p%,q%-o%,r%-p%
��
�� �S0(R0%)
�
!CLS%=R0%
�"ș "Wimp_GetWindowState",,CLS%
�*z0%=CLS%!4-CLS%!20:A1%=CLS%!16-CLS%!24
�B1%=CLS%!4:C1%=CLS%!16
��
�� �E0(CLS%)
�� CLS%!0=n% � �D1
��
���v
�� E1%,A%
�$DEG%=RND$

DEG%?12=7

DEG%?13=2

DEG%?14=7
"
DEG%?15=0
,DEG%!16=142
6DEG%!20=40
@
DEG%!24=0
JE1%=DEG%+28
TE1%!0=0
^E1%!4=e%
hE1%!8=(7<<24)� %11001
r$(E1%+12)="Info"
|E1%+=24
�E1%!0=0
�E1%!4=f%
�E1%!8=(7<<24)� %11001
�$(E1%+12)="About"
�E1%+=24
�
E1%!0=&80
�E1%!4=0
�E1%!8=(7<<24)� %11001
�$(E1%+12)="Quit"
��
�� �M0(CLS%)
�� A%
�Ȏ CLS%!16 �
� 0:�g0
4� &400C1 : � B0% � B0%=�:CLS%!0=n%:ș ABS%,,CLS%
� &502:�F1
&�
0�
:	� �F1
D	� � �
NPG1$="This is the Book Reader window.|MClick here to move onto the next page"
X�
b
G1$=""
l�
v� G1$<>"" �
�CLS%!12=CLS%!8
�$(CLS%+20)=G1$+�0
�CLS%!0=(20+�G1$+4)� � 3
�CLS%!16=&503
�(ș "Wimp_SendMessage",18,CLS%,CLS%!4
��
�	� �FN
�� �=&108D5 � �=&108D4 �
�E� u%=0 � � �dnL � f0%=u%:u%=0:P$=RUN$+".Pages."+ERL$(f0%):�N0(P$)
�
� �DlB
��
�ș "Wimp_DragBox",,-1
�6!DEF%=�:$(DEF%+4)=�$+" internal error code "+Þ+�0

-ș "Wimp_ReportError",DEF%,1,"BookReader"

�("POINTER")

�g0

 �

*��g0

4�O0

>�("POINTER")

H"ș "Wimp_CloseDown",SIN%,!CLG%

R�

\�

f	� �O0

p� A%

z� OFF%<>0 �

�� A%=1 � OFF%

�ș "Font_LoseFont",REM%(A%)

��

�
OFF%=0

��

��

���ON

�� H1% 560,s0% 24

�s0%!00=&10000

�s0%!04=&10000*0

�s0%!08=&10000*0

�s0%!12=&10000

�s0%!16=256*0
s0%!20=256*0
�
*� �I1(J1%,K1%,L1%,M1%,N1%,O1%,P1%,Q1%)
$�R1%
.2�!J1%<>&77617244:�99,"This is not a draw file"
81�J1%!4>201:�99,"Can't draw files after v2.01"
Bs0%!20=256*M1%-J1%!36
Ls0%!16=256*L1%
V(笤S1(J1%!24,J1%!28,J1%!32,J1%!36):�
`R1%=J1%+40
j�
t�T1(R1%)
~R1%+=R1%!4
�
�R1%>=K1%
��
�ݤS1(X%,Y%,A%,B%)
�#�U1(A%):�U1(X%):�V1(B%):�V1(Y%)
��A%<X%ȔA%,X%
��B%<Y%ȔB%,Y%
��N1%>A%:=�
��P1%<X%:=�
��O1%>B%:=�
��Q1%<Y%:=�
�=�
�$��U1(� X%):X%=((X%+s0%!16)>>8):�
$��V1(� Y%):Y%=((Y%+s0%!20)>>8):�

��W1(E1%,X1%)
�E1%,X1%
�
(��Y1(RND%)
2 ș"ColourTrans_SetGCOL",RND%
<�
F� �T1(R1%)
P�o0%
Zo0%=!R1%
d'笤S1(R1%!8,R1%!12,R1%!16,R1%!20):�
n
Ȏo0%�
x�1:�Z1(R1%)
��2:�a1(R1%)
��5:�b1(R1%)
��6:�c1(R1%)
��7:�d1(R1%)
��9:�e1(R1%)
�
�f1(R1%)
��
��
���g1(P%)
�s0%!16=256:s0%!20=256
�
Ȏ!P%�
��1:�h1(P%)
��2:�i1(P%)
�6:�j1(P%)
�
�
"
��h1(R1%)
,R1%!8=R1%!44:R1%!12=R1%!48
69R1%!16=R1%!8+��k1(R1%+52)*R1%!36:R1%!20=R1%!12+R1%!40
@�
J
��i1(R1%)
T�P%,F%,RND%,l1%,D%
^�m1
h<ș ACS%,P%,F%�&78000030,s0%,0,RND%,l1%,D%,&80000000+p%+8
r�
|
��j1(R1%)
��X%,Y%,A%,B%,P%
�X%=2n1:Y%=X%:A%=-X%:B%=A%
�
P%=R1%+36
�ȕP%<R1%+R1%!4
��P%!8<X%X%=P%!8
��P%!12<Y%Y%=P%!12
��P%!16>A%A%=P%!16
��P%!20>B%B%=P%!20
�P%+=P%!4
��
�*R1%!8=X%:R1%!12=Y%:R1%!16=A%:R1%!20=B%
��
�
��a1(R1%)
�P%,F%,RND%,l1%,D%
�m1
�R1%!24<>-1�
&�Y1(R1%!24)
0'ș AND%,P%,F%�&30,s0%,0,RND%,l1%,D%
:�
D�R1%!28<>-1�
N�Y1(R1%!28)
X(ș ASC%,P%,%111000,s0%,0,RND%,l1%,D%
b�
l�
v��m1
�l1%=H1%+260
�!l1%=R1%!36�3
�$!l1%=!l1%�((R1%!36�%110000)<<12)
�!!l1%=!l1%�((R1%!36�%1100)<<6)
�l1%!4=&A0000
�-l1%!8=((R1%?38)<<4) � (((R1%?39)<<4)<<16)
�l1%!12=l1%!8
��R1%!36�128�
�"D%=R1%+40:P%=4*R1%!44+8+R1%+40
��
�P%=R1%+40:D%=0
��
�'RND%=R1%!32:F%=0:�R1%!36�64:F%=F%�2
�

��Z1(R1%)
+�X%,Y%,A%,B%,C%,o1%,p1%,q1%,r1%,s1%,t1%
 %ș"OS_ReadModeVariable",�,4 �,,A%
*%ș"OS_ReadModeVariable",�,5 �,,B%
4X%=R1%!44:Y%=R1%!48
>�U1(X%):�V1(Y%)
HC%=0
R�
\	C%+=1
f� PTR%(C%)=R1%!32 � C%=NOT%
p!� PTR%(C%)<>R1%!32 � R1%!32=0
z� R1%!32=0 � POS%(C%)=0 �
��u1
��
�$(DEF%+100)=�k1(POS%(C%))
�s1%=(R1%!36)/40
�t1%=(R1%!40)/40
�4ș "XFont_FindFont",,DEF%+100,s1%,t1% � s1% ;r1%
�� (r1% � 1)=1 �
��u1
��
�Hș "ColourTrans_ReturnFontColours",0,R1%!28,R1%!24,14 � ,o1%,p1%,q1%
�ș "Font_SetFont",s1%
�*ș "Font_SetFontColours",0,o1%,p1%,q1%
�%ș "Font_Paint",,R1%+52,&10,X%,Y%
ș "Font_LoseFont",s1%
�
�
$�
.	� �u1
81�23,17,7,6,(R1%!36)>>(A%+8);(R1%!40)>>(B%+8)|
B�Y1(R1%!24)
L�X%,Y%+((R1%!40)>>11)*7
V�k1(R1%+52);
`�23,17,7,6,16>>A%;32>>B%|
j�
t
~
��b1(R1%)
��X%,Y%,A%,B%,v1%,P%,w%,H%
�v1%=!(R1%+24+40)
�%ș"OS_ReadModeVariable",�,4 �,,A%
�%ș"OS_ReadModeVariable",�,5 �,,B%
�+ș"OS_SpriteOp",&228,-1,R1%+24�,,,w%,H%
�w%=w%<<A%:H%=H%<<B%
�:�X%=0�15:!(H1%+300+X%*4)=!(R1%+24+44+X%*8)�&FFFFFF00:�
�*X%=R1%!8:Y%=R1%!12:A%=R1%!16:B%=R1%!20
�&�!(R1%+24+32)=&2C:P%=0:�P%=H1%+300
�#�U1(A%):�U1(X%):�V1(B%):�V1(Y%)
�5H1%!260=A%-X%:H1%!264=B%-Y%:H1%!268=w%:H1%!272=H%
�1ș "ColourTrans_SelectTable",v1%,P%,-1,-1,H1%
7ș "OS_SpriteOp",&234,-1,R1%+24,X%,Y%,8,H1%+260,H1%

�

��d1(R1%)
�T1(R1%+28)
(�
2
��c1(R1%)
<�P%
F
P%=R1%+36
P�
Z�T1(P%)
dP%+=P%!4
n�P%>=R1%+R1%!4
x�
�
��f1(R1%)
��X%,Y%,A%,B%
�*X%=R1%!8:Y%=R1%!12:A%=R1%!16:B%=R1%!20
�#�U1(A%):�U1(X%):�V1(B%):�V1(Y%)
��W1(0,1)
�ȓȐX%,Y%,A%-X%,B%-Y%
��W1(0,7)
�ȓX%,Y%,A%-X%,B%-Y%
��
�
��e1(R1%)
�%�X%,Y%,A%,B%,x0%,MOD%,l1%,w1%,x1%
�w1%=24:�y1(R1%,w1%):w1%+=4
�x0%=R1%!w1%
MOD%=x0%!0

x0%+=4
2ș "Font_StringWidth",,x0%+12,5000,5000,&20,40
"ș "Font_FutureFont" � X%
,ș "Font_SetFont",X%
6Qș "ColourTrans_ReturnFontColours",0,R1%!(w1%+12),R1%!(w1%+8),14 � ,X%,Y%,w1%
@(ș "Font_SetFontColours",0,X%,Y%,w1%
J� w1%=1 � MOD%
T2X%=((x0%!0) � &FFFF)<<8 :Y%=((x0%!0) >> 16)<<8
^2A%=((x0%!4) � &FFFF)<<8 :B%=((x0%!4) >> 16)<<8
h#�U1(A%):�U1(X%):�V1(B%):�V1(Y%)
r� X%,Y%:� A%,Y%
|1� ((x0%!8) � 1)=1 � � A%,Y%:l1%=&11 � l1%=&10
�'ș "Font_Paint",,(x0%+12),l1%,X%,Y%
�x0%+=(x0%!8) � (�(1))
��
��
�� �P0(z1$,J1%,K1%)
��RND%,E%
�
Ȏ � �
�� 2,4,5,10 :OPT%=1
�
�
OPT%=0
��
�	A2%=�
�
RND%=�z1$
� RND%=0 �
�y0
�
&E%=�#RND%:�#RND%
0�"load "+z1$+" "+�~(J1%)
:OLD%=J1%+E%
D	A2%=�
N�B2
X�
b�
l	� �B2
v� A%,B%,C%,MOD%,C2%
�POS%()=0
�PTR%()=0
�
A%=J1%+40
�C2%=LEN%
��D2(A%,OLD%)
��
�� �D2(A%,E2%)
��
�� A%!0=0 � �F2
�$� A%!0=6 � �D2(A%+24+12,A%+A%!4)
�#� A%!0=7 � �D2(A%+24+4,A%+A%!4)
�� A%!0=9 � �G2
�
MOD%=A%!4
A%+=MOD%
� A%>=E2% � MOD%=0
�
 � �H2(R1%)
*� B%
4B%=(24*R1%)+A%
>X%=(B%!8)>>8:Y%=(B%!12)>>8
H!I2%=(B%!16)>>8:J2%=(B%!20)>>8
RK2%=I2%-X%:�L2(K2%)
\K2%=K2%-M2%*1000-N2%*1000
f
X%=X%+O2%
p�
z	� �G2
�f� P2%,Q2%,R2%,S2%,P%,T2%,MOD%,X%,Y%,I2%,K2%,J2%,U2%,V2%,W2%,X2%,Y2%,Z2%,O2%,N2%,M2%,a2%,b2%,D%,c2%
�	W2%=�
�)S2%=32:Q2%=0:R2%=0:V2%=�("D"):Y2%=V2%
�P%=INT%+12
�
X2%=C2%+4
�
!C2%=0
�D%=1 :c2%=D%
�N2%=1:M2%=1
�&Z2%=N2%:O2%=M2%: �d2(Z2%):�d2(O2%)
�P2%=10:�d2(P2%)
�
�H2(1)
�J2%+=P2%
�U2%=A%+(A%!4)

z1%=24
�y1(A%,z1%)
z1%+=20+A%
$b2%=�:a2%=�
.�
8
MOD%=?z1%
B"� MOD%=&5C � �e2:z1%-=1:� �D~X
L� MOD%=9 � MOD%=&20
V%� MOD%>&1F � ?P%=MOD%:P%+=1:b2%=�
`� b2%=� � MOD%=&A � a2%=�
j0� MOD%=&A � P%>(INT%+12) � ?(P%-1)=&20 � �f2
t,� MOD%=&A � P%>(INT%+12) � ?P%=&20:P%+=1
~� W2% � P%>(INT%+14) � �f2
�
z1%+=1
�-� z1%>=U2% � X2%>LEN%+2000 � P%>INT%+2000
�� P%>(INT%+12) � �f2
�z1%=24:�y1(A%,z1%):z1%+=4
�A%!z1%=C2%
�C2%=X2%
��
�� �y1(g2%,� R1%)
�ȕ g2%!R1%=10
�R1%+=g2%!(R1%+4)
��
��
	� �f2

&� h2%,i2%,j2%,ERL%,k2%,x1%,l2%,m2%
� J2%>Y% �
l2%=V2%
(
P%?0=0
2	W2%=�
<j2%=P%-(INT%+13)
F�
P=INT%!0=(X% � &FFFF) � (((J2% � &FFFF) << 16) � &FFFF0000)
Z/INT%!4=(I2% � &FFFF) � ((Y% � &FFFF) << 16)
dDș "Font_StringWidth",,INT%+12,K2%,K2%,&20,j2% � ,ERL%,m2%,,,i2%
nș "Font_FutureFont" � x1%
xș "Font_SetFont",x1%
�� i2%<>0 �
�j2%-=i2%
�Aș "Font_StringWidth",,INT%+12+i2%,K2%,K2%,&20,j2% � ,,,,,h2%
�%� h2%=0 � V2%=�("D") � V2%=�("L")
�� V2%=�("C") �
�x1%=(K2%-m2%)/2
�)ș "Font_ConverttoOS",,x1%,x1% � ,x1%
�CINT%!0=((X%+x1%) � &FFFF) � (((J2% � &FFFF) << 16) � &FFFF0000)
��
�� V2%=�("R") �
�x1%=K2%-m2%
�)ș "Font_ConverttoOS",,x1%,x1% � ,x1%
�CINT%!0=((X%+x1%) � &FFFF) � (((J2% � &FFFF) << 16) � &FFFF0000)
�

�n2(ERL%)
V2%=l2%
"� k2%=12 � j2%+12
,INT%?k2%=?(ERL%+k2%-11)
6�
@�
JJ2%-=S2%
T� (J2%)<Y% �
^&� c2%<D% � c2%+=1:�H2(c2%) � j2%=0
h�
r� j2%<1 � i2%=0 � h2%=0
|�
�P%=INT%+12
�� V2%<>Y2% � V2%=Y2%
�� a2% � J2%=J2%-P2%
�� W2% �
�J2%=J2%+P2%:W2%=�
��
��
�� �L2(� X%)
�*ș "Font_Converttopoints",,X%,X% � ,X%
��
�	� �e2
�� X1%,o2%,K1%,V0%,p2%
�
z1%+=1
X1%=?z1%
� X1%>&2F � X1%<&3A �
o2%=�q2
&	K1%=0
0�
:
K1%+=1
D� RAD%(K1%)=o2% � K1%=NOT%
N?P%=26:P%+=1
X?P%=REM%(K1%) � &FF
b	P%+=1
l�
vȎ X1% �
�� �("!") : �r2
�*� �("P") : z1%+=1:P2%=�q2:�d2(P2%):�s2
�� �("V") : �t2:�s2
�� �("U") : �u2:�s2
�C� �("C") : ?P%=18:P%+=1:�v2:?P%=V0%:P%?1=K1%:P%?2=p2%:P%+=3:�s2
�� &2F      : ?P%=&2F:P%+=1
�� &0A      : W2%=�
� � �("D") : z1%+=1:D%=�q2:�s2
�#� �("A") : Y2%=z1%?1:z1%+=2:�w2
�� ?z1%=&A � z1%+=1
�� P%>(INT%+12) � W2%=�
�&� �("L") : z1%+=1:S2%=�q2:�d2(S2%)
�� �("F") : �x2
	 �r2
�
�
 �
*	� �v2
4� y2%,G%,B%
>
z1%+=1
Hy2%=�q2:� y2%>255 � y2%=255
RG%=�q2:� G%>255 � G%=255
\B%=�q2:� B%>255 � B%=255
f+K1%=(B% << 24) � (G%<<16 ) � (y2% << 8)
pHș "ColourTrans_ReturnFontColours",0,&FFFFFF00,K1%,14 � ,V0%,K1%,p2%
z�
�	� �s2
�
Ȏ ?z1% �
�� &A :z1%+=1
�� &2F:z1%+=1
��
��
�	� �u2
�	� z2%
�?P%=25:P%+=1
�
z1%+=1
�� ?z1%=&2E �
�?P%=0:P%+=1
�?P%=0:P%+=1

z1%+=1
�
z2%=�q2
$?P%=z2%:P%+=1
.z2%=�q2
8?P%=z2%:P%+=1
B�
L�
V	� �t2
`	� z2%
j
z1%+=1
t?P%=11:P%+=1
~z2%=�q2
�z2%=z2%*1250
�?P%=z2% � &FF
�P%?1=(z2% � &FF00)>>8
�P%?2=(z2% � &FF0000)>>16
�	P%+=3
��
�� �d2(� u0%)
�u0%=u0%*1000
�)ș "Font_ConverttoOS",,u0%,u0% � ,u0%
��
�	� �x2
�� D%,A3%,w%,B3%,r1%
�


z1%+=1
� ?z1%<>&20

D%=�q2
(ȕ ?z1%=&20:z1%+=1:�
2B3%=z1%
<�
F
z1%+=1
P� ?z1%=&20
Z?z1%=13
d�
n
z1%+=1
x� ?z1%<>&20
�A3%=�q2
�8� ?z1%=&A � ?z1%=&2F � w%=A3%:z1%+=1 � w%=�q2:z1%+=1
�OFF%+=1
�RAD%(OFF%)=D%
�?ș "XFont_FindFont",,B3%,A3%*16,w%*16,0,0 � REM%(OFF%) ;r1%
�� (r1% � 1)=1 �
�Fș "Font_FindFont",,"Trinity.Medium",A3%*16,w%*16,0,0 � REM%(OFF%)
��
��
�	� �q2
�� P%,C3%
�P%=0:C3%=1
�ȕ ?z1%=&20

z1%+=1
�
!� ?z1%=�("-") � C3%=-1:z1%+=1
"�
,7� ?z1%>&2F � ?z1%<&3A � P%=P%*10+(?z1% � &F):z1%+=1
6� �(?z1%>&2F � ?z1%<&3A)
@=P%*C3%
J	� �w2
T� ?z1%=�("/") � z1%+=1
^�
h	� �r2
r�
|
z1%+=1
�� ?z1%=&0A � ?z1%=&2F
�
z1%+=1
��
�� �n2(D3%)
�� p2%,J1%,X1%,E3%
�� p2%=INT% � INT%+12
�X1%=?p2%
�X2%?(p2%-INT%)=X1%
��
�<� R2%<>0 � X2%?12=25:X2%?13=Q2%:X2%?14=R2%:E3%=3 � E3%=0
�� p2%=INT%+12 � D3%
�X1%=?p2%
�"� X1%=25 � Q2%=p2%?1:R2%=p2%?2
 X2%?(p2%-INT%+E3%)=X1%
 �
 7� X2%?(p2%-INT%-1+E3%)=&20 � X2%?(p2%-INT%-1+E3%)=0
 &X2%?(p2%-INT%+E3%)=0
 0
p2%+=1
 :X2%?(p2%-INT%+E3%)=0
 DȎ ((p2%+E3%) � 3) �
 N� 0 : J1%=0
 X� 1 : J1%=3
 b� 2 : J1%=2
 l� 3 : J1%=1
 v�
 �X2%!8=p2%-INT%+J1%+E3%
 �"� V2%=�("D") � X2%!8=X2%!8 � 1
 �X2%+=(p2%-INT%+J1%+E3%)
 �!C2%+=1
 ��
 �	� �F2
 �
B%=1:C%=0
 ��
 �PTR%(B%)=?(A%+C%+8)
 �POS%(B%)=A%+C%+9
 �	B%+=1
 ��
 �	C%+=1
!� ?(A%+C%+8)=0
!�
!	C%+=1
! � ?(A%+C%+8)<>0
!*$� (A%+C%+8)>=(A%!4+A%) � B%>NOT%
!4�
!>
��F3(R1%)
!H+G3%=!R1%:H3%=R1%!4:I3%=R1%!8:J3%=R1%!12
!R$K3%=R1%!16:L3%=R1%!20:M3%=R1%!24
!\L1%=G3%-K3%:M1%=J3%-L3%
!f/N3%=R1%!28:O3%=R1%!32:P3%=R1%!36:Q3%=R1%!40
!p/N1%=R1%!24:O1%=R1%!28:P1%=R1%!32:Q1%=R1%!36
!zR3%=(R1%!28�&10000)<>0
!��
!���D1
!�%ș"Wimp_RedrawWindow",,CLS% � S3%
!��F3(CLS%+4)
!�
ȕ S3%
!�� A2% � �T3
!�S3%=�U3
!��
!��
!�ݤU3
!�	�RND%
!�%ș "Wimp_GetRectangle",,CLS%�RND%
!��F3(CLS%+4)
"	=RND%
"ݤV3(X%,Y%,w%,H%)
"�w%<0:X%+=w%:w%=-w%
"$�H%<0:Y%+=H%:H%=-H%
".�N1%>X%+w%:=�
"8�P1%<X%:=�
"B�O1%>Y%+H%:=�
"L�Q1%<Y%:=�
"V=�
"`ݤk1(RND%):�RND$
"j%ȕ?RND%<>0:RND$+=�?RND%:RND%+=1:�
"t	=RND$
"~��T3
"�1�I1(LN%,OLD%,L1%+32,M1%-32,N1%,O1%,P1%,Q1%):�
�

00000000  0d 00 0a 0b ee 20 85 20  f2 46 4e 0d 00 0b 3e f4  |..... . .FN...>.|
00000010  20 42 6f 6f 6b 20 52 65  61 64 65 72 20 56 65 72  | Book Reader Ver|
00000020  73 69 6f 6e 20 31 2e 30  20 62 79 20 4d 69 6b 65  |sion 1.0 by Mike|
00000030  20 43 6f 6f 6b 20 4d 75  73 62 75 72 79 20 43 6f  | Cook Musbury Co|
00000040  6e 73 75 6c 74 61 6e 74  73 0d 00 14 0d 49 46 25  |nsultants....IF%|
00000050  3d 26 38 30 30 30 0d 00  1e 0d de 20 4c 4e 25 20  |=&8000..... LN% |
00000060  49 46 25 0d 00 28 07 f2  4f 4e 0d 00 32 30 4f 52  |IF%..(..ON..20OR|
00000070  25 3d 26 34 30 30 43 35  3a 50 49 25 3d 26 34 30  |%=&400C5:PI%=&40|
00000080  30 44 42 3a 54 4f 25 3d  26 34 30 30 43 31 3a 41  |0DB:TO%=&400C1:A|
00000090  42 53 25 3d 26 34 30 30  43 36 0d 00 3c 27 41 43  |BS%=&400C6..<'AC|
000000a0  53 25 3d 26 34 30 37 30  30 3a 41 4e 44 25 3d 26  |S%=&40700:AND%=&|
000000b0  34 30 37 30 32 3a 41 53  43 25 3d 26 34 30 37 30  |40702:ASC%=&4070|
000000c0  34 0d 00 46 0c 41 53 4e  25 3d 32 30 30 0d 00 50  |4..F.ASN%=200..P|
000000d0  19 de 20 43 4c 47 25 20  34 3a 24 43 4c 47 25 3d  |.. CLG% 4:$CLG%=|
000000e0  22 54 41 53 4b 22 0d 00  5a 4f de 20 43 4c 53 25  |"TASK"..ZO. CLS%|
000000f0  20 26 33 30 30 2c 43 4f  53 25 20 32 30 2c 44 45  | &300,COS% 20,DE|
00000100  46 25 20 35 31 32 2c 44  45 47 25 20 32 35 36 2c  |F% 512,DEG% 256,|
00000110  20 44 49 4d 25 20 31 36  2c 20 44 49 56 25 20 36  | DIM% 16, DIV% 6|
00000120  34 2c 20 45 4e 44 25 20  32 35 36 2c 20 45 4f 52  |4, END% 256, EOR|
00000130  25 20 33 30 30 0d 00 64  0d de 20 45 4f 46 25 28  |% 300..d.. EOF%(|
00000140  33 29 0d 00 6e 37 de 20  45 52 4c 24 28 41 53 4e  |3)..n7. ERL$(ASN|
00000150  25 29 2c 45 52 52 25 28  41 53 4e 25 2c 34 29 2c  |%),ERR%(ASN%,4),|
00000160  45 58 50 25 28 41 53 4e  25 2c 34 2c 33 29 2c 20  |EXP%(ASN%,4,3), |
00000170  45 58 54 25 20 32 30 30  30 0d 00 78 3d de 20 46  |EXT% 2000..x=. F|
00000180  4f 52 25 28 34 29 2c 47  45 54 25 28 34 29 2c 20  |OR%(4),GET%(4), |
00000190  49 4e 54 25 20 32 30 30  30 2c 4c 45 4e 25 20 32  |INT% 2000,LEN% 2|
000001a0  30 30 30 2c 20 4c 45 54  25 20 31 30 30 2c 20 4c  |000, LET% 100, L|
000001b0  4f 47 25 20 33 30 0d 00  82 2f 4d 4f 44 25 3d 2d  |OG% 30.../MOD%=-|
000001c0  31 3a 4e 45 57 25 3d 30  3a 4e 4f 54 25 3d 31 30  |1:NEW%=0:NOT%=10|
000001d0  3a 4f 46 46 25 3d 30 3a  4f 4c 44 25 3d 30 3a 4f  |:OFF%=0:OLD%=0:O|
000001e0  50 54 25 3d 30 0d 00 8c  32 de 20 50 4f 53 25 28  |PT%=0...2. POS%(|
000001f0  4e 4f 54 25 29 2c 20 50  54 52 25 28 4e 4f 54 25  |NOT%), PTR%(NOT%|
00000200  29 2c 52 41 44 25 28 4e  4f 54 25 29 2c 52 45 4d  |),RAD%(NOT%),REM|
00000210  25 28 4e 4f 54 25 29 0d  00 96 33 c8 99 20 22 4f  |%(NOT%)...3.. "O|
00000220  53 5f 52 65 61 64 56 61  72 56 61 6c 22 2c 22 42  |S_ReadVarVal","B|
00000230  72 24 44 69 72 22 2c 4c  45 4e 25 2c 32 35 36 2c  |r$Dir",LEN%,256,|
00000240  30 2c 30 20 b8 20 2c 2c  41 25 0d 00 a0 0e 4c 45  |0,0 . ,,A%....LE|
00000250  4e 25 21 41 25 3d 31 33  0d 00 aa 0e 52 4e 44 24  |N%!A%=13....RND$|
00000260  3d 24 4c 45 4e 25 0d 00  b4 0d 52 55 4e 24 3d 52  |=$LEN%....RUN$=R|
00000270  4e 44 24 0d 00 be 08 42  25 3d 31 0d 00 c8 05 f5  |ND$....B%=1.....|
00000280  0d 00 d2 0f 41 25 2d 3d  31 3a 42 25 2b 3d 31 0d  |....A%-=1:B%+=1.|
00000290  00 dc 14 fd 20 4c 45 4e  25 3f 41 25 3d 97 28 22  |.... LEN%?A%=.("|
000002a0  21 22 29 0d 00 e6 14 52  4e 44 24 3d c2 52 4e 44  |!")....RND$=.RND|
000002b0  24 2c 42 25 2d 32 29 0d  00 f0 3b c8 99 20 22 57  |$,B%-2)...;.. "W|
000002c0  69 6d 70 5f 49 6e 69 74  69 61 6c 69 73 65 22 2c  |imp_Initialise",|
000002d0  32 30 30 2c 21 43 4c 47  25 2c 22 42 6f 6f 6b 52  |200,!CLG%,"BookR|
000002e0  65 61 64 65 72 22 20 b8  20 53 47 4e 25 2c 53 49  |eader" . SGN%,SI|
000002f0  4e 25 0d 00 fa 30 c8 99  20 22 57 69 6d 70 5f 4f  |N%...0.. "Wimp_O|
00000300  70 65 6e 54 65 6d 70 6c  61 74 65 22 2c 2c 22 3c  |penTemplate",,"<|
00000310  42 72 24 44 69 72 3e 2e  54 65 6d 70 6c 61 74 65  |Br$Dir>.Template|
00000320  73 22 0d 01 04 23 ee 20  85 20 c8 99 20 22 57 69  |s"...#. . .. "Wi|
00000330  6d 70 5f 43 6c 6f 73 65  54 65 6d 70 6c 61 74 65  |mp_CloseTemplate|
00000340  22 3a f2 46 4e 0d 01 0e  2a c8 99 20 50 49 25 2c  |":.FN...*.. PI%,|
00000350  2c 43 4c 53 25 2c 45 4e  44 25 2c 45 4e 44 25 2b  |,CLS%,END%,END%+|
00000360  32 35 36 2c 2d 31 2c 22  53 61 76 65 22 2c 30 0d  |256,-1,"Save",0.|
00000370  01 18 34 53 50 43 25 3d  43 4c 53 25 21 30 3a 53  |..4SPC%=CLS%!0:S|
00000380  51 52 25 3d 43 4c 53 25  21 34 3a 54 41 4e 25 3d  |QR%=CLS%!4:TAN%=|
00000390  43 4c 53 25 21 38 3a 55  53 52 25 3d 43 4c 53 25  |CLS%!8:USR%=CLS%|
000003a0  21 31 32 0d 01 22 13 24  28 43 4c 53 25 2b 37 32  |!12..".$(CLS%+72|
000003b0  29 3d 52 4e 44 24 0d 01  2c 17 c8 99 20 54 4f 25  |)=RND$..,... TO%|
000003c0  2c 2c 43 4c 53 25 20 b8  20 56 41 4c 25 0d 01 36  |,,CLS% . VAL%..6|
000003d0  2d c8 99 20 50 49 25 2c  2c 43 4c 53 25 2c 4c 4f  |-.. PI%,,CLS%,LO|
000003e0  47 25 2c 4c 4f 47 25 2b  33 30 2c 2d 31 2c 22 42  |G%,LOG%+30,-1,"B|
000003f0  6f 6f 6b 4d 61 72 6b 22  2c 30 0d 01 40 2e 56 44  |ookMark",0..@.VD|
00000400  55 25 3d 43 4c 53 25 21  30 3a 61 25 3d 43 4c 53  |U%=CLS%!0:a%=CLS|
00000410  25 21 34 3a 62 25 3d 43  4c 53 25 21 38 3a 63 25  |%!4:b%=CLS%!8:c%|
00000420  3d 43 4c 53 25 21 31 32  0d 01 4a 13 24 28 43 4c  |=CLS%!12..J.$(CL|
00000430  53 25 2b 37 32 29 3d 52  4e 44 24 0d 01 54 15 c8  |S%+72)=RND$..T..|
00000440  99 20 54 4f 25 2c 2c 43  4c 53 25 20 b8 20 64 25  |. TO%,,CLS% . d%|
00000450  0d 01 5e 2a c8 99 20 50  49 25 2c 2c 43 4c 53 25  |..^*.. PI%,,CLS%|
00000460  2c 45 4f 52 25 2c 45 4f  52 25 2b 33 30 30 2c 2d  |,EOR%,EOR%+300,-|
00000470  31 2c 22 49 6e 66 6f 22  2c 30 0d 01 68 15 c8 99  |1,"Info",0..h...|
00000480  20 54 4f 25 2c 2c 43 4c  53 25 20 b8 20 65 25 0d  | TO%,,CLS% . e%.|
00000490  01 72 2c c8 99 20 50 49  25 2c 2c 43 4c 53 25 2c  |.r,.. PI%,,CLS%,|
000004a0  45 58 54 25 2c 45 58 54  25 2b 32 30 30 30 2c 2d  |EXT%,EXT%+2000,-|
000004b0  31 2c 22 41 62 6f 75 74  22 2c 30 0d 01 7c 15 c8  |1,"About",0..|..|
000004c0  99 20 54 4f 25 2c 2c 43  4c 53 25 20 b8 20 66 25  |. TO%,,CLS% . f%|
000004d0  0d 01 86 29 c8 99 20 50  49 25 2c 2c 43 4c 53 25  |...).. PI%,,CLS%|
000004e0  2c 43 4f 53 25 2c 43 4f  53 25 2b 32 30 2c 2d 31  |,COS%,COS%+20,-1|
000004f0  2c 22 70 61 67 65 22 2c  30 0d 01 90 2c 67 25 3d  |,"page",0...,g%=|
00000500  43 4c 53 25 21 30 3a 68  25 3d 43 4c 53 25 21 34  |CLS%!0:h%=CLS%!4|
00000510  3a 69 25 3d 43 4c 53 25  21 38 3a 6a 25 3d 43 4c  |:i%=CLS%!8:j%=CL|
00000520  53 25 21 31 32 0d 01 9a  13 6b 25 3d 30 3a 6c 25  |S%!12....k%=0:l%|
00000530  3d 30 3a 6d 25 3d 2d 31  0d 01 a4 13 24 28 43 4c  |=0:m%=-1....$(CL|
00000540  53 25 2b 37 32 29 3d 52  4e 44 24 0d 01 ae 15 c8  |S%+72)=RND$.....|
00000550  99 20 54 4f 25 2c 2c 43  4c 53 25 20 b8 20 6e 25  |. TO%,,CLS% . n%|
00000560  0d 01 b8 29 c8 99 20 50  49 25 2c 2c 43 4c 53 25  |...).. PI%,,CLS%|
00000570  2c 4c 45 54 25 2c 4c 45  54 25 2b 31 30 30 2c 2d  |,LET%,LET%+100,-|
00000580  31 2c 22 52 69 70 22 2c  30 0d 01 c2 2c 6f 25 3d  |1,"Rip",0...,o%=|
00000590  43 4c 53 25 21 30 3a 70  25 3d 43 4c 53 25 21 34  |CLS%!0:p%=CLS%!4|
000005a0  3a 71 25 3d 43 4c 53 25  21 38 3a 72 25 3d 43 4c  |:q%=CLS%!8:r%=CL|
000005b0  53 25 21 31 32 0d 01 cc  13 24 28 43 4c 53 25 2b  |S%!12....$(CLS%+|
000005c0  37 32 29 3d 52 4e 44 24  0d 01 d6 15 c8 99 20 54  |72)=RND$...... T|
000005d0  4f 25 2c 2c 43 4c 53 25  20 b8 20 73 25 0d 01 e0  |O%,,CLS% . s%...|
000005e0  1b c8 99 20 22 57 69 6d  70 5f 43 6c 6f 73 65 54  |... "Wimp_CloseT|
000005f0  65 6d 70 6c 61 74 65 22  0d 01 ea 2c c8 99 20 22  |emplate"...,.. "|
00000600  57 69 6d 70 5f 4f 70 65  6e 54 65 6d 70 6c 61 74  |Wimp_OpenTemplat|
00000610  65 22 2c 2c 22 3c 42 72  24 44 69 72 3e 2e 41 62  |e",,"<Br$Dir>.Ab|
00000620  6f 75 74 22 0d 01 f4 2c  c8 99 20 50 49 25 2c 2c  |out"...,.. PI%,,|
00000630  43 4c 53 25 2c 45 58 54  25 2c 45 58 54 25 2b 32  |CLS%,EXT%,EXT%+2|
00000640  30 30 30 2c 2d 31 2c 22  41 62 6f 75 74 22 2c 30  |000,-1,"About",0|
00000650  0d 01 fe 15 c8 99 20 54  4f 25 2c 2c 43 4c 53 25  |...... TO%,,CLS%|
00000660  20 b8 20 66 25 0d 02 08  1b c8 99 20 22 57 69 6d  | . f%...... "Wim|
00000670  70 5f 43 6c 6f 73 65 54  65 6d 70 6c 61 74 65 22  |p_CloseTemplate"|
00000680  0d 02 12 08 74 25 3d 30  0d 02 1c 0b ee 20 85 20  |....t%=0..... . |
00000690  f2 46 4e 0d 02 26 08 75  25 3d 30 0d 02 30 06 f2  |.FN..&.u%=0..0..|
000006a0  76 0d 02 3a 12 77 25 3d  a3 3a 78 25 3d b9 3a 79  |v..:.w%=.:x%=.:y|
000006b0  25 3d a3 0d 02 44 08 7a  25 3d a3 0d 02 4e 0f 41  |%=...D.z%=...N.A|
000006c0  30 25 3d a3 3a 42 30 25  3d a3 0d 02 58 07 f2 43  |0%=.:B0%=...X..C|
000006d0  30 0d 02 62 10 f2 44 30  28 64 25 2c 43 4c 53 25  |0..b..D0(d%,CLS%|
000006e0  29 0d 02 6c 05 f5 0d 02  76 1f c8 99 20 22 57 69  |)..l....v... "Wi|
000006f0  6d 70 5f 50 6f 6c 6c 22  2c 25 31 2c 43 4c 53 25  |mp_Poll",%1,CLS%|
00000700  20 b8 20 41 25 0d 02 80  0b c8 8e 20 41 25 20 ca  | . A%...... A% .|
00000710  0d 02 8a 11 c9 20 31 3a  f2 45 30 28 43 4c 53 25  |..... 1:.E0(CLS%|
00000720  29 0d 02 94 11 c9 20 32  3a f2 46 30 28 43 4c 53  |)..... 2:.F0(CLS|
00000730  25 29 0d 02 9e 0b c9 20  33 3a f2 47 30 0d 02 a8  |%)..... 3:.G0...|
00000740  0b c9 20 34 3a f2 48 30  0d 02 b2 0b c9 20 35 3a  |.. 4:.H0..... 5:|
00000750  f2 49 30 0d 02 bc 3d c9  20 36 3a f2 4a 30 28 43  |.I0...=. 6:.J0(C|
00000760  4c 53 25 2c 21 43 4c 53  25 2c 43 4c 53 25 21 34  |LS%,!CLS%,CLS%!4|
00000770  2c 43 4c 53 25 21 38 2c  43 4c 53 25 21 31 32 2c  |,CLS%!8,CLS%!12,|
00000780  43 4c 53 25 21 31 36 2c  43 4c 53 25 21 32 30 29  |CLS%!16,CLS%!20)|
00000790  0d 02 c6 11 c9 20 37 3a  f2 4b 30 28 43 4c 53 25  |..... 7:.K0(CLS%|
000007a0  29 0d 02 d0 11 c9 20 39  3a f2 4c 30 28 43 4c 53  |)..... 9:.L0(CLS|
000007b0  25 29 0d 02 da 15 c9 20  31 37 2c 31 38 3a f2 4d  |%)..... 17,18:.M|
000007c0  30 28 43 4c 53 25 29 0d  02 e4 05 cb 0d 02 ee 07  |0(CLS%).........|
000007d0  fd 20 a3 0d 02 f8 09 dd  20 f2 47 30 0d 03 02 12  |. ...... .G0....|
000007e0  f2 44 30 28 56 41 4c 25  2c 43 4c 53 25 29 0d 03  |.D0(VAL%,CLS%)..|
000007f0  0c 05 e1 0d 03 16 0f dd  20 f2 4c 30 28 43 4c 53  |........ .L0(CLS|
00000800  25 29 0d 03 20 0e c8 8e  20 21 43 4c 53 25 20 ca  |%).. ... !CLS% .|
00000810  0d 03 2a 0b c9 20 32 3a  f2 47 30 0d 03 34 05 cb  |..*.. 2:.G0..4..|
00000820  0d 03 3e 05 cd 0d 03 48  05 e1 0d 03 52 0d dd 20  |..>....H....R.. |
00000830  f2 4e 30 28 50 24 29 0d  03 5c 07 f2 4f 30 0d 03  |.N0(P$)..\..O0..|
00000840  66 15 c8 99 20 22 48 6f  75 72 67 6c 61 73 73 5f  |f... "Hourglass_|
00000850  4f 6e 22 0d 03 70 17 f2  50 30 28 50 24 2c 4c 4e  |On"..p..P0(P$,LN|
00000860  25 2c 4c 4e 25 2b 49 46  25 29 0d 03 7a 16 c8 99  |%,LN%+IF%)..z...|
00000870  20 22 48 6f 75 72 67 6c  61 73 73 5f 4f 66 66 22  | "Hourglass_Off"|
00000880  0d 03 84 0b f2 51 30 28  6e 25 29 0d 03 8e 05 e1  |.....Q0(n%).....|
00000890  0d 03 98 0e dd 20 f2 51  30 28 52 30 25 29 0d 03  |..... .Q0(R0%)..|
000008a0  a2 0c f2 53 30 28 52 30  25 29 0d 03 ac 3a c8 99  |...S0(R0%)...:..|
000008b0  20 22 57 69 6d 70 5f 46  6f 72 63 65 52 65 64 72  | "Wimp_ForceRedr|
000008c0  61 77 22 2c 2d 31 2c 43  4c 53 25 21 34 2c 43 4c  |aw",-1,CLS%!4,CL|
000008d0  53 25 21 38 2c 43 4c 53  25 21 31 32 2c 43 4c 53  |S%!8,CLS%!12,CLS|
000008e0  25 21 31 36 0d 03 b6 05  e1 0d 03 c0 27 dd 20 f2  |%!16........'. .|
000008f0  4a 30 28 43 4c 53 25 2c  54 30 25 2c 55 30 25 2c  |J0(CLS%,T0%,U0%,|
00000900  56 30 25 2c 57 30 25 2c  58 30 25 2c 59 30 25 29  |V0%,W0%,X0%,Y0%)|
00000910  0d 03 ca 0f e7 20 7a 25  20 8c 20 7a 25 3d a3 0d  |..... z% . z%=..|
00000920  03 d4 0c c8 8e 20 57 30  25 20 ca 0d 03 de 1d c9  |..... W0% ......|
00000930  20 6e 25 20 3a e7 20 56  30 25 3d 32 20 8c 20 f2  | n% :. V0%=2 . .|
00000940  5a 30 20 8b 20 f2 61 30  0d 03 e8 0e c9 20 73 25  |Z0 . .a0..... s%|
00000950  20 20 3a f2 62 30 0d 03  f2 0f c9 20 56 41 4c 25  |  :.b0..... VAL%|
00000960  20 3a f2 63 30 0d 03 fc  0d c9 20 64 25 20 3a f2  | :.c0..... d% :.|
00000970  64 30 0d 04 06 05 cb 0d  04 10 05 cd 0d 04 1a 05  |d0..............|
00000980  e1 0d 04 24 09 dd 20 f2  64 30 0d 04 2e 09 ea 20  |...$.. .d0..... |
00000990  65 30 25 0d 04 38 2f c8  99 20 22 57 69 6d 70 5f  |e0%..8/.. "Wimp_|
000009a0  57 68 69 63 68 49 63 6f  6e 22 2c 64 25 2c 43 4c  |WhichIcon",d%,CL|
000009b0  53 25 2c 26 33 46 30 30  30 30 2c 26 32 31 30 30  |S%,&3F0000,&2100|
000009c0  30 30 0d 04 42 11 66 30  25 3d 45 52 52 25 28 31  |00..B.f0%=ERR%(1|
000009d0  2c 30 29 0d 04 4c 0d 65  30 25 3d 21 43 4c 53 25  |,0)..L.e0%=!CLS%|
000009e0  0d 04 56 0d e7 20 65 30  25 3d 32 20 8c 0d 04 60  |..V.. e0%=2 ...`|
000009f0  23 65 30 25 3d 8e 28 52  55 4e 24 2b 22 2e 50 61  |#e0%=.(RUN$+".Pa|
00000a00  67 65 73 2e 21 42 6f 6f  6b 4d 61 72 6b 21 22 29  |ges.!BookMark!")|
00000a10  0d 04 6a 19 e7 20 65 30  25 3c 3e 30 20 8c 20 e8  |..j.. e0%<>0 . .|
00000a20  20 23 65 30 25 2c 66 30  25 0d 04 74 0a d9 20 23  | #e0%,f0%..t.. #|
00000a30  65 30 25 0d 04 7e 05 cd  0d 04 88 0c 21 43 4c 53  |e0%..~......!CLS|
00000a40  25 3d 64 25 0d 04 92 11  c8 99 20 41 42 53 25 2c  |%=d%...... ABS%,|
00000a50  2c 43 4c 53 25 0d 04 9c  10 f2 44 30 28 6e 25 2c  |,CLS%.....D0(n%,|
00000a60  43 4c 53 25 29 0d 04 a6  1f 50 24 3d 52 55 4e 24  |CLS%)....P$=RUN$|
00000a70  2b 22 2e 50 61 67 65 73  2e 22 2b 45 52 4c 24 28  |+".Pages."+ERL$(|
00000a80  66 30 25 29 0d 04 b0 0b  f2 4e 30 28 50 24 29 0d  |f0%).....N0(P$).|
00000a90  04 ba 17 c8 97 20 c8 93  20 30 2c 30 2c 33 30 30  |..... .. 0,0,300|
00000aa0  30 2c 33 30 30 30 0d 04  c4 05 e1 0d 04 ce 09 dd  |0,3000..........|
00000ab0  20 f2 63 30 0d 04 d8 09  ea 20 65 30 25 0d 04 e2  | .c0..... e0%...|
00000ac0  31 c8 99 20 22 57 69 6d  70 5f 57 68 69 63 68 49  |1.. "Wimp_WhichI|
00000ad0  63 6f 6e 22 2c 56 41 4c  25 2c 43 4c 53 25 2c 26  |con",VAL%,CLS%,&|
00000ae0  33 46 30 30 30 30 2c 26  32 31 30 30 30 30 0d 04  |3F0000,&210000..|
00000af0  ec 0d 65 30 25 3d 21 43  4c 53 25 0d 04 f6 0d e7  |..e0%=!CLS%.....|
00000b00  20 65 30 25 3d 31 20 8c  0d 05 00 23 65 30 25 3d  | e0%=1 ....#e0%=|
00000b10  ae 28 52 55 4e 24 2b 22  2e 50 61 67 65 73 2e 21  |.(RUN$+".Pages.!|
00000b20  42 6f 6f 6b 4d 61 72 6b  21 22 29 0d 05 0a 0e f1  |BookMark!").....|
00000b30  20 23 65 30 25 2c 66 30  25 0d 05 14 0a d9 20 23  | #e0%,f0%..... #|
00000b40  65 30 25 0d 05 1e 05 cd  0d 05 28 0c 21 43 4c 53  |e0%.......(.!CLS|
00000b50  25 3d 6e 25 0d 05 32 11  c8 99 20 41 42 53 25 2c  |%=n%..2... ABS%,|
00000b60  2c 43 4c 53 25 0d 05 3c  0e 21 43 4c 53 25 3d 56  |,CLS%..<.!CLS%=V|
00000b70  41 4c 25 0d 05 46 11 c8  99 20 41 42 53 25 2c 2c  |AL%..F... ABS%,,|
00000b80  43 4c 53 25 0d 05 50 07  f2 67 30 0d 05 5a 05 e1  |CLS%..P..g0..Z..|
00000b90  0d 05 64 09 dd 20 f2 62  30 0d 05 6e 09 ea 20 65  |..d.. .b0..n.. e|
00000ba0  30 25 0d 05 78 2f c8 99  20 22 57 69 6d 70 5f 57  |0%..x/.. "Wimp_W|
00000bb0  68 69 63 68 49 63 6f 6e  22 2c 73 25 2c 43 4c 53  |hichIcon",s%,CLS|
00000bc0  25 2c 26 33 46 30 30 30  30 2c 26 32 31 30 30 30  |%,&3F0000,&21000|
00000bd0  30 0d 05 82 0d 65 30 25  3d 21 43 4c 53 25 0d 05  |0....e0%=!CLS%..|
00000be0  8c 14 e7 20 65 30 25 3d  2d 31 20 8c 20 ef 20 37  |... e0%=-1 . . 7|
00000bf0  3a e1 0d 05 96 21 e7 20  45 52 52 25 28 66 30 25  |:....!. ERR%(f0%|
00000c00  2c 65 30 25 2d 32 29 3d  20 30 20 8c 20 ef 20 37  |,e0%-2)= 0 . . 7|
00000c10  3a 20 e1 0d 05 a0 0a 75  25 3d 66 30 25 0d 05 aa  |: .....u%=f0%...|
00000c20  17 66 30 25 3d 45 52 52  25 28 66 30 25 2c 65 30  |.f0%=ERR%(f0%,e0|
00000c30  25 2d 32 29 0d 05 b4 0c  21 43 4c 53 25 3d 73 25  |%-2)....!CLS%=s%|
00000c40  0d 05 be 11 c8 99 20 41  42 53 25 2c 2c 43 4c 53  |...... ABS%,,CLS|
00000c50  25 0d 05 c8 10 f2 44 30  28 6e 25 2c 43 4c 53 25  |%.....D0(n%,CLS%|
00000c60  29 0d 05 d2 1f 50 24 3d  52 55 4e 24 2b 22 2e 50  |)....P$=RUN$+".P|
00000c70  61 67 65 73 2e 22 2b 45  52 4c 24 28 66 30 25 29  |ages."+ERL$(f0%)|
00000c80  0d 05 dc 0b f2 4e 30 28  50 24 29 0d 05 e6 17 c8  |.....N0(P$).....|
00000c90  97 20 c8 93 20 30 2c 30  2c 33 30 30 30 2c 33 30  |. .. 0,0,3000,30|
00000ca0  30 30 0d 05 f0 05 e1 0d  05 fa 09 dd 20 f2 68 30  |00.......... .h0|
00000cb0  0d 06 04 0d e7 20 58 30  25 3d 32 20 8c 0d 06 0e  |..... X0%=2 ....|
00000cc0  0e 43 4c 53 25 21 30 3d  69 30 25 0d 06 18 07 f2  |.CLS%!0=i0%.....|
00000cd0  47 30 0d 06 22 0e 43 4c  53 25 21 30 3d 6a 30 25  |G0..".CLS%!0=j0%|
00000ce0  0d 06 2c 11 c8 99 20 41  42 53 25 2c 2c 43 4c 53  |..,... ABS%,,CLS|
00000cf0  25 0d 06 36 23 e7 20 6b  30 25 20 8c 20 c8 97 20  |%..6#. k0% . .. |
00000d00  c8 93 20 30 2c 30 2c 33  30 30 30 2c 33 30 30 30  |.. 0,0,3000,3000|
00000d10  3a f2 67 30 0d 06 40 05  cd 0d 06 4a 0d e7 20 58  |:.g0..@....J.. X|
00000d20  30 25 3d 31 20 8c 0d 06  54 09 6c 30 25 3d b9 0d  |0%=1 ...T.l0%=..|
00000d30  06 5e 0e 43 4c 53 25 21  30 3d 6a 30 25 0d 06 68  |.^.CLS%!0=j0%..h|
00000d40  11 c8 99 20 41 42 53 25  2c 2c 43 4c 53 25 0d 06  |... ABS%,,CLS%..|
00000d50  72 07 f2 6d 30 0d 06 7c  5c 43 4c 53 25 21 30 3d  |r..m0..|\CLS%!0=|
00000d60  56 41 4c 25 3a 43 4c 53  25 21 34 3d 32 30 30 3a  |VAL%:CLS%!4=200:|
00000d70  43 4c 53 25 21 38 3d 32  30 30 3a 43 4c 53 25 21  |CLS%!8=200:CLS%!|
00000d80  31 32 3d 34 35 30 3a 43  4c 53 25 21 31 36 3d 33  |12=450:CLS%!16=3|
00000d90  38 30 3a 43 4c 53 25 21  32 30 3d 30 3a 43 4c 53  |80:CLS%!20=0:CLS|
00000da0  25 21 32 34 3d 30 3a 43  4c 53 25 21 32 38 3d 2d  |%!24=0:CLS%!28=-|
00000db0  31 0d 06 86 10 c8 99 20  4f 52 25 2c 2c 43 4c 53  |1...... OR%,,CLS|
00000dc0  25 0d 06 90 05 cd 0d 06  9a 17 c8 97 20 c8 93 20  |%........... .. |
00000dd0  30 2c 30 2c 33 30 30 30  2c 33 30 30 30 0d 06 a4  |0,0,3000,3000...|
00000de0  05 e1 0d 06 ae 09 dd 20  f2 61 30 0d 06 b8 21 ea  |....... .a0...!.|
00000df0  20 6e 30 25 2c 6f 30 25  2c 70 30 25 2c 71 30 25  | n0%,o0%,p0%,q0%|
00000e00  2c 42 25 2c 72 30 25 2c  52 4e 44 24 0d 06 c2 25  |,B%,r0%,RND$...%|
00000e10  c8 99 20 22 57 69 6d 70  5f 47 65 74 50 6f 69 6e  |.. "Wimp_GetPoin|
00000e20  74 65 72 49 6e 66 6f 22  2c 2c 43 4c 53 25 2b 34  |terInfo",,CLS%+4|
00000e30  30 0d 06 cc 1f 70 30 25  3d 28 28 43 4c 53 25 21  |0....p0%=((CLS%!|
00000e40  34 30 29 3c 3c 38 29 2d  28 73 30 25 21 31 36 29  |40)<<8)-(s0%!16)|
00000e50  0d 06 d6 1f 71 30 25 3d  28 28 43 4c 53 25 21 34  |....q0%=((CLS%!4|
00000e60  34 29 3c 3c 38 29 2d 28  73 30 25 21 32 30 29 0d  |4)<<8)-(s0%!20).|
00000e70  06 e0 0f 6f 30 25 3d 30  3a 6e 30 25 3d a3 0d 06  |...o0%=0:n0%=...|
00000e80  ea 0f 4e 45 57 25 3d 4c  4e 25 2b 34 30 0d 06 f4  |..NEW%=LN%+40...|
00000e90  05 f5 0d 06 fe 3c e7 20  70 30 25 3e 4e 45 57 25  |.....<. p0%>NEW%|
00000ea0  21 38 20 80 20 70 30 25  3c 4e 45 57 25 21 31 36  |!8 . p0%<NEW%!16|
00000eb0  20 80 20 71 30 25 3e 4e  45 57 25 21 31 32 20 80  | . q0%>NEW%!12 .|
00000ec0  20 71 30 25 3c 4e 45 57  25 21 32 30 20 8c 0d 07  | q0%<NEW%!20 ...|
00000ed0  08 0e e3 20 42 25 3d 30  20 b8 20 34 0d 07 12 68  |... B%=0 . 4...h|
00000ee0  e7 20 45 58 50 25 28 66  30 25 2c 42 25 2c 30 29  |. EXP%(f0%,B%,0)|
00000ef0  3d 4e 45 57 25 21 38 20  80 20 45 58 50 25 28 66  |=NEW%!8 . EXP%(f|
00000f00  30 25 2c 42 25 2c 31 29  3d 4e 45 57 25 21 31 32  |0%,B%,1)=NEW%!12|
00000f10  20 80 20 45 58 50 25 28  66 30 25 2c 42 25 2c 32  | . EXP%(f0%,B%,2|
00000f20  29 3d 4e 45 57 25 21 31  36 20 80 20 45 58 50 25  |)=NEW%!16 . EXP%|
00000f30  28 66 30 25 2c 42 25 2c  33 29 3d 4e 45 57 25 21  |(f0%,B%,3)=NEW%!|
00000f40  32 30 20 8c 0d 07 1c 09  6e 30 25 3d b9 0d 07 26  |20 .....n0%=...&|
00000f50  14 72 30 25 3d 45 52 52  25 28 66 30 25 2c 42 25  |.r0%=ERR%(f0%,B%|
00000f60  29 0d 07 30 05 cd 0d 07  3a 05 ed 0d 07 44 05 cd  |)..0....:....D..|
00000f70  0d 07 4e 10 4e 45 57 25  2b 3d 4e 45 57 25 21 34  |..N.NEW%+=NEW%!4|
00000f80  0d 07 58 10 fd 20 4e 45  57 25 3e 3d 4f 4c 44 25  |..X.. NEW%>=OLD%|
00000f90  0d 07 62 13 e7 20 6e 30  25 20 8c 20 66 30 25 3d  |..b.. n0% . f0%=|
00000fa0  72 30 25 0d 07 6c 11 e7  20 66 30 25 3d 32 20 8c  |r0%..l.. f0%=2 .|
00000fb0  20 f2 67 30 0d 07 76 0b  e7 20 6e 30 25 20 8c 0d  | .g0..v.. n0% ..|
00000fc0  07 80 22 52 4e 44 24 3d  52 55 4e 24 2b 22 2e 50  |.."RND$=RUN$+".P|
00000fd0  61 67 65 73 2e 22 2b 45  52 4c 24 28 66 30 25 29  |ages."+ERL$(f0%)|
00000fe0  3a 0d 07 8a 20 e7 20 52  4e 44 24 3c 3e 50 24 20  |:... . RND$<>P$ |
00000ff0  8c 20 50 24 3d 52 4e 44  24 3a f2 4e 30 28 50 24  |. P$=RND$:.N0(P$|
00001000  29 0d 07 94 05 cd 0d 07  9e 05 e1 0d 07 a8 09 dd  |)...............|
00001010  20 f2 5a 30 0d 07 b2 11  ea 20 54 30 25 2c 55 30  | .Z0..... T0%,U0|
00001020  25 2c 56 30 25 0d 07 bc  12 c8 97 20 54 30 25 2c  |%,V0%...... T0%,|
00001030  55 30 25 2c 56 30 25 0d  07 c6 28 c8 99 22 57 69  |U0%,V0%...(.."Wi|
00001040  6d 70 5f 43 72 65 61 74  65 4d 65 6e 75 22 2c 2c  |mp_CreateMenu",,|
00001050  44 45 47 25 2c 54 30 25  2d 36 38 2c 55 30 25 0d  |DEG%,T0%-68,U0%.|
00001060  07 d0 08 7a 25 3d b9 0d  07 da 05 e1 0d 07 e4 0e  |...z%=..........|
00001070  dd 20 f2 74 30 28 75 30  25 29 0d 07 ee 0f ea 20  |. .t0(u0%)..... |
00001080  52 4e 44 25 2c 4d 4f 44  25 0d 07 f8 1a 52 4e 44  |RND%,MOD%....RND|
00001090  25 3d 28 44 49 56 25 2b  33 29 20 80 20 28 ac 28  |%=(DIV%+3) . (.(|
000010a0  33 29 29 0d 08 02 11 e3  20 4d 4f 44 25 3d 30 20  |3))..... MOD%=0 |
000010b0  b8 20 31 36 0d 08 0c 12  3f 28 52 4e 44 25 2b 4d  |. 16....?(RND%+M|
000010c0  4f 44 25 29 3d 30 0d 08  16 05 ed 0d 08 20 1a 4d  |OD%)=0....... .M|
000010d0  4f 44 25 3d 28 44 49 4d  25 2b 33 29 20 80 20 28  |OD%=(DIM%+3) . (|
000010e0  ac 28 33 29 29 0d 08 2a  3a 24 4d 4f 44 25 3d 22  |.(3))..*:$MOD%="|
000010f0  70 74 72 5f 74 75 72 6e  22 3a 3f 28 52 4e 44 25  |ptr_turn":?(RND%|
00001100  2b 37 29 3d 33 3a 3f 28  52 4e 44 25 2b 31 32 29  |+7)=3:?(RND%+12)|
00001110  3d 32 3a 3f 28 52 4e 44  25 2b 31 34 29 3d 31 0d  |=2:?(RND%+14)=1.|
00001120  08 34 2d c8 99 20 22 57  69 6d 70 5f 53 70 72 69  |.4-.. "Wimp_Spri|
00001130  74 65 4f 70 22 2c 33 36  2c 2c 4d 4f 44 25 2c 32  |teOp",36,,MOD%,2|
00001140  2c 32 35 2c 30 2c 30 2c  52 4e 44 25 0d 08 3e 3d  |,25,0,0,RND%..>=|
00001150  ef 20 31 39 2c 33 2c 32  35 2c 30 2c 30 2c 30 3a  |. 19,3,25,0,0,0:|
00001160  ef 20 31 39 2c 32 2c 32  35 2c 32 35 35 2c 31 38  |. 19,2,25,255,18|
00001170  37 2c 30 3a ef 20 31 39  2c 31 2c 32 35 2c 32 32  |7,0:. 19,1,25,22|
00001180  34 2c 32 32 34 2c 31 37  36 0d 08 48 12 ff 28 22  |4,224,176..H..("|
00001190  50 4f 49 4e 54 45 52 20  32 22 29 0d 08 52 05 e1  |POINTER 2")..R..|
000011a0  0d 08 5c 09 dd 20 f2 49  30 0d 08 66 18 e7 20 43  |..\.. .I0..f.. C|
000011b0  4c 53 25 21 30 3d 6e 25  20 8c 20 f2 74 30 28 31  |LS%!0=n% . .t0(1|
000011c0  29 0d 08 70 29 e7 20 43  4c 53 25 21 30 3d 73 25  |)..p). CLS%!0=s%|
000011d0  20 8c 20 c8 97 20 c8 93  20 6f 25 2c 70 25 2c 71  | . .. .. o%,p%,q|
000011e0  25 2d 6f 25 2c 72 25 2d  70 25 0d 08 7a 37 e7 20  |%-o%,r%-p%..z7. |
000011f0  43 4c 53 25 21 30 3d 56  41 4c 25 20 8c 20 c8 97  |CLS%!0=VAL% . ..|
00001200  20 c8 93 20 53 50 43 25  2c 53 51 52 25 2c 54 41  | .. SPC%,SQR%,TA|
00001210  4e 25 2d 53 50 43 25 2c  55 53 52 25 2d 53 51 52  |N%-SPC%,USR%-SQR|
00001220  25 0d 08 84 2d e7 20 43  4c 53 25 21 30 3d 64 25  |%...-. CLS%!0=d%|
00001230  20 8c 20 c8 97 20 c8 93  20 56 44 55 25 2c 61 25  | . .. .. VDU%,a%|
00001240  2c 62 25 2d 56 44 55 25  2c 63 25 2d 61 25 0d 08  |,b%-VDU%,c%-a%..|
00001250  8e 05 e1 0d 08 98 09 dd  20 f2 48 30 0d 08 a2 1e  |........ .H0....|
00001260  e7 20 43 4c 53 25 21 30  3d 6e 25 20 8c 20 ff 28  |. CLS%!0=n% . .(|
00001270  22 50 4f 49 4e 54 45 52  22 29 0d 08 ac 05 e1 0d  |"POINTER")......|
00001280  08 b6 13 dd 20 f2 44 30  28 76 30 25 2c 43 4c 53  |.... .D0(v0%,CLS|
00001290  25 29 0d 08 c0 0c c8 8e  20 76 30 25 20 ca 0d 08  |%)...... v0% ...|
000012a0  ca 5d c9 20 6e 25 20 3a  21 43 4c 53 25 3d 6e 25  |.]. n% :!CLS%=n%|
000012b0  3a 43 4c 53 25 21 34 3d  67 25 3a 43 4c 53 25 21  |:CLS%!4=g%:CLS%!|
000012c0  38 3d 68 25 3a 43 4c 53  25 21 31 32 3d 69 25 3a  |8=h%:CLS%!12=i%:|
000012d0  43 4c 53 25 21 31 36 3d  6a 25 3a 43 4c 53 25 21  |CLS%!16=j%:CLS%!|
000012e0  32 30 3d 6b 25 3a 43 4c  53 25 21 32 34 3d 6c 25  |20=k%:CLS%!24=l%|
000012f0  3a 43 4c 53 25 21 32 38  3d 6d 25 0d 08 d4 73 c9  |:CLS%!28=m%...s.|
00001300  20 73 25 20 3a 21 43 4c  53 25 3d 73 25 3a 43 4c  | s% :!CLS%=s%:CL|
00001310  53 25 21 34 3d 6f 25 3a  43 4c 53 25 21 38 3d 70  |S%!4=o%:CLS%!8=p|
00001320  25 3a 43 4c 53 25 21 31  32 3d 71 25 3a 43 4c 53  |%:CLS%!12=q%:CLS|
00001330  25 21 31 36 3d 72 25 3a  43 4c 53 25 21 32 30 3d  |%!16=r%:CLS%!20=|
00001340  30 3a 43 4c 53 25 21 32  34 3d 30 3a 43 4c 53 25  |0:CLS%!24=0:CLS%|
00001350  21 32 38 3d 2d 31 3a c8  97 20 c8 93 20 6f 25 2c  |!28=-1:.. .. o%,|
00001360  70 25 2c 71 25 2d 6f 25  2c 72 25 2d 70 25 0d 08  |p%,q%-o%,r%-p%..|
00001370  de 8a c9 20 56 41 4c 25  3a 21 43 4c 53 25 3d 56  |... VAL%:!CLS%=V|
00001380  41 4c 25 3a 43 4c 53 25  21 34 3d 53 50 43 25 3a  |AL%:CLS%!4=SPC%:|
00001390  43 4c 53 25 21 38 3d 53  51 52 25 3a 43 4c 53 25  |CLS%!8=SQR%:CLS%|
000013a0  21 31 32 3d 54 41 4e 25  3a 43 4c 53 25 21 31 36  |!12=TAN%:CLS%!16|
000013b0  3d 55 53 52 25 3a 43 4c  53 25 21 32 30 3d 30 3a  |=USR%:CLS%!20=0:|
000013c0  43 4c 53 25 21 32 34 3d  30 3a 43 4c 53 25 21 32  |CLS%!24=0:CLS%!2|
000013d0  38 3d 2d 31 3a c8 97 20  c8 93 20 53 50 43 25 2c  |8=-1:.. .. SPC%,|
000013e0  53 51 52 25 2c 54 41 4e  25 2d 53 50 43 25 2c 55  |SQR%,TAN%-SPC%,U|
000013f0  53 52 25 2d 53 51 52 25  0d 08 e8 78 c9 20 64 25  |SR%-SQR%...x. d%|
00001400  3a 21 43 4c 53 25 3d 64  25 3a 43 4c 53 25 21 34  |:!CLS%=d%:CLS%!4|
00001410  3d 56 44 55 25 3a 43 4c  53 25 21 38 3d 61 25 3a  |=VDU%:CLS%!8=a%:|
00001420  43 4c 53 25 21 31 32 3d  62 25 3a 43 4c 53 25 21  |CLS%!12=b%:CLS%!|
00001430  31 36 3d 63 25 3a 43 4c  53 25 21 32 30 3d 30 3a  |16=c%:CLS%!20=0:|
00001440  43 4c 53 25 21 32 34 3d  30 3a 43 4c 53 25 21 32  |CLS%!24=0:CLS%!2|
00001450  38 3d 2d 31 3a c8 97 20  c8 93 20 56 44 55 25 2c  |8=-1:.. .. VDU%,|
00001460  61 25 2c 62 25 2d 56 44  55 25 2c 63 25 2d 61 25  |a%,b%-VDU%,c%-a%|
00001470  0d 08 f2 05 7f 0d 08 fc  09 76 30 25 3d 30 0d 09  |.........v0%=0..|
00001480  06 05 cb 0d 09 10 1b e7  20 76 30 25 3c 3e 30 20  |........ v0%<>0 |
00001490  8c 20 c8 99 20 4f 52 25  2c 2c 43 4c 53 25 0d 09  |. .. OR%,,CLS%..|
000014a0  1a 05 e1 0d 09 24 0f dd  20 f2 46 30 28 43 4c 53  |.....$.. .F0(CLS|
000014b0  25 29 0d 09 2e 09 ea 20  57 30 25 0d 09 38 0e 57  |%)..... W0%..8.W|
000014c0  30 25 3d 43 4c 53 25 21  30 0d 09 42 10 e7 20 57  |0%=CLS%!0..B.. W|
000014d0  30 25 3d 2d 31 20 8c 20  e1 0d 09 4c 17 e7 20 57  |0%=-1 . ...L.. W|
000014e0  30 25 3d 6e 25 20 84 20  57 30 25 3d 73 25 20 8c  |0%=n% . W0%=s% .|
000014f0  0d 09 56 10 c8 99 20 4f  52 25 2c 2c 43 4c 53 25  |..V... OR%,,CLS%|
00001500  0d 09 60 05 cd 0d 09 6a  05 e1 0d 09 74 09 dd 20  |..`....j....t.. |
00001510  f2 43 30 0d 09 7e 0c ea  20 46 25 2c 77 30 25 0d  |.C0..~.. F%,w0%.|
00001520  09 88 21 46 25 3d 8e 28  52 55 4e 24 2b 22 2e 50  |..!F%=.(RUN$+".P|
00001530  61 67 65 73 2e 21 42 69  6e 64 69 6e 67 21 22 29  |ages.!Binding!")|
00001540  0d 09 92 2b e7 20 46 25  3d 30 20 8c 20 85 39 39  |...+. F%=0 . .99|
00001550  2c 22 54 68 69 73 20 62  6f 6f 6b 20 68 61 73 20  |,"This book has |
00001560  6e 6f 20 62 69 6e 64 69  6e 67 22 0d 09 9c 11 e8  |no binding".....|
00001570  20 23 46 25 2c 78 30 25  2c 77 30 25 0d 09 a6 0d  | #F%,x0%,w0%....|
00001580  e7 20 77 30 25 3d 31 20  8c 0d 09 b0 0d e8 20 23  |. w0%=1 ...... #|
00001590  46 25 2c 66 30 25 0d 09  ba 10 e3 20 41 25 3d 31  |F%,f0%..... A%=1|
000015a0  20 b8 20 78 30 25 0d 09  c4 12 e8 20 23 46 25 2c  | . x0%..... #F%,|
000015b0  45 52 4c 24 28 41 25 29  0d 09 ce 0e e3 20 42 25  |ERL$(A%)..... B%|
000015c0  3d 30 20 b8 20 34 0d 09  d8 15 e8 20 23 46 25 2c  |=0 . 4..... #F%,|
000015d0  45 52 52 25 28 41 25 2c  42 25 29 0d 09 e2 0e e3  |ERR%(A%,B%).....|
000015e0  20 43 25 3d 30 20 b8 20  33 0d 09 ec 18 e8 20 23  | C%=0 . 3..... #|
000015f0  46 25 2c 45 58 50 25 28  41 25 2c 42 25 2c 43 25  |F%,EXP%(A%,B%,C%|
00001600  29 0d 09 f6 07 ed 3a ed  0d 0a 00 05 ed 0d 0a 0a  |).....:.........|
00001610  05 cd 0d 0a 14 09 d9 20  23 46 25 0d 0a 1e 05 e1  |....... #F%.....|
00001620  0d 0a 28 09 dd 20 f2 79  30 0d 0a 32 0c 21 43 4c  |..(.. .y0..2.!CL|
00001630  53 25 3d 6e 25 0d 0a 3c  21 c8 99 20 22 57 69 6d  |S%=n%..<!.. "Wim|
00001640  70 5f 47 65 74 57 69 6e  64 6f 77 49 6e 66 6f 22  |p_GetWindowInfo"|
00001650  2c 2c 43 4c 53 25 0d 0a  46 2d 67 25 3d 43 4c 53  |,,CLS%..F-g%=CLS|
00001660  25 21 34 3a 68 25 3d 43  4c 53 25 21 38 3a 69 25  |%!4:h%=CLS%!8:i%|
00001670  3d 43 4c 53 25 21 31 32  3a 6a 25 3d 43 4c 53 25  |=CLS%!12:j%=CLS%|
00001680  21 31 36 0d 0a 50 24 6b  25 3d 43 4c 53 25 21 32  |!16..P$k%=CLS%!2|
00001690  30 3a 6c 25 3d 43 4c 53  25 21 32 34 3a 6d 25 3d  |0:l%=CLS%!24:m%=|
000016a0  43 4c 53 25 21 32 38 0d  0a 5a 10 f2 44 30 28 73  |CLS%!28..Z..D0(s|
000016b0  25 2c 43 4c 53 25 29 0d  0a 64 0c 21 43 4c 53 25  |%,CLS%)..d.!CLS%|
000016c0  3d 6e 25 0d 0a 6e 11 c8  99 20 41 42 53 25 2c 2c  |=n%..n... ABS%,,|
000016d0  43 4c 53 25 0d 0a 78 1b  c8 97 20 c8 93 20 6f 25  |CLS%..x... .. o%|
000016e0  2c 70 25 2c 71 25 2d 6f  25 2c 72 25 2d 70 25 0d  |,p%,q%-o%,r%-p%.|
000016f0  0a 82 05 e1 0d 0a 8c 0e  dd 20 f2 53 30 28 52 30  |......... .S0(R0|
00001700  25 29 0d 0a 96 0d 21 43  4c 53 25 3d 52 30 25 0d  |%)....!CLS%=R0%.|
00001710  0a a0 22 c8 99 20 22 57  69 6d 70 5f 47 65 74 57  |..".. "Wimp_GetW|
00001720  69 6e 64 6f 77 53 74 61  74 65 22 2c 2c 43 4c 53  |indowState",,CLS|
00001730  25 0d 0a aa 2a 7a 30 25  3d 43 4c 53 25 21 34 2d  |%...*z0%=CLS%!4-|
00001740  43 4c 53 25 21 32 30 3a  41 31 25 3d 43 4c 53 25  |CLS%!20:A1%=CLS%|
00001750  21 31 36 2d 43 4c 53 25  21 32 34 0d 0a b4 1a 42  |!16-CLS%!24....B|
00001760  31 25 3d 43 4c 53 25 21  34 3a 43 31 25 3d 43 4c  |1%=CLS%!4:C1%=CL|
00001770  53 25 21 31 36 0d 0a be  05 e1 0d 0a c8 0f dd 20  |S%!16.......... |
00001780  f2 45 30 28 43 4c 53 25  29 0d 0a d2 15 e7 20 43  |.E0(CLS%)..... C|
00001790  4c 53 25 21 30 3d 6e 25  20 8c 20 f2 44 31 0d 0a  |LS%!0=n% . .D1..|
000017a0  dc 05 e1 0d 0a e6 07 dd  f2 76 0d 0a f0 0c ea 20  |.........v..... |
000017b0  45 31 25 2c 41 25 0d 0a  fa 0e 24 44 45 47 25 3d  |E1%,A%....$DEG%=|
000017c0  52 4e 44 24 0d 0b 04 0d  44 45 47 25 3f 31 32 3d  |RND$....DEG%?12=|
000017d0  37 0d 0b 0e 0d 44 45 47  25 3f 31 33 3d 32 0d 0b  |7....DEG%?13=2..|
000017e0  18 0d 44 45 47 25 3f 31  34 3d 37 0d 0b 22 0d 44  |..DEG%?14=7..".D|
000017f0  45 47 25 3f 31 35 3d 30  0d 0b 2c 0f 44 45 47 25  |EG%?15=0..,.DEG%|
00001800  21 31 36 3d 31 34 32 0d  0b 36 0e 44 45 47 25 21  |!16=142..6.DEG%!|
00001810  32 30 3d 34 30 0d 0b 40  0d 44 45 47 25 21 32 34  |20=40..@.DEG%!24|
00001820  3d 30 0d 0b 4a 0f 45 31  25 3d 44 45 47 25 2b 32  |=0..J.E1%=DEG%+2|
00001830  38 0d 0b 54 0b 45 31 25  21 30 3d 30 0d 0b 5e 0c  |8..T.E1%!0=0..^.|
00001840  45 31 25 21 34 3d 65 25  0d 0b 68 19 45 31 25 21  |E1%!4=e%..h.E1%!|
00001850  38 3d 28 37 3c 3c 32 34  29 84 20 25 31 31 30 30  |8=(7<<24). %1100|
00001860  31 0d 0b 72 14 24 28 45  31 25 2b 31 32 29 3d 22  |1..r.$(E1%+12)="|
00001870  49 6e 66 6f 22 0d 0b 7c  0b 45 31 25 2b 3d 32 34  |Info"..|.E1%+=24|
00001880  0d 0b 86 0b 45 31 25 21  30 3d 30 0d 0b 90 0c 45  |....E1%!0=0....E|
00001890  31 25 21 34 3d 66 25 0d  0b 9a 19 45 31 25 21 38  |1%!4=f%....E1%!8|
000018a0  3d 28 37 3c 3c 32 34 29  84 20 25 31 31 30 30 31  |=(7<<24). %11001|
000018b0  0d 0b a4 15 24 28 45 31  25 2b 31 32 29 3d 22 41  |....$(E1%+12)="A|
000018c0  62 6f 75 74 22 0d 0b ae  0b 45 31 25 2b 3d 32 34  |bout"....E1%+=24|
000018d0  0d 0b b8 0d 45 31 25 21  30 3d 26 38 30 0d 0b c2  |....E1%!0=&80...|
000018e0  0b 45 31 25 21 34 3d 30  0d 0b cc 19 45 31 25 21  |.E1%!4=0....E1%!|
000018f0  38 3d 28 37 3c 3c 32 34  29 84 20 25 31 31 30 30  |8=(7<<24). %1100|
00001900  31 0d 0b d6 14 24 28 45  31 25 2b 31 32 29 3d 22  |1....$(E1%+12)="|
00001910  51 75 69 74 22 0d 0b e0  05 e1 0d 0b ea 0f dd 20  |Quit".......... |
00001920  f2 4d 30 28 43 4c 53 25  29 0d 0b f4 08 ea 20 41  |.M0(CLS%)..... A|
00001930  25 0d 0b fe 10 c8 8e 20  43 4c 53 25 21 31 36 20  |%...... CLS%!16 |
00001940  ca 0d 0c 08 0b c9 20 30  3a f2 67 30 0d 0c 12 34  |...... 0:.g0...4|
00001950  c9 20 26 34 30 30 43 31  20 3a 20 e7 20 42 30 25  |. &400C1 : . B0%|
00001960  20 8c 20 42 30 25 3d a3  3a 43 4c 53 25 21 30 3d  | . B0%=.:CLS%!0=|
00001970  6e 25 3a c8 99 20 41 42  53 25 2c 2c 43 4c 53 25  |n%:.. ABS%,,CLS%|
00001980  0d 0c 1c 0e c9 20 26 35  30 32 3a f2 46 31 0d 0c  |..... &502:.F1..|
00001990  26 05 cb 0d 0c 30 05 e1  0d 0c 3a 09 dd 20 f2 46  |&....0....:.. .F|
000019a0  31 0d 0c 44 09 e7 20 b9  20 8c 0d 0c 4e 50 47 31  |1..D.. . ...NPG1|
000019b0  24 3d 22 54 68 69 73 20  69 73 20 74 68 65 20 42  |$="This is the B|
000019c0  6f 6f 6b 20 52 65 61 64  65 72 20 77 69 6e 64 6f  |ook Reader windo|
000019d0  77 2e 7c 4d 43 6c 69 63  6b 20 68 65 72 65 20 74  |w.|MClick here t|
000019e0  6f 20 6d 6f 76 65 20 6f  6e 74 6f 20 74 68 65 20  |o move onto the |
000019f0  6e 65 78 74 20 70 61 67  65 22 0d 0c 58 05 cc 0d  |next page"..X...|
00001a00  0c 62 0a 47 31 24 3d 22  22 0d 0c 6c 05 cd 0d 0c  |.b.G1$=""..l....|
00001a10  76 0f e7 20 47 31 24 3c  3e 22 22 20 8c 0d 0c 80  |v.. G1$<>"" ....|
00001a20  12 43 4c 53 25 21 31 32  3d 43 4c 53 25 21 38 0d  |.CLS%!12=CLS%!8.|
00001a30  0c 8a 15 24 28 43 4c 53  25 2b 32 30 29 3d 47 31  |...$(CLS%+20)=G1|
00001a40  24 2b bd 30 0d 0c 94 1b  43 4c 53 25 21 30 3d 28  |$+.0....CLS%!0=(|
00001a50  32 30 2b a9 47 31 24 2b  34 29 80 20 ac 20 33 0d  |20+.G1$+4). . 3.|
00001a60  0c 9e 10 43 4c 53 25 21  31 36 3d 26 35 30 33 0d  |...CLS%!16=&503.|
00001a70  0c a8 28 c8 99 20 22 57  69 6d 70 5f 53 65 6e 64  |..(.. "Wimp_Send|
00001a80  4d 65 73 73 61 67 65 22  2c 31 38 2c 43 4c 53 25  |Message",18,CLS%|
00001a90  2c 43 4c 53 25 21 34 0d  0c b2 05 e1 0d 0c bc 09  |,CLS%!4.........|
00001aa0  dd 20 f2 46 4e 0d 0c c6  1b e7 20 9f 3d 26 31 30  |. .FN..... .=&10|
00001ab0  38 44 35 20 84 20 9f 3d  26 31 30 38 44 34 20 8c  |8D5 . .=&108D4 .|
00001ac0  0d 0c d0 45 e7 20 75 25  3d 30 20 8c 20 e5 20 8d  |...E. u%=0 . . .|
00001ad0  64 6e 4c 20 8b 20 66 30  25 3d 75 25 3a 75 25 3d  |dnL . f0%=u%:u%=|
00001ae0  30 3a 50 24 3d 52 55 4e  24 2b 22 2e 50 61 67 65  |0:P$=RUN$+".Page|
00001af0  73 2e 22 2b 45 52 4c 24  28 66 30 25 29 3a f2 4e  |s."+ERL$(f0%):.N|
00001b00  30 28 50 24 29 0d 0c da  0a e5 20 8d 44 6c 42 0d  |0(P$)..... .DlB.|
00001b10  0c e4 05 cd 0d 0c ee 19  c8 99 20 22 57 69 6d 70  |.......... "Wimp|
00001b20  5f 44 72 61 67 42 6f 78  22 2c 2c 2d 31 0d 0c f8  |_DragBox",,-1...|
00001b30  36 21 44 45 46 25 3d 9f  3a 24 28 44 45 46 25 2b  |6!DEF%=.:$(DEF%+|
00001b40  34 29 3d f6 24 2b 22 20  69 6e 74 65 72 6e 61 6c  |4)=.$+" internal|
00001b50  20 65 72 72 6f 72 20 63  6f 64 65 20 22 2b c3 9e  | error code "+..|
00001b60  2b bd 30 0d 0d 02 2d c8  99 20 22 57 69 6d 70 5f  |+.0...-.. "Wimp_|
00001b70  52 65 70 6f 72 74 45 72  72 6f 72 22 2c 44 45 46  |ReportError",DEF|
00001b80  25 2c 31 2c 22 42 6f 6f  6b 52 65 61 64 65 72 22  |%,1,"BookReader"|
00001b90  0d 0d 0c 10 ff 28 22 50  4f 49 4e 54 45 52 22 29  |.....("POINTER")|
00001ba0  0d 0d 16 07 f2 67 30 0d  0d 20 05 e1 0d 0d 2a 08  |.....g0.. ....*.|
00001bb0  dd f2 67 30 0d 0d 34 07  f2 4f 30 0d 0d 3e 10 ff  |..g0..4..O0..>..|
00001bc0  28 22 50 4f 49 4e 54 45  52 22 29 0d 0d 48 22 c8  |("POINTER")..H".|
00001bd0  99 20 22 57 69 6d 70 5f  43 6c 6f 73 65 44 6f 77  |. "Wimp_CloseDow|
00001be0  6e 22 2c 53 49 4e 25 2c  21 43 4c 47 25 0d 0d 52  |n",SIN%,!CLG%..R|
00001bf0  05 e0 0d 0d 5c 05 e1 0d  0d 66 09 dd 20 f2 4f 30  |....\....f.. .O0|
00001c00  0d 0d 70 08 ea 20 41 25  0d 0d 7a 0f e7 20 4f 46  |..p.. A%..z.. OF|
00001c10  46 25 3c 3e 30 20 8c 0d  0d 84 11 e3 20 41 25 3d  |F%<>0 ...... A%=|
00001c20  31 20 b8 20 4f 46 46 25  0d 0d 8e 1f c8 99 20 22  |1 . OFF%...... "|
00001c30  46 6f 6e 74 5f 4c 6f 73  65 46 6f 6e 74 22 2c 52  |Font_LoseFont",R|
00001c40  45 4d 25 28 41 25 29 0d  0d 98 05 ed 0d 0d a2 0a  |EM%(A%).........|
00001c50  4f 46 46 25 3d 30 0d 0d  ac 05 cd 0d 0d b6 05 e1  |OFF%=0..........|
00001c60  0d 0d c0 08 dd f2 4f 4e  0d 0d ca 14 de 20 48 31  |......ON..... H1|
00001c70  25 20 35 36 30 2c 73 30  25 20 32 34 0d 0d d4 11  |% 560,s0% 24....|
00001c80  73 30 25 21 30 30 3d 26  31 30 30 30 30 0d 0d de  |s0%!00=&10000...|
00001c90  13 73 30 25 21 30 34 3d  26 31 30 30 30 30 2a 30  |.s0%!04=&10000*0|
00001ca0  0d 0d e8 13 73 30 25 21  30 38 3d 26 31 30 30 30  |....s0%!08=&1000|
00001cb0  30 2a 30 0d 0d f2 11 73  30 25 21 31 32 3d 26 31  |0*0....s0%!12=&1|
00001cc0  30 30 30 30 0d 0d fc 10  73 30 25 21 31 36 3d 32  |0000....s0%!16=2|
00001cd0  35 36 2a 30 0d 0e 06 10  73 30 25 21 32 30 3d 32  |56*0....s0%!20=2|
00001ce0  35 36 2a 30 0d 0e 10 05  e1 0d 0e 1a 2a dd 20 f2  |56*0........*. .|
00001cf0  49 31 28 4a 31 25 2c 4b  31 25 2c 4c 31 25 2c 4d  |I1(J1%,K1%,L1%,M|
00001d00  31 25 2c 4e 31 25 2c 4f  31 25 2c 50 31 25 2c 51  |1%,N1%,O1%,P1%,Q|
00001d10  31 25 29 0d 0e 24 08 ea  52 31 25 0d 0e 2e 32 e7  |1%)..$..R1%...2.|
00001d20  21 4a 31 25 3c 3e 26 37  37 36 31 37 32 34 34 3a  |!J1%<>&77617244:|
00001d30  85 39 39 2c 22 54 68 69  73 20 69 73 20 6e 6f 74  |.99,"This is not|
00001d40  20 61 20 64 72 61 77 20  66 69 6c 65 22 0d 0e 38  | a draw file"..8|
00001d50  31 e7 4a 31 25 21 34 3e  32 30 31 3a 85 39 39 2c  |1.J1%!4>201:.99,|
00001d60  22 43 61 6e 27 74 20 64  72 61 77 20 66 69 6c 65  |"Can't draw file|
00001d70  73 20 61 66 74 65 72 20  76 32 2e 30 31 22 0d 0e  |s after v2.01"..|
00001d80  42 19 73 30 25 21 32 30  3d 32 35 36 2a 4d 31 25  |B.s0%!20=256*M1%|
00001d90  2d 4a 31 25 21 33 36 0d  0e 4c 12 73 30 25 21 31  |-J1%!36..L.s0%!1|
00001da0  36 3d 32 35 36 2a 4c 31  25 0d 0e 56 28 e7 ac a4  |6=256*L1%..V(...|
00001db0  53 31 28 4a 31 25 21 32  34 2c 4a 31 25 21 32 38  |S1(J1%!24,J1%!28|
00001dc0  2c 4a 31 25 21 33 32 2c  4a 31 25 21 33 36 29 3a  |,J1%!32,J1%!36):|
00001dd0  e1 0d 0e 60 0e 52 31 25  3d 4a 31 25 2b 34 30 0d  |...`.R1%=J1%+40.|
00001de0  0e 6a 05 f5 0d 0e 74 0c  f2 54 31 28 52 31 25 29  |.j....t..T1(R1%)|
00001df0  0d 0e 7e 0e 52 31 25 2b  3d 52 31 25 21 34 0d 0e  |..~.R1%+=R1%!4..|
00001e00  88 0d fd 52 31 25 3e 3d  4b 31 25 0d 0e 92 05 e1  |...R1%>=K1%.....|
00001e10  0d 0e 9c 15 dd a4 53 31  28 58 25 2c 59 25 2c 41  |......S1(X%,Y%,A|
00001e20  25 2c 42 25 29 0d 0e a6  23 f2 55 31 28 41 25 29  |%,B%)...#.U1(A%)|
00001e30  3a f2 55 31 28 58 25 29  3a f2 56 31 28 42 25 29  |:.U1(X%):.V1(B%)|
00001e40  3a f2 56 31 28 59 25 29  0d 0e b0 11 e7 41 25 3c  |:.V1(Y%).....A%<|
00001e50  58 25 c8 94 41 25 2c 58  25 0d 0e ba 11 e7 42 25  |X%..A%,X%.....B%|
00001e60  3c 59 25 c8 94 42 25 2c  59 25 0d 0e c4 0e e7 4e  |<Y%..B%,Y%.....N|
00001e70  31 25 3e 41 25 3a 3d a3  0d 0e ce 0e e7 50 31 25  |1%>A%:=......P1%|
00001e80  3c 58 25 3a 3d a3 0d 0e  d8 0e e7 4f 31 25 3e 42  |<X%:=......O1%>B|
00001e90  25 3a 3d a3 0d 0e e2 0e  e7 51 31 25 3c 59 25 3a  |%:=......Q1%<Y%:|
00001ea0  3d a3 0d 0e ec 06 3d b9  0d 0e f6 24 dd f2 55 31  |=.....=....$..U1|
00001eb0  28 f8 20 58 25 29 3a 58  25 3d 28 28 58 25 2b 73  |(. X%):X%=((X%+s|
00001ec0  30 25 21 31 36 29 3e 3e  38 29 3a e1 0d 0f 00 24  |0%!16)>>8):....$|
00001ed0  dd f2 56 31 28 f8 20 59  25 29 3a 59 25 3d 28 28  |..V1(. Y%):Y%=((|
00001ee0  59 25 2b 73 30 25 21 32  30 29 3e 3e 38 29 3a e1  |Y%+s0%!20)>>8):.|
00001ef0  0d 0f 0a 11 dd f2 57 31  28 45 31 25 2c 58 31 25  |......W1(E1%,X1%|
00001f00  29 0d 0f 14 0c e6 45 31  25 2c 58 31 25 0d 0f 1e  |).....E1%,X1%...|
00001f10  05 e1 0d 0f 28 0e dd f2  59 31 28 52 4e 44 25 29  |....(...Y1(RND%)|
00001f20  0d 0f 32 20 c8 99 22 43  6f 6c 6f 75 72 54 72 61  |..2 .."ColourTra|
00001f30  6e 73 5f 53 65 74 47 43  4f 4c 22 2c 52 4e 44 25  |ns_SetGCOL",RND%|
00001f40  0d 0f 3c 05 e1 0d 0f 46  0e dd 20 f2 54 31 28 52  |..<....F.. .T1(R|
00001f50  31 25 29 0d 0f 50 08 ea  6f 30 25 0d 0f 5a 0c 6f  |1%)..P..o0%..Z.o|
00001f60  30 25 3d 21 52 31 25 0d  0f 64 27 e7 ac a4 53 31  |0%=!R1%..d'...S1|
00001f70  28 52 31 25 21 38 2c 52  31 25 21 31 32 2c 52 31  |(R1%!8,R1%!12,R1|
00001f80  25 21 31 36 2c 52 31 25  21 32 30 29 3a e1 0d 0f  |%!16,R1%!20):...|
00001f90  6e 0a c8 8e 6f 30 25 ca  0d 0f 78 0f c9 31 3a f2  |n...o0%...x..1:.|
00001fa0  5a 31 28 52 31 25 29 0d  0f 82 0f c9 32 3a f2 61  |Z1(R1%).....2:.a|
00001fb0  31 28 52 31 25 29 0d 0f  8c 0f c9 35 3a f2 62 31  |1(R1%).....5:.b1|
00001fc0  28 52 31 25 29 0d 0f 96  0f c9 36 3a f2 63 31 28  |(R1%).....6:.c1(|
00001fd0  52 31 25 29 0d 0f a0 0f  c9 37 3a f2 64 31 28 52  |R1%).....7:.d1(R|
00001fe0  31 25 29 0d 0f aa 0f c9  39 3a f2 65 31 28 52 31  |1%).....9:.e1(R1|
00001ff0  25 29 0d 0f b4 0d 7f f2  66 31 28 52 31 25 29 0d  |%)......f1(R1%).|
00002000  0f be 05 cb 0d 0f c8 05  e1 0d 0f d2 0c dd f2 67  |...............g|
00002010  31 28 50 25 29 0d 0f dc  19 73 30 25 21 31 36 3d  |1(P%)....s0%!16=|
00002020  32 35 36 3a 73 30 25 21  32 30 3d 32 35 36 0d 0f  |256:s0%!20=256..|
00002030  e6 0a c8 8e 21 50 25 ca  0d 0f f0 0e c9 31 3a f2  |....!P%......1:.|
00002040  68 31 28 50 25 29 0d 0f  fa 0e c9 32 3a f2 69 31  |h1(P%).....2:.i1|
00002050  28 50 25 29 0d 10 04 0e  c9 36 3a f2 6a 31 28 50  |(P%).....6:.j1(P|
00002060  25 29 0d 10 0e 05 cb 0d  10 18 05 e1 0d 10 22 0d  |%)............".|
00002070  dd f2 68 31 28 52 31 25  29 0d 10 2c 1e 52 31 25  |..h1(R1%)..,.R1%|
00002080  21 38 3d 52 31 25 21 34  34 3a 52 31 25 21 31 32  |!8=R1%!44:R1%!12|
00002090  3d 52 31 25 21 34 38 0d  10 36 39 52 31 25 21 31  |=R1%!48..69R1%!1|
000020a0  36 3d 52 31 25 21 38 2b  a9 a4 6b 31 28 52 31 25  |6=R1%!8+..k1(R1%|
000020b0  2b 35 32 29 2a 52 31 25  21 33 36 3a 52 31 25 21  |+52)*R1%!36:R1%!|
000020c0  32 30 3d 52 31 25 21 31  32 2b 52 31 25 21 34 30  |20=R1%!12+R1%!40|
000020d0  0d 10 40 05 e1 0d 10 4a  0d dd f2 69 31 28 52 31  |..@....J...i1(R1|
000020e0  25 29 0d 10 54 16 ea 50  25 2c 46 25 2c 52 4e 44  |%)..T..P%,F%,RND|
000020f0  25 2c 6c 31 25 2c 44 25  0d 10 5e 07 f2 6d 31 0d  |%,l1%,D%..^..m1.|
00002100  10 68 3c c8 99 20 41 43  53 25 2c 50 25 2c 46 25  |.h<.. ACS%,P%,F%|
00002110  84 26 37 38 30 30 30 30  33 30 2c 73 30 25 2c 30  |.&78000030,s0%,0|
00002120  2c 52 4e 44 25 2c 6c 31  25 2c 44 25 2c 26 38 30  |,RND%,l1%,D%,&80|
00002130  30 30 30 30 30 30 2b 70  25 2b 38 0d 10 72 05 e1  |000000+p%+8..r..|
00002140  0d 10 7c 0d dd f2 6a 31  28 52 31 25 29 0d 10 86  |..|...j1(R1%)...|
00002150  13 ea 58 25 2c 59 25 2c  41 25 2c 42 25 2c 50 25  |..X%,Y%,A%,B%,P%|
00002160  0d 10 90 1d 58 25 3d 32  6e 31 3a 59 25 3d 58 25  |....X%=2n1:Y%=X%|
00002170  3a 41 25 3d 2d 58 25 3a  42 25 3d 41 25 0d 10 9a  |:A%=-X%:B%=A%...|
00002180  0d 50 25 3d 52 31 25 2b  33 36 0d 10 a4 12 c8 95  |.P%=R1%+36......|
00002190  50 25 3c 52 31 25 2b 52  31 25 21 34 0d 10 ae 13  |P%<R1%+R1%!4....|
000021a0  e7 50 25 21 38 3c 58 25  58 25 3d 50 25 21 38 0d  |.P%!8<X%X%=P%!8.|
000021b0  10 b8 15 e7 50 25 21 31  32 3c 59 25 59 25 3d 50  |....P%!12<Y%Y%=P|
000021c0  25 21 31 32 0d 10 c2 15  e7 50 25 21 31 36 3e 41  |%!12.....P%!16>A|
000021d0  25 41 25 3d 50 25 21 31  36 0d 10 cc 15 e7 50 25  |%A%=P%!16.....P%|
000021e0  21 32 30 3e 42 25 42 25  3d 50 25 21 32 30 0d 10  |!20>B%B%=P%!20..|
000021f0  d6 0c 50 25 2b 3d 50 25  21 34 0d 10 e0 05 ce 0d  |..P%+=P%!4......|
00002200  10 ea 2a 52 31 25 21 38  3d 58 25 3a 52 31 25 21  |..*R1%!8=X%:R1%!|
00002210  31 32 3d 59 25 3a 52 31  25 21 31 36 3d 41 25 3a  |12=Y%:R1%!16=A%:|
00002220  52 31 25 21 32 30 3d 42  25 0d 10 f4 05 e1 0d 10  |R1%!20=B%.......|
00002230  fe 0d dd f2 61 31 28 52  31 25 29 0d 11 08 16 ea  |....a1(R1%).....|
00002240  50 25 2c 46 25 2c 52 4e  44 25 2c 6c 31 25 2c 44  |P%,F%,RND%,l1%,D|
00002250  25 0d 11 12 07 f2 6d 31  0d 11 1c 10 e7 52 31 25  |%.....m1.....R1%|
00002260  21 32 34 3c 3e 2d 31 8c  0d 11 26 0f f2 59 31 28  |!24<>-1...&..Y1(|
00002270  52 31 25 21 32 34 29 0d  11 30 27 c8 99 20 41 4e  |R1%!24)..0'.. AN|
00002280  44 25 2c 50 25 2c 46 25  84 26 33 30 2c 73 30 25  |D%,P%,F%.&30,s0%|
00002290  2c 30 2c 52 4e 44 25 2c  6c 31 25 2c 44 25 0d 11  |,0,RND%,l1%,D%..|
000022a0  3a 05 cd 0d 11 44 10 e7  52 31 25 21 32 38 3c 3e  |:....D..R1%!28<>|
000022b0  2d 31 8c 0d 11 4e 0f f2  59 31 28 52 31 25 21 32  |-1...N..Y1(R1%!2|
000022c0  38 29 0d 11 58 28 c8 99  20 41 53 43 25 2c 50 25  |8)..X(.. ASC%,P%|
000022d0  2c 25 31 31 31 30 30 30  2c 73 30 25 2c 30 2c 52  |,%111000,s0%,0,R|
000022e0  4e 44 25 2c 6c 31 25 2c  44 25 0d 11 62 05 cd 0d  |ND%,l1%,D%..b...|
000022f0  11 6c 05 e1 0d 11 76 08  dd f2 6d 31 0d 11 80 0f  |.l....v...m1....|
00002300  6c 31 25 3d 48 31 25 2b  32 36 30 0d 11 8a 11 21  |l1%=H1%+260....!|
00002310  6c 31 25 3d 52 31 25 21  33 36 80 33 0d 11 94 24  |l1%=R1%!36.3...$|
00002320  21 6c 31 25 3d 21 6c 31  25 84 28 28 52 31 25 21  |!l1%=!l1%.((R1%!|
00002330  33 36 80 25 31 31 30 30  30 30 29 3c 3c 31 32 29  |36.%110000)<<12)|
00002340  0d 11 9e 21 21 6c 31 25  3d 21 6c 31 25 84 28 28  |...!!l1%=!l1%.((|
00002350  52 31 25 21 33 36 80 25  31 31 30 30 29 3c 3c 36  |R1%!36.%1100)<<6|
00002360  29 0d 11 a8 10 6c 31 25  21 34 3d 26 41 30 30 30  |)....l1%!4=&A000|
00002370  30 0d 11 b2 2d 6c 31 25  21 38 3d 28 28 52 31 25  |0...-l1%!8=((R1%|
00002380  3f 33 38 29 3c 3c 34 29  20 84 20 28 28 28 52 31  |?38)<<4) . (((R1|
00002390  25 3f 33 39 29 3c 3c 34  29 3c 3c 31 36 29 0d 11  |%?39)<<4)<<16)..|
000023a0  bc 10 6c 31 25 21 31 32  3d 6c 31 25 21 38 0d 11  |..l1%!12=l1%!8..|
000023b0  c6 10 e7 52 31 25 21 33  36 80 31 32 38 8c 0d 11  |...R1%!36.128...|
000023c0  d0 22 44 25 3d 52 31 25  2b 34 30 3a 50 25 3d 34  |."D%=R1%+40:P%=4|
000023d0  2a 52 31 25 21 34 34 2b  38 2b 52 31 25 2b 34 30  |*R1%!44+8+R1%+40|
000023e0  0d 11 da 05 cc 0d 11 e4  12 50 25 3d 52 31 25 2b  |.........P%=R1%+|
000023f0  34 30 3a 44 25 3d 30 0d  11 ee 05 cd 0d 11 f8 27  |40:D%=0........'|
00002400  52 4e 44 25 3d 52 31 25  21 33 32 3a 46 25 3d 30  |RND%=R1%!32:F%=0|
00002410  3a e7 52 31 25 21 33 36  80 36 34 3a 46 25 3d 46  |:.R1%!36.64:F%=F|
00002420  25 84 32 0d 12 02 05 e1  0d 12 0c 0d dd f2 5a 31  |%.2...........Z1|
00002430  28 52 31 25 29 0d 12 16  2b ea 58 25 2c 59 25 2c  |(R1%)...+.X%,Y%,|
00002440  41 25 2c 42 25 2c 43 25  2c 6f 31 25 2c 70 31 25  |A%,B%,C%,o1%,p1%|
00002450  2c 71 31 25 2c 72 31 25  2c 73 31 25 2c 74 31 25  |,q1%,r1%,s1%,t1%|
00002460  0d 12 20 25 c8 99 22 4f  53 5f 52 65 61 64 4d 6f  |.. %.."OS_ReadMo|
00002470  64 65 56 61 72 69 61 62  6c 65 22 2c eb 2c 34 20  |deVariable",.,4 |
00002480  b8 2c 2c 41 25 0d 12 2a  25 c8 99 22 4f 53 5f 52  |.,,A%..*%.."OS_R|
00002490  65 61 64 4d 6f 64 65 56  61 72 69 61 62 6c 65 22  |eadModeVariable"|
000024a0  2c eb 2c 35 20 b8 2c 2c  42 25 0d 12 34 17 58 25  |,.,5 .,,B%..4.X%|
000024b0  3d 52 31 25 21 34 34 3a  59 25 3d 52 31 25 21 34  |=R1%!44:Y%=R1%!4|
000024c0  38 0d 12 3e 13 f2 55 31  28 58 25 29 3a f2 56 31  |8..>..U1(X%):.V1|
000024d0  28 59 25 29 0d 12 48 08  43 25 3d 30 0d 12 52 05  |(Y%)..H.C%=0..R.|
000024e0  f5 0d 12 5c 09 43 25 2b  3d 31 0d 12 66 1f fd 20  |...\.C%+=1..f.. |
000024f0  50 54 52 25 28 43 25 29  3d 52 31 25 21 33 32 20  |PTR%(C%)=R1%!32 |
00002500  84 20 43 25 3d 4e 4f 54  25 0d 12 70 21 e7 20 50  |. C%=NOT%..p!. P|
00002510  54 52 25 28 43 25 29 3c  3e 52 31 25 21 33 32 20  |TR%(C%)<>R1%!32 |
00002520  8c 20 52 31 25 21 33 32  3d 30 0d 12 7a 1d e7 20  |. R1%!32=0..z.. |
00002530  52 31 25 21 33 32 3d 30  20 84 20 50 4f 53 25 28  |R1%!32=0 . POS%(|
00002540  43 25 29 3d 30 20 8c 0d  12 84 07 f2 75 31 0d 12  |C%)=0 ......u1..|
00002550  8e 05 cc 0d 12 98 1d 24  28 44 45 46 25 2b 31 30  |.......$(DEF%+10|
00002560  30 29 3d a4 6b 31 28 50  4f 53 25 28 43 25 29 29  |0)=.k1(POS%(C%))|
00002570  0d 12 a2 13 73 31 25 3d  28 52 31 25 21 33 36 29  |....s1%=(R1%!36)|
00002580  2f 34 30 0d 12 ac 13 74  31 25 3d 28 52 31 25 21  |/40....t1%=(R1%!|
00002590  34 30 29 2f 34 30 0d 12  b6 34 c8 99 20 22 58 46  |40)/40...4.. "XF|
000025a0  6f 6e 74 5f 46 69 6e 64  46 6f 6e 74 22 2c 2c 44  |ont_FindFont",,D|
000025b0  45 46 25 2b 31 30 30 2c  73 31 25 2c 74 31 25 20  |EF%+100,s1%,t1% |
000025c0  b8 20 73 31 25 20 3b 72  31 25 0d 12 c0 13 e7 20  |. s1% ;r1%..... |
000025d0  28 72 31 25 20 80 20 31  29 3d 31 20 8c 0d 12 ca  |(r1% . 1)=1 ....|
000025e0  07 f2 75 31 0d 12 d4 05  cc 0d 12 de 48 c8 99 20  |..u1........H.. |
000025f0  22 43 6f 6c 6f 75 72 54  72 61 6e 73 5f 52 65 74  |"ColourTrans_Ret|
00002600  75 72 6e 46 6f 6e 74 43  6f 6c 6f 75 72 73 22 2c  |urnFontColours",|
00002610  30 2c 52 31 25 21 32 38  2c 52 31 25 21 32 34 2c  |0,R1%!28,R1%!24,|
00002620  31 34 20 b8 20 2c 6f 31  25 2c 70 31 25 2c 71 31  |14 . ,o1%,p1%,q1|
00002630  25 0d 12 e8 19 c8 99 20  22 46 6f 6e 74 5f 53 65  |%...... "Font_Se|
00002640  74 46 6f 6e 74 22 2c 73  31 25 0d 12 f2 2a c8 99  |tFont",s1%...*..|
00002650  20 22 46 6f 6e 74 5f 53  65 74 46 6f 6e 74 43 6f  | "Font_SetFontCo|
00002660  6c 6f 75 72 73 22 2c 30  2c 6f 31 25 2c 70 31 25  |lours",0,o1%,p1%|
00002670  2c 71 31 25 0d 12 fc 25  c8 99 20 22 46 6f 6e 74  |,q1%...%.. "Font|
00002680  5f 50 61 69 6e 74 22 2c  2c 52 31 25 2b 35 32 2c  |_Paint",,R1%+52,|
00002690  26 31 30 2c 58 25 2c 59  25 0d 13 06 1a c8 99 20  |&10,X%,Y%...... |
000026a0  22 46 6f 6e 74 5f 4c 6f  73 65 46 6f 6e 74 22 2c  |"Font_LoseFont",|
000026b0  73 31 25 0d 13 10 05 cd  0d 13 1a 05 cd 0d 13 24  |s1%............$|
000026c0  05 e1 0d 13 2e 09 dd 20  f2 75 31 0d 13 38 31 ef  |....... .u1..81.|
000026d0  32 33 2c 31 37 2c 37 2c  36 2c 28 52 31 25 21 33  |23,17,7,6,(R1%!3|
000026e0  36 29 3e 3e 28 41 25 2b  38 29 3b 28 52 31 25 21  |6)>>(A%+8);(R1%!|
000026f0  34 30 29 3e 3e 28 42 25  2b 38 29 7c 0d 13 42 0f  |40)>>(B%+8)|..B.|
00002700  f2 59 31 28 52 31 25 21  32 34 29 0d 13 4c 1b ec  |.Y1(R1%!24)..L..|
00002710  58 25 2c 59 25 2b 28 28  52 31 25 21 34 30 29 3e  |X%,Y%+((R1%!40)>|
00002720  3e 31 31 29 2a 37 0d 13  56 11 f1 a4 6b 31 28 52  |>11)*7..V...k1(R|
00002730  31 25 2b 35 32 29 3b 0d  13 60 1d ef 32 33 2c 31  |1%+52);..`..23,1|
00002740  37 2c 37 2c 36 2c 31 36  3e 3e 41 25 3b 33 32 3e  |7,7,6,16>>A%;32>|
00002750  3e 42 25 7c 0d 13 6a 05  e1 0d 13 74 04 0d 13 7e  |>B%|..j....t...~|
00002760  0d dd f2 62 31 28 52 31  25 29 0d 13 88 1d ea 58  |...b1(R1%).....X|
00002770  25 2c 59 25 2c 41 25 2c  42 25 2c 76 31 25 2c 50  |%,Y%,A%,B%,v1%,P|
00002780  25 2c 77 25 2c 48 25 0d  13 92 14 76 31 25 3d 21  |%,w%,H%....v1%=!|
00002790  28 52 31 25 2b 32 34 2b  34 30 29 0d 13 9c 25 c8  |(R1%+24+40)...%.|
000027a0  99 22 4f 53 5f 52 65 61  64 4d 6f 64 65 56 61 72  |."OS_ReadModeVar|
000027b0  69 61 62 6c 65 22 2c eb  2c 34 20 b8 2c 2c 41 25  |iable",.,4 .,,A%|
000027c0  0d 13 a6 25 c8 99 22 4f  53 5f 52 65 61 64 4d 6f  |...%.."OS_ReadMo|
000027d0  64 65 56 61 72 69 61 62  6c 65 22 2c eb 2c 35 20  |deVariable",.,5 |
000027e0  b8 2c 2c 42 25 0d 13 b0  2b c8 99 22 4f 53 5f 53  |.,,B%...+.."OS_S|
000027f0  70 72 69 74 65 4f 70 22  2c 26 32 32 38 2c 2d 31  |priteOp",&228,-1|
00002800  2c 52 31 25 2b 32 34 b8  2c 2c 2c 77 25 2c 48 25  |,R1%+24.,,,w%,H%|
00002810  0d 13 ba 17 77 25 3d 77  25 3c 3c 41 25 3a 48 25  |....w%=w%<<A%:H%|
00002820  3d 48 25 3c 3c 42 25 0d  13 c4 3a e3 58 25 3d 30  |=H%<<B%...:.X%=0|
00002830  b8 31 35 3a 21 28 48 31  25 2b 33 30 30 2b 58 25  |.15:!(H1%+300+X%|
00002840  2a 34 29 3d 21 28 52 31  25 2b 32 34 2b 34 34 2b  |*4)=!(R1%+24+44+|
00002850  58 25 2a 38 29 80 26 46  46 46 46 46 46 30 30 3a  |X%*8).&FFFFFF00:|
00002860  ed 0d 13 ce 2a 58 25 3d  52 31 25 21 38 3a 59 25  |....*X%=R1%!8:Y%|
00002870  3d 52 31 25 21 31 32 3a  41 25 3d 52 31 25 21 31  |=R1%!12:A%=R1%!1|
00002880  36 3a 42 25 3d 52 31 25  21 32 30 0d 13 d8 26 e7  |6:B%=R1%!20...&.|
00002890  21 28 52 31 25 2b 32 34  2b 33 32 29 3d 26 32 43  |!(R1%+24+32)=&2C|
000028a0  3a 50 25 3d 30 3a 8b 50  25 3d 48 31 25 2b 33 30  |:P%=0:.P%=H1%+30|
000028b0  30 0d 13 e2 23 f2 55 31  28 41 25 29 3a f2 55 31  |0...#.U1(A%):.U1|
000028c0  28 58 25 29 3a f2 56 31  28 42 25 29 3a f2 56 31  |(X%):.V1(B%):.V1|
000028d0  28 59 25 29 0d 13 ec 35  48 31 25 21 32 36 30 3d  |(Y%)...5H1%!260=|
000028e0  41 25 2d 58 25 3a 48 31  25 21 32 36 34 3d 42 25  |A%-X%:H1%!264=B%|
000028f0  2d 59 25 3a 48 31 25 21  32 36 38 3d 77 25 3a 48  |-Y%:H1%!268=w%:H|
00002900  31 25 21 32 37 32 3d 48  25 0d 13 f6 31 c8 99 20  |1%!272=H%...1.. |
00002910  22 43 6f 6c 6f 75 72 54  72 61 6e 73 5f 53 65 6c  |"ColourTrans_Sel|
00002920  65 63 74 54 61 62 6c 65  22 2c 76 31 25 2c 50 25  |ectTable",v1%,P%|
00002930  2c 2d 31 2c 2d 31 2c 48  31 25 0d 14 00 37 c8 99  |,-1,-1,H1%...7..|
00002940  20 22 4f 53 5f 53 70 72  69 74 65 4f 70 22 2c 26  | "OS_SpriteOp",&|
00002950  32 33 34 2c 2d 31 2c 52  31 25 2b 32 34 2c 58 25  |234,-1,R1%+24,X%|
00002960  2c 59 25 2c 38 2c 48 31  25 2b 32 36 30 2c 48 31  |,Y%,8,H1%+260,H1|
00002970  25 0d 14 0a 05 e1 0d 14  14 0d dd f2 64 31 28 52  |%...........d1(R|
00002980  31 25 29 0d 14 1e 0f f2  54 31 28 52 31 25 2b 32  |1%).....T1(R1%+2|
00002990  38 29 0d 14 28 05 e1 0d  14 32 0d dd f2 63 31 28  |8)..(....2...c1(|
000029a0  52 31 25 29 0d 14 3c 07  ea 50 25 0d 14 46 0d 50  |R1%)..<..P%..F.P|
000029b0  25 3d 52 31 25 2b 33 36  0d 14 50 05 f5 0d 14 5a  |%=R1%+36..P....Z|
000029c0  0b f2 54 31 28 50 25 29  0d 14 64 0c 50 25 2b 3d  |..T1(P%)..d.P%+=|
000029d0  50 25 21 34 0d 14 6e 12  fd 50 25 3e 3d 52 31 25  |P%!4..n..P%>=R1%|
000029e0  2b 52 31 25 21 34 0d 14  78 05 e1 0d 14 82 0d dd  |+R1%!4..x.......|
000029f0  f2 66 31 28 52 31 25 29  0d 14 8c 10 ea 58 25 2c  |.f1(R1%).....X%,|
00002a00  59 25 2c 41 25 2c 42 25  0d 14 96 2a 58 25 3d 52  |Y%,A%,B%...*X%=R|
00002a10  31 25 21 38 3a 59 25 3d  52 31 25 21 31 32 3a 41  |1%!8:Y%=R1%!12:A|
00002a20  25 3d 52 31 25 21 31 36  3a 42 25 3d 52 31 25 21  |%=R1%!16:B%=R1%!|
00002a30  32 30 0d 14 a0 23 f2 55  31 28 41 25 29 3a f2 55  |20...#.U1(A%):.U|
00002a40  31 28 58 25 29 3a f2 56  31 28 42 25 29 3a f2 56  |1(X%):.V1(B%):.V|
00002a50  31 28 59 25 29 0d 14 aa  0c f2 57 31 28 30 2c 31  |1(Y%).....W1(0,1|
00002a60  29 0d 14 b4 19 c8 93 c8  90 58 25 2c 59 25 2c 41  |)........X%,Y%,A|
00002a70  25 2d 58 25 2c 42 25 2d  59 25 0d 14 be 0c f2 57  |%-X%,B%-Y%.....W|
00002a80  31 28 30 2c 37 29 0d 14  c8 17 c8 93 58 25 2c 59  |1(0,7)......X%,Y|
00002a90  25 2c 41 25 2d 58 25 2c  42 25 2d 59 25 0d 14 d2  |%,A%-X%,B%-Y%...|
00002aa0  05 e1 0d 14 dc 0d dd f2  65 31 28 52 31 25 29 0d  |........e1(R1%).|
00002ab0  14 e6 25 ea 58 25 2c 59  25 2c 41 25 2c 42 25 2c  |..%.X%,Y%,A%,B%,|
00002ac0  78 30 25 2c 4d 4f 44 25  2c 6c 31 25 2c 77 31 25  |x0%,MOD%,l1%,w1%|
00002ad0  2c 78 31 25 0d 14 f0 1e  77 31 25 3d 32 34 3a f2  |,x1%....w1%=24:.|
00002ae0  79 31 28 52 31 25 2c 77  31 25 29 3a 77 31 25 2b  |y1(R1%,w1%):w1%+|
00002af0  3d 34 0d 14 fa 0f 78 30  25 3d 52 31 25 21 77 31  |=4....x0%=R1%!w1|
00002b00  25 0d 15 04 0e 4d 4f 44  25 3d 78 30 25 21 30 0d  |%....MOD%=x0%!0.|
00002b10  15 0e 0a 78 30 25 2b 3d  34 0d 15 18 32 c8 99 20  |...x0%+=4...2.. |
00002b20  22 46 6f 6e 74 5f 53 74  72 69 6e 67 57 69 64 74  |"Font_StringWidt|
00002b30  68 22 2c 2c 78 30 25 2b  31 32 2c 35 30 30 30 2c  |h",,x0%+12,5000,|
00002b40  35 30 30 30 2c 26 32 30  2c 34 30 0d 15 22 1d c8  |5000,&20,40.."..|
00002b50  99 20 22 46 6f 6e 74 5f  46 75 74 75 72 65 46 6f  |. "Font_FutureFo|
00002b60  6e 74 22 20 b8 20 58 25  0d 15 2c 18 c8 99 20 22  |nt" . X%..,... "|
00002b70  46 6f 6e 74 5f 53 65 74  46 6f 6e 74 22 2c 58 25  |Font_SetFont",X%|
00002b80  0d 15 36 51 c8 99 20 22  43 6f 6c 6f 75 72 54 72  |..6Q.. "ColourTr|
00002b90  61 6e 73 5f 52 65 74 75  72 6e 46 6f 6e 74 43 6f  |ans_ReturnFontCo|
00002ba0  6c 6f 75 72 73 22 2c 30  2c 52 31 25 21 28 77 31  |lours",0,R1%!(w1|
00002bb0  25 2b 31 32 29 2c 52 31  25 21 28 77 31 25 2b 38  |%+12),R1%!(w1%+8|
00002bc0  29 2c 31 34 20 b8 20 2c  58 25 2c 59 25 2c 77 31  |),14 . ,X%,Y%,w1|
00002bd0  25 0d 15 40 28 c8 99 20  22 46 6f 6e 74 5f 53 65  |%..@(.. "Font_Se|
00002be0  74 46 6f 6e 74 43 6f 6c  6f 75 72 73 22 2c 30 2c  |tFontColours",0,|
00002bf0  58 25 2c 59 25 2c 77 31  25 0d 15 4a 12 e3 20 77  |X%,Y%,w1%..J.. w|
00002c00  31 25 3d 31 20 b8 20 4d  4f 44 25 0d 15 54 32 58  |1%=1 . MOD%..T2X|
00002c10  25 3d 28 28 78 30 25 21  30 29 20 80 20 26 46 46  |%=((x0%!0) . &FF|
00002c20  46 46 29 3c 3c 38 20 3a  59 25 3d 28 28 78 30 25  |FF)<<8 :Y%=((x0%|
00002c30  21 30 29 20 3e 3e 20 31  36 29 3c 3c 38 0d 15 5e  |!0) >> 16)<<8..^|
00002c40  32 41 25 3d 28 28 78 30  25 21 34 29 20 80 20 26  |2A%=((x0%!4) . &|
00002c50  46 46 46 46 29 3c 3c 38  20 3a 42 25 3d 28 28 78  |FFFF)<<8 :B%=((x|
00002c60  30 25 21 34 29 20 3e 3e  20 31 36 29 3c 3c 38 0d  |0%!4) >> 16)<<8.|
00002c70  15 68 23 f2 55 31 28 41  25 29 3a f2 55 31 28 58  |.h#.U1(A%):.U1(X|
00002c80  25 29 3a f2 56 31 28 42  25 29 3a f2 56 31 28 59  |%):.V1(B%):.V1(Y|
00002c90  25 29 0d 15 72 13 ec 20  58 25 2c 59 25 3a ec 20  |%)..r.. X%,Y%:. |
00002ca0  41 25 2c 59 25 0d 15 7c  31 e7 20 28 28 78 30 25  |A%,Y%..|1. ((x0%|
00002cb0  21 38 29 20 80 20 31 29  3d 31 20 8c 20 ec 20 41  |!8) . 1)=1 . . A|
00002cc0  25 2c 59 25 3a 6c 31 25  3d 26 31 31 20 8b 20 6c  |%,Y%:l1%=&11 . l|
00002cd0  31 25 3d 26 31 30 0d 15  86 27 c8 99 20 22 46 6f  |1%=&10...'.. "Fo|
00002ce0  6e 74 5f 50 61 69 6e 74  22 2c 2c 28 78 30 25 2b  |nt_Paint",,(x0%+|
00002cf0  31 32 29 2c 6c 31 25 2c  58 25 2c 59 25 0d 15 90  |12),l1%,X%,Y%...|
00002d00  19 78 30 25 2b 3d 28 78  30 25 21 38 29 20 80 20  |.x0%+=(x0%!8) . |
00002d10  28 ac 28 31 29 29 0d 15  9a 05 ed 0d 15 a4 05 e1  |(.(1))..........|
00002d20  0d 15 ae 16 dd 20 f2 50  30 28 7a 31 24 2c 4a 31  |..... .P0(z1$,J1|
00002d30  25 2c 4b 31 25 29 0d 15  b8 0c ea 52 4e 44 25 2c  |%,K1%).....RND%,|
00002d40  45 25 0d 15 c2 0a c8 8e  20 eb 20 ca 0d 15 cc 16  |E%...... . .....|
00002d50  c9 20 32 2c 34 2c 35 2c  31 30 20 3a 4f 50 54 25  |. 2,4,5,10 :OPT%|
00002d60  3d 31 0d 15 d6 05 7f 0d  15 e0 0a 4f 50 54 25 3d  |=1.........OPT%=|
00002d70  30 0d 15 ea 05 cb 0d 15  f4 09 41 32 25 3d a3 0d  |0.........A2%=..|
00002d80  15 fe 0d 52 4e 44 25 3d  8e 7a 31 24 0d 16 08 0e  |...RND%=.z1$....|
00002d90  e7 20 52 4e 44 25 3d 30  20 8c 0d 16 12 07 f2 79  |. RND%=0 ......y|
00002da0  30 0d 16 1c 05 cc 0d 16  26 14 45 25 3d a2 23 52  |0.......&.E%=.#R|
00002db0  4e 44 25 3a d9 23 52 4e  44 25 0d 16 30 1c ff 22  |ND%:.#RND%..0.."|
00002dc0  6c 6f 61 64 20 22 2b 7a  31 24 2b 22 20 22 2b c3  |load "+z1$+" "+.|
00002dd0  7e 28 4a 31 25 29 0d 16  3a 0f 4f 4c 44 25 3d 4a  |~(J1%)..:.OLD%=J|
00002de0  31 25 2b 45 25 0d 16 44  09 41 32 25 3d b9 0d 16  |1%+E%..D.A2%=...|
00002df0  4e 07 f2 42 32 0d 16 58  05 cd 0d 16 62 05 e1 0d  |N..B2..X....b...|
00002e00  16 6c 09 dd 20 f2 42 32  0d 16 76 17 ea 20 41 25  |.l.. .B2..v.. A%|
00002e10  2c 42 25 2c 43 25 2c 4d  4f 44 25 2c 43 32 25 0d  |,B%,C%,MOD%,C2%.|
00002e20  16 80 0c 50 4f 53 25 28  29 3d 30 0d 16 8a 0c 50  |...POS%()=0....P|
00002e30  54 52 25 28 29 3d 30 0d  16 94 0d 41 25 3d 4a 31  |TR%()=0....A%=J1|
00002e40  25 2b 34 30 0d 16 9e 0c  43 32 25 3d 4c 45 4e 25  |%+40....C2%=LEN%|
00002e50  0d 16 a8 10 f2 44 32 28  41 25 2c 4f 4c 44 25 29  |.....D2(A%,OLD%)|
00002e60  0d 16 b2 05 e1 0d 16 bc  11 dd 20 f2 44 32 28 41  |.......... .D2(A|
00002e70  25 2c 45 32 25 29 0d 16  c6 05 f5 0d 16 d0 12 e7  |%,E2%)..........|
00002e80  20 41 25 21 30 3d 30 20  8c 20 f2 46 32 0d 16 da  | A%!0=0 . .F2...|
00002e90  24 e7 20 41 25 21 30 3d  36 20 8c 20 f2 44 32 28  |$. A%!0=6 . .D2(|
00002ea0  41 25 2b 32 34 2b 31 32  2c 41 25 2b 41 25 21 34  |A%+24+12,A%+A%!4|
00002eb0  29 0d 16 e4 23 e7 20 41  25 21 30 3d 37 20 8c 20  |)...#. A%!0=7 . |
00002ec0  f2 44 32 28 41 25 2b 32  34 2b 34 2c 41 25 2b 41  |.D2(A%+24+4,A%+A|
00002ed0  25 21 34 29 0d 16 ee 12  e7 20 41 25 21 30 3d 39  |%!4)..... A%!0=9|
00002ee0  20 8c 20 f2 47 32 0d 16  f8 0d 4d 4f 44 25 3d 41  | . .G2....MOD%=A|
00002ef0  25 21 34 0d 17 02 0c 41  25 2b 3d 4d 4f 44 25 0d  |%!4....A%+=MOD%.|
00002f00  17 0c 16 fd 20 41 25 3e  3d 45 32 25 20 84 20 4d  |.... A%>=E2% . M|
00002f10  4f 44 25 3d 30 0d 17 16  05 e1 0d 17 20 0e dd 20  |OD%=0....... .. |
00002f20  f2 48 32 28 52 31 25 29  0d 17 2a 08 ea 20 42 25  |.H2(R1%)..*.. B%|
00002f30  0d 17 34 12 42 25 3d 28  32 34 2a 52 31 25 29 2b  |..4.B%=(24*R1%)+|
00002f40  41 25 0d 17 3e 1e 58 25  3d 28 42 25 21 38 29 3e  |A%..>.X%=(B%!8)>|
00002f50  3e 38 3a 59 25 3d 28 42  25 21 31 32 29 3e 3e 38  |>8:Y%=(B%!12)>>8|
00002f60  0d 17 48 21 49 32 25 3d  28 42 25 21 31 36 29 3e  |..H!I2%=(B%!16)>|
00002f70  3e 38 3a 4a 32 25 3d 28  42 25 21 32 30 29 3e 3e  |>8:J2%=(B%!20)>>|
00002f80  38 0d 17 52 17 4b 32 25  3d 49 32 25 2d 58 25 3a  |8..R.K2%=I2%-X%:|
00002f90  f2 4c 32 28 4b 32 25 29  0d 17 5c 1d 4b 32 25 3d  |.L2(K2%)..\.K2%=|
00002fa0  4b 32 25 2d 4d 32 25 2a  31 30 30 30 2d 4e 32 25  |K2%-M2%*1000-N2%|
00002fb0  2a 31 30 30 30 0d 17 66  0d 58 25 3d 58 25 2b 4f  |*1000..f.X%=X%+O|
00002fc0  32 25 0d 17 70 05 e1 0d  17 7a 09 dd 20 f2 47 32  |2%..p....z.. .G2|
00002fd0  0d 17 84 66 ea 20 50 32  25 2c 51 32 25 2c 52 32  |...f. P2%,Q2%,R2|
00002fe0  25 2c 53 32 25 2c 50 25  2c 54 32 25 2c 4d 4f 44  |%,S2%,P%,T2%,MOD|
00002ff0  25 2c 58 25 2c 59 25 2c  49 32 25 2c 4b 32 25 2c  |%,X%,Y%,I2%,K2%,|
00003000  4a 32 25 2c 55 32 25 2c  56 32 25 2c 57 32 25 2c  |J2%,U2%,V2%,W2%,|
00003010  58 32 25 2c 59 32 25 2c  5a 32 25 2c 4f 32 25 2c  |X2%,Y2%,Z2%,O2%,|
00003020  4e 32 25 2c 4d 32 25 2c  61 32 25 2c 62 32 25 2c  |N2%,M2%,a2%,b2%,|
00003030  44 25 2c 63 32 25 0d 17  8e 09 57 32 25 3d a3 0d  |D%,c2%....W2%=..|
00003040  17 98 29 53 32 25 3d 33  32 3a 51 32 25 3d 30 3a  |..)S2%=32:Q2%=0:|
00003050  52 32 25 3d 30 3a 56 32  25 3d 97 28 22 44 22 29  |R2%=0:V2%=.("D")|
00003060  3a 59 32 25 3d 56 32 25  0d 17 a2 0e 50 25 3d 49  |:Y2%=V2%....P%=I|
00003070  4e 54 25 2b 31 32 0d 17  ac 0d 58 32 25 3d 43 32  |NT%+12....X2%=C2|
00003080  25 2b 34 0d 17 b6 0a 21  43 32 25 3d 30 0d 17 c0  |%+4....!C2%=0...|
00003090  10 44 25 3d 31 20 3a 63  32 25 3d 44 25 0d 17 ca  |.D%=1 :c2%=D%...|
000030a0  0f 4e 32 25 3d 31 3a 4d  32 25 3d 31 0d 17 d4 26  |.N2%=1:M2%=1...&|
000030b0  5a 32 25 3d 4e 32 25 3a  4f 32 25 3d 4d 32 25 3a  |Z2%=N2%:O2%=M2%:|
000030c0  20 f2 64 32 28 5a 32 25  29 3a f2 64 32 28 4f 32  | .d2(Z2%):.d2(O2|
000030d0  25 29 0d 17 de 13 50 32  25 3d 31 30 3a f2 64 32  |%)....P2%=10:.d2|
000030e0  28 50 32 25 29 0d 17 e8  0a f2 48 32 28 31 29 0d  |(P2%).....H2(1).|
000030f0  17 f2 0c 4a 32 25 2b 3d  50 32 25 0d 17 fc 11 55  |...J2%+=P2%....U|
00003100  32 25 3d 41 25 2b 28 41  25 21 34 29 0d 18 06 0a  |2%=A%+(A%!4)....|
00003110  7a 31 25 3d 32 34 0d 18  10 0f f2 79 31 28 41 25  |z1%=24.....y1(A%|
00003120  2c 7a 31 25 29 0d 18 1a  0e 7a 31 25 2b 3d 32 30  |,z1%)....z1%+=20|
00003130  2b 41 25 0d 18 24 0f 62  32 25 3d a3 3a 61 32 25  |+A%..$.b2%=.:a2%|
00003140  3d b9 0d 18 2e 05 f5 0d  18 38 0d 4d 4f 44 25 3d  |=........8.MOD%=|
00003150  3f 7a 31 25 0d 18 42 22  e7 20 4d 4f 44 25 3d 26  |?z1%..B". MOD%=&|
00003160  35 43 20 8c 20 f2 65 32  3a 7a 31 25 2d 3d 31 3a  |5C . .e2:z1%-=1:|
00003170  e5 20 8d 44 7e 58 0d 18  4c 17 e7 20 4d 4f 44 25  |. .D~X..L.. MOD%|
00003180  3d 39 20 8c 20 4d 4f 44  25 3d 26 32 30 0d 18 56  |=9 . MOD%=&20..V|
00003190  25 e7 20 4d 4f 44 25 3e  26 31 46 20 8c 20 3f 50  |%. MOD%>&1F . ?P|
000031a0  25 3d 4d 4f 44 25 3a 50  25 2b 3d 31 3a 62 32 25  |%=MOD%:P%+=1:b2%|
000031b0  3d b9 0d 18 60 1d e7 20  62 32 25 3d a3 20 80 20  |=...`.. b2%=. . |
000031c0  4d 4f 44 25 3d 26 41 20  8c 20 61 32 25 3d b9 0d  |MOD%=&A . a2%=..|
000031d0  18 6a 30 e7 20 4d 4f 44  25 3d 26 41 20 80 20 50  |.j0. MOD%=&A . P|
000031e0  25 3e 28 49 4e 54 25 2b  31 32 29 20 80 20 3f 28  |%>(INT%+12) . ?(|
000031f0  50 25 2d 31 29 3d 26 32  30 20 8c 20 f2 66 32 0d  |P%-1)=&20 . .f2.|
00003200  18 74 2c e7 20 4d 4f 44  25 3d 26 41 20 80 20 50  |.t,. MOD%=&A . P|
00003210  25 3e 28 49 4e 54 25 2b  31 32 29 20 8c 20 3f 50  |%>(INT%+12) . ?P|
00003220  25 3d 26 32 30 3a 50 25  2b 3d 31 0d 18 7e 1e e7  |%=&20:P%+=1..~..|
00003230  20 57 32 25 20 80 20 50  25 3e 28 49 4e 54 25 2b  | W2% . P%>(INT%+|
00003240  31 34 29 20 8c 20 f2 66  32 0d 18 88 0a 7a 31 25  |14) . .f2....z1%|
00003250  2b 3d 31 0d 18 92 2d fd  20 7a 31 25 3e 3d 55 32  |+=1...-. z1%>=U2|
00003260  25 20 84 20 58 32 25 3e  4c 45 4e 25 2b 32 30 30  |% . X2%>LEN%+200|
00003270  30 20 84 20 50 25 3e 49  4e 54 25 2b 32 30 30 30  |0 . P%>INT%+2000|
00003280  0d 18 9c 18 e7 20 50 25  3e 28 49 4e 54 25 2b 31  |..... P%>(INT%+1|
00003290  32 29 20 8c 20 f2 66 32  0d 18 a6 1d 7a 31 25 3d  |2) . .f2....z1%=|
000032a0  32 34 3a f2 79 31 28 41  25 2c 7a 31 25 29 3a 7a  |24:.y1(A%,z1%):z|
000032b0  31 25 2b 3d 34 0d 18 b0  0e 41 25 21 7a 31 25 3d  |1%+=4....A%!z1%=|
000032c0  43 32 25 0d 18 ba 0b 43  32 25 3d 58 32 25 0d 18  |C2%....C2%=X2%..|
000032d0  c4 05 e1 0d 18 ce 14 dd  20 f2 79 31 28 67 32 25  |........ .y1(g2%|
000032e0  2c f8 20 52 31 25 29 0d  18 d8 11 c8 95 20 67 32  |,. R1%)...... g2|
000032f0  25 21 52 31 25 3d 31 30  0d 18 e2 14 52 31 25 2b  |%!R1%=10....R1%+|
00003300  3d 67 32 25 21 28 52 31  25 2b 34 29 0d 18 ec 05  |=g2%!(R1%+4)....|
00003310  ce 0d 18 f6 05 e1 0d 19  00 09 dd 20 f2 66 32 0d  |........... .f2.|
00003320  19 0a 26 ea 20 68 32 25  2c 69 32 25 2c 6a 32 25  |..&. h2%,i2%,j2%|
00003330  2c 45 52 4c 25 2c 6b 32  25 2c 78 31 25 2c 6c 32  |,ERL%,k2%,x1%,l2|
00003340  25 2c 6d 32 25 0d 19 14  0e e7 20 4a 32 25 3e 59  |%,m2%..... J2%>Y|
00003350  25 20 8c 0d 19 1e 0b 6c  32 25 3d 56 32 25 0d 19  |% .....l2%=V2%..|
00003360  28 0a 50 25 3f 30 3d 30  0d 19 32 09 57 32 25 3d  |(.P%?0=0..2.W2%=|
00003370  a3 0d 19 3c 14 6a 32 25  3d 50 25 2d 28 49 4e 54  |...<.j2%=P%-(INT|
00003380  25 2b 31 33 29 0d 19 46  05 f5 0d 19 50 3d 49 4e  |%+13)..F....P=IN|
00003390  54 25 21 30 3d 28 58 25  20 80 20 26 46 46 46 46  |T%!0=(X% . &FFFF|
000033a0  29 20 84 20 28 28 28 4a  32 25 20 80 20 26 46 46  |) . (((J2% . &FF|
000033b0  46 46 29 20 3c 3c 20 31  36 29 20 80 20 26 46 46  |FF) << 16) . &FF|
000033c0  46 46 30 30 30 30 29 0d  19 5a 2f 49 4e 54 25 21  |FF0000)..Z/INT%!|
000033d0  34 3d 28 49 32 25 20 80  20 26 46 46 46 46 29 20  |4=(I2% . &FFFF) |
000033e0  84 20 28 28 59 25 20 80  20 26 46 46 46 46 29 20  |. ((Y% . &FFFF) |
000033f0  3c 3c 20 31 36 29 0d 19  64 44 c8 99 20 22 46 6f  |<< 16)..dD.. "Fo|
00003400  6e 74 5f 53 74 72 69 6e  67 57 69 64 74 68 22 2c  |nt_StringWidth",|
00003410  2c 49 4e 54 25 2b 31 32  2c 4b 32 25 2c 4b 32 25  |,INT%+12,K2%,K2%|
00003420  2c 26 32 30 2c 6a 32 25  20 b8 20 2c 45 52 4c 25  |,&20,j2% . ,ERL%|
00003430  2c 6d 32 25 2c 2c 2c 69  32 25 0d 19 6e 1e c8 99  |,m2%,,,i2%..n...|
00003440  20 22 46 6f 6e 74 5f 46  75 74 75 72 65 46 6f 6e  | "Font_FutureFon|
00003450  74 22 20 b8 20 78 31 25  0d 19 78 19 c8 99 20 22  |t" . x1%..x... "|
00003460  46 6f 6e 74 5f 53 65 74  46 6f 6e 74 22 2c 78 31  |Font_SetFont",x1|
00003470  25 0d 19 82 0e e7 20 69  32 25 3c 3e 30 20 8c 0d  |%..... i2%<>0 ..|
00003480  19 8c 0c 6a 32 25 2d 3d  69 32 25 0d 19 96 41 c8  |...j2%-=i2%...A.|
00003490  99 20 22 46 6f 6e 74 5f  53 74 72 69 6e 67 57 69  |. "Font_StringWi|
000034a0  64 74 68 22 2c 2c 49 4e  54 25 2b 31 32 2b 69 32  |dth",,INT%+12+i2|
000034b0  25 2c 4b 32 25 2c 4b 32  25 2c 26 32 30 2c 6a 32  |%,K2%,K2%,&20,j2|
000034c0  25 20 b8 20 2c 2c 2c 2c  2c 68 32 25 0d 19 a0 25  |% . ,,,,,h2%...%|
000034d0  e7 20 68 32 25 3d 30 20  80 20 56 32 25 3d 97 28  |. h2%=0 . V2%=.(|
000034e0  22 44 22 29 20 8c 20 56  32 25 3d 97 28 22 4c 22  |"D") . V2%=.("L"|
000034f0  29 0d 19 aa 12 e7 20 56  32 25 3d 97 28 22 43 22  |)..... V2%=.("C"|
00003500  29 20 8c 0d 19 b4 13 78  31 25 3d 28 4b 32 25 2d  |) .....x1%=(K2%-|
00003510  6d 32 25 29 2f 32 0d 19  be 29 c8 99 20 22 46 6f  |m2%)/2...).. "Fo|
00003520  6e 74 5f 43 6f 6e 76 65  72 74 74 6f 4f 53 22 2c  |nt_ConverttoOS",|
00003530  2c 78 31 25 2c 78 31 25  20 b8 20 2c 78 31 25 0d  |,x1%,x1% . ,x1%.|
00003540  19 c8 43 49 4e 54 25 21  30 3d 28 28 58 25 2b 78  |..CINT%!0=((X%+x|
00003550  31 25 29 20 80 20 26 46  46 46 46 29 20 84 20 28  |1%) . &FFFF) . (|
00003560  28 28 4a 32 25 20 80 20  26 46 46 46 46 29 20 3c  |((J2% . &FFFF) <|
00003570  3c 20 31 36 29 20 80 20  26 46 46 46 46 30 30 30  |< 16) . &FFFF000|
00003580  30 29 0d 19 d2 05 cd 0d  19 dc 12 e7 20 56 32 25  |0).......... V2%|
00003590  3d 97 28 22 52 22 29 20  8c 0d 19 e6 0f 78 31 25  |=.("R") .....x1%|
000035a0  3d 4b 32 25 2d 6d 32 25  0d 19 f0 29 c8 99 20 22  |=K2%-m2%...).. "|
000035b0  46 6f 6e 74 5f 43 6f 6e  76 65 72 74 74 6f 4f 53  |Font_ConverttoOS|
000035c0  22 2c 2c 78 31 25 2c 78  31 25 20 b8 20 2c 78 31  |",,x1%,x1% . ,x1|
000035d0  25 0d 19 fa 43 49 4e 54  25 21 30 3d 28 28 58 25  |%...CINT%!0=((X%|
000035e0  2b 78 31 25 29 20 80 20  26 46 46 46 46 29 20 84  |+x1%) . &FFFF) .|
000035f0  20 28 28 28 4a 32 25 20  80 20 26 46 46 46 46 29  | (((J2% . &FFFF)|
00003600  20 3c 3c 20 31 36 29 20  80 20 26 46 46 46 46 30  | << 16) . &FFFF0|
00003610  30 30 30 29 0d 1a 04 05  cd 0d 1a 0e 0d f2 6e 32  |000)..........n2|
00003620  28 45 52 4c 25 29 0d 1a  18 0b 56 32 25 3d 6c 32  |(ERL%)....V2%=l2|
00003630  25 0d 1a 22 15 e3 20 6b  32 25 3d 31 32 20 b8 20  |%..".. k2%=12 . |
00003640  6a 32 25 2b 31 32 0d 1a  2c 1b 49 4e 54 25 3f 6b  |j2%+12..,.INT%?k|
00003650  32 25 3d 3f 28 45 52 4c  25 2b 6b 32 25 2d 31 31  |2%=?(ERL%+k2%-11|
00003660  29 0d 1a 36 05 ed 0d 1a  40 05 cd 0d 1a 4a 0c 4a  |)..6....@....J.J|
00003670  32 25 2d 3d 53 32 25 0d  1a 54 10 e7 20 28 4a 32  |2%-=S2%..T.. (J2|
00003680  25 29 3c 59 25 20 8c 0d  1a 5e 26 e7 20 63 32 25  |%)<Y% ...^&. c2%|
00003690  3c 44 25 20 8c 20 63 32  25 2b 3d 31 3a f2 48 32  |<D% . c2%+=1:.H2|
000036a0  28 63 32 25 29 20 8b 20  6a 32 25 3d 30 0d 1a 68  |(c2%) . j2%=0..h|
000036b0  05 cd 0d 1a 72 1b fd 20  6a 32 25 3c 31 20 84 20  |....r.. j2%<1 . |
000036c0  69 32 25 3d 30 20 84 20  68 32 25 3d 30 0d 1a 7c  |i2%=0 . h2%=0..||
000036d0  05 cd 0d 1a 86 0e 50 25  3d 49 4e 54 25 2b 31 32  |......P%=INT%+12|
000036e0  0d 1a 90 18 e7 20 56 32  25 3c 3e 59 32 25 20 8c  |..... V2%<>Y2% .|
000036f0  20 56 32 25 3d 59 32 25  0d 1a 9a 17 e7 20 61 32  | V2%=Y2%..... a2|
00003700  25 20 8c 20 4a 32 25 3d  4a 32 25 2d 50 32 25 0d  |% . J2%=J2%-P2%.|
00003710  1a a4 0b e7 20 57 32 25  20 8c 0d 1a ae 15 4a 32  |.... W2% .....J2|
00003720  25 3d 4a 32 25 2b 50 32  25 3a 57 32 25 3d a3 0d  |%=J2%+P2%:W2%=..|
00003730  1a b8 05 cd 0d 1a c2 05  e1 0d 1a cc 0f dd 20 f2  |.............. .|
00003740  4c 32 28 f8 20 58 25 29  0d 1a d6 2a c8 99 20 22  |L2(. X%)...*.. "|
00003750  46 6f 6e 74 5f 43 6f 6e  76 65 72 74 74 6f 70 6f  |Font_Converttopo|
00003760  69 6e 74 73 22 2c 2c 58  25 2c 58 25 20 b8 20 2c  |ints",,X%,X% . ,|
00003770  58 25 0d 1a e0 05 e1 0d  1a ea 09 dd 20 f2 65 32  |X%.......... .e2|
00003780  0d 1a f4 19 ea 20 58 31  25 2c 6f 32 25 2c 4b 31  |..... X1%,o2%,K1|
00003790  25 2c 56 30 25 2c 70 32  25 0d 1a fe 0a 7a 31 25  |%,V0%,p2%....z1%|
000037a0  2b 3d 31 0d 1b 08 0c 58  31 25 3d 3f 7a 31 25 0d  |+=1....X1%=?z1%.|
000037b0  1b 12 19 e7 20 58 31 25  3e 26 32 46 20 80 20 58  |.... X1%>&2F . X|
000037c0  31 25 3c 26 33 41 20 8c  0d 1b 1c 0b 6f 32 25 3d  |1%<&3A .....o2%=|
000037d0  a4 71 32 0d 1b 26 09 4b  31 25 3d 30 0d 1b 30 05  |.q2..&.K1%=0..0.|
000037e0  f5 0d 1b 3a 0a 4b 31 25  2b 3d 31 0d 1b 44 1e fd  |...:.K1%+=1..D..|
000037f0  20 52 41 44 25 28 4b 31  25 29 3d 6f 32 25 20 84  | RAD%(K1%)=o2% .|
00003800  20 4b 31 25 3d 4e 4f 54  25 0d 1b 4e 10 3f 50 25  | K1%=NOT%..N.?P%|
00003810  3d 32 36 3a 50 25 2b 3d  31 0d 1b 58 17 3f 50 25  |=26:P%+=1..X.?P%|
00003820  3d 52 45 4d 25 28 4b 31  25 29 20 80 20 26 46 46  |=REM%(K1%) . &FF|
00003830  0d 1b 62 09 50 25 2b 3d  31 0d 1b 6c 05 cc 0d 1b  |..b.P%+=1..l....|
00003840  76 0c c8 8e 20 58 31 25  20 ca 0d 1b 80 12 c9 20  |v... X1% ...... |
00003850  97 28 22 21 22 29 20 3a  20 f2 72 32 0d 1b 8a 2a  |.("!") : .r2...*|
00003860  c9 20 97 28 22 50 22 29  20 3a 20 7a 31 25 2b 3d  |. .("P") : z1%+=|
00003870  31 3a 50 32 25 3d a4 71  32 3a f2 64 32 28 50 32  |1:P2%=.q2:.d2(P2|
00003880  25 29 3a f2 73 32 0d 1b  94 16 c9 20 97 28 22 56  |%):.s2..... .("V|
00003890  22 29 20 3a 20 f2 74 32  3a f2 73 32 0d 1b 9e 16  |") : .t2:.s2....|
000038a0  c9 20 97 28 22 55 22 29  20 3a 20 f2 75 32 3a f2  |. .("U") : .u2:.|
000038b0  73 32 0d 1b a8 43 c9 20  97 28 22 43 22 29 20 3a  |s2...C. .("C") :|
000038c0  20 3f 50 25 3d 31 38 3a  50 25 2b 3d 31 3a f2 76  | ?P%=18:P%+=1:.v|
000038d0  32 3a 3f 50 25 3d 56 30  25 3a 50 25 3f 31 3d 4b  |2:?P%=V0%:P%?1=K|
000038e0  31 25 3a 50 25 3f 32 3d  70 32 25 3a 50 25 2b 3d  |1%:P%?2=p2%:P%+=|
000038f0  33 3a f2 73 32 0d 1b b2  1e c9 20 26 32 46 20 20  |3:.s2..... &2F  |
00003900  20 20 20 20 3a 20 3f 50  25 3d 26 32 46 3a 50 25  |    : ?P%=&2F:P%|
00003910  2b 3d 31 0d 1b bc 16 c9  20 26 30 41 20 20 20 20  |+=1..... &0A    |
00003920  20 20 3a 20 57 32 25 3d  b9 0d 1b c6 20 c9 20 97  |  : W2%=.... . .|
00003930  28 22 44 22 29 20 3a 20  7a 31 25 2b 3d 31 3a 44  |("D") : z1%+=1:D|
00003940  25 3d a4 71 32 3a f2 73  32 0d 1b d0 23 c9 20 97  |%=.q2:.s2...#. .|
00003950  28 22 41 22 29 20 3a 20  59 32 25 3d 7a 31 25 3f  |("A") : Y2%=z1%?|
00003960  31 3a 7a 31 25 2b 3d 32  3a f2 77 32 0d 1b da 16  |1:z1%+=2:.w2....|
00003970  e7 20 3f 7a 31 25 3d 26  41 20 8c 20 7a 31 25 2b  |. ?z1%=&A . z1%+|
00003980  3d 31 0d 1b e4 1a e7 20  50 25 3e 28 49 4e 54 25  |=1..... P%>(INT%|
00003990  2b 31 32 29 20 8c 20 57  32 25 3d b9 0d 1b ee 26  |+12) . W2%=....&|
000039a0  c9 20 97 28 22 4c 22 29  20 3a 20 7a 31 25 2b 3d  |. .("L") : z1%+=|
000039b0  31 3a 53 32 25 3d a4 71  32 3a f2 64 32 28 53 32  |1:S2%=.q2:.d2(S2|
000039c0  25 29 0d 1b f8 12 c9 20  97 28 22 46 22 29 20 3a  |%)..... .("F") :|
000039d0  20 f2 78 32 0d 1c 02 09  7f 20 f2 72 32 0d 1c 0c  | .x2..... .r2...|
000039e0  05 cb 0d 1c 16 05 cd 0d  1c 20 05 e1 0d 1c 2a 09  |......... ....*.|
000039f0  dd 20 f2 76 32 0d 1c 34  0f ea 20 79 32 25 2c 47  |. .v2..4.. y2%,G|
00003a00  25 2c 42 25 0d 1c 3e 0a  7a 31 25 2b 3d 31 0d 1c  |%,B%..>.z1%+=1..|
00003a10  48 1f 79 32 25 3d a4 71  32 3a e7 20 79 32 25 3e  |H.y2%=.q2:. y2%>|
00003a20  32 35 35 20 8c 20 79 32  25 3d 32 35 35 0d 1c 52  |255 . y2%=255..R|
00003a30  1c 47 25 3d a4 71 32 3a  e7 20 47 25 3e 32 35 35  |.G%=.q2:. G%>255|
00003a40  20 8c 20 47 25 3d 32 35  35 0d 1c 5c 1c 42 25 3d  | . G%=255..\.B%=|
00003a50  a4 71 32 3a e7 20 42 25  3e 32 35 35 20 8c 20 42  |.q2:. B%>255 . B|
00003a60  25 3d 32 35 35 0d 1c 66  2b 4b 31 25 3d 28 42 25  |%=255..f+K1%=(B%|
00003a70  20 3c 3c 20 32 34 29 20  84 20 28 47 25 3c 3c 31  | << 24) . (G%<<1|
00003a80  36 20 29 20 84 20 28 79  32 25 20 3c 3c 20 38 29  |6 ) . (y2% << 8)|
00003a90  0d 1c 70 48 c8 99 20 22  43 6f 6c 6f 75 72 54 72  |..pH.. "ColourTr|
00003aa0  61 6e 73 5f 52 65 74 75  72 6e 46 6f 6e 74 43 6f  |ans_ReturnFontCo|
00003ab0  6c 6f 75 72 73 22 2c 30  2c 26 46 46 46 46 46 46  |lours",0,&FFFFFF|
00003ac0  30 30 2c 4b 31 25 2c 31  34 20 b8 20 2c 56 30 25  |00,K1%,14 . ,V0%|
00003ad0  2c 4b 31 25 2c 70 32 25  0d 1c 7a 05 e1 0d 1c 84  |,K1%,p2%..z.....|
00003ae0  09 dd 20 f2 73 32 0d 1c  8e 0d c8 8e 20 3f 7a 31  |.. .s2...... ?z1|
00003af0  25 20 ca 0d 1c 98 10 c9  20 26 41 20 3a 7a 31 25  |% ...... &A :z1%|
00003b00  2b 3d 31 0d 1c a2 10 c9  20 26 32 46 3a 7a 31 25  |+=1..... &2F:z1%|
00003b10  2b 3d 31 0d 1c ac 05 cb  0d 1c b6 05 e1 0d 1c c0  |+=1.............|
00003b20  09 dd 20 f2 75 32 0d 1c  ca 09 ea 20 7a 32 25 0d  |.. .u2..... z2%.|
00003b30  1c d4 10 3f 50 25 3d 32  35 3a 50 25 2b 3d 31 0d  |...?P%=25:P%+=1.|
00003b40  1c de 0a 7a 31 25 2b 3d  31 0d 1c e8 10 e7 20 3f  |...z1%+=1..... ?|
00003b50  7a 31 25 3d 26 32 45 20  8c 0d 1c f2 0f 3f 50 25  |z1%=&2E .....?P%|
00003b60  3d 30 3a 50 25 2b 3d 31  0d 1c fc 0f 3f 50 25 3d  |=0:P%+=1....?P%=|
00003b70  30 3a 50 25 2b 3d 31 0d  1d 06 0a 7a 31 25 2b 3d  |0:P%+=1....z1%+=|
00003b80  31 0d 1d 10 05 cc 0d 1d  1a 0b 7a 32 25 3d a4 71  |1.........z2%=.q|
00003b90  32 0d 1d 24 11 3f 50 25  3d 7a 32 25 3a 50 25 2b  |2..$.?P%=z2%:P%+|
00003ba0  3d 31 0d 1d 2e 0b 7a 32  25 3d a4 71 32 0d 1d 38  |=1....z2%=.q2..8|
00003bb0  11 3f 50 25 3d 7a 32 25  3a 50 25 2b 3d 31 0d 1d  |.?P%=z2%:P%+=1..|
00003bc0  42 05 cd 0d 1d 4c 05 e1  0d 1d 56 09 dd 20 f2 74  |B....L....V.. .t|
00003bd0  32 0d 1d 60 09 ea 20 7a  32 25 0d 1d 6a 0a 7a 31  |2..`.. z2%..j.z1|
00003be0  25 2b 3d 31 0d 1d 74 10  3f 50 25 3d 31 31 3a 50  |%+=1..t.?P%=11:P|
00003bf0  25 2b 3d 31 0d 1d 7e 0b  7a 32 25 3d a4 71 32 0d  |%+=1..~.z2%=.q2.|
00003c00  1d 88 10 7a 32 25 3d 7a  32 25 2a 31 32 35 30 0d  |...z2%=z2%*1250.|
00003c10  1d 92 11 3f 50 25 3d 7a  32 25 20 80 20 26 46 46  |...?P%=z2% . &FF|
00003c20  0d 1d 9c 19 50 25 3f 31  3d 28 7a 32 25 20 80 20  |....P%?1=(z2% . |
00003c30  26 46 46 30 30 29 3e 3e  38 0d 1d a6 1c 50 25 3f  |&FF00)>>8....P%?|
00003c40  32 3d 28 7a 32 25 20 80  20 26 46 46 30 30 30 30  |2=(z2% . &FF0000|
00003c50  29 3e 3e 31 36 0d 1d b0  09 50 25 2b 3d 33 0d 1d  |)>>16....P%+=3..|
00003c60  ba 05 e1 0d 1d c4 10 dd  20 f2 64 32 28 f8 20 75  |........ .d2(. u|
00003c70  30 25 29 0d 1d ce 10 75  30 25 3d 75 30 25 2a 31  |0%)....u0%=u0%*1|
00003c80  30 30 30 0d 1d d8 29 c8  99 20 22 46 6f 6e 74 5f  |000...).. "Font_|
00003c90  43 6f 6e 76 65 72 74 74  6f 4f 53 22 2c 2c 75 30  |ConverttoOS",,u0|
00003ca0  25 2c 75 30 25 20 b8 20  2c 75 30 25 0d 1d e2 05  |%,u0% . ,u0%....|
00003cb0  e1 0d 1d ec 09 dd 20 f2  78 32 0d 1d f6 17 ea 20  |...... .x2..... |
00003cc0  44 25 2c 41 33 25 2c 77  25 2c 42 33 25 2c 72 31  |D%,A3%,w%,B3%,r1|
00003cd0  25 0d 1e 00 05 f5 0d 1e  0a 0a 7a 31 25 2b 3d 31  |%.........z1%+=1|
00003ce0  0d 1e 14 0f fd 20 3f 7a  31 25 3c 3e 26 32 30 0d  |..... ?z1%<>&20.|
00003cf0  1e 1e 0a 44 25 3d a4 71  32 0d 1e 28 18 c8 95 20  |...D%=.q2..(... |
00003d00  3f 7a 31 25 3d 26 32 30  3a 7a 31 25 2b 3d 31 3a  |?z1%=&20:z1%+=1:|
00003d10  ce 0d 1e 32 0b 42 33 25  3d 7a 31 25 0d 1e 3c 05  |...2.B3%=z1%..<.|
00003d20  f5 0d 1e 46 0a 7a 31 25  2b 3d 31 0d 1e 50 0e fd  |...F.z1%+=1..P..|
00003d30  20 3f 7a 31 25 3d 26 32  30 0d 1e 5a 0b 3f 7a 31  | ?z1%=&20..Z.?z1|
00003d40  25 3d 31 33 0d 1e 64 05  f5 0d 1e 6e 0a 7a 31 25  |%=13..d....n.z1%|
00003d50  2b 3d 31 0d 1e 78 0f fd  20 3f 7a 31 25 3c 3e 26  |+=1..x.. ?z1%<>&|
00003d60  32 30 0d 1e 82 0b 41 33  25 3d a4 71 32 0d 1e 8c  |20....A3%=.q2...|
00003d70  38 e7 20 3f 7a 31 25 3d  26 41 20 84 20 3f 7a 31  |8. ?z1%=&A . ?z1|
00003d80  25 3d 26 32 46 20 8c 20  77 25 3d 41 33 25 3a 7a  |%=&2F . w%=A3%:z|
00003d90  31 25 2b 3d 31 20 8b 20  77 25 3d a4 71 32 3a 7a  |1%+=1 . w%=.q2:z|
00003da0  31 25 2b 3d 31 0d 1e 96  0b 4f 46 46 25 2b 3d 31  |1%+=1....OFF%+=1|
00003db0  0d 1e a0 11 52 41 44 25  28 4f 46 46 25 29 3d 44  |....RAD%(OFF%)=D|
00003dc0  25 0d 1e aa 3f c8 99 20  22 58 46 6f 6e 74 5f 46  |%...?.. "XFont_F|
00003dd0  69 6e 64 46 6f 6e 74 22  2c 2c 42 33 25 2c 41 33  |indFont",,B3%,A3|
00003de0  25 2a 31 36 2c 77 25 2a  31 36 2c 30 2c 30 20 b8  |%*16,w%*16,0,0 .|
00003df0  20 52 45 4d 25 28 4f 46  46 25 29 20 3b 72 31 25  | REM%(OFF%) ;r1%|
00003e00  0d 1e b4 13 e7 20 28 72  31 25 20 80 20 31 29 3d  |..... (r1% . 1)=|
00003e10  31 20 8c 0d 1e be 46 c8  99 20 22 46 6f 6e 74 5f  |1 ....F.. "Font_|
00003e20  46 69 6e 64 46 6f 6e 74  22 2c 2c 22 54 72 69 6e  |FindFont",,"Trin|
00003e30  69 74 79 2e 4d 65 64 69  75 6d 22 2c 41 33 25 2a  |ity.Medium",A3%*|
00003e40  31 36 2c 77 25 2a 31 36  2c 30 2c 30 20 b8 20 52  |16,w%*16,0,0 . R|
00003e50  45 4d 25 28 4f 46 46 25  29 0d 1e c8 05 cd 0d 1e  |EM%(OFF%).......|
00003e60  d2 05 e1 0d 1e dc 09 dd  20 a4 71 32 0d 1e e6 0c  |........ .q2....|
00003e70  ea 20 50 25 2c 43 33 25  0d 1e f0 0e 50 25 3d 30  |. P%,C3%....P%=0|
00003e80  3a 43 33 25 3d 31 0d 1e  fa 0f c8 95 20 3f 7a 31  |:C3%=1...... ?z1|
00003e90  25 3d 26 32 30 0d 1f 04  0a 7a 31 25 2b 3d 31 0d  |%=&20....z1%+=1.|
00003ea0  1f 0e 05 ce 0d 1f 18 21  e7 20 3f 7a 31 25 3d 97  |.......!. ?z1%=.|
00003eb0  28 22 2d 22 29 20 8c 20  43 33 25 3d 2d 31 3a 7a  |("-") . C3%=-1:z|
00003ec0  31 25 2b 3d 31 0d 1f 22  05 f5 0d 1f 2c 37 e7 20  |1%+=1.."....,7. |
00003ed0  3f 7a 31 25 3e 26 32 46  20 80 20 3f 7a 31 25 3c  |?z1%>&2F . ?z1%<|
00003ee0  26 33 41 20 8c 20 50 25  3d 50 25 2a 31 30 2b 28  |&3A . P%=P%*10+(|
00003ef0  3f 7a 31 25 20 80 20 26  46 29 3a 7a 31 25 2b 3d  |?z1% . &F):z1%+=|
00003f00  31 0d 1f 36 1c fd 20 ac  28 3f 7a 31 25 3e 26 32  |1..6.. .(?z1%>&2|
00003f10  46 20 80 20 3f 7a 31 25  3c 26 33 41 29 0d 1f 40  |F . ?z1%<&3A)..@|
00003f20  0b 3d 50 25 2a 43 33 25  0d 1f 4a 09 dd 20 f2 77  |.=P%*C3%..J.. .w|
00003f30  32 0d 1f 54 1a e7 20 3f  7a 31 25 3d 97 28 22 2f  |2..T.. ?z1%=.("/|
00003f40  22 29 20 8c 20 7a 31 25  2b 3d 31 0d 1f 5e 05 e1  |") . z1%+=1..^..|
00003f50  0d 1f 68 09 dd 20 f2 72  32 0d 1f 72 05 f5 0d 1f  |..h.. .r2..r....|
00003f60  7c 0a 7a 31 25 2b 3d 31  0d 1f 86 19 fd 20 3f 7a  ||.z1%+=1..... ?z|
00003f70  31 25 3d 26 30 41 20 84  20 3f 7a 31 25 3d 26 32  |1%=&0A . ?z1%=&2|
00003f80  46 0d 1f 90 0a 7a 31 25  2b 3d 31 0d 1f 9a 05 e1  |F....z1%+=1.....|
00003f90  0d 1f a4 0e dd 20 f2 6e  32 28 44 33 25 29 0d 1f  |..... .n2(D3%)..|
00003fa0  ae 15 ea 20 70 32 25 2c  4a 31 25 2c 58 31 25 2c  |... p2%,J1%,X1%,|
00003fb0  45 33 25 0d 1f b8 18 e3  20 70 32 25 3d 49 4e 54  |E3%..... p2%=INT|
00003fc0  25 20 b8 20 49 4e 54 25  2b 31 32 0d 1f c2 0c 58  |% . INT%+12....X|
00003fd0  31 25 3d 3f 70 32 25 0d  1f cc 16 58 32 25 3f 28  |1%=?p2%....X2%?(|
00003fe0  70 32 25 2d 49 4e 54 25  29 3d 58 31 25 0d 1f d6  |p2%-INT%)=X1%...|
00003ff0  05 ed 0d 1f e0 3c e7 20  52 32 25 3c 3e 30 20 8c  |.....<. R2%<>0 .|
00004000  20 58 32 25 3f 31 32 3d  32 35 3a 58 32 25 3f 31  | X2%?12=25:X2%?1|
00004010  33 3d 51 32 25 3a 58 32  25 3f 31 34 3d 52 32 25  |3=Q2%:X2%?14=R2%|
00004020  3a 45 33 25 3d 33 20 8b  20 45 33 25 3d 30 0d 1f  |:E3%=3 . E3%=0..|
00004030  ea 17 e3 20 70 32 25 3d  49 4e 54 25 2b 31 32 20  |... p2%=INT%+12 |
00004040  b8 20 44 33 25 0d 1f f4  0c 58 31 25 3d 3f 70 32  |. D3%....X1%=?p2|
00004050  25 0d 1f fe 22 e7 20 58  31 25 3d 32 35 20 8c 20  |%...". X1%=25 . |
00004060  51 32 25 3d 70 32 25 3f  31 3a 52 32 25 3d 70 32  |Q2%=p2%?1:R2%=p2|
00004070  25 3f 32 0d 20 08 1a 58  32 25 3f 28 70 32 25 2d  |%?2. ..X2%?(p2%-|
00004080  49 4e 54 25 2b 45 33 25  29 3d 58 31 25 0d 20 12  |INT%+E3%)=X1%. .|
00004090  05 ed 0d 20 1c 37 e7 20  58 32 25 3f 28 70 32 25  |... .7. X2%?(p2%|
000040a0  2d 49 4e 54 25 2d 31 2b  45 33 25 29 3d 26 32 30  |-INT%-1+E3%)=&20|
000040b0  20 8c 20 58 32 25 3f 28  70 32 25 2d 49 4e 54 25  | . X2%?(p2%-INT%|
000040c0  2d 31 2b 45 33 25 29 3d  30 0d 20 26 18 58 32 25  |-1+E3%)=0. &.X2%|
000040d0  3f 28 70 32 25 2d 49 4e  54 25 2b 45 33 25 29 3d  |?(p2%-INT%+E3%)=|
000040e0  30 0d 20 30 0a 70 32 25  2b 3d 31 0d 20 3a 18 58  |0. 0.p2%+=1. :.X|
000040f0  32 25 3f 28 70 32 25 2d  49 4e 54 25 2b 45 33 25  |2%?(p2%-INT%+E3%|
00004100  29 3d 30 0d 20 44 18 c8  8e 20 28 28 70 32 25 2b  |)=0. D... ((p2%+|
00004110  45 33 25 29 20 80 20 33  29 20 ca 0d 20 4e 0f c9  |E3%) . 3) .. N..|
00004120  20 30 20 3a 20 4a 31 25  3d 30 0d 20 58 0f c9 20  | 0 : J1%=0. X.. |
00004130  31 20 3a 20 4a 31 25 3d  33 0d 20 62 0f c9 20 32  |1 : J1%=3. b.. 2|
00004140  20 3a 20 4a 31 25 3d 32  0d 20 6c 0f c9 20 33 20  | : J1%=2. l.. 3 |
00004150  3a 20 4a 31 25 3d 31 0d  20 76 05 cb 0d 20 80 1a  |: J1%=1. v... ..|
00004160  58 32 25 21 38 3d 70 32  25 2d 49 4e 54 25 2b 4a  |X2%!8=p2%-INT%+J|
00004170  31 25 2b 45 33 25 0d 20  8a 22 e7 20 56 32 25 3d  |1%+E3%. .". V2%=|
00004180  97 28 22 44 22 29 20 8c  20 58 32 25 21 38 3d 58  |.("D") . X2%!8=X|
00004190  32 25 21 38 20 84 20 31  0d 20 94 1b 58 32 25 2b  |2%!8 . 1. ..X2%+|
000041a0  3d 28 70 32 25 2d 49 4e  54 25 2b 4a 31 25 2b 45  |=(p2%-INT%+J1%+E|
000041b0  33 25 29 0d 20 9e 0b 21  43 32 25 2b 3d 31 0d 20  |3%). ..!C2%+=1. |
000041c0  a8 05 e1 0d 20 b2 09 dd  20 f2 46 32 0d 20 bc 0d  |.... ... .F2. ..|
000041d0  42 25 3d 31 3a 43 25 3d  30 0d 20 c6 05 f5 0d 20  |B%=1:C%=0. .... |
000041e0  d0 17 50 54 52 25 28 42  25 29 3d 3f 28 41 25 2b  |..PTR%(B%)=?(A%+|
000041f0  43 25 2b 38 29 0d 20 da  14 50 4f 53 25 28 42 25  |C%+8). ..POS%(B%|
00004200  29 3d 41 25 2b 43 25 2b  39 0d 20 e4 09 42 25 2b  |)=A%+C%+9. ..B%+|
00004210  3d 31 0d 20 ee 05 f5 0d  20 f8 09 43 25 2b 3d 31  |=1. .... ..C%+=1|
00004220  0d 21 02 12 fd 20 3f 28  41 25 2b 43 25 2b 38 29  |.!... ?(A%+C%+8)|
00004230  3d 30 0d 21 0c 05 f5 0d  21 16 09 43 25 2b 3d 31  |=0.!....!..C%+=1|
00004240  0d 21 20 13 fd 20 3f 28  41 25 2b 43 25 2b 38 29  |.! .. ?(A%+C%+8)|
00004250  3c 3e 30 0d 21 2a 24 fd  20 28 41 25 2b 43 25 2b  |<>0.!*$. (A%+C%+|
00004260  38 29 3e 3d 28 41 25 21  34 2b 41 25 29 20 84 20  |8)>=(A%!4+A%) . |
00004270  42 25 3e 4e 4f 54 25 0d  21 34 05 e1 0d 21 3e 0d  |B%>NOT%.!4...!>.|
00004280  dd f2 46 33 28 52 31 25  29 0d 21 48 2b 47 33 25  |..F3(R1%).!H+G3%|
00004290  3d 21 52 31 25 3a 48 33  25 3d 52 31 25 21 34 3a  |=!R1%:H3%=R1%!4:|
000042a0  49 33 25 3d 52 31 25 21  38 3a 4a 33 25 3d 52 31  |I3%=R1%!8:J3%=R1|
000042b0  25 21 31 32 0d 21 52 24  4b 33 25 3d 52 31 25 21  |%!12.!R$K3%=R1%!|
000042c0  31 36 3a 4c 33 25 3d 52  31 25 21 32 30 3a 4d 33  |16:L3%=R1%!20:M3|
000042d0  25 3d 52 31 25 21 32 34  0d 21 5c 1b 4c 31 25 3d  |%=R1%!24.!\.L1%=|
000042e0  47 33 25 2d 4b 33 25 3a  4d 31 25 3d 4a 33 25 2d  |G3%-K3%:M1%=J3%-|
000042f0  4c 33 25 0d 21 66 2f 4e  33 25 3d 52 31 25 21 32  |L3%.!f/N3%=R1%!2|
00004300  38 3a 4f 33 25 3d 52 31  25 21 33 32 3a 50 33 25  |8:O3%=R1%!32:P3%|
00004310  3d 52 31 25 21 33 36 3a  51 33 25 3d 52 31 25 21  |=R1%!36:Q3%=R1%!|
00004320  34 30 0d 21 70 2f 4e 31  25 3d 52 31 25 21 32 34  |40.!p/N1%=R1%!24|
00004330  3a 4f 31 25 3d 52 31 25  21 32 38 3a 50 31 25 3d  |:O1%=R1%!28:P1%=|
00004340  52 31 25 21 33 32 3a 51  31 25 3d 52 31 25 21 33  |R1%!32:Q1%=R1%!3|
00004350  36 0d 21 7a 1a 52 33 25  3d 28 52 31 25 21 32 38  |6.!z.R3%=(R1%!28|
00004360  80 26 31 30 30 30 30 29  3c 3e 30 0d 21 84 05 e1  |.&10000)<>0.!...|
00004370  0d 21 8e 08 dd f2 44 31  0d 21 98 25 c8 99 22 57  |.!....D1.!.%.."W|
00004380  69 6d 70 5f 52 65 64 72  61 77 57 69 6e 64 6f 77  |imp_RedrawWindow|
00004390  22 2c 2c 43 4c 53 25 20  b8 20 53 33 25 0d 21 a2  |",,CLS% . S3%.!.|
000043a0  0f f2 46 33 28 43 4c 53  25 2b 34 29 0d 21 ac 0a  |..F3(CLS%+4).!..|
000043b0  c8 95 20 53 33 25 0d 21  b6 0f e7 20 41 32 25 20  |.. S3%.!... A2% |
000043c0  8c 20 f2 54 33 0d 21 c0  0b 53 33 25 3d a4 55 33  |. .T3.!..S3%=.U3|
000043d0  0d 21 ca 05 ce 0d 21 d4  05 e1 0d 21 de 08 dd a4  |.!....!....!....|
000043e0  55 33 0d 21 e8 09 ea 52  4e 44 25 0d 21 f2 25 c8  |U3.!...RND%.!.%.|
000043f0  99 20 22 57 69 6d 70 5f  47 65 74 52 65 63 74 61  |. "Wimp_GetRecta|
00004400  6e 67 6c 65 22 2c 2c 43  4c 53 25 b8 52 4e 44 25  |ngle",,CLS%.RND%|
00004410  0d 21 fc 0f f2 46 33 28  43 4c 53 25 2b 34 29 0d  |.!...F3(CLS%+4).|
00004420  22 06 09 3d 52 4e 44 25  0d 22 10 15 dd a4 56 33  |"..=RND%."....V3|
00004430  28 58 25 2c 59 25 2c 77  25 2c 48 25 29 0d 22 1a  |(X%,Y%,w%,H%).".|
00004440  17 e7 77 25 3c 30 3a 58  25 2b 3d 77 25 3a 77 25  |..w%<0:X%+=w%:w%|
00004450  3d 2d 77 25 0d 22 24 17  e7 48 25 3c 30 3a 59 25  |=-w%."$..H%<0:Y%|
00004460  2b 3d 48 25 3a 48 25 3d  2d 48 25 0d 22 2e 11 e7  |+=H%:H%=-H%."...|
00004470  4e 31 25 3e 58 25 2b 77  25 3a 3d a3 0d 22 38 0e  |N1%>X%+w%:=.."8.|
00004480  e7 50 31 25 3c 58 25 3a  3d a3 0d 22 42 11 e7 4f  |.P1%<X%:=.."B..O|
00004490  31 25 3e 59 25 2b 48 25  3a 3d a3 0d 22 4c 0e e7  |1%>Y%+H%:=.."L..|
000044a0  51 31 25 3c 59 25 3a 3d  a3 0d 22 56 06 3d b9 0d  |Q1%<Y%:=.."V.=..|
000044b0  22 60 14 dd a4 6b 31 28  52 4e 44 25 29 3a ea 52  |"`...k1(RND%):.R|
000044c0  4e 44 24 0d 22 6a 25 c8  95 3f 52 4e 44 25 3c 3e  |ND$."j%..?RND%<>|
000044d0  30 3a 52 4e 44 24 2b 3d  bd 3f 52 4e 44 25 3a 52  |0:RND$+=.?RND%:R|
000044e0  4e 44 25 2b 3d 31 3a ce  0d 22 74 09 3d 52 4e 44  |ND%+=1:.."t.=RND|
000044f0  24 0d 22 7e 08 dd f2 54  33 0d 22 88 31 f2 49 31  |$."~...T3.".1.I1|
00004500  28 4c 4e 25 2c 4f 4c 44  25 2c 4c 31 25 2b 33 32  |(LN%,OLD%,L1%+32|
00004510  2c 4d 31 25 2d 33 32 2c  4e 31 25 2c 4f 31 25 2c  |,M1%-32,N1%,O1%,|
00004520  50 31 25 2c 51 31 25 29  3a e1 0d ff 02           |P1%,Q1%):....|
0000452d