� MENU
�0
�23,1,0;0;0;0;
(*LOAD $.TITLE 3000
2� �
<�4
F�23,1,0;0;0;0;
P�double("M E N U",15,2)
Z�double("*******",15,4)
d�''
n-�"USE LETTER KEYS TO MAKE YOUR SELECTION"
x�'''
��"(A) LETTERS"
��'"(B) ELK ENTERTAINMENT"
��'"(C) 'CLICK' - A REVIEW"
��'"(D) CONDUCTIVITY"
��'"(E) MEMORY MAP"
�"�'"(F) ASSEMBLER - PART SEVEN"
��'"(G) ADVERTS"
��'"(H) THE LAST BIT !"
��
�A$=�
�K� A$="A" � A$="B" � A$="C" � A$="D" � A$="E" � A$="F" � A$="G" � A$="H"
�� A$="A" � �"$.LETTS1"
�� A$="B" � �"$.ENT1"
�� A$="C" � �"$.CLICK1"

� A$="D" � �"$.CON1"

� A$="E" � �"$.MM1"

� A$="F" � �"$.ASSEM1"

� A$="G" � �"$.ADVERTS"

"� A$="H" � �"$.LAST"

,�

6 � �double(A$,K,L)

@� N

J
A%=135

TA%=&A:X%=0:Y%=&A

^
D=&A00

h� N=1 � �(A$)

rB$=�A$,N,1)

|?D=�(B$)

�
� (&FFF1)

�+�23,240,D?1,D?1,D?2,D?2,D?3,D?3,D?4,D?4

�+�23,241,D?5,D?5,D?6,D?6,D?7,D?7,D?8,D?8

� �K+N,L);�240;�K+N,L+1);�241

�� N

��
�

00000000  0d 00 0a 0a f4 20 4d 45  4e 55 0d 00 14 06 eb 30  |..... MENU.....0|
00000010  0d 00 1e 12 ef 32 33 2c  31 2c 30 3b 30 3b 30 3b  |.....23,1,0;0;0;|
00000020  30 3b 0d 00 28 16 2a 4c  4f 41 44 20 24 2e 54 49  |0;..(.*LOAD $.TI|
00000030  54 4c 45 20 33 30 30 30  0d 00 32 07 e7 20 a5 0d  |TLE 3000..2.. ..|
00000040  00 3c 06 eb 34 0d 00 46  12 ef 32 33 2c 31 2c 30  |.<..4..F..23,1,0|
00000050  3b 30 3b 30 3b 30 3b 0d  00 50 1b f2 64 6f 75 62  |;0;0;0;..P..doub|
00000060  6c 65 28 22 4d 20 45 20  4e 20 55 22 2c 31 35 2c  |le("M E N U",15,|
00000070  32 29 0d 00 5a 1b f2 64  6f 75 62 6c 65 28 22 2a  |2)..Z..double("*|
00000080  2a 2a 2a 2a 2a 2a 22 2c  31 35 2c 34 29 0d 00 64  |******",15,4)..d|
00000090  07 f1 27 27 0d 00 6e 2d  f1 22 55 53 45 20 4c 45  |..''..n-."USE LE|
000000a0  54 54 45 52 20 4b 45 59  53 20 54 4f 20 4d 41 4b  |TTER KEYS TO MAK|
000000b0  45 20 59 4f 55 52 20 53  45 4c 45 43 54 49 4f 4e  |E YOUR SELECTION|
000000c0  22 0d 00 78 08 f1 27 27  27 0d 00 82 12 f1 22 28  |"..x..'''....."(|
000000d0  41 29 20 4c 45 54 54 45  52 53 22 0d 00 8c 1d f1  |A) LETTERS".....|
000000e0  27 22 28 42 29 20 45 4c  4b 20 45 4e 54 45 52 54  |'"(B) ELK ENTERT|
000000f0  41 49 4e 4d 45 4e 54 22  0d 00 96 1e f1 27 22 28  |AINMENT".....'"(|
00000100  43 29 20 27 43 4c 49 43  4b 27 20 2d 20 41 20 52  |C) 'CLICK' - A R|
00000110  45 56 49 45 57 22 0d 00  a0 18 f1 27 22 28 44 29  |EVIEW".....'"(D)|
00000120  20 43 4f 4e 44 55 43 54  49 56 49 54 59 22 0d 00  | CONDUCTIVITY"..|
00000130  aa 16 f1 27 22 28 45 29  20 4d 45 4d 4f 52 59 20  |...'"(E) MEMORY |
00000140  4d 41 50 22 0d 00 af 22  f1 27 22 28 46 29 20 41  |MAP"...".'"(F) A|
00000150  53 53 45 4d 42 4c 45 52  20 2d 20 50 41 52 54 20  |SSEMBLER - PART |
00000160  53 45 56 45 4e 22 0d 00  b4 13 f1 27 22 28 47 29  |SEVEN".....'"(G)|
00000170  20 41 44 56 45 52 54 53  22 0d 00 be 1a f1 27 22  | ADVERTS".....'"|
00000180  28 48 29 20 54 48 45 20  4c 41 53 54 20 42 49 54  |(H) THE LAST BIT|
00000190  20 21 22 0d 00 c8 05 f5  0d 00 d2 08 41 24 3d be  | !".........A$=.|
000001a0  0d 00 dc 4b fd 20 41 24  3d 22 41 22 20 84 20 41  |...K. A$="A" . A|
000001b0  24 3d 22 42 22 20 84 20  41 24 3d 22 43 22 20 84  |$="B" . A$="C" .|
000001c0  20 41 24 3d 22 44 22 20  84 20 41 24 3d 22 45 22  | A$="D" . A$="E"|
000001d0  20 84 20 41 24 3d 22 46  22 20 84 20 41 24 3d 22  | . A$="F" . A$="|
000001e0  47 22 20 84 20 41 24 3d  22 48 22 0d 00 e6 1a e7  |G" . A$="H".....|
000001f0  20 41 24 3d 22 41 22 20  8c 20 d7 22 24 2e 4c 45  | A$="A" . ."$.LE|
00000200  54 54 53 31 22 0d 00 f0  18 e7 20 41 24 3d 22 42  |TTS1"..... A$="B|
00000210  22 20 8c 20 d7 22 24 2e  45 4e 54 31 22 0d 00 fa  |" . ."$.ENT1"...|
00000220  1a e7 20 41 24 3d 22 43  22 20 8c 20 d7 22 24 2e  |.. A$="C" . ."$.|
00000230  43 4c 49 43 4b 31 22 0d  01 04 18 e7 20 41 24 3d  |CLICK1"..... A$=|
00000240  22 44 22 20 8c 20 d7 22  24 2e 43 4f 4e 31 22 0d  |"D" . ."$.CON1".|
00000250  01 0e 17 e7 20 41 24 3d  22 45 22 20 8c 20 d7 22  |.... A$="E" . ."|
00000260  24 2e 4d 4d 31 22 0d 01  18 1a e7 20 41 24 3d 22  |$.MM1"..... A$="|
00000270  46 22 20 8c 20 d7 22 24  2e 41 53 53 45 4d 31 22  |F" . ."$.ASSEM1"|
00000280  0d 01 1d 1b e7 20 41 24  3d 22 47 22 20 8c 20 d7  |..... A$="G" . .|
00000290  22 24 2e 41 44 56 45 52  54 53 22 0d 01 22 18 e7  |"$.ADVERTS".."..|
000002a0  20 41 24 3d 22 48 22 20  8c 20 d7 22 24 2e 4c 41  | A$="H" . ."$.LA|
000002b0  53 54 22 0d 01 2c 05 e0  0d 01 36 16 20 dd 20 f2  |ST"..,....6. . .|
000002c0  64 6f 75 62 6c 65 28 41  24 2c 4b 2c 4c 29 0d 01  |double(A$,K,L)..|
000002d0  40 07 ea 20 4e 0d 01 4a  0a 41 25 3d 31 33 35 0d  |@.. N..J.A%=135.|
000002e0  01 54 14 41 25 3d 26 41  3a 58 25 3d 30 3a 59 25  |.T.A%=&A:X%=0:Y%|
000002f0  3d 26 41 0d 01 5e 0a 44  3d 26 41 30 30 0d 01 68  |=&A..^.D=&A00..h|
00000300  11 e3 20 4e 3d 31 20 b8  20 a9 28 41 24 29 0d 01  |.. N=1 . .(A$)..|
00000310  72 0f 42 24 3d c1 41 24  2c 4e 2c 31 29 0d 01 7c  |r.B$=.A$,N,1)..||
00000320  0c 3f 44 3d 97 28 42 24  29 0d 01 86 0d d6 20 28  |.?D=.(B$)..... (|
00000330  26 46 46 46 31 29 0d 01  90 2b ef 32 33 2c 32 34  |&FFF1)...+.23,24|
00000340  30 2c 44 3f 31 2c 44 3f  31 2c 44 3f 32 2c 44 3f  |0,D?1,D?1,D?2,D?|
00000350  32 2c 44 3f 33 2c 44 3f  33 2c 44 3f 34 2c 44 3f  |2,D?3,D?3,D?4,D?|
00000360  34 0d 01 9a 2b ef 32 33  2c 32 34 31 2c 44 3f 35  |4...+.23,241,D?5|
00000370  2c 44 3f 35 2c 44 3f 36  2c 44 3f 36 2c 44 3f 37  |,D?5,D?6,D?6,D?7|
00000380  2c 44 3f 37 2c 44 3f 38  2c 44 3f 38 0d 01 a4 20  |,D?7,D?8,D?8... |
00000390  f1 8a 4b 2b 4e 2c 4c 29  3b bd 32 34 30 3b 8a 4b  |..K+N,L);.240;.K|
000003a0  2b 4e 2c 4c 2b 31 29 3b  bd 32 34 31 0d 01 ae 07  |+N,L+1);.241....|
000003b0  ed 20 4e 0d 01 b8 05 e1  0d ff                    |. N.......|
000003ba