�>!RunImage
0�Produced by BasCompress v1.67 (16 Jul 1995)
�ș&400C0,&C8,&4B534154,"HelpFile"�,q%:�J%&A0,Z%575,F%&87,M%76:X%=F%+&87:S%=�:ș&400D9,,�A("<HelpFile$Dir>.Templates"):ș&400DB,,Z%,F%,X%,-1,"prog_info",0�,,F%:ș&400C1,,Z%�c%:ș&400DB,,Z%,F%,X%,-1,"main",0�,,F%:ș&400C1,,Z%�W%:ș&400DA
�$M%="HelpFile":M%!&C=&70207:M%!16=&90:M%!20=44:M%!24=0:M%!28=0:M%!32=c%:M%!36=&7000021:$(M%+40)="Info":M%!52=&80:M%!56=-1:M%!60=M%!36:$(M%+64)="Quit":�e%=0�2�2:P%=J%:[OPTe%:MOV0,#49:ADR1,Z%:SWI &400C7:CMP0,#2:BEQ R%:CMP0,#6:BEQ z%:MOVpc,&E:.R%
�SWI &400C5:B J%:.z%:LDR0,[1,#&C]:LDR2,K%:CMP0,2:BNE J%:LDR0,[1,#8]:CMP0,#2:BNE J%:LDR2,[1]:SUB2,2,#64:LDR3,[1,#4]:ADR1,M%:SWI &400D4:B J%:.K%:&W%:.d%:STR0,[2],#4:MOV4,#0:MOV5,#&D:.w%:LDRB3,[0],#1:CMP3,#&A:STREQB5,[0,#-1]:STREQ0,[2],#4:ADDEQ4,4,#1
�CMP0,1:BLT w%:MOV0,4:MOVpc,&E:]:�:V%=&400*4:M$=�A("<HelpFile$Dir>.!Help"):ș8,17,M$�T%,,,,U%:�T%<>1��42,"!Help file not found."
gD%=�-&8000+V%+U%:ș&400EC,D%,-1�x%:�x%<D%��42,"Sorry, there�s not enough memory to start HelpFile."
�Q%=�:G%=Q%+V%:ș8,16,M$,G%:A%=G%:B%=G%+U%:C%=Q%:a%=�d%:!Z%=0:Z%!4=a%*-32+4:Z%!8=&4D6:Z%!&C=0:ș&400D7,W%,Z%:!Z%=W%:ș&400CB,,Z%:Z%!28=-1:ș&400C5,,Z%:��A
	�:Ȏ�J%�

��1:ș&400C8,,Z%�I%:ȕI%:Y%=Z%!4-Z%!20+8:N%=Z%!16-Z%!24:�H%=N%-Z%!40>>5�N%-Z%!32>>5:�Y%,N%-H%*32:�$(Q%!(H%<<2)):�:ș&400CA,,Z%�I%:�
�3:S%=�
?�9:�!Z%=1�S%=��ș&400CF,,Z%:�Z%!8=1ș&400D4,,M%,!Z%-64,Z%!4

�17,18:�Z%!16=0�S%=�
!�:�S%:ș&400DD,q%,&4B534154:�
,ݤA(Z$):ș&43040�_%:A$=Z$+�_%:�Z(A$)=0�
A$=Z$+"1":�Z(A$)=0�
	A$=Z$
�
	�:=A$
!ݤZ(Z$):�s%:ș8,5,Z$�s%:=s%=1
��A:
M!Z%=�:$(Z%+4)=�$+" at line "+Þ+�0:ș&400DF,Z%,3,"HelpFile"�,S%:S%=S%=2:�
�

00000000  0d 00 01 0f f4 3e 21 52  75 6e 49 6d 61 67 65 0d  |.....>!RunImage.|
00000010  00 02 30 f4 50 72 6f 64  75 63 65 64 20 62 79 20  |..0.Produced by |
00000020  42 61 73 43 6f 6d 70 72  65 73 73 20 76 31 2e 36  |BasCompress v1.6|
00000030  37 20 28 31 36 20 4a 75  6c 20 31 39 39 35 29 0d  |7 (16 Jul 1995).|
00000040  00 03 ef c8 99 26 34 30  30 43 30 2c 26 43 38 2c  |.....&400C0,&C8,|
00000050  26 34 42 35 33 34 31 35  34 2c 22 48 65 6c 70 46  |&4B534154,"HelpF|
00000060  69 6c 65 22 b8 2c 71 25  3a de 4a 25 26 41 30 2c  |ile".,q%:.J%&A0,|
00000070  5a 25 35 37 35 2c 46 25  26 38 37 2c 4d 25 37 36  |Z%575,F%&87,M%76|
00000080  3a 58 25 3d 46 25 2b 26  38 37 3a 53 25 3d a3 3a  |:X%=F%+&87:S%=.:|
00000090  c8 99 26 34 30 30 44 39  2c 2c a4 41 28 22 3c 48  |..&400D9,,.A("<H|
000000a0  65 6c 70 46 69 6c 65 24  44 69 72 3e 2e 54 65 6d  |elpFile$Dir>.Tem|
000000b0  70 6c 61 74 65 73 22 29  3a c8 99 26 34 30 30 44  |plates"):..&400D|
000000c0  42 2c 2c 5a 25 2c 46 25  2c 58 25 2c 2d 31 2c 22  |B,,Z%,F%,X%,-1,"|
000000d0  70 72 6f 67 5f 69 6e 66  6f 22 2c 30 b8 2c 2c 46  |prog_info",0.,,F|
000000e0  25 3a c8 99 26 34 30 30  43 31 2c 2c 5a 25 b8 63  |%:..&400C1,,Z%.c|
000000f0  25 3a c8 99 26 34 30 30  44 42 2c 2c 5a 25 2c 46  |%:..&400DB,,Z%,F|
00000100  25 2c 58 25 2c 2d 31 2c  22 6d 61 69 6e 22 2c 30  |%,X%,-1,"main",0|
00000110  b8 2c 2c 46 25 3a c8 99  26 34 30 30 43 31 2c 2c  |.,,F%:..&400C1,,|
00000120  5a 25 b8 57 25 3a c8 99  26 34 30 30 44 41 0d 00  |Z%.W%:..&400DA..|
00000130  04 f7 24 4d 25 3d 22 48  65 6c 70 46 69 6c 65 22  |..$M%="HelpFile"|
00000140  3a 4d 25 21 26 43 3d 26  37 30 32 30 37 3a 4d 25  |:M%!&C=&70207:M%|
00000150  21 31 36 3d 26 39 30 3a  4d 25 21 32 30 3d 34 34  |!16=&90:M%!20=44|
00000160  3a 4d 25 21 32 34 3d 30  3a 4d 25 21 32 38 3d 30  |:M%!24=0:M%!28=0|
00000170  3a 4d 25 21 33 32 3d 63  25 3a 4d 25 21 33 36 3d  |:M%!32=c%:M%!36=|
00000180  26 37 30 30 30 30 32 31  3a 24 28 4d 25 2b 34 30  |&7000021:$(M%+40|
00000190  29 3d 22 49 6e 66 6f 22  3a 4d 25 21 35 32 3d 26  |)="Info":M%!52=&|
000001a0  38 30 3a 4d 25 21 35 36  3d 2d 31 3a 4d 25 21 36  |80:M%!56=-1:M%!6|
000001b0  30 3d 4d 25 21 33 36 3a  24 28 4d 25 2b 36 34 29  |0=M%!36:$(M%+64)|
000001c0  3d 22 51 75 69 74 22 3a  e3 65 25 3d 30 b8 32 88  |="Quit":.e%=0.2.|
000001d0  32 3a 50 25 3d 4a 25 3a  5b 4f 50 54 65 25 3a 4d  |2:P%=J%:[OPTe%:M|
000001e0  4f 56 30 2c 23 34 39 3a  41 44 52 31 2c 5a 25 3a  |OV0,#49:ADR1,Z%:|
000001f0  53 57 49 20 26 34 30 30  43 37 3a 43 4d 50 30 2c  |SWI &400C7:CMP0,|
00000200  23 32 3a 42 45 51 20 52  25 3a 43 4d 50 30 2c 23  |#2:BEQ R%:CMP0,#|
00000210  36 3a 42 45 51 20 7a 25  3a 4d 4f 56 70 63 2c 26  |6:BEQ z%:MOVpc,&|
00000220  45 3a 2e 52 25 0d 00 05  fa 53 57 49 20 26 34 30  |E:.R%....SWI &40|
00000230  30 43 35 3a 42 20 4a 25  3a 2e 7a 25 3a 4c 44 52  |0C5:B J%:.z%:LDR|
00000240  30 2c 5b 31 2c 23 26 43  5d 3a 4c 44 52 32 2c 4b  |0,[1,#&C]:LDR2,K|
00000250  25 3a 43 4d 50 30 2c 32  3a 42 4e 45 20 4a 25 3a  |%:CMP0,2:BNE J%:|
00000260  4c 44 52 30 2c 5b 31 2c  23 38 5d 3a 43 4d 50 30  |LDR0,[1,#8]:CMP0|
00000270  2c 23 32 3a 42 4e 45 20  4a 25 3a 4c 44 52 32 2c  |,#2:BNE J%:LDR2,|
00000280  5b 31 5d 3a 53 55 42 32  2c 32 2c 23 36 34 3a 4c  |[1]:SUB2,2,#64:L|
00000290  44 52 33 2c 5b 31 2c 23  34 5d 3a 41 44 52 31 2c  |DR3,[1,#4]:ADR1,|
000002a0  4d 25 3a 53 57 49 20 26  34 30 30 44 34 3a 42 20  |M%:SWI &400D4:B |
000002b0  4a 25 3a 2e 4b 25 3a 26  57 25 3a 2e 64 25 3a 53  |J%:.K%:&W%:.d%:S|
000002c0  54 52 30 2c 5b 32 5d 2c  23 34 3a 4d 4f 56 34 2c  |TR0,[2],#4:MOV4,|
000002d0  23 30 3a 4d 4f 56 35 2c  23 26 44 3a 2e 77 25 3a  |#0:MOV5,#&D:.w%:|
000002e0  4c 44 52 42 33 2c 5b 30  5d 2c 23 31 3a 43 4d 50  |LDRB3,[0],#1:CMP|
000002f0  33 2c 23 26 41 3a 53 54  52 45 51 42 35 2c 5b 30  |3,#&A:STREQB5,[0|
00000300  2c 23 2d 31 5d 3a 53 54  52 45 51 30 2c 5b 32 5d  |,#-1]:STREQ0,[2]|
00000310  2c 23 34 3a 41 44 44 45  51 34 2c 34 2c 23 31 0d  |,#4:ADDEQ4,4,#1.|
00000320  00 06 83 43 4d 50 30 2c  31 3a 42 4c 54 20 77 25  |...CMP0,1:BLT w%|
00000330  3a 4d 4f 56 30 2c 34 3a  4d 4f 56 70 63 2c 26 45  |:MOV0,4:MOVpc,&E|
00000340  3a 5d 3a ed 3a 56 25 3d  26 34 30 30 2a 34 3a 4d  |:]:.:V%=&400*4:M|
00000350  24 3d a4 41 28 22 3c 48  65 6c 70 46 69 6c 65 24  |$=.A("<HelpFile$|
00000360  44 69 72 3e 2e 21 48 65  6c 70 22 29 3a c8 99 38  |Dir>.!Help"):..8|
00000370  2c 31 37 2c 4d 24 b8 54  25 2c 2c 2c 2c 55 25 3a  |,17,M$.T%,,,,U%:|
00000380  e7 54 25 3c 3e 31 8c 85  34 32 2c 22 21 48 65 6c  |.T%<>1..42,"!Hel|
00000390  70 20 66 69 6c 65 20 6e  6f 74 20 66 6f 75 6e 64  |p file not found|
000003a0  2e 22 0d 00 07 67 44 25  3d 93 2d 26 38 30 30 30  |."...gD%=.-&8000|
000003b0  2b 56 25 2b 55 25 3a c8  99 26 34 30 30 45 43 2c  |+V%+U%:..&400EC,|
000003c0  44 25 2c 2d 31 b8 78 25  3a e7 78 25 3c 44 25 8c  |D%,-1.x%:.x%<D%.|
000003d0  85 34 32 2c 22 53 6f 72  72 79 2c 20 74 68 65 72  |.42,"Sorry, ther|
000003e0  65 91 73 20 6e 6f 74 20  65 6e 6f 75 67 68 20 6d  |e.s not enough m|
000003f0  65 6d 6f 72 79 20 74 6f  20 73 74 61 72 74 20 48  |emory to start H|
00000400  65 6c 70 46 69 6c 65 2e  22 0d 00 08 9e 51 25 3d  |elpFile."....Q%=|
00000410  93 3a 47 25 3d 51 25 2b  56 25 3a c8 99 38 2c 31  |.:G%=Q%+V%:..8,1|
00000420  36 2c 4d 24 2c 47 25 3a  41 25 3d 47 25 3a 42 25  |6,M$,G%:A%=G%:B%|
00000430  3d 47 25 2b 55 25 3a 43  25 3d 51 25 3a 61 25 3d  |=G%+U%:C%=Q%:a%=|
00000440  ba 64 25 3a 21 5a 25 3d  30 3a 5a 25 21 34 3d 61  |.d%:!Z%=0:Z%!4=a|
00000450  25 2a 2d 33 32 2b 34 3a  5a 25 21 38 3d 26 34 44  |%*-32+4:Z%!8=&4D|
00000460  36 3a 5a 25 21 26 43 3d  30 3a c8 99 26 34 30 30  |6:Z%!&C=0:..&400|
00000470  44 37 2c 57 25 2c 5a 25  3a 21 5a 25 3d 57 25 3a  |D7,W%,Z%:!Z%=W%:|
00000480  c8 99 26 34 30 30 43 42  2c 2c 5a 25 3a 5a 25 21  |..&400CB,,Z%:Z%!|
00000490  32 38 3d 2d 31 3a c8 99  26 34 30 30 43 35 2c 2c  |28=-1:..&400C5,,|
000004a0  5a 25 3a ee 85 f2 41 0d  00 09 0c f5 3a c8 8e ba  |Z%:...A.....:...|
000004b0  4a 25 ca 0d 00 0a 86 c9  31 3a c8 99 26 34 30 30  |J%......1:..&400|
000004c0  43 38 2c 2c 5a 25 b8 49  25 3a c8 95 49 25 3a 59  |C8,,Z%.I%:..I%:Y|
000004d0  25 3d 5a 25 21 34 2d 5a  25 21 32 30 2b 38 3a 4e  |%=Z%!4-Z%!20+8:N|
000004e0  25 3d 5a 25 21 31 36 2d  5a 25 21 32 34 3a e3 48  |%=Z%!16-Z%!24:.H|
000004f0  25 3d 4e 25 2d 5a 25 21  34 30 3e 3e 35 b8 4e 25  |%=N%-Z%!40>>5.N%|
00000500  2d 5a 25 21 33 32 3e 3e  35 3a ec 59 25 2c 4e 25  |-Z%!32>>5:.Y%,N%|
00000510  2d 48 25 2a 33 32 3a f1  24 28 51 25 21 28 48 25  |-H%*32:.$(Q%!(H%|
00000520  3c 3c 32 29 29 3a ed 3a  c8 99 26 34 30 30 43 41  |<<2)):.:..&400CA|
00000530  2c 2c 5a 25 b8 49 25 3a  ce 0d 00 0b 0b c9 33 3a  |,,Z%.I%:......3:|
00000540  53 25 3d b9 0d 00 0c 3f  c9 39 3a e7 21 5a 25 3d  |S%=....?.9:.!Z%=|
00000550  31 8c 53 25 3d b9 8b c8  99 26 34 30 30 43 46 2c  |1.S%=....&400CF,|
00000560  2c 5a 25 3a e7 5a 25 21  38 3d 31 c8 99 26 34 30  |,Z%:.Z%!8=1..&40|
00000570  30 44 34 2c 2c 4d 25 2c  21 5a 25 2d 36 34 2c 5a  |0D4,,M%,!Z%-64,Z|
00000580  25 21 34 0d 00 0d 18 c9  31 37 2c 31 38 3a e7 5a  |%!4.....17,18:.Z|
00000590  25 21 31 36 3d 30 8c 53  25 3d b9 0d 00 0e 21 cb  |%!16=0.S%=....!.|
000005a0  3a fd 53 25 3a c8 99 26  34 30 30 44 44 2c 71 25  |:.S%:..&400DD,q%|
000005b0  2c 26 34 42 35 33 34 31  35 34 3a e0 0d 00 0f 2c  |,&4B534154:....,|
000005c0  dd a4 41 28 5a 24 29 3a  c8 99 26 34 33 30 34 30  |..A(Z$):..&43040|
000005d0  b8 5f 25 3a 41 24 3d 5a  24 2b c3 5f 25 3a e7 a4  |._%:A$=Z$+._%:..|
000005e0  5a 28 41 24 29 3d 30 8c  0d 00 10 18 41 24 3d 5a  |Z(A$)=0.....A$=Z|
000005f0  24 2b 22 31 22 3a e7 a4  5a 28 41 24 29 3d 30 8c  |$+"1":..Z(A$)=0.|
00000600  0d 00 11 09 41 24 3d 5a  24 0d 00 12 05 cd 0d 00  |....A$=Z$.......|
00000610  13 09 cd 3a 3d 41 24 0d  00 14 21 dd a4 5a 28 5a  |...:=A$...!..Z(Z|
00000620  24 29 3a ea 73 25 3a c8  99 38 2c 35 2c 5a 24 b8  |$):.s%:..8,5,Z$.|
00000630  73 25 3a 3d 73 25 3d 31  0d 00 15 0b dd f2 41 3a  |s%:=s%=1......A:|
00000640  ee 85 87 0d 00 16 4d 21  5a 25 3d 9f 3a 24 28 5a  |......M!Z%=.:$(Z|
00000650  25 2b 34 29 3d f6 24 2b  22 20 61 74 20 6c 69 6e  |%+4)=.$+" at lin|
00000660  65 20 22 2b c3 9e 2b bd  30 3a c8 99 26 34 30 30  |e "+..+.0:..&400|
00000670  44 46 2c 5a 25 2c 33 2c  22 48 65 6c 70 46 69 6c  |DF,Z%,3,"HelpFil|
00000680  65 22 b8 2c 53 25 3a 53  25 3d 53 25 3d 32 3a e1  |e".,S%:S%=S%=2:.|
00000690  0d ff                                             |..|
00000692