-� EUG MENU by Richard Dimond V.2 Feb 1998
-�Z% �Tr@ ��"LOAD $.CODE7":L%=900:�=&2600
2�:�menu:�0:�
<3��menu:�22,4,19,0,4;0;23,1,0;0;0;0;28,2,30,35,2
FKlns=&80:sklns=&81:skp=&82:cnt=&83:modflg=&84:?skp=0:?modflg=0:M%=�:T%=�
P.�12,12:�1267,12:�1267,1011:�12,1011:�12,12
Z��L%:�T$:T$="EUG38 "+T$+" MENU":�17-�T$/2);T$;�17-�T$/2);ĩT$,�126);�0,3)"PLEASE SELECT -":�'"T. Toggle ";((((M%*-1)� 1)+1)*40)" column text"
d�L%>900 �Dx@
nA�'"P. Print all text files"''"I. Information about EUG":�tB@
x�'"R. Return to Main menu"
��'�34,"+")
��Y:�Z=1�Y:�A$:�'A$:�
��D$:�"DIR "+D$
��B$
��"FX21":�:a%=�B$,�):�a%
�-�a%=1 M%=M% � �:�10,5);8-(4*�(M%)):�tj@
��L%>900 �d\@
�0�a%=2 �"$.PRINT" ��a%>4 L%=(860+a%*10):�menu
� �L%=900:�a%<5 a%=a%-2 :�dp@
��a%=2 Z%=�:L%=900:�menu
��L%>900:�a%>2 a%=a%-2
�� R%,f$,F%,P$,D%,S$,N%
�$&120=f$:$&134=P$:$&148=S$

a%=a%-1:�a%<>0 �dp@ ��TNA

Z%=�:�"$.PRINT"
��� MAIN,6,"1. Gus","2. Letters","3. Features","4. Programming","5. Games","6. Shopping",$,"TPI123456",0,"+info",1,,0,,0,0,"+gus",1,,0,,0
�C� LETTERS,1,"1. John Crane RISC it",$,"TR1",0,"+CRANE",1,,0,,0,
�C� FEATURES,1,"1. Looking at the VIEW",$,"TR1",0,"+view",5,,0,,0
��� PROGRAMMING,2,"1, More on Programming","The programs for AMX to RISC are  in P directory",$,"TR12",1,"+P",6,"PTDEMO",0,,0,
�2� GAMES,1,"1. SUNDAY",$,"TR1",0,"+SUN",1,,0,,0
�<� SALES,1,"1, Things for sale",$,"TR1",0,"+SALE",1,,0,,0
�

00000000  0d 00 0a 2d f4 20 45 55  47 20 4d 45 4e 55 20 62  |...-. EUG MENU b|
00000010  79 20 52 69 63 68 61 72  64 20 44 69 6d 6f 6e 64  |y Richard Dimond|
00000020  20 56 2e 32 20 46 65 62  20 31 39 39 38 0d 00 14  | V.2 Feb 1998...|
00000030  2d e7 5a 25 20 e5 8d 54  72 40 20 8b ff 22 4c 4f  |-.Z% ..Tr@ .."LO|
00000040  41 44 20 24 2e 43 4f 44  45 37 22 3a 4c 25 3d 39  |AD $.CODE7":L%=9|
00000050  30 30 3a d3 3d 26 32 36  30 30 0d 00 32 10 f5 3a  |00:.=&2600..2..:|
00000060  f2 6d 65 6e 75 3a fd 30  3a e0 0d 00 3c 33 dd f2  |.menu:.0:...<3..|
00000070  6d 65 6e 75 3a ef 32 32  2c 34 2c 31 39 2c 30 2c  |menu:.22,4,19,0,|
00000080  34 3b 30 3b 32 33 2c 31  2c 30 3b 30 3b 30 3b 30  |4;0;23,1,0;0;0;0|
00000090  3b 32 38 2c 32 2c 33 30  2c 33 35 2c 32 0d 00 46  |;28,2,30,35,2..F|
000000a0  4b 6c 6e 73 3d 26 38 30  3a 73 6b 6c 6e 73 3d 26  |Klns=&80:sklns=&|
000000b0  38 31 3a 73 6b 70 3d 26  38 32 3a 63 6e 74 3d 26  |81:skp=&82:cnt=&|
000000c0  38 33 3a 6d 6f 64 66 6c  67 3d 26 38 34 3a 3f 73  |83:modflg=&84:?s|
000000d0  6b 70 3d 30 3a 3f 6d 6f  64 66 6c 67 3d 30 3a 4d  |kp=0:?modflg=0:M|
000000e0  25 3d a3 3a 54 25 3d a3  0d 00 50 2e ec 31 32 2c  |%=.:T%=...P..12,|
000000f0  31 32 3a df 31 32 36 37  2c 31 32 3a df 31 32 36  |12:.1267,12:.126|
00000100  37 2c 31 30 31 31 3a df  31 32 2c 31 30 31 31 3a  |7,1011:.12,1011:|
00000110  df 31 32 2c 31 32 0d 00  5a 91 f7 4c 25 3a f3 54  |.12,12..Z..L%:.T|
00000120  24 3a 54 24 3d 22 45 55  47 33 38 20 22 2b 54 24  |$:T$="EUG38 "+T$|
00000130  2b 22 20 4d 45 4e 55 22  3a f1 8a 31 37 2d a9 54  |+" MENU":..17-.T|
00000140  24 2f 32 29 3b 54 24 3b  8a 31 37 2d a9 54 24 2f  |$/2);T$;.17-.T$/|
00000150  32 29 3b c4 a9 54 24 2c  bd 31 32 36 29 3b 8a 30  |2);..T$,.126);.0|
00000160  2c 33 29 22 50 4c 45 41  53 45 20 53 45 4c 45 43  |,3)"PLEASE SELEC|
00000170  54 20 2d 22 3a f1 27 22  54 2e 20 54 6f 67 67 6c  |T -":.'"T. Toggl|
00000180  65 20 22 3b 28 28 28 28  4d 25 2a 2d 31 29 82 20  |e ";((((M%*-1). |
00000190  31 29 2b 31 29 2a 34 30  29 22 20 63 6f 6c 75 6d  |1)+1)*40)" colum|
000001a0  6e 20 74 65 78 74 22 0d  00 64 11 e7 4c 25 3e 39  |n text"..d..L%>9|
000001b0  30 30 20 e5 8d 44 78 40  0d 00 6e 41 f1 27 22 50  |00 ..Dx@..nA.'"P|
000001c0  2e 20 50 72 69 6e 74 20  61 6c 6c 20 74 65 78 74  |. Print all text|
000001d0  20 66 69 6c 65 73 22 27  27 22 49 2e 20 49 6e 66  | files"''"I. Inf|
000001e0  6f 72 6d 61 74 69 6f 6e  20 61 62 6f 75 74 20 45  |ormation about E|
000001f0  55 47 22 3a e5 8d 74 42  40 0d 00 78 1e f1 27 22  |UG":..tB@..x..'"|
00000200  52 2e 20 52 65 74 75 72  6e 20 74 6f 20 4d 61 69  |R. Return to Mai|
00000210  6e 20 6d 65 6e 75 22 0d  00 82 0e f1 27 c4 33 34  |n menu".....'.34|
00000220  2c 22 2b 22 29 0d 00 8c  18 f3 59 3a e3 5a 3d 31  |,"+").....Y:.Z=1|
00000230  b8 59 3a f3 41 24 3a f1  27 41 24 3a ed 0d 00 96  |.Y:.A$:.'A$:....|
00000240  12 f3 44 24 3a ff 22 44  49 52 20 22 2b 44 24 0d  |..D$:."DIR "+D$.|
00000250  00 a0 07 f3 42 24 0d 00  aa 1b ff 22 46 58 32 31  |....B$....."FX21|
00000260  22 3a f5 3a 61 25 3d a7  42 24 2c be 29 3a fd 61  |":.:a%=.B$,.):.a|
00000270  25 0d 00 b4 2d e7 61 25  3d 31 20 4d 25 3d 4d 25  |%...-.a%=1 M%=M%|
00000280  20 82 20 b9 3a f1 8a 31  30 2c 35 29 3b 38 2d 28  | . .:..10,5);8-(|
00000290  34 2a 94 28 4d 25 29 29  3a e5 8d 74 6a 40 0d 00  |4*.(M%)):..tj@..|
000002a0  be 11 e7 4c 25 3e 39 30  30 20 e5 8d 64 5c 40 0d  |...L%>900 ..d\@.|
000002b0  00 c8 30 e7 61 25 3d 32  20 d7 22 24 2e 50 52 49  |..0.a%=2 ."$.PRI|
000002c0  4e 54 22 20 8b e7 61 25  3e 34 20 4c 25 3d 28 38  |NT" ..a%>4 L%=(8|
000002d0  36 30 2b 61 25 2a 31 30  29 3a f2 6d 65 6e 75 0d  |60+a%*10):.menu.|
000002e0  00 d2 20 e7 4c 25 3d 39  30 30 3a e7 61 25 3c 35  |.. .L%=900:.a%<5|
000002f0  20 61 25 3d 61 25 2d 32  20 3a e5 8d 64 70 40 0d  | a%=a%-2 :..dp@.|
00000300  00 dc 1b e7 61 25 3d 32  20 5a 25 3d a3 3a 4c 25  |....a%=2 Z%=.:L%|
00000310  3d 39 30 30 3a f2 6d 65  6e 75 0d 00 e6 19 e7 4c  |=900:.menu.....L|
00000320  25 3e 39 30 30 3a e7 61  25 3e 32 20 61 25 3d 61  |%>900:.a%>2 a%=a|
00000330  25 2d 32 0d 00 f0 1a f3  20 52 25 2c 66 24 2c 46  |%-2..... R%,f$,F|
00000340  25 2c 50 24 2c 44 25 2c  53 24 2c 4e 25 0d 00 fa  |%,P$,D%,S$,N%...|
00000350  1e 24 26 31 32 30 3d 66  24 3a 24 26 31 33 34 3d  |.$&120=f$:$&134=|
00000360  50 24 3a 24 26 31 34 38  3d 53 24 0d 01 04 1f 61  |P$:$&148=S$....a|
00000370  25 3d 61 25 2d 31 3a e7  61 25 3c 3e 30 20 e5 8d  |%=a%-1:.a%<>0 ..|
00000380  64 70 40 20 8b e5 8d 54  4e 41 0d 01 0e 13 5a 25  |dp@ ...TNA....Z%|
00000390  3d b9 3a d7 22 24 2e 50  52 49 4e 54 22 0d 03 84  |=.:."$.PRINT"...|
000003a0  8b dc 20 4d 41 49 4e 2c  36 2c 22 31 2e 20 47 75  |.. MAIN,6,"1. Gu|
000003b0  73 22 2c 22 32 2e 20 4c  65 74 74 65 72 73 22 2c  |s","2. Letters",|
000003c0  22 33 2e 20 46 65 61 74  75 72 65 73 22 2c 22 34  |"3. Features","4|
000003d0  2e 20 50 72 6f 67 72 61  6d 6d 69 6e 67 22 2c 22  |. Programming","|
000003e0  35 2e 20 47 61 6d 65 73  22 2c 22 36 2e 20 53 68  |5. Games","6. Sh|
000003f0  6f 70 70 69 6e 67 22 2c  24 2c 22 54 50 49 31 32  |opping",$,"TPI12|
00000400  33 34 35 36 22 2c 30 2c  22 2b 69 6e 66 6f 22 2c  |3456",0,"+info",|
00000410  31 2c 2c 30 2c 2c 30 2c  30 2c 22 2b 67 75 73 22  |1,,0,,0,0,"+gus"|
00000420  2c 31 2c 2c 30 2c 2c 30  0d 03 8e 43 dc 20 4c 45  |,1,,0,,0...C. LE|
00000430  54 54 45 52 53 2c 31 2c  22 31 2e 20 4a 6f 68 6e  |TTERS,1,"1. John|
00000440  20 43 72 61 6e 65 20 52  49 53 43 20 69 74 22 2c  | Crane RISC it",|
00000450  24 2c 22 54 52 31 22 2c  30 2c 22 2b 43 52 41 4e  |$,"TR1",0,"+CRAN|
00000460  45 22 2c 31 2c 2c 30 2c  2c 30 2c 0d 03 98 43 dc  |E",1,,0,,0,...C.|
00000470  20 46 45 41 54 55 52 45  53 2c 31 2c 22 31 2e 20  | FEATURES,1,"1. |
00000480  4c 6f 6f 6b 69 6e 67 20  61 74 20 74 68 65 20 56  |Looking at the V|
00000490  49 45 57 22 2c 24 2c 22  54 52 31 22 2c 30 2c 22  |IEW",$,"TR1",0,"|
000004a0  2b 76 69 65 77 22 2c 35  2c 2c 30 2c 2c 30 0d 03  |+view",5,,0,,0..|
000004b0  a2 80 dc 20 50 52 4f 47  52 41 4d 4d 49 4e 47 2c  |... PROGRAMMING,|
000004c0  32 2c 22 31 2c 20 4d 6f  72 65 20 6f 6e 20 50 72  |2,"1, More on Pr|
000004d0  6f 67 72 61 6d 6d 69 6e  67 22 2c 22 54 68 65 20  |ogramming","The |
000004e0  70 72 6f 67 72 61 6d 73  20 66 6f 72 20 41 4d 58  |programs for AMX|
000004f0  20 74 6f 20 52 49 53 43  20 61 72 65 20 20 69 6e  | to RISC are  in|
00000500  20 50 20 64 69 72 65 63  74 6f 72 79 22 2c 24 2c  | P directory",$,|
00000510  22 54 52 31 32 22 2c 31  2c 22 2b 50 22 2c 36 2c  |"TR12",1,"+P",6,|
00000520  22 50 54 44 45 4d 4f 22  2c 30 2c 2c 30 2c 0d 03  |"PTDEMO",0,,0,..|
00000530  ac 32 dc 20 47 41 4d 45  53 2c 31 2c 22 31 2e 20  |.2. GAMES,1,"1. |
00000540  53 55 4e 44 41 59 22 2c  24 2c 22 54 52 31 22 2c  |SUNDAY",$,"TR1",|
00000550  30 2c 22 2b 53 55 4e 22  2c 31 2c 2c 30 2c 2c 30  |0,"+SUN",1,,0,,0|
00000560  0d 03 b6 3c dc 20 53 41  4c 45 53 2c 31 2c 22 31  |...<. SALES,1,"1|
00000570  2c 20 54 68 69 6e 67 73  20 66 6f 72 20 73 61 6c  |, Things for sal|
00000580  65 22 2c 24 2c 22 54 52  31 22 2c 30 2c 22 2b 53  |e",$,"TR1",0,"+S|
00000590  41 4c 45 22 2c 31 2c 2c  30 2c 2c 30 0d ff        |ALE",1,,0,,0..|
0000059e