�>!RunImageC
0�Produced by BasCompress v1.30 (11 Oct 1992)
+� � Justin Fletcher,�13th February 1996
((U%=�:�V:��Z:�R:�U%=���("Spool"):��
2�U%=��*Spool Spooled
<�U%=����
FrAppname$="PrintKill":_$="1.00 (13 Feb 1996)":q$="":a$="PrintKill":L$=�B(Appname$+"$Dir"):�X:�T:S%=�:��U:�@@@@
P(ȕS%=�:�Y:�:ș&400dd:�Z:�U%=��*SPOOL
Z�
d��Y:ș&400c7,1,E%�x%:Ȏx%�
n�2:ș&400c5,,E%
x�3:ș&400c6,,E%
��6:�N(E%!8,E%!12,E%!16)
�	�9:�L
��17,18:�K(E%!16)
��19:�B(E%!16)
��:�
���N(a,P,W):ȎP�
��-2:Ȏa�
�'�1,4:*Filer_Run <Printers$Dir>.!Run
�	�2:�J
��
��:�
�,��L:ș&400cf,,A%:w%=A%!8:A$=�G(C%):ȎA$�
��"Quit":S%=�

�:�(w%�1)=1��P�C%=-1

�

��K(L):ȎL�

"�&400c3:�E%!4=L%�S%=�:�H

,
�0:S%=�*2

6G�&80143:E%!12=0:E%!16=8:E%!0=24:E%!20=1:L%=E%!4:ș&400e7,18,E%,E%!4

@�1282:�D(E%!32,E%!36,E%!4)

J�:�

T��B(L):ȎL�

^0�8:E%!12=0:E%!16=0:E%!0=20:ș&400e7,17,E%,L%

h�:�

r���X:�q%256:O%=0:�S(1282):�S(10):�S(0):ș&400c0,310,&4b534154,Appname$,q%�O,X:X%=1024:J%=1024:�E%2048,I%X%,Z%J%,V%2048:C%=-1:�Q:infobox%=�X("Info",1):�M(infobox%,1,Appname$):�M(infobox%,2,a$):�M(infobox%,4,_$):_=�P("!"+Appname$,q$,1)

|2T%=�J(Appname$+"|Info]>infobox%|Quit"):R%=H%:�

�,��T:L%=-1:*Filer_Run <Printers$Dir>.!Run

��

� ��D(P,W,M):�@@@@:�I(P,W,M):�

�� infobox%,">HInfobox"

�� 3,">HInfobox3"

�� -2,">HIconbar"

�� -1,-1

�� -2,-2,-2,-2

�	��H:�

�'��V:�A%1024:U=-2:M%=-1:F%=-1:z=-2:�

���S(Y)q%!O%=Y:�

�ݤX(R$,d%)�K%,D%,a%:ș&400d9,,L$+".Templates":ș&400db,,0,,,,R$,0�,,K%:�D%K%:ș&400db,,V%,D%,D%+K%,-1,R$,0�,,,,,,a%:ș&400da:�a%=0��2051,"Template file "+R$+" not found"

� V%!64=d%:ș&400c1,,V%�D%:=D%
5ݤB(w$)�K:ș&20023,w$,A%,255,0,3�,,K:A%?K=13:=$A%
>��R:�:��:�Z:�4:��0,�$+" at line "+Þ+" in error handler"
�B$="Internal error : ("+Þ+") "+�$:�("Set Error$ "+B$):�("Set Error$Task Not known"):A%!0=�:$(A%+4)=B$+" whilst initialising"+�0:ș&400df,A%,9,"uninitialised task":�
&F��U�Q,B$,P%:�:��:�Z:�4:��0,�$+" at line "+Þ+" in error handler"
0ș6,124:�>2047��<2051�
:/Q=�-2047:B$=�$:�Q=3�B$+=" (Cancel to Quit)"
D'P%=�C(Appname$,B$,Q):�P%=2�Q=3�S%=�
NW�:B$="Internal error : ("+Þ+") "+�$+" Cancel to Quit":P%=�C(Appname$,B$,3):�P%<>1�
X:S%=�:�("Set Error$ "+B$):�("Set Error$Task "+Appname$)
b&�:�(-1)��(-2)��(-17)��("Spool"):�
l�:�
vOݤC(J$,H$,e%)J$=�E(J$):H$=�E(H$):$(A%+4)=H$:!A%=0:ș&400df,A%,e%,J$�,P%:=P%
��ݤJ(M$):�T,I,H,J,x,U$,D$:T=Z%:J=0:M$+="|":�C(�S(M$,D$)):�E(&70207):I=Z%:�E(128):�E(40):�E(0):H%=0:�:U$=�S(M$,D$):H%=H%+1:F=�W(D$,H,G$)+((-(M$=""))<<7):B=&7000021+((-(�(U$)>11))<<8)+(1<<14)*(F�256):�(F�4)<>0�B=B�256
�$�E(F�255):�E(H):�(U$)>J�J=�(U$)
�.�E(B):�W(U$,G$,(F�4)):�M$="":!I=J*16+16:=T
�(��W(P$,G$,q)�P$,1)="�"�P$=�(�P$,2))
��(P$)<12�G$=""�q=0�
�
�C(P$)
��:�E(�A(P$)):�G$<>""�
�6Z%!-8=Z%!-8�2051:�Q(G$),2)="sm"�Z%!-8=Z%!-8�2048
��E(�A("S"+G$))
��:�E(-1)
��:�E(�(P$))
��:�
�KݤS(�M$,�D$):�S$:S$=�M$,�M$,"|")-1):M$=�M$,�(S$)+2):�S$,"]")<1�S$+="]"
1D$=�S$,�S$,"]")+1):S$=�S$,�S$,"]")-1):=�E(S$)
0��C(P$)�(P$)>11��2051,"Menu entry too long"
C$Z%=P$:Z%+=12:J%-=12:�J%<=4��2051,"Not enough memory for menus"
 �
*I��E(W%):!Z%=W%:Z%+=4:J%-=4:�J%<=4��2051,"Not enough memory for menus"
4�
>[ݤW(M$,�D,�G$):�S$,D$,A:D=-1:G$="":M$=M$+",":ȕM$<>"":S$=�M$,1):M$=�M$,2):�S$="T"�A=A�1
H�S$="D"�A=A�2
R�S$="W"�A=A�4
\�S$="S"�A=A�256
f�S$=">"�
p+D=�(�M$,�M$,",")-1)):M$=�M$,�M$,",")+1)
z�:�S$="}"�
�-G$=�M$,�M$,",")-1)+" ":M$=�M$,�M$,",")+1)
�
�:�:=A
�FݤA(E$)�V:V=I%:�(E$)>X%-1��2051,"Not enough room for indirection"
�%$I%=E$:I%+=�(E$)+1:X%-=�(E$)+1:=V
�Q��J:ș&400cf,,E%:C%=T%:_%=E%!0-64:z%=96+40*R%:ș&400d4,,T%,E%!0-64,96+40*R%:�
���P:ș&400d4,,C%,_%,z%:�
�WݤG(Z%)�Q%,C:Q%=Z%:C=0:ȕ(E%!C>-1�Q%<>U):Q%=Q%!(32+(E%!C)*24):C+=4:�:�Q%=U�E%!C<>0�
�'ș&400a0,,U,E%+C,�255,�0),255�,,,A$
�(�:ș&400d5,,Z%,E%,�255,�0),255�,,,A$
�	�:=A$
�oݤP(O$,J$,s)�X:J$=�E(J$):E%!0=-�(s):E%!4=0:E%!8=-16:E%!12=12+16*�(J$):E%!16=88:�E%!12<12+16*4�E%!12=12+16*4
��J$<>""�
�YE%!20=(1<<28)+(7<<24)+(3<<12)+(11)+(1<<8):E%!24=�A(J$):E%!28=�A("S"+O$):E%!32=�(J$)+1
4�:E%!20=(1<<28)+(7<<24)+(3<<12)+(26):$(E%+24)=O$
�:ș&400c2,,E%�X:=X
Y��G(G%,N%):G%+=G%=-1:!E%=G%:E%!4=N%:ș&400ce,,E%:ș&400d1,G%,E%!8,E%!12,E%!16,E%!20:�
$q��M(G%,N%,Q$)Q$=�E(Q$):E%!0=G%:E%!4=N%:ș&400ce,,E%:�((E%!24)�256)=0��2051,"Icon isn't indirected (#"+�N%+")"
.�N(E%!28)<>Q$�
8F�(Q$)<E%!36�$(E%!28)=Q$��2051,"Text too long for icon (#"+�N%+")"
B
�G(G%,N%)
L�:�
VE��I(P,W,M):�S,E,Z$,Z,E$,A$,z$,T$:Z=�:S=-1:�:�E,Z$:�E>(1<<16)�E<0�
`	�S=P�
jE=W:Z$="":z$=A$
t�:S=E:A$=Z$
~�
��:�E=W�S=P�
��W=-1�Z$=""�
��A(�E(A$)+"|M",M)
�0�:A$=�E(A$):�A$,"|M")>0�A$=�A$,�A$,"|M")-1)
��A(�E(A$)+"|M"+�E(Z$),M)
�	�:Z=�
��:�Z$="-1"�Z=�:�Z�
�6!A%=-1:A%!4=-1:A%!8=-1:ș&400f4,1,A%,P,W:�!A%<>-1�
�iș&400d5,,C%,A%,�255," ")�,,,T$:A$=T$:ȕ�A$," ")>0:�A$,�A$," "),1)="_":�:Z$=�M("HM"+A$):�Z$<>"HM"+A$�
��A(Z$,M)
�0�:�:�A$,E,Z$,Z$:��(A$)=C%�A$="-2":�A$<>"-2"�
�
�E>-1�
�A(Z$,M):Z=�

$�:�:�S,A$,E,Z$:�(A$)=0�A$<>"0"�
�T$=A$��A(Z$,M):Z=�
 �:�S=A%!0��(A$)=A%!4�E=A%!8�
(�A(Z$,M):Z=�
2�
<�:�Z=��S=-2�S>32768
F�
P�
Z�
d�
n�:�
x-��A(Z$,M)Z$=�E(Z$):��Z$,2)<>"|M"�Z$+="|M"
�`�F$,W$:Z$=�F(Z$):ȕ�Z$,"|M")>0:F$=�Z$,�Z$,"|M")-1):Z$=�Z$,�(F$)+3):�"!.?",�F$,1))=0�F$+="."
�hW$+=F$+"|M":�:E%!12=E%!8:E%!4=M:E%!16=1283:$(E%+20)=W$+�0:E%!0=20+(�(W$)+4)�-4:ș&400e7,17,E%,E%!4:�
�5��Q�G,J:�M%<>-1��2051,"Message file already open"
�8ș&41500,,L$+".Messages"�G,,J:�(G�1)=1�F%=0�F%=�Z(J)
�<�F%=-1��2051,"No room for secondary MessageTrans buffer"
�KM%=�Z(16):�M%=-1��F(F%):�2051,"No room for primary MessageTrans buffer"
�#ș&41501,M%,L$+".Messages",F%:�
�#��Z:�:��:�4:�:�" at ";�:w=�:�
��M%>-1�
�ș&61504,M%:�F(M%):�F(F%)
��:�
�8ݤM(N$)�I$,K$,Y$,E$,s%,G:�M%=-1�=N$�N$+="::::":E$=N$
��E$=�E$,�E$,":")+1):N$=�N$,�N$,":")-1):I$=�E$,�E$,":")-1):E$=�E$,�(I$)+2):K$=�E$,�E$,":")-1):E$=�E$,�(K$)+2):Y$=�E$,�E$,":")-1):E$=�E$,�(Y$)+2):ș&61502,M%,N$,A%,256,I$,K$,Y$�,,,s%;G:�(G�1)=1�=N$�A%?s%=13
=�F($A%)
%ݤE(E$):�E$,1)=">"�E$=�M(�E$,2))
=E$
"5ݤN(N)�E$:ȕ?N>31��(E$)<255:E$=E$+�?N:N=N+1:�:=E$
,JݤQ(E$)�W$,F$,R:�R=1��(E$):W$=�E$,R,1):�W$>="A"�W$<="Z"�W$=�(�(W$)+32)
6F$+=W$:�:=F$
@ݤF(E$):�F$,X$:�:��:=E$
J[ȕ�E$,"�")>0:F$=�E$,�E$,"�")+1):F$=�F$,�F$,"�")-1):X$=F$:��X$,1)<>"$"�X$="STR$("+X$+")"
T8E$=�E$,�E$,"�")-1)+�(X$)+�E$,�E$,"�")+�(F$)+2):�:=E$
^-ݤU(C$)�V$:�C$,":")>0�C$=�C$,�C$,":")+1)
hȎ�C$,".")�
r�0:V$=C$
|V$=�U(�C$,�(C$)-�C$,".")))
�	�:=V$
�6ݤZ(Y%):�F:�Y%<1��2051,"Cannot claim negative RMA"
�)ș&2001e,6,,,Y%�,,B%;F:�(F�1)>0�B%=-1
�=B%
�#��F(�B%):�B%>0�ș30,7,,B%:B%=-1
��
�

00000000  0d 00 0a 10 f4 3e 21 52  75 6e 49 6d 61 67 65 43  |.....>!RunImageC|
00000010  0d 00 14 30 f4 50 72 6f  64 75 63 65 64 20 62 79  |...0.Produced by|
00000020  20 42 61 73 43 6f 6d 70  72 65 73 73 20 76 31 2e  | BasCompress v1.|
00000030  33 30 20 28 31 31 20 4f  63 74 20 31 39 39 32 29  |30 (11 Oct 1992)|
00000040  0d 00 1e 2b f4 20 a9 20  4a 75 73 74 69 6e 20 46  |...+. . Justin F|
00000050  6c 65 74 63 68 65 72 2c  a0 31 33 74 68 20 46 65  |letcher,.13th Fe|
00000060  62 72 75 61 72 79 20 31  39 39 36 0d 00 28 28 55  |bruary 1996..((U|
00000070  25 3d a3 3a f2 56 3a ee  85 f2 5a 3a f2 52 3a e7  |%=.:.V:...Z:.R:.|
00000080  55 25 3d b9 8c ff 28 22  53 70 6f 6f 6c 22 29 3a  |U%=...("Spool"):|
00000090  e0 8b e0 0d 00 32 18 e7  55 25 3d b9 8c 2a 53 70  |.....2..U%=..*Sp|
000000a0  6f 6f 6c 20 53 70 6f 6f  6c 65 64 0d 00 3c 0c e7  |ool Spooled..<..|
000000b0  55 25 3d b9 8c fc ee 0d  00 46 72 41 70 70 6e 61  |U%=......FrAppna|
000000c0  6d 65 24 3d 22 50 72 69  6e 74 4b 69 6c 6c 22 3a  |me$="PrintKill":|
000000d0  5f 24 3d 22 31 2e 30 30  20 28 31 33 20 46 65 62  |_$="1.00 (13 Feb|
000000e0  20 31 39 39 36 29 22 3a  71 24 3d 22 22 3a 61 24  | 1996)":q$="":a$|
000000f0  3d 22 50 72 69 6e 74 4b  69 6c 6c 22 3a 4c 24 3d  |="PrintKill":L$=|
00000100  a4 42 28 41 70 70 6e 61  6d 65 24 2b 22 24 44 69  |.B(Appname$+"$Di|
00000110  72 22 29 3a f2 58 3a f2  54 3a 53 25 3d a3 3a ee  |r"):.X:.T:S%=.:.|
00000120  85 f2 55 3a e5 40 40 40  40 0d 00 50 28 c8 95 53  |..U:.@@@@..P(..S|
00000130  25 3d a3 3a f2 59 3a ce  3a c8 99 26 34 30 30 64  |%=.:.Y:.:..&400d|
00000140  64 3a f2 5a 3a e7 55 25  3d b9 8c 2a 53 50 4f 4f  |d:.Z:.U%=..*SPOO|
00000150  4c 0d 00 5a 05 e0 0d 00  64 1e dd f2 59 3a c8 99  |L..Z....d...Y:..|
00000160  26 34 30 30 63 37 2c 31  2c 45 25 b8 78 25 3a c8  |&400c7,1,E%.x%:.|
00000170  8e 78 25 ca 0d 00 6e 13  c9 32 3a c8 99 26 34 30  |.x%...n..2:..&40|
00000180  30 63 35 2c 2c 45 25 0d  00 78 13 c9 33 3a c8 99  |0c5,,E%..x..3:..|
00000190  26 34 30 30 63 36 2c 2c  45 25 0d 00 82 1b c9 36  |&400c6,,E%.....6|
000001a0  3a f2 4e 28 45 25 21 38  2c 45 25 21 31 32 2c 45  |:.N(E%!8,E%!12,E|
000001b0  25 21 31 36 29 0d 00 8c  09 c9 39 3a f2 4c 0d 00  |%!16).....9:.L..|
000001c0  96 14 c9 31 37 2c 31 38  3a f2 4b 28 45 25 21 31  |...17,18:.K(E%!1|
000001d0  36 29 0d 00 a0 11 c9 31  39 3a f2 42 28 45 25 21  |6).....19:.B(E%!|
000001e0  31 36 29 0d 00 aa 07 cb  3a e1 0d 00 b4 13 dd f2  |16).....:.......|
000001f0  4e 28 61 2c 50 2c 57 29  3a c8 8e 50 ca 0d 00 be  |N(a,P,W):..P....|
00000200  0c c9 2d 32 3a c8 8e 61  ca 0d 00 c8 27 c9 31 2c  |..-2:..a....'.1,|
00000210  34 3a 2a 46 69 6c 65 72  5f 52 75 6e 20 3c 50 72  |4:*Filer_Run <Pr|
00000220  69 6e 74 65 72 73 24 44  69 72 3e 2e 21 52 75 6e  |inters$Dir>.!Run|
00000230  0d 00 d2 09 c9 32 3a f2  4a 0d 00 dc 05 cb 0d 00  |.....2:.J.......|
00000240  e6 07 cb 3a e1 0d 00 f0  2c dd f2 4c 3a c8 99 26  |...:....,..L:..&|
00000250  34 30 30 63 66 2c 2c 41  25 3a 77 25 3d 41 25 21  |400cf,,A%:w%=A%!|
00000260  38 3a 41 24 3d a4 47 28  43 25 29 3a c8 8e 41 24  |8:A$=.G(C%):..A$|
00000270  ca 0d 00 fa 10 c9 22 51  75 69 74 22 3a 53 25 3d  |......"Quit":S%=|
00000280  b9 0d 01 04 18 cb 3a e7  28 77 25 80 31 29 3d 31  |......:.(w%.1)=1|
00000290  8c f2 50 8b 43 25 3d 2d  31 0d 01 0e 05 e1 0d 01  |..P.C%=-1.......|
000002a0  18 0f dd f2 4b 28 4c 29  3a c8 8e 4c ca 0d 01 22  |....K(L):..L..."|
000002b0  1c c9 26 34 30 30 63 33  3a e7 45 25 21 34 3d 4c  |..&400c3:.E%!4=L|
000002c0  25 8c 53 25 3d b9 3a f2  48 0d 01 2c 0d c9 30 3a  |%.S%=.:.H..,..0:|
000002d0  53 25 3d b9 2a 32 0d 01  36 47 c9 26 38 30 31 34  |S%=.*2..6G.&8014|
000002e0  33 3a 45 25 21 31 32 3d  30 3a 45 25 21 31 36 3d  |3:E%!12=0:E%!16=|
000002f0  38 3a 45 25 21 30 3d 32  34 3a 45 25 21 32 30 3d  |8:E%!0=24:E%!20=|
00000300  31 3a 4c 25 3d 45 25 21  34 3a c8 99 26 34 30 30  |1:L%=E%!4:..&400|
00000310  65 37 2c 31 38 2c 45 25  2c 45 25 21 34 0d 01 40  |e7,18,E%,E%!4..@|
00000320  1e c9 31 32 38 32 3a f2  44 28 45 25 21 33 32 2c  |..1282:.D(E%!32,|
00000330  45 25 21 33 36 2c 45 25  21 34 29 0d 01 4a 07 cb  |E%!36,E%!4)..J..|
00000340  3a e1 0d 01 54 0f dd f2  42 28 4c 29 3a c8 8e 4c  |:...T...B(L):..L|
00000350  ca 0d 01 5e 30 c9 38 3a  45 25 21 31 32 3d 30 3a  |...^0.8:E%!12=0:|
00000360  45 25 21 31 36 3d 30 3a  45 25 21 30 3d 32 30 3a  |E%!16=0:E%!0=20:|
00000370  c8 99 26 34 30 30 65 37  2c 31 37 2c 45 25 2c 4c  |..&400e7,17,E%,L|
00000380  25 0d 01 68 07 cb 3a e1  0d 01 72 ec dd f2 58 3a  |%..h..:...r...X:|
00000390  de 71 25 32 35 36 3a 4f  25 3d 30 3a f2 53 28 31  |.q%256:O%=0:.S(1|
000003a0  32 38 32 29 3a f2 53 28  31 30 29 3a f2 53 28 30  |282):.S(10):.S(0|
000003b0  29 3a c8 99 26 34 30 30  63 30 2c 33 31 30 2c 26  |):..&400c0,310,&|
000003c0  34 62 35 33 34 31 35 34  2c 41 70 70 6e 61 6d 65  |4b534154,Appname|
000003d0  24 2c 71 25 b8 4f 2c 58  3a 58 25 3d 31 30 32 34  |$,q%.O,X:X%=1024|
000003e0  3a 4a 25 3d 31 30 32 34  3a de 45 25 32 30 34 38  |:J%=1024:.E%2048|
000003f0  2c 49 25 58 25 2c 5a 25  4a 25 2c 56 25 32 30 34  |,I%X%,Z%J%,V%204|
00000400  38 3a 43 25 3d 2d 31 3a  f2 51 3a 69 6e 66 6f 62  |8:C%=-1:.Q:infob|
00000410  6f 78 25 3d a4 58 28 22  49 6e 66 6f 22 2c 31 29  |ox%=.X("Info",1)|
00000420  3a f2 4d 28 69 6e 66 6f  62 6f 78 25 2c 31 2c 41  |:.M(infobox%,1,A|
00000430  70 70 6e 61 6d 65 24 29  3a f2 4d 28 69 6e 66 6f  |ppname$):.M(info|
00000440  62 6f 78 25 2c 32 2c 61  24 29 3a f2 4d 28 69 6e  |box%,2,a$):.M(in|
00000450  66 6f 62 6f 78 25 2c 34  2c 5f 24 29 3a 5f 3d a4  |fobox%,4,_$):_=.|
00000460  50 28 22 21 22 2b 41 70  70 6e 61 6d 65 24 2c 71  |P("!"+Appname$,q|
00000470  24 2c 31 29 0d 01 7c 32  54 25 3d a4 4a 28 41 70  |$,1)..|2T%=.J(Ap|
00000480  70 6e 61 6d 65 24 2b 22  7c 49 6e 66 6f 5d 3e 69  |pname$+"|Info]>i|
00000490  6e 66 6f 62 6f 78 25 7c  51 75 69 74 22 29 3a 52  |nfobox%|Quit"):R|
000004a0  25 3d 48 25 3a e1 0d 01  86 2c dd f2 54 3a 4c 25  |%=H%:....,..T:L%|
000004b0  3d 2d 31 3a 2a 46 69 6c  65 72 5f 52 75 6e 20 3c  |=-1:*Filer_Run <|
000004c0  50 72 69 6e 74 65 72 73  24 44 69 72 3e 2e 21 52  |Printers$Dir>.!R|
000004d0  75 6e 0d 01 90 05 e1 0d  01 9a 20 dd f2 44 28 50  |un........ ..D(P|
000004e0  2c 57 2c 4d 29 3a f7 40  40 40 40 3a f2 49 28 50  |,W,M):.@@@@:.I(P|
000004f0  2c 57 2c 4d 29 3a e1 0d  01 a4 1a dc 20 69 6e 66  |,W,M):...... inf|
00000500  6f 62 6f 78 25 2c 22 3e  48 49 6e 66 6f 62 6f 78  |obox%,">HInfobox|
00000510  22 0d 01 ae 14 dc 20 33  2c 22 3e 48 49 6e 66 6f  |"..... 3,">HInfo|
00000520  62 6f 78 33 22 0d 01 b8  14 dc 20 2d 32 2c 22 3e  |box3"..... -2,">|
00000530  48 49 63 6f 6e 62 61 72  22 0d 01 c2 0b dc 20 2d  |HIconbar"..... -|
00000540  31 2c 2d 31 0d 01 cc 11  dc 20 2d 32 2c 2d 32 2c  |1,-1..... -2,-2,|
00000550  2d 32 2c 2d 32 0d 01 d6  09 dd f2 48 3a e1 0d 01  |-2,-2......H:...|
00000560  e0 27 dd f2 56 3a de 41  25 31 30 32 34 3a 55 3d  |.'..V:.A%1024:U=|
00000570  2d 32 3a 4d 25 3d 2d 31  3a 46 25 3d 2d 31 3a 7a  |-2:M%=-1:F%=-1:z|
00000580  3d 2d 32 3a e1 0d 01 ea  13 dd f2 53 28 59 29 71  |=-2:.......S(Y)q|
00000590  25 21 4f 25 3d 59 3a e1  0d 01 f4 ad dd a4 58 28  |%!O%=Y:.......X(|
000005a0  52 24 2c 64 25 29 ea 4b  25 2c 44 25 2c 61 25 3a  |R$,d%).K%,D%,a%:|
000005b0  c8 99 26 34 30 30 64 39  2c 2c 4c 24 2b 22 2e 54  |..&400d9,,L$+".T|
000005c0  65 6d 70 6c 61 74 65 73  22 3a c8 99 26 34 30 30  |emplates":..&400|
000005d0  64 62 2c 2c 30 2c 2c 2c  2c 52 24 2c 30 b8 2c 2c  |db,,0,,,,R$,0.,,|
000005e0  4b 25 3a de 44 25 4b 25  3a c8 99 26 34 30 30 64  |K%:.D%K%:..&400d|
000005f0  62 2c 2c 56 25 2c 44 25  2c 44 25 2b 4b 25 2c 2d  |b,,V%,D%,D%+K%,-|
00000600  31 2c 52 24 2c 30 b8 2c  2c 2c 2c 2c 2c 61 25 3a  |1,R$,0.,,,,,,a%:|
00000610  c8 99 26 34 30 30 64 61  3a e7 61 25 3d 30 8c 85  |..&400da:.a%=0..|
00000620  32 30 35 31 2c 22 54 65  6d 70 6c 61 74 65 20 66  |2051,"Template f|
00000630  69 6c 65 20 22 2b 52 24  2b 22 20 6e 6f 74 20 66  |ile "+R$+" not f|
00000640  6f 75 6e 64 22 0d 01 fe  20 56 25 21 36 34 3d 64  |ound"... V%!64=d|
00000650  25 3a c8 99 26 34 30 30  63 31 2c 2c 56 25 b8 44  |%:..&400c1,,V%.D|
00000660  25 3a 3d 44 25 0d 02 08  35 dd a4 42 28 77 24 29  |%:=D%...5..B(w$)|
00000670  ea 4b 3a c8 99 26 32 30  30 32 33 2c 77 24 2c 41  |.K:..&20023,w$,A|
00000680  25 2c 32 35 35 2c 30 2c  33 b8 2c 2c 4b 3a 41 25  |%,255,0,3.,,K:A%|
00000690  3f 4b 3d 31 33 3a 3d 24  41 25 0d 02 12 3e dd f2  |?K=13:=$A%...>..|
000006a0  52 3a ea 85 3a ee 85 ea  3a f2 5a 3a ef 34 3a 85  |R:..:...:.Z:.4:.|
000006b0  a2 30 2c f6 24 2b 22 20  61 74 20 6c 69 6e 65 20  |.0,.$+" at line |
000006c0  22 2b c3 9e 2b 22 20 69  6e 20 65 72 72 6f 72 20  |"+..+" in error |
000006d0  68 61 6e 64 6c 65 72 22  0d 02 1c a9 42 24 3d 22  |handler"....B$="|
000006e0  49 6e 74 65 72 6e 61 6c  20 65 72 72 6f 72 20 3a  |Internal error :|
000006f0  20 28 22 2b c3 9e 2b 22  29 20 22 2b f6 24 3a ff  | ("+..+") "+.$:.|
00000700  28 22 53 65 74 20 45 72  72 6f 72 24 20 22 2b 42  |("Set Error$ "+B|
00000710  24 29 3a ff 28 22 53 65  74 20 45 72 72 6f 72 24  |$):.("Set Error$|
00000720  54 61 73 6b 20 4e 6f 74  20 6b 6e 6f 77 6e 22 29  |Task Not known")|
00000730  3a 41 25 21 30 3d 9f 3a  24 28 41 25 2b 34 29 3d  |:A%!0=.:$(A%+4)=|
00000740  42 24 2b 22 20 77 68 69  6c 73 74 20 69 6e 69 74  |B$+" whilst init|
00000750  69 61 6c 69 73 69 6e 67  22 2b bd 30 3a c8 99 26  |ialising"+.0:..&|
00000760  34 30 30 64 66 2c 41 25  2c 39 2c 22 75 6e 69 6e  |400df,A%,9,"unin|
00000770  69 74 69 61 6c 69 73 65  64 20 74 61 73 6b 22 3a  |itialised task":|
00000780  e1 0d 02 26 46 dd f2 55  ea 51 2c 42 24 2c 50 25  |...&F..U.Q,B$,P%|
00000790  3a ea 85 3a ee 85 ea 3a  f2 5a 3a ef 34 3a 85 a2  |:..:...:.Z:.4:..|
000007a0  30 2c f6 24 2b 22 20 61  74 20 6c 69 6e 65 20 22  |0,.$+" at line "|
000007b0  2b c3 9e 2b 22 20 69 6e  20 65 72 72 6f 72 20 68  |+..+" in error h|
000007c0  61 6e 64 6c 65 72 22 0d  02 30 1b c8 99 36 2c 31  |andler"..0...6,1|
000007d0  32 34 3a e7 9f 3e 32 30  34 37 80 9f 3c 32 30 35  |24:..>2047..<205|
000007e0  31 8c 0d 02 3a 2f 51 3d  9f 2d 32 30 34 37 3a 42  |1...:/Q=.-2047:B|
000007f0  24 3d f6 24 3a e7 51 3d  33 8c 42 24 2b 3d 22 20  |$=.$:.Q=3.B$+=" |
00000800  28 43 61 6e 63 65 6c 20  74 6f 20 51 75 69 74 29  |(Cancel to Quit)|
00000810  22 0d 02 44 27 50 25 3d  a4 43 28 41 70 70 6e 61  |"..D'P%=.C(Appna|
00000820  6d 65 24 2c 42 24 2c 51  29 3a e7 50 25 3d 32 80  |me$,B$,Q):.P%=2.|
00000830  51 3d 33 8c 53 25 3d b9  0d 02 4e 57 cc 3a 42 24  |Q=3.S%=...NW.:B$|
00000840  3d 22 49 6e 74 65 72 6e  61 6c 20 65 72 72 6f 72  |="Internal error|
00000850  20 3a 20 28 22 2b c3 9e  2b 22 29 20 22 2b f6 24  | : ("+..+") "+.$|
00000860  2b 22 20 43 61 6e 63 65  6c 20 74 6f 20 51 75 69  |+" Cancel to Qui|
00000870  74 22 3a 50 25 3d a4 43  28 41 70 70 6e 61 6d 65  |t":P%=.C(Appname|
00000880  24 2c 42 24 2c 33 29 3a  e7 50 25 3c 3e 31 8c 0d  |$,B$,3):.P%<>1..|
00000890  02 58 3a 53 25 3d b9 3a  ff 28 22 53 65 74 20 45  |.X:S%=.:.("Set E|
000008a0  72 72 6f 72 24 20 22 2b  42 24 29 3a ff 28 22 53  |rror$ "+B$):.("S|
000008b0  65 74 20 45 72 72 6f 72  24 54 61 73 6b 20 22 2b  |et Error$Task "+|
000008c0  41 70 70 6e 61 6d 65 24  29 0d 02 62 26 cd 3a e7  |Appname$)..b&.:.|
000008d0  a6 28 2d 31 29 80 a6 28  2d 32 29 80 a6 28 2d 31  |.(-1)..(-2)..(-1|
000008e0  37 29 8c ff 28 22 53 70  6f 6f 6c 22 29 3a e0 0d  |7)..("Spool"):..|
000008f0  02 6c 07 cd 3a e1 0d 02  76 4f dd a4 43 28 4a 24  |.l..:...vO..C(J$|
00000900  2c 48 24 2c 65 25 29 4a  24 3d a4 45 28 4a 24 29  |,H$,e%)J$=.E(J$)|
00000910  3a 48 24 3d a4 45 28 48  24 29 3a 24 28 41 25 2b  |:H$=.E(H$):$(A%+|
00000920  34 29 3d 48 24 3a 21 41  25 3d 30 3a c8 99 26 34  |4)=H$:!A%=0:..&4|
00000930  30 30 64 66 2c 41 25 2c  65 25 2c 4a 24 b8 2c 50  |00df,A%,e%,J$.,P|
00000940  25 3a 3d 50 25 0d 02 80  da dd a4 4a 28 4d 24 29  |%:=P%......J(M$)|
00000950  3a ea 54 2c 49 2c 48 2c  4a 2c 78 2c 55 24 2c 44  |:.T,I,H,J,x,U$,D|
00000960  24 3a 54 3d 5a 25 3a 4a  3d 30 3a 4d 24 2b 3d 22  |$:T=Z%:J=0:M$+="|
00000970  7c 22 3a f2 43 28 a4 53  28 4d 24 2c 44 24 29 29  ||":.C(.S(M$,D$))|
00000980  3a f2 45 28 26 37 30 32  30 37 29 3a 49 3d 5a 25  |:.E(&70207):I=Z%|
00000990  3a f2 45 28 31 32 38 29  3a f2 45 28 34 30 29 3a  |:.E(128):.E(40):|
000009a0  f2 45 28 30 29 3a 48 25  3d 30 3a f5 3a 55 24 3d  |.E(0):H%=0:.:U$=|
000009b0  a4 53 28 4d 24 2c 44 24  29 3a 48 25 3d 48 25 2b  |.S(M$,D$):H%=H%+|
000009c0  31 3a 46 3d a4 57 28 44  24 2c 48 2c 47 24 29 2b  |1:F=.W(D$,H,G$)+|
000009d0  28 28 2d 28 4d 24 3d 22  22 29 29 3c 3c 37 29 3a  |((-(M$=""))<<7):|
000009e0  42 3d 26 37 30 30 30 30  32 31 2b 28 28 2d 28 a9  |B=&7000021+((-(.|
000009f0  28 55 24 29 3e 31 31 29  29 3c 3c 38 29 2b 28 31  |(U$)>11))<<8)+(1|
00000a00  3c 3c 31 34 29 2a 28 46  80 32 35 36 29 3a e7 28  |<<14)*(F.256):.(|
00000a10  46 80 34 29 3c 3e 30 8c  42 3d 42 84 32 35 36 0d  |F.4)<>0.B=B.256.|
00000a20  02 8a 24 f2 45 28 46 80  32 35 35 29 3a f2 45 28  |..$.E(F.255):.E(|
00000a30  48 29 3a e7 a9 28 55 24  29 3e 4a 8c 4a 3d a9 28  |H):..(U$)>J.J=.(|
00000a40  55 24 29 0d 02 94 2e f2  45 28 42 29 3a f2 57 28  |U$).....E(B):.W(|
00000a50  55 24 2c 47 24 2c 28 46  80 34 29 29 3a fd 4d 24  |U$,G$,(F.4)):.M$|
00000a60  3d 22 22 3a 21 49 3d 4a  2a 31 36 2b 31 36 3a 3d  |="":!I=J*16+16:=|
00000a70  54 0d 02 9e 28 dd f2 57  28 50 24 2c 47 24 2c 71  |T...(..W(P$,G$,q|
00000a80  29 e7 c0 50 24 2c 31 29  3d 22 a4 22 8c 50 24 3d  |)..P$,1)=".".P$=|
00000a90  a0 28 c1 50 24 2c 32 29  29 0d 02 a8 18 e7 a9 28  |.(.P$,2))......(|
00000aa0  50 24 29 3c 31 32 80 47  24 3d 22 22 80 71 3d 30  |P$)<12.G$="".q=0|
00000ab0  8c 0d 02 b2 0a f2 43 28  50 24 29 0d 02 bc 19 cc  |......C(P$).....|
00000ac0  3a f2 45 28 a4 41 28 50  24 29 29 3a e7 47 24 3c  |:.E(.A(P$)):.G$<|
00000ad0  3e 22 22 8c 0d 02 c6 36  5a 25 21 2d 38 3d 5a 25  |>""....6Z%!-8=Z%|
00000ae0  21 2d 38 84 32 30 35 31  3a e7 c0 a4 51 28 47 24  |!-8.2051:...Q(G$|
00000af0  29 2c 32 29 3d 22 73 6d  22 8c 5a 25 21 2d 38 3d  |),2)="sm".Z%!-8=|
00000b00  5a 25 21 2d 38 82 32 30  34 38 0d 02 d0 12 f2 45  |Z%!-8.2048.....E|
00000b10  28 a4 41 28 22 53 22 2b  47 24 29 29 0d 02 da 0c  |(.A("S"+G$))....|
00000b20  cc 3a f2 45 28 2d 31 29  0d 02 e4 0f cd 3a f2 45  |.:.E(-1).....:.E|
00000b30  28 a9 28 50 24 29 29 0d  02 ee 07 cd 3a e1 0d 02  |(.(P$)).....:...|
00000b40  f8 4b dd a4 53 28 f8 4d  24 2c f8 44 24 29 3a ea  |.K..S(.M$,.D$):.|
00000b50  53 24 3a 53 24 3d c0 4d  24 2c a7 4d 24 2c 22 7c  |S$:S$=.M$,.M$,"||
00000b60  22 29 2d 31 29 3a 4d 24  3d c1 4d 24 2c a9 28 53  |")-1):M$=.M$,.(S|
00000b70  24 29 2b 32 29 3a e7 a7  53 24 2c 22 5d 22 29 3c  |$)+2):..S$,"]")<|
00000b80  31 8c 53 24 2b 3d 22 5d  22 0d 03 02 31 44 24 3d  |1.S$+="]"...1D$=|
00000b90  c1 53 24 2c a7 53 24 2c  22 5d 22 29 2b 31 29 3a  |.S$,.S$,"]")+1):|
00000ba0  53 24 3d c0 53 24 2c a7  53 24 2c 22 5d 22 29 2d  |S$=.S$,.S$,"]")-|
00000bb0  31 29 3a 3d a4 45 28 53  24 29 0d 03 0c 30 dd f2  |1):=.E(S$)...0..|
00000bc0  43 28 50 24 29 e7 a9 28  50 24 29 3e 31 31 8c 85  |C(P$)..(P$)>11..|
00000bd0  32 30 35 31 2c 22 4d 65  6e 75 20 65 6e 74 72 79  |2051,"Menu entry|
00000be0  20 74 6f 6f 20 6c 6f 6e  67 22 0d 03 16 43 24 5a  | too long"...C$Z|
00000bf0  25 3d 50 24 3a 5a 25 2b  3d 31 32 3a 4a 25 2d 3d  |%=P$:Z%+=12:J%-=|
00000c00  31 32 3a e7 4a 25 3c 3d  34 8c 85 32 30 35 31 2c  |12:.J%<=4..2051,|
00000c10  22 4e 6f 74 20 65 6e 6f  75 67 68 20 6d 65 6d 6f  |"Not enough memo|
00000c20  72 79 20 66 6f 72 20 6d  65 6e 75 73 22 0d 03 20  |ry for menus".. |
00000c30  05 e1 0d 03 2a 49 dd f2  45 28 57 25 29 3a 21 5a  |....*I..E(W%):!Z|
00000c40  25 3d 57 25 3a 5a 25 2b  3d 34 3a 4a 25 2d 3d 34  |%=W%:Z%+=4:J%-=4|
00000c50  3a e7 4a 25 3c 3d 34 8c  85 32 30 35 31 2c 22 4e  |:.J%<=4..2051,"N|
00000c60  6f 74 20 65 6e 6f 75 67  68 20 6d 65 6d 6f 72 79  |ot enough memory|
00000c70  20 66 6f 72 20 6d 65 6e  75 73 22 0d 03 34 05 e1  | for menus"..4..|
00000c80  0d 03 3e 5b dd a4 57 28  4d 24 2c f8 44 2c f8 47  |..>[..W(M$,.D,.G|
00000c90  24 29 3a ea 53 24 2c 44  24 2c 41 3a 44 3d 2d 31  |$):.S$,D$,A:D=-1|
00000ca0  3a 47 24 3d 22 22 3a 4d  24 3d 4d 24 2b 22 2c 22  |:G$="":M$=M$+","|
00000cb0  3a c8 95 4d 24 3c 3e 22  22 3a 53 24 3d c0 4d 24  |:..M$<>"":S$=.M$|
00000cc0  2c 31 29 3a 4d 24 3d c1  4d 24 2c 32 29 3a e7 53  |,1):M$=.M$,2):.S|
00000cd0  24 3d 22 54 22 8c 41 3d  41 84 31 0d 03 48 11 e7  |$="T".A=A.1..H..|
00000ce0  53 24 3d 22 44 22 8c 41  3d 41 84 32 0d 03 52 11  |S$="D".A=A.2..R.|
00000cf0  e7 53 24 3d 22 57 22 8c  41 3d 41 84 34 0d 03 5c  |.S$="W".A=A.4..\|
00000d00  13 e7 53 24 3d 22 53 22  8c 41 3d 41 84 32 35 36  |..S$="S".A=A.256|
00000d10  0d 03 66 0c e7 53 24 3d  22 3e 22 8c 0d 03 70 2b  |..f..S$=">"...p+|
00000d20  44 3d a0 28 c0 4d 24 2c  a7 4d 24 2c 22 2c 22 29  |D=.(.M$,.M$,",")|
00000d30  2d 31 29 29 3a 4d 24 3d  c1 4d 24 2c a7 4d 24 2c  |-1)):M$=.M$,.M$,|
00000d40  22 2c 22 29 2b 31 29 0d  03 7a 0e cd 3a e7 53 24  |",")+1)..z..:.S$|
00000d50  3d 22 7d 22 8c 0d 03 84  2d 47 24 3d c0 4d 24 2c  |="}"....-G$=.M$,|
00000d60  a7 4d 24 2c 22 2c 22 29  2d 31 29 2b 22 20 22 3a  |.M$,",")-1)+" ":|
00000d70  4d 24 3d c1 4d 24 2c a7  4d 24 2c 22 2c 22 29 2b  |M$=.M$,.M$,",")+|
00000d80  31 29 0d 03 8e 0a cd 3a  ce 3a 3d 41 0d 03 98 46  |1).....:.:=A...F|
00000d90  dd a4 41 28 45 24 29 ea  56 3a 56 3d 49 25 3a e7  |..A(E$).V:V=I%:.|
00000da0  a9 28 45 24 29 3e 58 25  2d 31 8c 85 32 30 35 31  |.(E$)>X%-1..2051|
00000db0  2c 22 4e 6f 74 20 65 6e  6f 75 67 68 20 72 6f 6f  |,"Not enough roo|
00000dc0  6d 20 66 6f 72 20 69 6e  64 69 72 65 63 74 69 6f  |m for indirectio|
00000dd0  6e 22 0d 03 a2 25 24 49  25 3d 45 24 3a 49 25 2b  |n"...%$I%=E$:I%+|
00000de0  3d a9 28 45 24 29 2b 31  3a 58 25 2d 3d a9 28 45  |=.(E$)+1:X%-=.(E|
00000df0  24 29 2b 31 3a 3d 56 0d  03 ac 51 dd f2 4a 3a c8  |$)+1:=V...Q..J:.|
00000e00  99 26 34 30 30 63 66 2c  2c 45 25 3a 43 25 3d 54  |.&400cf,,E%:C%=T|
00000e10  25 3a 5f 25 3d 45 25 21  30 2d 36 34 3a 7a 25 3d  |%:_%=E%!0-64:z%=|
00000e20  39 36 2b 34 30 2a 52 25  3a c8 99 26 34 30 30 64  |96+40*R%:..&400d|
00000e30  34 2c 2c 54 25 2c 45 25  21 30 2d 36 34 2c 39 36  |4,,T%,E%!0-64,96|
00000e40  2b 34 30 2a 52 25 3a e1  0d 03 b6 1c dd f2 50 3a  |+40*R%:.......P:|
00000e50  c8 99 26 34 30 30 64 34  2c 2c 43 25 2c 5f 25 2c  |..&400d4,,C%,_%,|
00000e60  7a 25 3a e1 0d 03 c0 57  dd a4 47 28 5a 25 29 ea  |z%:....W..G(Z%).|
00000e70  51 25 2c 43 3a 51 25 3d  5a 25 3a 43 3d 30 3a c8  |Q%,C:Q%=Z%:C=0:.|
00000e80  95 28 45 25 21 43 3e 2d  31 80 51 25 3c 3e 55 29  |.(E%!C>-1.Q%<>U)|
00000e90  3a 51 25 3d 51 25 21 28  33 32 2b 28 45 25 21 43  |:Q%=Q%!(32+(E%!C|
00000ea0  29 2a 32 34 29 3a 43 2b  3d 34 3a ce 3a e7 51 25  |)*24):C+=4:.:.Q%|
00000eb0  3d 55 80 45 25 21 43 3c  3e 30 8c 0d 03 ca 27 c8  |=U.E%!C<>0....'.|
00000ec0  99 26 34 30 30 61 30 2c  2c 55 2c 45 25 2b 43 2c  |.&400a0,,U,E%+C,|
00000ed0  c4 32 35 35 2c bd 30 29  2c 32 35 35 b8 2c 2c 2c  |.255,.0),255.,,,|
00000ee0  41 24 0d 03 d4 28 cc 3a  c8 99 26 34 30 30 64 35  |A$...(.:..&400d5|
00000ef0  2c 2c 5a 25 2c 45 25 2c  c4 32 35 35 2c bd 30 29  |,,Z%,E%,.255,.0)|
00000f00  2c 32 35 35 b8 2c 2c 2c  41 24 0d 03 de 09 cd 3a  |,255.,,,A$.....:|
00000f10  3d 41 24 0d 03 e8 6f dd  a4 50 28 4f 24 2c 4a 24  |=A$...o..P(O$,J$|
00000f20  2c 73 29 ea 58 3a 4a 24  3d a4 45 28 4a 24 29 3a  |,s).X:J$=.E(J$):|
00000f30  45 25 21 30 3d 2d 94 28  73 29 3a 45 25 21 34 3d  |E%!0=-.(s):E%!4=|
00000f40  30 3a 45 25 21 38 3d 2d  31 36 3a 45 25 21 31 32  |0:E%!8=-16:E%!12|
00000f50  3d 31 32 2b 31 36 2a a9  28 4a 24 29 3a 45 25 21  |=12+16*.(J$):E%!|
00000f60  31 36 3d 38 38 3a e7 45  25 21 31 32 3c 31 32 2b  |16=88:.E%!12<12+|
00000f70  31 36 2a 34 8c 45 25 21  31 32 3d 31 32 2b 31 36  |16*4.E%!12=12+16|
00000f80  2a 34 0d 03 f2 0c e7 4a  24 3c 3e 22 22 8c 0d 03  |*4.....J$<>""...|
00000f90  fc 59 45 25 21 32 30 3d  28 31 3c 3c 32 38 29 2b  |.YE%!20=(1<<28)+|
00000fa0  28 37 3c 3c 32 34 29 2b  28 33 3c 3c 31 32 29 2b  |(7<<24)+(3<<12)+|
00000fb0  28 31 31 29 2b 28 31 3c  3c 38 29 3a 45 25 21 32  |(11)+(1<<8):E%!2|
00000fc0  34 3d a4 41 28 4a 24 29  3a 45 25 21 32 38 3d a4  |4=.A(J$):E%!28=.|
00000fd0  41 28 22 53 22 2b 4f 24  29 3a 45 25 21 33 32 3d  |A("S"+O$):E%!32=|
00000fe0  a9 28 4a 24 29 2b 31 0d  04 06 34 cc 3a 45 25 21  |.(J$)+1...4.:E%!|
00000ff0  32 30 3d 28 31 3c 3c 32  38 29 2b 28 37 3c 3c 32  |20=(1<<28)+(7<<2|
00001000  34 29 2b 28 33 3c 3c 31  32 29 2b 28 32 36 29 3a  |4)+(3<<12)+(26):|
00001010  24 28 45 25 2b 32 34 29  3d 4f 24 0d 04 10 17 cd  |$(E%+24)=O$.....|
00001020  3a c8 99 26 34 30 30 63  32 2c 2c 45 25 b8 58 3a  |:..&400c2,,E%.X:|
00001030  3d 58 0d 04 1a 59 dd f2  47 28 47 25 2c 4e 25 29  |=X...Y..G(G%,N%)|
00001040  3a 47 25 2b 3d 47 25 3d  2d 31 3a 21 45 25 3d 47  |:G%+=G%=-1:!E%=G|
00001050  25 3a 45 25 21 34 3d 4e  25 3a c8 99 26 34 30 30  |%:E%!4=N%:..&400|
00001060  63 65 2c 2c 45 25 3a c8  99 26 34 30 30 64 31 2c  |ce,,E%:..&400d1,|
00001070  47 25 2c 45 25 21 38 2c  45 25 21 31 32 2c 45 25  |G%,E%!8,E%!12,E%|
00001080  21 31 36 2c 45 25 21 32  30 3a e1 0d 04 24 71 dd  |!16,E%!20:...$q.|
00001090  f2 4d 28 47 25 2c 4e 25  2c 51 24 29 51 24 3d a4  |.M(G%,N%,Q$)Q$=.|
000010a0  45 28 51 24 29 3a 45 25  21 30 3d 47 25 3a 45 25  |E(Q$):E%!0=G%:E%|
000010b0  21 34 3d 4e 25 3a c8 99  26 34 30 30 63 65 2c 2c  |!4=N%:..&400ce,,|
000010c0  45 25 3a e7 28 28 45 25  21 32 34 29 80 32 35 36  |E%:.((E%!24).256|
000010d0  29 3d 30 8c 85 32 30 35  31 2c 22 49 63 6f 6e 20  |)=0..2051,"Icon |
000010e0  69 73 6e 27 74 20 69 6e  64 69 72 65 63 74 65 64  |isn't indirected|
000010f0  20 28 23 22 2b c3 4e 25  2b 22 29 22 0d 04 2e 13  | (#"+.N%+")"....|
00001100  e7 a4 4e 28 45 25 21 32  38 29 3c 3e 51 24 8c 0d  |..N(E%!28)<>Q$..|
00001110  04 38 46 e7 a9 28 51 24  29 3c 45 25 21 33 36 8c  |.8F..(Q$)<E%!36.|
00001120  24 28 45 25 21 32 38 29  3d 51 24 8b 85 32 30 35  |$(E%!28)=Q$..205|
00001130  31 2c 22 54 65 78 74 20  74 6f 6f 20 6c 6f 6e 67  |1,"Text too long|
00001140  20 66 6f 72 20 69 63 6f  6e 20 28 23 22 2b c3 4e  | for icon (#"+.N|
00001150  25 2b 22 29 22 0d 04 42  0d f2 47 28 47 25 2c 4e  |%+")"..B..G(G%,N|
00001160  25 29 0d 04 4c 07 cd 3a  e1 0d 04 56 45 dd f2 49  |%)..L..:...VE..I|
00001170  28 50 2c 57 2c 4d 29 3a  ea 53 2c 45 2c 5a 24 2c  |(P,W,M):.S,E,Z$,|
00001180  5a 2c 45 24 2c 41 24 2c  7a 24 2c 54 24 3a 5a 3d  |Z,E$,A$,z$,T$:Z=|
00001190  a3 3a 53 3d 2d 31 3a f5  3a f3 45 2c 5a 24 3a e7  |.:S=-1:.:.E,Z$:.|
000011a0  45 3e 28 31 3c 3c 31 36  29 84 45 3c 30 8c 0d 04  |E>(1<<16).E<0...|
000011b0  60 09 e7 53 3d 50 8c 0d  04 6a 13 45 3d 57 3a 5a  |`..S=P...j.E=W:Z|
000011c0  24 3d 22 22 3a 7a 24 3d  41 24 0d 04 74 0f cc 3a  |$="":z$=A$..t..:|
000011d0  53 3d 45 3a 41 24 3d 5a  24 0d 04 7e 05 cd 0d 04  |S=E:A$=Z$..~....|
000011e0  88 0f cd 3a e7 45 3d 57  80 53 3d 50 8c 0d 04 92  |...:.E=W.S=P....|
000011f0  10 e7 57 3d 2d 31 84 5a  24 3d 22 22 8c 0d 04 9c  |..W=-1.Z$=""....|
00001200  15 f2 41 28 a4 45 28 41  24 29 2b 22 7c 4d 22 2c  |..A(.E(A$)+"|M",|
00001210  4d 29 0d 04 a6 30 cc 3a  41 24 3d a4 45 28 41 24  |M)...0.:A$=.E(A$|
00001220  29 3a e7 a7 41 24 2c 22  7c 4d 22 29 3e 30 8c 41  |):..A$,"|M")>0.A|
00001230  24 3d c0 41 24 2c a7 41  24 2c 22 7c 4d 22 29 2d  |$=.A$,.A$,"|M")-|
00001240  31 29 0d 04 b0 1c f2 41  28 a4 45 28 41 24 29 2b  |1).....A(.E(A$)+|
00001250  22 7c 4d 22 2b a4 45 28  5a 24 29 2c 4d 29 0d 04  |"|M"+.E(Z$),M)..|
00001260  ba 09 cd 3a 5a 3d b9 0d  04 c4 17 cd 3a fd 5a 24  |...:Z=......:.Z$|
00001270  3d 22 2d 31 22 84 5a 3d  b9 3a e7 ac 5a 8c 0d 04  |="-1".Z=.:..Z...|
00001280  ce 36 21 41 25 3d 2d 31  3a 41 25 21 34 3d 2d 31  |.6!A%=-1:A%!4=-1|
00001290  3a 41 25 21 38 3d 2d 31  3a c8 99 26 34 30 30 66  |:A%!8=-1:..&400f|
000012a0  34 2c 31 2c 41 25 2c 50  2c 57 3a e7 21 41 25 3c  |4,1,A%,P,W:.!A%<|
000012b0  3e 2d 31 8c 0d 04 d8 69  c8 99 26 34 30 30 64 35  |>-1....i..&400d5|
000012c0  2c 2c 43 25 2c 41 25 2c  c4 32 35 35 2c 22 20 22  |,,C%,A%,.255," "|
000012d0  29 b8 2c 2c 2c 54 24 3a  41 24 3d 54 24 3a c8 95  |).,,,T$:A$=T$:..|
000012e0  a7 41 24 2c 22 20 22 29  3e 30 3a c1 41 24 2c a7  |.A$," ")>0:.A$,.|
000012f0  41 24 2c 22 20 22 29 2c  31 29 3d 22 5f 22 3a ce  |A$," "),1)="_":.|
00001300  3a 5a 24 3d a4 4d 28 22  48 4d 22 2b 41 24 29 3a  |:Z$=.M("HM"+A$):|
00001310  e7 5a 24 3c 3e 22 48 4d  22 2b 41 24 8c 0d 04 e2  |.Z$<>"HM"+A$....|
00001320  0c f2 41 28 5a 24 2c 4d  29 0d 04 ec 30 cc 3a f5  |..A(Z$,M)...0.:.|
00001330  3a f3 41 24 2c 45 2c 5a  24 2c 5a 24 3a fd a0 28  |:.A$,E,Z$,Z$:..(|
00001340  41 24 29 3d 43 25 84 41  24 3d 22 2d 32 22 3a e7  |A$)=C%.A$="-2":.|
00001350  41 24 3c 3e 22 2d 32 22  8c 0d 04 f6 0a e7 45 3e  |A$<>"-2"......E>|
00001360  2d 31 8c 0d 05 00 10 f2  41 28 5a 24 2c 4d 29 3a  |-1......A(Z$,M):|
00001370  5a 3d b9 0d 05 0a 24 cc  3a f5 3a f3 53 2c 41 24  |Z=....$.:.:.S,A$|
00001380  2c 45 2c 5a 24 3a e7 bb  28 41 24 29 3d 30 80 41  |,E,Z$:..(A$)=0.A|
00001390  24 3c 3e 22 30 22 8c 0d  05 14 17 e7 54 24 3d 41  |$<>"0"......T$=A|
000013a0  24 8c f2 41 28 5a 24 2c  4d 29 3a 5a 3d b9 0d 05  |$..A(Z$,M):Z=...|
000013b0  1e 20 cc 3a e7 53 3d 41  25 21 30 80 bb 28 41 24  |. .:.S=A%!0..(A$|
000013c0  29 3d 41 25 21 34 80 45  3d 41 25 21 38 8c 0d 05  |)=A%!4.E=A%!8...|
000013d0  28 10 f2 41 28 5a 24 2c  4d 29 3a 5a 3d b9 0d 05  |(..A(Z$,M):Z=...|
000013e0  32 05 cd 0d 05 3c 17 cd  3a fd 5a 3d b9 84 53 3d  |2....<..:.Z=..S=|
000013f0  2d 32 84 53 3e 33 32 37  36 38 0d 05 46 05 cd 0d  |-2.S>32768..F...|
00001400  05 50 05 cd 0d 05 5a 05  cd 0d 05 64 05 cd 0d 05  |.P....Z....d....|
00001410  6e 07 cd 3a e1 0d 05 78  2d dd f2 41 28 5a 24 2c  |n..:...x-..A(Z$,|
00001420  4d 29 5a 24 3d a4 45 28  5a 24 29 3a e7 c2 5a 24  |M)Z$=.E(Z$):..Z$|
00001430  2c 32 29 3c 3e 22 7c 4d  22 8c 5a 24 2b 3d 22 7c  |,2)<>"|M".Z$+="||
00001440  4d 22 0d 05 82 60 ea 46  24 2c 57 24 3a 5a 24 3d  |M"...`.F$,W$:Z$=|
00001450  a4 46 28 5a 24 29 3a c8  95 a7 5a 24 2c 22 7c 4d  |.F(Z$):...Z$,"|M|
00001460  22 29 3e 30 3a 46 24 3d  c0 5a 24 2c a7 5a 24 2c  |")>0:F$=.Z$,.Z$,|
00001470  22 7c 4d 22 29 2d 31 29  3a 5a 24 3d c1 5a 24 2c  |"|M")-1):Z$=.Z$,|
00001480  a9 28 46 24 29 2b 33 29  3a e7 a7 22 21 2e 3f 22  |.(F$)+3):.."!.?"|
00001490  2c c2 46 24 2c 31 29 29  3d 30 8c 46 24 2b 3d 22  |,.F$,1))=0.F$+="|
000014a0  2e 22 0d 05 8c 68 57 24  2b 3d 46 24 2b 22 7c 4d  |."...hW$+=F$+"|M|
000014b0  22 3a ce 3a 45 25 21 31  32 3d 45 25 21 38 3a 45  |":.:E%!12=E%!8:E|
000014c0  25 21 34 3d 4d 3a 45 25  21 31 36 3d 31 32 38 33  |%!4=M:E%!16=1283|
000014d0  3a 24 28 45 25 2b 32 30  29 3d 57 24 2b bd 30 3a  |:$(E%+20)=W$+.0:|
000014e0  45 25 21 30 3d 32 30 2b  28 a9 28 57 24 29 2b 34  |E%!0=20+(.(W$)+4|
000014f0  29 80 2d 34 3a c8 99 26  34 30 30 65 37 2c 31 37  |).-4:..&400e7,17|
00001500  2c 45 25 2c 45 25 21 34  3a e1 0d 05 96 35 dd f2  |,E%,E%!4:....5..|
00001510  51 ea 47 2c 4a 3a e7 4d  25 3c 3e 2d 31 8c 85 32  |Q.G,J:.M%<>-1..2|
00001520  30 35 31 2c 22 4d 65 73  73 61 67 65 20 66 69 6c  |051,"Message fil|
00001530  65 20 61 6c 72 65 61 64  79 20 6f 70 65 6e 22 0d  |e already open".|
00001540  05 a0 38 c8 99 26 34 31  35 30 30 2c 2c 4c 24 2b  |..8..&41500,,L$+|
00001550  22 2e 4d 65 73 73 61 67  65 73 22 b8 47 2c 2c 4a  |".Messages".G,,J|
00001560  3a e7 28 47 80 31 29 3d  31 8c 46 25 3d 30 8b 46  |:.(G.1)=1.F%=0.F|
00001570  25 3d a4 5a 28 4a 29 0d  05 aa 3c e7 46 25 3d 2d  |%=.Z(J)...<.F%=-|
00001580  31 8c 85 32 30 35 31 2c  22 4e 6f 20 72 6f 6f 6d  |1..2051,"No room|
00001590  20 66 6f 72 20 73 65 63  6f 6e 64 61 72 79 20 4d  | for secondary M|
000015a0  65 73 73 61 67 65 54 72  61 6e 73 20 62 75 66 66  |essageTrans buff|
000015b0  65 72 22 0d 05 b4 4b 4d  25 3d a4 5a 28 31 36 29  |er"...KM%=.Z(16)|
000015c0  3a e7 4d 25 3d 2d 31 8c  f2 46 28 46 25 29 3a 85  |:.M%=-1..F(F%):.|
000015d0  32 30 35 31 2c 22 4e 6f  20 72 6f 6f 6d 20 66 6f  |2051,"No room fo|
000015e0  72 20 70 72 69 6d 61 72  79 20 4d 65 73 73 61 67  |r primary Messag|
000015f0  65 54 72 61 6e 73 20 62  75 66 66 65 72 22 0d 05  |eTrans buffer"..|
00001600  be 23 c8 99 26 34 31 35  30 31 2c 4d 25 2c 4c 24  |.#..&41501,M%,L$|
00001610  2b 22 2e 4d 65 73 73 61  67 65 73 22 2c 46 25 3a  |+".Messages",F%:|
00001620  e1 0d 05 c8 23 dd f2 5a  3a ea 85 3a ee 85 ea 3a  |....#..Z:..:...:|
00001630  ef 34 3a f6 3a f1 22 20  61 74 20 22 3b 9e 3a 77  |.4:.:." at ";.:w|
00001640  3d a5 3a e1 0d 05 d2 0b  e7 4d 25 3e 2d 31 8c 0d  |=.:......M%>-1..|
00001650  05 dc 1d c8 99 26 36 31  35 30 34 2c 4d 25 3a f2  |.....&61504,M%:.|
00001660  46 28 4d 25 29 3a f2 46  28 46 25 29 0d 05 e6 07  |F(M%):.F(F%)....|
00001670  cd 3a e1 0d 05 f0 38 dd  a4 4d 28 4e 24 29 ea 49  |.:....8..M(N$).I|
00001680  24 2c 4b 24 2c 59 24 2c  45 24 2c 73 25 2c 47 3a  |$,K$,Y$,E$,s%,G:|
00001690  e7 4d 25 3d 2d 31 8c 3d  4e 24 8b 4e 24 2b 3d 22  |.M%=-1.=N$.N$+="|
000016a0  3a 3a 3a 3a 22 3a 45 24  3d 4e 24 0d 05 fa cf 45  |::::":E$=N$....E|
000016b0  24 3d c1 45 24 2c a7 45  24 2c 22 3a 22 29 2b 31  |$=.E$,.E$,":")+1|
000016c0  29 3a 4e 24 3d c0 4e 24  2c a7 4e 24 2c 22 3a 22  |):N$=.N$,.N$,":"|
000016d0  29 2d 31 29 3a 49 24 3d  c0 45 24 2c a7 45 24 2c  |)-1):I$=.E$,.E$,|
000016e0  22 3a 22 29 2d 31 29 3a  45 24 3d c1 45 24 2c a9  |":")-1):E$=.E$,.|
000016f0  28 49 24 29 2b 32 29 3a  4b 24 3d c0 45 24 2c a7  |(I$)+2):K$=.E$,.|
00001700  45 24 2c 22 3a 22 29 2d  31 29 3a 45 24 3d c1 45  |E$,":")-1):E$=.E|
00001710  24 2c a9 28 4b 24 29 2b  32 29 3a 59 24 3d c0 45  |$,.(K$)+2):Y$=.E|
00001720  24 2c a7 45 24 2c 22 3a  22 29 2d 31 29 3a 45 24  |$,.E$,":")-1):E$|
00001730  3d c1 45 24 2c a9 28 59  24 29 2b 32 29 3a c8 99  |=.E$,.(Y$)+2):..|
00001740  26 36 31 35 30 32 2c 4d  25 2c 4e 24 2c 41 25 2c  |&61502,M%,N$,A%,|
00001750  32 35 36 2c 49 24 2c 4b  24 2c 59 24 b8 2c 2c 2c  |256,I$,K$,Y$.,,,|
00001760  73 25 3b 47 3a e7 28 47  80 31 29 3d 31 8c 3d 4e  |s%;G:.(G.1)=1.=N|
00001770  24 8b 41 25 3f 73 25 3d  31 33 0d 06 04 0c 3d a4  |$.A%?s%=13....=.|
00001780  46 28 24 41 25 29 0d 06  0e 25 dd a4 45 28 45 24  |F($A%)...%..E(E$|
00001790  29 3a e7 c0 45 24 2c 31  29 3d 22 3e 22 8c 45 24  |):..E$,1)=">".E$|
000017a0  3d a4 4d 28 c1 45 24 2c  32 29 29 0d 06 18 07 3d  |=.M(.E$,2))....=|
000017b0  45 24 0d 06 22 35 dd a4  4e 28 4e 29 ea 45 24 3a  |E$.."5..N(N).E$:|
000017c0  c8 95 3f 4e 3e 33 31 80  a9 28 45 24 29 3c 32 35  |..?N>31..(E$)<25|
000017d0  35 3a 45 24 3d 45 24 2b  bd 3f 4e 3a 4e 3d 4e 2b  |5:E$=E$+.?N:N=N+|
000017e0  31 3a ce 3a 3d 45 24 0d  06 2c 4a dd a4 51 28 45  |1:.:=E$..,J..Q(E|
000017f0  24 29 ea 57 24 2c 46 24  2c 52 3a e3 52 3d 31 b8  |$).W$,F$,R:.R=1.|
00001800  a9 28 45 24 29 3a 57 24  3d c1 45 24 2c 52 2c 31  |.(E$):W$=.E$,R,1|
00001810  29 3a e7 57 24 3e 3d 22  41 22 80 57 24 3c 3d 22  |):.W$>="A".W$<="|
00001820  5a 22 8c 57 24 3d bd 28  97 28 57 24 29 2b 33 32  |Z".W$=.(.(W$)+32|
00001830  29 0d 06 36 10 46 24 2b  3d 57 24 3a ed 3a 3d 46  |)..6.F$+=W$:.:=F|
00001840  24 0d 06 40 1d dd a4 46  28 45 24 29 3a ea 46 24  |$..@...F(E$):.F$|
00001850  2c 58 24 3a ea 85 3a ee  85 ea 3a 3d 45 24 0d 06  |,X$:..:...:=E$..|
00001860  4a 5b c8 95 a7 45 24 2c  22 a4 22 29 3e 30 3a 46  |J[...E$,".")>0:F|
00001870  24 3d c1 45 24 2c a7 45  24 2c 22 a4 22 29 2b 31  |$=.E$,.E$,".")+1|
00001880  29 3a 46 24 3d c0 46 24  2c a7 46 24 2c 22 a4 22  |):F$=.F$,.F$,"."|
00001890  29 2d 31 29 3a 58 24 3d  46 24 3a e7 c2 58 24 2c  |)-1):X$=F$:..X$,|
000018a0  31 29 3c 3e 22 24 22 8c  58 24 3d 22 53 54 52 24  |1)<>"$".X$="STR$|
000018b0  28 22 2b 58 24 2b 22 29  22 0d 06 54 38 45 24 3d  |("+X$+")"..T8E$=|
000018c0  c0 45 24 2c a7 45 24 2c  22 a4 22 29 2d 31 29 2b  |.E$,.E$,".")-1)+|
000018d0  a0 28 58 24 29 2b c1 45  24 2c a7 45 24 2c 22 a4  |.(X$)+.E$,.E$,".|
000018e0  22 29 2b a9 28 46 24 29  2b 32 29 3a ce 3a 3d 45  |")+.(F$)+2):.:=E|
000018f0  24 0d 06 5e 2d dd a4 55  28 43 24 29 ea 56 24 3a  |$..^-..U(C$).V$:|
00001900  e7 a7 43 24 2c 22 3a 22  29 3e 30 8c 43 24 3d c1  |..C$,":")>0.C$=.|
00001910  43 24 2c a7 43 24 2c 22  3a 22 29 2b 31 29 0d 06  |C$,.C$,":")+1)..|
00001920  68 0f c8 8e a7 43 24 2c  22 2e 22 29 ca 0d 06 72  |h....C$,".")...r|
00001930  0c c9 30 3a 56 24 3d 43  24 0d 06 7c 1f 7f 56 24  |..0:V$=C$..|..V$|
00001940  3d a4 55 28 c2 43 24 2c  a9 28 43 24 29 2d a7 43  |=.U(.C$,.(C$)-.C|
00001950  24 2c 22 2e 22 29 29 29  0d 06 86 09 cb 3a 3d 56  |$,"."))).....:=V|
00001960  24 0d 06 90 36 dd a4 5a  28 59 25 29 3a ea 46 3a  |$...6..Z(Y%):.F:|
00001970  e7 59 25 3c 31 8c 85 32  30 35 31 2c 22 43 61 6e  |.Y%<1..2051,"Can|
00001980  6e 6f 74 20 63 6c 61 69  6d 20 6e 65 67 61 74 69  |not claim negati|
00001990  76 65 20 52 4d 41 22 0d  06 9a 29 c8 99 26 32 30  |ve RMA"...)..&20|
000019a0  30 31 65 2c 36 2c 2c 2c  59 25 b8 2c 2c 42 25 3b  |01e,6,,,Y%.,,B%;|
000019b0  46 3a e7 28 46 80 31 29  3e 30 8c 42 25 3d 2d 31  |F:.(F.1)>0.B%=-1|
000019c0  0d 06 a4 07 3d 42 25 0d  06 ae 23 dd f2 46 28 f8  |....=B%...#..F(.|
000019d0  42 25 29 3a e7 42 25 3e  30 8c c8 99 33 30 2c 37  |B%):.B%>0...30,7|
000019e0  2c 2c 42 25 3a 42 25 3d  2d 31 0d 06 b8 05 e1 0d  |,,B%:B%=-1......|
000019f0  ff                                                |.|
000019f1