�=&2500:�assem
("�22,4:�19,0,4;0;23;8202;0;0;0;
2.�12,12:�1267,12:�1267,1011:�12,1011:�12,12
<4�10,3)" FEATURES MENU":�10,5)"~~~~~~~~~~~~~~~"
P�28,10,29,35,7
Z�1:�"PLEASE SELECT -":�3
d�'"<A> Elk Ent"
n �'"<B> MORE HELP WITH EXILE"
x/�'"<C> HARD DISK PROJECT"''"    ON THE ELK"
��'"<D> REPLY TO N.Z. GROUP"
��'"<R> RETURN TO MAIN MENU"
��26:*FX21,0
��:a%=�"ABCDEFGHR",�):�a%
�5�a%=1�f$="ELKENT15":g$="":h$="":i$="":�text:�Th@
�E�a%=2�f$="EXILE1":g$="EXILE2":h$="EXILE3":i$="EXILE4":�text:�Th@
��a%=3��"HD"
�2�a%=4�f$="reply":g$="":h$="":i$="":�text:�Th@
��a%=9��"DIR $":�"MENU"
��-102�Th@��:�
�
��text

$�clear:�22,6:�"LOAD "+f$+" 2500"

*�22,3,14:�''"SHIFT TO SCROLL"'':�print

"�(g$)=0��txA

,$�"PRESS SPACE TO CONTINUE":key=�

6$�clear:�22,6:�"LOAD "+g$+" 2500"

@*�22,3,14:�''"SHIFT TO SCROLL"'':�print

T�(h$)=0��txA

^$�"PRESS SPACE TO CONTINUE":key=�

h$�clear:�22,6:�"LOAD "+h$+" 2500"

r*�22,3,14:�''"SHIFT TO SCROLL"'':�print

��(i$)=0��txA

�$�"PRESS SPACE TO CONTINUE":key=�

�$�clear:�22,6:�"LOAD "+i$+" 2500"

�*�22,3,14:�''"SHIFT TO SCROLL"'':�print

�'�;"<P> TO PRINT TEXT, <M> FOR MENU"

�
�:a$=�

��a$="M"��Th@

�#�a$="P"��15,0,2:�print:�3:�Th@

���

��

���assem
�i=0�2�2
P%=&900
	[OPTi
&
.print
0LDA#0:STA&70
:LDA#&25:STA&71
D
.L1 LDY#0
N.L2 LDA(&70),Y
XCMP#0:BEQrts
bCMP#&0D:BEQprt
lCMP#&20:BCCspc
vCMP#&7F:BCSspc
�.prt JSR&FFE3
�.inc INY:BNE L2
�INC&71:JMP L1
�.spc LDA#&20
�JSR&FFE3:JMPinc
�.rts RTS
�
.clear
�LDA#0:STA&72
�LDA#&25:STA&73
�
.L3 LDY#0
�
.L4 LDA#0
�STA(&72),Y
�INY:BNE L4

INC&73

LDA&73
CMP#&40
 
BNE L3
*RTS
4]
>�
H�
�

00000000  0d 00 14 12 d3 3d 26 32  35 30 30 3a f2 61 73 73  |.....=&2500:.ass|
00000010  65 6d 0d 00 28 22 ef 32  32 2c 34 3a ef 31 39 2c  |em..(".22,4:.19,|
00000020  30 2c 34 3b 30 3b 32 33  3b 38 32 30 32 3b 30 3b  |0,4;0;23;8202;0;|
00000030  30 3b 30 3b 0d 00 32 2e  ec 31 32 2c 31 32 3a df  |0;0;..2..12,12:.|
00000040  31 32 36 37 2c 31 32 3a  df 31 32 36 37 2c 31 30  |1267,12:.1267,10|
00000050  31 31 3a df 31 32 2c 31  30 31 31 3a df 31 32 2c  |11:.12,1011:.12,|
00000060  31 32 0d 00 3c 34 f1 8a  31 30 2c 33 29 22 20 46  |12..<4..10,3)" F|
00000070  45 41 54 55 52 45 53 20  4d 45 4e 55 22 3a f1 8a  |EATURES MENU":..|
00000080  31 30 2c 35 29 22 7e 7e  7e 7e 7e 7e 7e 7e 7e 7e  |10,5)"~~~~~~~~~~|
00000090  7e 7e 7e 7e 7e 22 0d 00  50 12 ef 32 38 2c 31 30  |~~~~~"..P..28,10|
000000a0  2c 32 39 2c 33 35 2c 37  0d 00 5a 1c fb 31 3a f1  |,29,35,7..Z..1:.|
000000b0  22 50 4c 45 41 53 45 20  53 45 4c 45 43 54 20 2d  |"PLEASE SELECT -|
000000c0  22 3a fb 33 0d 00 64 13  f1 27 22 3c 41 3e 20 45  |":.3..d..'"<A> E|
000000d0  6c 6b 20 45 6e 74 22 0d  00 6e 20 f1 27 22 3c 42  |lk Ent"..n .'"<B|
000000e0  3e 20 4d 4f 52 45 20 48  45 4c 50 20 57 49 54 48  |> MORE HELP WITH|
000000f0  20 45 58 49 4c 45 22 0d  00 78 2f f1 27 22 3c 43  | EXILE"..x/.'"<C|
00000100  3e 20 48 41 52 44 20 44  49 53 4b 20 50 52 4f 4a  |> HARD DISK PROJ|
00000110  45 43 54 22 27 27 22 20  20 20 20 4f 4e 20 54 48  |ECT"''"    ON TH|
00000120  45 20 45 4c 4b 22 0d 00  82 1f f1 27 22 3c 44 3e  |E ELK".....'"<D>|
00000130  20 52 45 50 4c 59 20 54  4f 20 4e 2e 5a 2e 20 47  | REPLY TO N.Z. G|
00000140  52 4f 55 50 22 0d 00 8c  1f f1 27 22 3c 52 3e 20  |ROUP".....'"<R> |
00000150  52 45 54 55 52 4e 20 54  4f 20 4d 41 49 4e 20 4d  |RETURN TO MAIN M|
00000160  45 4e 55 22 0d 00 96 0f  ef 32 36 3a 2a 46 58 32  |ENU".....26:*FX2|
00000170  31 2c 30 0d 00 aa 1c f5  3a 61 25 3d a7 22 41 42  |1,0.....:a%=."AB|
00000180  43 44 45 46 47 48 52 22  2c be 29 3a fd 61 25 0d  |CDEFGHR",.):.a%.|
00000190  00 b4 35 e7 61 25 3d 31  8c 66 24 3d 22 45 4c 4b  |..5.a%=1.f$="ELK|
000001a0  45 4e 54 31 35 22 3a 67  24 3d 22 22 3a 68 24 3d  |ENT15":g$="":h$=|
000001b0  22 22 3a 69 24 3d 22 22  3a f2 74 65 78 74 3a e5  |"":i$="":.text:.|
000001c0  8d 54 68 40 0d 00 be 45  e7 61 25 3d 32 8c 66 24  |.Th@...E.a%=2.f$|
000001d0  3d 22 45 58 49 4c 45 31  22 3a 67 24 3d 22 45 58  |="EXILE1":g$="EX|
000001e0  49 4c 45 32 22 3a 68 24  3d 22 45 58 49 4c 45 33  |ILE2":h$="EXILE3|
000001f0  22 3a 69 24 3d 22 45 58  49 4c 45 34 22 3a f2 74  |":i$="EXILE4":.t|
00000200  65 78 74 3a e5 8d 54 68  40 0d 00 c8 0f e7 61 25  |ext:..Th@.....a%|
00000210  3d 33 8c d7 22 48 44 22  0d 00 d2 32 e7 61 25 3d  |=3.."HD"...2.a%=|
00000220  34 8c 66 24 3d 22 72 65  70 6c 79 22 3a 67 24 3d  |4.f$="reply":g$=|
00000230  22 22 3a 68 24 3d 22 22  3a 69 24 3d 22 22 3a f2  |"":h$="":i$="":.|
00000240  74 65 78 74 3a e5 8d 54  68 40 0d 00 dc 1a e7 61  |text:..Th@.....a|
00000250  25 3d 39 8c ff 22 44 49  52 20 24 22 3a d7 22 4d  |%=9.."DIR $":."M|
00000260  45 4e 55 22 0d 00 e6 13  e7 a6 2d 31 30 32 e5 8d  |ENU"......-102..|
00000270  54 68 40 8b e0 3a e0 0d  00 fa 0a dd f2 74 65 78  |Th@..:.......tex|
00000280  74 0d 01 04 24 d6 63 6c  65 61 72 3a ef 32 32 2c  |t...$.clear:.22,|
00000290  36 3a ff 22 4c 4f 41 44  20 22 2b 66 24 2b 22 20  |6:."LOAD "+f$+" |
000002a0  32 35 30 30 22 0d 01 0e  2a ef 32 32 2c 33 2c 31  |2500"...*.22,3,1|
000002b0  34 3a f1 27 27 22 53 48  49 46 54 20 54 4f 20 53  |4:.''"SHIFT TO S|
000002c0  43 52 4f 4c 4c 22 27 27  3a d6 70 72 69 6e 74 0d  |CROLL"'':.print.|
000002d0  01 22 12 e7 a9 28 67 24  29 3d 30 8c e5 8d 74 78  |."...(g$)=0...tx|
000002e0  41 0d 01 2c 24 f1 22 50  52 45 53 53 20 53 50 41  |A..,$."PRESS SPA|
000002f0  43 45 20 54 4f 20 43 4f  4e 54 49 4e 55 45 22 3a  |CE TO CONTINUE":|
00000300  6b 65 79 3d a5 0d 01 36  24 d6 63 6c 65 61 72 3a  |key=...6$.clear:|
00000310  ef 32 32 2c 36 3a ff 22  4c 4f 41 44 20 22 2b 67  |.22,6:."LOAD "+g|
00000320  24 2b 22 20 32 35 30 30  22 0d 01 40 2a ef 32 32  |$+" 2500"..@*.22|
00000330  2c 33 2c 31 34 3a f1 27  27 22 53 48 49 46 54 20  |,3,14:.''"SHIFT |
00000340  54 4f 20 53 43 52 4f 4c  4c 22 27 27 3a d6 70 72  |TO SCROLL"'':.pr|
00000350  69 6e 74 0d 01 54 12 e7  a9 28 68 24 29 3d 30 8c  |int..T...(h$)=0.|
00000360  e5 8d 74 78 41 0d 01 5e  24 f1 22 50 52 45 53 53  |..txA..^$."PRESS|
00000370  20 53 50 41 43 45 20 54  4f 20 43 4f 4e 54 49 4e  | SPACE TO CONTIN|
00000380  55 45 22 3a 6b 65 79 3d  a5 0d 01 68 24 d6 63 6c  |UE":key=...h$.cl|
00000390  65 61 72 3a ef 32 32 2c  36 3a ff 22 4c 4f 41 44  |ear:.22,6:."LOAD|
000003a0  20 22 2b 68 24 2b 22 20  32 35 30 30 22 0d 01 72  | "+h$+" 2500"..r|
000003b0  2a ef 32 32 2c 33 2c 31  34 3a f1 27 27 22 53 48  |*.22,3,14:.''"SH|
000003c0  49 46 54 20 54 4f 20 53  43 52 4f 4c 4c 22 27 27  |IFT TO SCROLL"''|
000003d0  3a d6 70 72 69 6e 74 0d  01 86 12 e7 a9 28 69 24  |:.print......(i$|
000003e0  29 3d 30 8c e5 8d 74 78  41 0d 01 90 24 f1 22 50  |)=0...txA...$."P|
000003f0  52 45 53 53 20 53 50 41  43 45 20 54 4f 20 43 4f  |RESS SPACE TO CO|
00000400  4e 54 49 4e 55 45 22 3a  6b 65 79 3d a5 0d 01 9a  |NTINUE":key=....|
00000410  24 d6 63 6c 65 61 72 3a  ef 32 32 2c 36 3a ff 22  |$.clear:.22,6:."|
00000420  4c 4f 41 44 20 22 2b 69  24 2b 22 20 32 35 30 30  |LOAD "+i$+" 2500|
00000430  22 0d 01 a4 2a ef 32 32  2c 33 2c 31 34 3a f1 27  |"...*.22,3,14:.'|
00000440  27 22 53 48 49 46 54 20  54 4f 20 53 43 52 4f 4c  |'"SHIFT TO SCROL|
00000450  4c 22 27 27 3a d6 70 72  69 6e 74 0d 01 b8 27 f1  |L"'':.print...'.|
00000460  3b 22 3c 50 3e 20 54 4f  20 50 52 49 4e 54 20 54  |;"<P> TO PRINT T|
00000470  45 58 54 2c 20 3c 4d 3e  20 46 4f 52 20 4d 45 4e  |EXT, <M> FOR MEN|
00000480  55 22 0d 01 c2 0a f5 3a  61 24 3d be 0d 01 d6 11  |U".....:a$=.....|
00000490  e7 61 24 3d 22 4d 22 8c  e5 8d 54 68 40 0d 01 e0  |.a$="M"...Th@...|
000004a0  23 e7 61 24 3d 22 50 22  8c ef 31 35 2c 30 2c 32  |#.a$="P"..15,0,2|
000004b0  3a d6 70 72 69 6e 74 3a  ef 33 3a e5 8d 54 68 40  |:.print:.3:..Th@|
000004c0  0d 01 ea 06 fd a3 0d 01  f4 05 e1 0d 01 fe 0b dd  |................|
000004d0  f2 61 73 73 65 6d 0d 02  08 0c e3 69 3d 30 b8 32  |.assem.....i=0.2|
000004e0  88 32 0d 02 12 0b 50 25  3d 26 39 30 30 0d 02 1c  |.2....P%=&900...|
000004f0  09 5b 4f 50 54 69 0d 02  26 0a 2e 70 72 69 6e 74  |.[OPTi..&..print|
00000500  0d 02 30 10 4c 44 41 23  30 3a 53 54 41 26 37 30  |..0.LDA#0:STA&70|
00000510  0d 02 3a 12 4c 44 41 23  26 32 35 3a 53 54 41 26  |..:.LDA#&25:STA&|
00000520  37 31 0d 02 44 0d 2e 4c  31 20 4c 44 59 23 30 0d  |71..D..L1 LDY#0.|
00000530  02 4e 12 2e 4c 32 20 4c  44 41 28 26 37 30 29 2c  |.N..L2 LDA(&70),|
00000540  59 0d 02 58 10 43 4d 50  23 30 3a 42 45 51 72 74  |Y..X.CMP#0:BEQrt|
00000550  73 0d 02 62 12 43 4d 50  23 26 30 44 3a 42 45 51  |s..b.CMP#&0D:BEQ|
00000560  70 72 74 0d 02 6c 12 43  4d 50 23 26 32 30 3a 42  |prt..l.CMP#&20:B|
00000570  43 43 73 70 63 0d 02 76  12 43 4d 50 23 26 37 46  |CCspc..v.CMP#&7F|
00000580  3a 42 43 53 73 70 63 0d  02 80 11 2e 70 72 74 20  |:BCSspc.....prt |
00000590  4a 53 52 26 46 46 45 33  0d 02 8a 13 2e 69 6e 63  |JSR&FFE3.....inc|
000005a0  20 49 4e 59 3a 42 4e 45  20 4c 32 0d 02 94 11 49  | INY:BNE L2....I|
000005b0  4e 43 26 37 31 3a 4a 4d  50 20 4c 31 0d 02 9e 10  |NC&71:JMP L1....|
000005c0  2e 73 70 63 20 4c 44 41  23 26 32 30 0d 02 a8 13  |.spc LDA#&20....|
000005d0  4a 53 52 26 46 46 45 33  3a 4a 4d 50 69 6e 63 0d  |JSR&FFE3:JMPinc.|
000005e0  02 b2 0c 2e 72 74 73 20  52 54 53 0d 02 bc 0a 2e  |....rts RTS.....|
000005f0  63 6c 65 61 72 0d 02 c6  10 4c 44 41 23 30 3a 53  |clear....LDA#0:S|
00000600  54 41 26 37 32 0d 02 d0  12 4c 44 41 23 26 32 35  |TA&72....LDA#&25|
00000610  3a 53 54 41 26 37 33 0d  02 da 0d 2e 4c 33 20 4c  |:STA&73.....L3 L|
00000620  44 59 23 30 0d 02 e4 0d  2e 4c 34 20 4c 44 41 23  |DY#0.....L4 LDA#|
00000630  30 0d 02 ee 0e 53 54 41  28 26 37 32 29 2c 59 0d  |0....STA(&72),Y.|
00000640  02 f8 0e 49 4e 59 3a 42  4e 45 20 4c 34 0d 03 02  |...INY:BNE L4...|
00000650  0a 49 4e 43 26 37 33 0d  03 0c 0a 4c 44 41 26 37  |.INC&73....LDA&7|
00000660  33 0d 03 16 0b 43 4d 50  23 26 34 30 0d 03 20 0a  |3....CMP#&40.. .|
00000670  42 4e 45 20 4c 33 0d 03  2a 07 52 54 53 0d 03 34  |BNE L3..*.RTS..4|
00000680  05 5d 0d 03 3e 05 ed 0d  03 48 05 e1 0d ff        |.]..>....H....|
0000068e