Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_52.ADF » MENU

MENU

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_52.ADF
Filename: MENU
Read OK:
File size: 14DD bytes
Load address: FFFF0E00
Exec address: FFFF802B
File contents
   10MODE4:VDU23;8202;0;0;0;:COLOUR0:COLOUR129:*FX 200 1
   20VDU23,128,15,127,248,240,255,255,240,96,23,129,224,248,124,60,252,252,60,24,23,130,127,255,240,255,255,240,255,127,23,131,224,248,60,248,248,60,248,224,23,132,31,127,252,240,240,252,127,31,23,133,252,252,0,0,0,0,252,252
   30VDU23,134,255,255,240,240,240,240,255,255,23,135,224,248,252,60,60,252,248,224,23,136,31,127,248,255,255,248,127,31,23,137,252,252,0,192,192,0,252,252,23,138,31,127,240,255,255,240,240,240,23,139,252,252,0,192,192,0,0,0
   40VDU23,140,31,127,252,240,240,252,127,31,23,141,252,252,0,252,252,60,252,252,23,142,240,240,240,240,240,240,255,255,23,143,0,0,0,0,0,0,252,252,23,144,31,127,248,240,240,240,240,96,23,145,224,248,124,60,60,60,60,24
   50VDU23,146,31,127,252,240,240,252,127,31,23,147,127,255,240,255,255,240,240,240,23,148,224,248,60,248,224,0,0,0,23,149,127,255,240,255,255,255,241,240,23,150,224,248,60,248,224,224,248,124,23,151,127,243,248,127,7,240,255,31
   60VDU23,151,127,243,248,127,7,240,255,31,23,152,240,252,60,0,248,124,60,248,23,153,255,255,7,7,7,7,7,7,23,154,252,252,128,128,128,128,128,128,23,155,240,240,240,240,240,252,127,31,23,156,60,60,60,60,60,252,248,224,23,157,0,0,0,255,0,0,0,0
   70DIMline$(8),file$(8):I%=52:*FX4 1
   80text%=0:*FX 5 1
   90PROCbo:*FX6 1
  100*LOAD DISPLAY 5800
  110PRINTTAB(37,24);I%
  120REMRead In Menu Colours
  130  ONERRORCLOSE #opt:back%=2:fore%=0:N%=3:retu%=127:K%=60:L%=12:GOTO170
  140  opt=OPENIN "$.SPECDAT"
  150  INPUT# opt,back%,fore%,N%,retu%,K%,L%
  160  CLOSE# opt
  170ONERRORMODE6:OSCLI("FX 4,1"):REPORT:PRINT" at line ";ERL:END
  180REPEAT
  190  PROCshow
  200  PROCk:IFA%=999GOTO200
  210  IFA%<>retu% THEN f$=file$(A%-64) ELSE f$=""
  220  PROCbo
  230  IFf$="X" THEN f$=""
  240UNTILf$<>"" AND M%<>1
  250check$=MID$(f$,3,1)
  260IFcheck$="+" THEN text%=1
  280IFtext%=0 THEN VDU22,6:VDU23;8202;0;0;0;:CHAINf$
  290IFtext%=1 THEN MODE3:VDU23;8202;0;0;0;:$&15C=f$:Z%=1:CHAIN"$.TYPE"
  300END
  310:
  320DEFPROCshow
  330IFM%=1 RESTORE 1220
  340IFM%=2 RESTORE 1230
  350IFM%=3 RESTORE 1240
  360IFM%=4 RESTORE 1250
  370IFM%=5 RESTORE 1260
  380IFM%=6 RESTORE 1270
  390IFM%=7 RESTORE 1280
  400IFM%=8 RESTORE 1290
  410FORcount%=1TO7
  420  READ line$(count%),file$(count%)
  430NEXTcount%
  440 
  450VDU28,1,29,4,6
  460PROCc
  470FORcount%=1TO7
  480  def%=(count%*2)+126
  490  IFfile$(count%) <> "" PRINT''';CHR$(def%);CHR$(def%+1);"  ";line$(count%);
  500NEXTcount%
  510VDU28,0,31,39,0,19,7,back%;0;19,0,fore%;0;
  520ENDPROC
  530:
  540DEFPROCk:A%=GET:IFA%=retu% AND M%<>1 THEN M%=1:PROCbo:ENDPROC
  550IFA%=90 PROCbo:PROCconfigure:M%=1:A%=retu%:ENDPROC
  560IFA%=79 PROCprint:REM Don't Touch!
  570IFA%<65 OR A%>71 THEN A%=999:VDU7:ENDPROC
  580IFM%=1 M%=(A%-63):ENDPROC ELSE f$=file$(A%-64)
  590IFfile$(A%-64)="" AND M%<>1 THEN A%=999:VDU7
  600ENDPROC
  610:
  620DEFPROCprint:VDU22,6:VDU23;8202;0;0;0;:Z%=0:CHAIN"$.PRINT"
  630:
  640DEFPROCc:VDU28,1,29,29,7:CLS:ENDPROC
  650:
  660DEFPROCbo:VDU19,0,0;0;19,7,0;0;:ENDPROC
  670DEFPROCwrite
  680opt=OPENOUT "$.SPECDAT"
  690PRINT# opt,back%,fore%,N%,retu%,K%,L%
  700CLOSE# opt
  710ENDPROC
  720:
  730DEFPROCconfigure:VDU28,1,29,4,6:PROCc
  740VDU28,1,29,4,6:PROCc:RESTORE1300
  750PRINT'"   DISK CONFIGURATION MENU";
  760FORcount%=1TO7
  770  READ line$(count%),file$(count%)
  780  def%=(count%*2)+126
  790  IFfile$(count%) <> "" PRINT'';CHR$(def%);CHR$(def%+1);"  ";line$(count%)
  800NEXTcount%
  810REPEAT
  820  PROCupcon
  830  OSCLI("FX 21"):i%=GET
  840  IFi%=65 AND retu%=127 retu%=82:GOTO860
  850  IFi%=65 AND retu%=82 retu%=127
  860  IFi%=66 THENPROCscroll(2)
  870  IFi%=67 THENPROCscroll(1)
  880  IFi%=68 AND N%=3 N%=6:GOTO920
  890  IFi%=68 AND N%=6 N%=3
  900  IFi%=69 THENK%=K%+1:IFK%>80 THEN K%=40
  910  IFi%=70 THENL%=L%+1:IFL%>14 THEN L%=1
  920UNTILi%=71:VDU7:PRINTTAB(10,22)"Are You Sure (Y/N)";:j%=GET
  930IFj%=89 OR j%=121 PROCwrite ELSE VDU7
  940ENDPROC
  950:
  960DEFPROCupcon:PRINTTAB(21,4);
  970IFretu%=127 PRINT"<DELETE>"
  980IFretu%=82 PRINT"     <R>"
  990PROCdis(fore%):PRINTTAB(9-(LEN(A$))+17,7)"   ";A$
 1000PROCdis(back%):PRINTTAB(9-(LEN(A$))+17,10)"   ";A$
 1010PRINTTAB(28,13);N%;TAB(21,16);K%;" lines"TAB(21,19);:IFL%<10 THEN PRINT" ";
 1020PRINT;L%;" lines"
 1030VDU19,0,fore%;0;19,7,back%;0;
 1040ENDPROC
 1050:
 1060DEFPROCscroll(col%):IFcol%=1THEN back%=back%+1
 1070IFcol%=2THEN fore%=fore%+1
 1080IFback% > 7 THEN back%=0
 1090IFfore% > 7 THEN fore%=0
 1100ENDPROC
 1110:
 1120DEFPROCdis(show%)
 1130IFshow%=0 A$="Black '0'"
 1140IFshow%=1 A$="Red '1'"
 1150IFshow%=2 A$="Green '2'"
 1160IFshow%=3 A$="Yellow '3'"
 1170IFshow%=4 A$="Blue '4'"
 1180IFshow%=5 A$="Magenta '5'"
 1190IFshow%=6 A$="Cyan '6'"
 1200IFshow%=7 A$="White '7'"
 1210ENDPROC
 1220DATA !FIRST STOP EDITORIAL!,X,ARTICLES/DOCS MENU,X,UTILITIES MENU,X,GAMES/DEMO MENU,X,REVIEWS MENU,X,ADVENTURES MENU,X,ADVERTISEMENTS/MAILBAG,X
 1230DATA !CONFIGURATION MENU!,V.+CONFIG,!ELECTRON USER GROUP!,V.+EUG,!IN THIS ISSUE!,V.+CONTS,!NEWS AND THE INTERNET!,V.+NEWS,!BUGS (EUG #51)!,V.+BUGS,<Empty>,"",<Empty>,""
 1240DATA AUTHORDASHED! Article,V.+AUTHOR,BRAINTEASERS Art Pt 1,V.+BTEAS1,REPTON INFINITY Passwrds,V.+INFPAS,SUNDAY REVEALED! Pt 1,V.+SSR1,SUNDAY REVEALED! Pt 2,V.+SSR2,Sundry Documentation,V.+RUGH,<Empty>,""
 1250DATA CLOWN Picture,U.CLOWN,EROTICA Picture,U.aPT1,MICKEY MOUSE Picture,U.MICKEY,WORM Picture,U.WORM,STAMP FRAME Utility,U.STMPfrm,SUNDAY Load/Save Utility,U.SUNSAVE,SUNDAY L/S Util Docs,V.+SUNSAV
 1260DATA ANTIQUE COLLECTOR (Arc),G.ANTIQUE,BOMBHUNT (Arcade),G.BOMBHUN,FRUIT MACHINE (Pot Luck),G.FRUIT,GOOD NIGHT FOLKS Demo,U.GNIGHT,HEXAGON (Brainteaser),U.HEXAGON,PATIENCE MENU (Patience),G.PATMENU,SAFECRACKER (Brainteaser),U.SAFECRA
 1270DATA EUG #0 Review,R.+EUG0,FOUR GREAT GAMES 1 Rev,R.+FOURGA,MYSTERY OF JAVA STAR Rev,R.+MYSTER,XLCR Review,R.+XLCR,<Empty>,,<Empty>,,<Empty>,""
 1280DATA SUPERGRAN Adventure,G.SGRAN1,FUN HOUSE Solution,S.+MYSTFH,<Empty>,,<Empty>,,<Empty>,,<Empty>,,<Empty>,,<Empty>,""
 1290DATA Classified Ads,V.+SALE1,Streets Ahead Patience,L.+STREET,Utilities And Agreement,L.+UTILIT,<Empty>,,<Empty>,,<Empty>,,<Empty>,""
 1300DATA Return To Main Menu Key,X,Cycle Background Colour,X,Cycle Foreground Colour,X,View Text Files Mode,X,One Pass Print,X,Perforation Skip,X,Save Configuration,X

(�4:�23;8202;0;0;0;:�0:�129:*FX 200 1
��23,128,15,127,248,240,255,255,240,96,23,129,224,248,124,60,252,252,60,24,23,130,127,255,240,255,255,240,255,127,23,131,224,248,60,248,248,60,248,224,23,132,31,127,252,240,240,252,127,31,23,133,252,252,0,0,0,0,252,252
��23,134,255,255,240,240,240,240,255,255,23,135,224,248,252,60,60,252,248,224,23,136,31,127,248,255,255,248,127,31,23,137,252,252,0,192,192,0,252,252,23,138,31,127,240,255,255,240,240,240,23,139,252,252,0,192,192,0,0,0
(��23,140,31,127,252,240,240,252,127,31,23,141,252,252,0,252,252,60,252,252,23,142,240,240,240,240,240,240,255,255,23,143,0,0,0,0,0,0,252,252,23,144,31,127,248,240,240,240,240,96,23,145,224,248,124,60,60,60,60,24
2��23,146,31,127,252,240,240,252,127,31,23,147,127,255,240,255,255,240,240,240,23,148,224,248,60,248,224,0,0,0,23,149,127,255,240,255,255,255,241,240,23,150,224,248,60,248,224,224,248,124,23,151,127,243,248,127,7,240,255,31
<��23,151,127,243,248,127,7,240,255,31,23,152,240,252,60,0,248,124,60,248,23,153,255,255,7,7,7,7,7,7,23,154,252,252,128,128,128,128,128,128,23,155,240,240,240,240,240,252,127,31,23,156,60,60,60,60,60,252,248,224,23,157,0,0,0,255,0,0,0,0
F#�line$(8),file$(8):I%=52:*FX4 1
Ptext%=0:*FX 5 1
Z�bo:*FX6 1
d*LOAD DISPLAY 5800
n�37,24);I%
x�Read In Menu Colours
�?  �� #opt:back%=2:fore%=0:N%=3:retu%=127:K%=60:L%=12:�tj@
�  opt=� "$.SPECDAT"
�'  �# opt,back%,fore%,N%,retu%,K%,L%
�  �# opt
�'��6:�("FX 4,1"):�:�" at line ";�:�
��
�  �show
�  �k:�A%=999�dH@
�*  �A%<>retu% � f$=file$(A%-64) � f$=""
�	  �bo
�  �f$="X" � f$=""
��f$<>"" � M%<>1
�check$=�f$,3,1)
�check$="+" � text%=1
(�text%=0 � �22,6:�23;8202;0;0;0;:�f$
"9�text%=1 � �3:�23;8202;0;0;0;:$&15C=f$:Z%=1:�"$.TYPE"
,�
6:
@
��show
J�M%=1 � �dDD
T�M%=2 � �dND
^�M%=3 � �dXD
h�M%=4 � �dbD
r�M%=5 � �dlD
|�M%=6 � �dvD
��M%=7 � �T@E
��M%=8 � �TJE
��count%=1�7
�#  � line$(count%),file$(count%)
��count%
� 
��28,1,29,4,6
��c
��count%=1�7
�  def%=(count%*2)+126
�E  �file$(count%) <> "" �''';�(def%);�(def%+1);"  ";line$(count%);
��count%
�,�28,0,31,39,0,19,7,back%;0;19,0,fore%;0;
�
:
+��k:A%=�:�A%=retu% � M%<>1 � M%=1:�bo:�
&)�A%=90 �bo:�configure:M%=1:A%=retu%:�
0 �A%=79 �print:� Don't Touch!
: �A%<65 � A%>71 � A%=999:�7:�
D(�M%=1 M%=(A%-63):� � f$=file$(A%-64)
N(�file$(A%-64)="" � M%<>1 � A%=999:�7
X�
b:
l1��print:�22,6:�23;8202;0;0;0;:Z%=0:�"$.PRINT"
v:
���c:�28,1,29,29,7:�:�
�:
���bo:�19,0,0;0;19,7,0;0;:�
���write
�opt=� "$.SPECDAT"
�%�# opt,back%,fore%,N%,retu%,K%,L%
�
�# opt
��
�:
���configure:�28,1,29,4,6:�c
��28,1,29,4,6:�c:��TTE
�#�'"   DISK CONFIGURATION MENU";
��count%=1�7
#  � line$(count%),file$(count%)
  def%=(count%*2)+126
C  �file$(count%) <> "" �'';�(def%);�(def%+1);"  ";line$(count%)
 �count%
*�
4  �upcon
>  �("FX 21"):i%=�
H'  �i%=65 � retu%=127 retu%=82:�D\C
R!  �i%=65 � retu%=82 retu%=127
\  �i%=66 ��scroll(2)
f  �i%=67 ��scroll(1)
p  �i%=68 � N%=3 N%=6:�tXC
z  �i%=68 � N%=6 N%=3
�$  �i%=69 �K%=K%+1:�K%>80 � K%=40
�#  �i%=70 �L%=L%+1:�L%>14 � L%=1
�0�i%=71:�7:�10,22)"Are You Sure (Y/N)";:j%=�
��j%=89 � j%=121 �write � �7
��
�:
���upcon:�21,4);
��retu%=127 �"<DELETE>"
��retu%=82 �"     <R>"
�)�dis(fore%):�9-(�(A$))+17,7)"   ";A$
�*�dis(back%):�9-(�(A$))+17,10)"   ";A$
�:�28,13);N%;�21,16);K%;" lines"�21,19);:�L%<10 � �" ";
��;L%;" lines"
�19,0,fore%;0;19,7,back%;0;
�
:
$)��scroll(col%):�col%=1� back%=back%+1
.�col%=2� fore%=fore%+1
8�back% > 7 � back%=0
B�fore% > 7 � fore%=0
L�
V:
`��dis(show%)
j�show%=0 A$="Black '0'"
t�show%=1 A$="Red '1'"
~�show%=2 A$="Green '2'"
��show%=3 A$="Yellow '3'"
��show%=4 A$="Blue '4'"
��show%=5 A$="Magenta '5'"
��show%=6 A$="Cyan '6'"
��show%=7 A$="White '7'"
��
� !FIRST STOP EDITORIAL!,X,ARTICLES/DOCS MENU,X,UTILITIES MENU,X,GAMES/DEMO MENU,X,REVIEWS MENU,X,ADVENTURES MENU,X,ADVERTISEMENTS/MAILBAG,X
Ω� !CONFIGURATION MENU!,V.+CONFIG,!ELECTRON USER GROUP!,V.+EUG,!IN THIS ISSUE!,V.+CONTS,!NEWS AND THE INTERNET!,V.+NEWS,!BUGS (EUG #51)!,V.+BUGS,<Empty>,"",<Empty>,""
��� AUTHORDASHED! Article,V.+AUTHOR,BRAINTEASERS Art Pt 1,V.+BTEAS1,REPTON INFINITY Passwrds,V.+INFPAS,SUNDAY REVEALED! Pt 1,V.+SSR1,SUNDAY REVEALED! Pt 2,V.+SSR2,Sundry Documentation,V.+RUGH,<Empty>,""
��� CLOWN Picture,U.CLOWN,EROTICA Picture,U.aPT1,MICKEY MOUSE Picture,U.MICKEY,WORM Picture,U.WORM,STAMP FRAME Utility,U.STMPfrm,SUNDAY Load/Save Utility,U.SUNSAVE,SUNDAY L/S Util Docs,V.+SUNSAV
��� ANTIQUE COLLECTOR (Arc),G.ANTIQUE,BOMBHUNT (Arcade),G.BOMBHUN,FRUIT MACHINE (Pot Luck),G.FRUIT,GOOD NIGHT FOLKS Demo,U.GNIGHT,HEXAGON (Brainteaser),U.HEXAGON,PATIENCE MENU (Patience),G.PATMENU,SAFECRACKER (Brainteaser),U.SAFECRA
��� EUG #0 Review,R.+EUG0,FOUR GREAT GAMES 1 Rev,R.+FOURGA,MYSTERY OF JAVA STAR Rev,R.+MYSTER,XLCR Review,R.+XLCR,<Empty>,,<Empty>,,<Empty>,""
w� SUPERGRAN Adventure,G.SGRAN1,FUN HOUSE Solution,S.+MYSTFH,<Empty>,,<Empty>,,<Empty>,,<Empty>,,<Empty>,,<Empty>,""

�� Classified Ads,V.+SALE1,Streets Ahead Patience,L.+STREET,Utilities And Agreement,L.+UTILIT,<Empty>,,<Empty>,,<Empty>,,<Empty>,""
�� Return To Main Menu Key,X,Cycle Background Colour,X,Cycle Foreground Colour,X,View Text Files Mode,X,One Pass Print,X,Perforation Skip,X,Save Configuration,X
�
00000000  0d 00 0a 28 eb 34 3a ef  32 33 3b 38 32 30 32 3b  |...(.4:.23;8202;|
00000010  30 3b 30 3b 30 3b 3a fb  30 3a fb 31 32 39 3a 2a  |0;0;0;:.0:.129:*|
00000020  46 58 20 32 30 30 20 31  0d 00 14 dd ef 32 33 2c  |FX 200 1.....23,|
00000030  31 32 38 2c 31 35 2c 31  32 37 2c 32 34 38 2c 32  |128,15,127,248,2|
00000040  34 30 2c 32 35 35 2c 32  35 35 2c 32 34 30 2c 39  |40,255,255,240,9|
00000050  36 2c 32 33 2c 31 32 39  2c 32 32 34 2c 32 34 38  |6,23,129,224,248|
00000060  2c 31 32 34 2c 36 30 2c  32 35 32 2c 32 35 32 2c  |,124,60,252,252,|
00000070  36 30 2c 32 34 2c 32 33  2c 31 33 30 2c 31 32 37  |60,24,23,130,127|
00000080  2c 32 35 35 2c 32 34 30  2c 32 35 35 2c 32 35 35  |,255,240,255,255|
00000090  2c 32 34 30 2c 32 35 35  2c 31 32 37 2c 32 33 2c  |,240,255,127,23,|
000000a0  31 33 31 2c 32 32 34 2c  32 34 38 2c 36 30 2c 32  |131,224,248,60,2|
000000b0  34 38 2c 32 34 38 2c 36  30 2c 32 34 38 2c 32 32  |48,248,60,248,22|
000000c0  34 2c 32 33 2c 31 33 32  2c 33 31 2c 31 32 37 2c  |4,23,132,31,127,|
000000d0  32 35 32 2c 32 34 30 2c  32 34 30 2c 32 35 32 2c  |252,240,240,252,|
000000e0  31 32 37 2c 33 31 2c 32  33 2c 31 33 33 2c 32 35  |127,31,23,133,25|
000000f0  32 2c 32 35 32 2c 30 2c  30 2c 30 2c 30 2c 32 35  |2,252,0,0,0,0,25|
00000100  32 2c 32 35 32 0d 00 1e  dd ef 32 33 2c 31 33 34  |2,252.....23,134|
00000110  2c 32 35 35 2c 32 35 35  2c 32 34 30 2c 32 34 30  |,255,255,240,240|
00000120  2c 32 34 30 2c 32 34 30  2c 32 35 35 2c 32 35 35  |,240,240,255,255|
00000130  2c 32 33 2c 31 33 35 2c  32 32 34 2c 32 34 38 2c  |,23,135,224,248,|
00000140  32 35 32 2c 36 30 2c 36  30 2c 32 35 32 2c 32 34  |252,60,60,252,24|
00000150  38 2c 32 32 34 2c 32 33  2c 31 33 36 2c 33 31 2c  |8,224,23,136,31,|
00000160  31 32 37 2c 32 34 38 2c  32 35 35 2c 32 35 35 2c  |127,248,255,255,|
00000170  32 34 38 2c 31 32 37 2c  33 31 2c 32 33 2c 31 33  |248,127,31,23,13|
00000180  37 2c 32 35 32 2c 32 35  32 2c 30 2c 31 39 32 2c  |7,252,252,0,192,|
00000190  31 39 32 2c 30 2c 32 35  32 2c 32 35 32 2c 32 33  |192,0,252,252,23|
000001a0  2c 31 33 38 2c 33 31 2c  31 32 37 2c 32 34 30 2c  |,138,31,127,240,|
000001b0  32 35 35 2c 32 35 35 2c  32 34 30 2c 32 34 30 2c  |255,255,240,240,|
000001c0  32 34 30 2c 32 33 2c 31  33 39 2c 32 35 32 2c 32  |240,23,139,252,2|
000001d0  35 32 2c 30 2c 31 39 32  2c 31 39 32 2c 30 2c 30  |52,0,192,192,0,0|
000001e0  2c 30 0d 00 28 d6 ef 32  33 2c 31 34 30 2c 33 31  |,0..(..23,140,31|
000001f0  2c 31 32 37 2c 32 35 32  2c 32 34 30 2c 32 34 30  |,127,252,240,240|
00000200  2c 32 35 32 2c 31 32 37  2c 33 31 2c 32 33 2c 31  |,252,127,31,23,1|
00000210  34 31 2c 32 35 32 2c 32  35 32 2c 30 2c 32 35 32  |41,252,252,0,252|
00000220  2c 32 35 32 2c 36 30 2c  32 35 32 2c 32 35 32 2c  |,252,60,252,252,|
00000230  32 33 2c 31 34 32 2c 32  34 30 2c 32 34 30 2c 32  |23,142,240,240,2|
00000240  34 30 2c 32 34 30 2c 32  34 30 2c 32 34 30 2c 32  |40,240,240,240,2|
00000250  35 35 2c 32 35 35 2c 32  33 2c 31 34 33 2c 30 2c  |55,255,23,143,0,|
00000260  30 2c 30 2c 30 2c 30 2c  30 2c 32 35 32 2c 32 35  |0,0,0,0,0,252,25|
00000270  32 2c 32 33 2c 31 34 34  2c 33 31 2c 31 32 37 2c  |2,23,144,31,127,|
00000280  32 34 38 2c 32 34 30 2c  32 34 30 2c 32 34 30 2c  |248,240,240,240,|
00000290  32 34 30 2c 39 36 2c 32  33 2c 31 34 35 2c 32 32  |240,96,23,145,22|
000002a0  34 2c 32 34 38 2c 31 32  34 2c 36 30 2c 36 30 2c  |4,248,124,60,60,|
000002b0  36 30 2c 36 30 2c 32 34  0d 00 32 e1 ef 32 33 2c  |60,60,24..2..23,|
000002c0  31 34 36 2c 33 31 2c 31  32 37 2c 32 35 32 2c 32  |146,31,127,252,2|
000002d0  34 30 2c 32 34 30 2c 32  35 32 2c 31 32 37 2c 33  |40,240,252,127,3|
000002e0  31 2c 32 33 2c 31 34 37  2c 31 32 37 2c 32 35 35  |1,23,147,127,255|
000002f0  2c 32 34 30 2c 32 35 35  2c 32 35 35 2c 32 34 30  |,240,255,255,240|
00000300  2c 32 34 30 2c 32 34 30  2c 32 33 2c 31 34 38 2c  |,240,240,23,148,|
00000310  32 32 34 2c 32 34 38 2c  36 30 2c 32 34 38 2c 32  |224,248,60,248,2|
00000320  32 34 2c 30 2c 30 2c 30  2c 32 33 2c 31 34 39 2c  |24,0,0,0,23,149,|
00000330  31 32 37 2c 32 35 35 2c  32 34 30 2c 32 35 35 2c  |127,255,240,255,|
00000340  32 35 35 2c 32 35 35 2c  32 34 31 2c 32 34 30 2c  |255,255,241,240,|
00000350  32 33 2c 31 35 30 2c 32  32 34 2c 32 34 38 2c 36  |23,150,224,248,6|
00000360  30 2c 32 34 38 2c 32 32  34 2c 32 32 34 2c 32 34  |0,248,224,224,24|
00000370  38 2c 31 32 34 2c 32 33  2c 31 35 31 2c 31 32 37  |8,124,23,151,127|
00000380  2c 32 34 33 2c 32 34 38  2c 31 32 37 2c 37 2c 32  |,243,248,127,7,2|
00000390  34 30 2c 32 35 35 2c 33  31 0d 00 3c ee ef 32 33  |40,255,31..<..23|
000003a0  2c 31 35 31 2c 31 32 37  2c 32 34 33 2c 32 34 38  |,151,127,243,248|
000003b0  2c 31 32 37 2c 37 2c 32  34 30 2c 32 35 35 2c 33  |,127,7,240,255,3|
000003c0  31 2c 32 33 2c 31 35 32  2c 32 34 30 2c 32 35 32  |1,23,152,240,252|
000003d0  2c 36 30 2c 30 2c 32 34  38 2c 31 32 34 2c 36 30  |,60,0,248,124,60|
000003e0  2c 32 34 38 2c 32 33 2c  31 35 33 2c 32 35 35 2c  |,248,23,153,255,|
000003f0  32 35 35 2c 37 2c 37 2c  37 2c 37 2c 37 2c 37 2c  |255,7,7,7,7,7,7,|
00000400  32 33 2c 31 35 34 2c 32  35 32 2c 32 35 32 2c 31  |23,154,252,252,1|
00000410  32 38 2c 31 32 38 2c 31  32 38 2c 31 32 38 2c 31  |28,128,128,128,1|
00000420  32 38 2c 31 32 38 2c 32  33 2c 31 35 35 2c 32 34  |28,128,23,155,24|
00000430  30 2c 32 34 30 2c 32 34  30 2c 32 34 30 2c 32 34  |0,240,240,240,24|
00000440  30 2c 32 35 32 2c 31 32  37 2c 33 31 2c 32 33 2c  |0,252,127,31,23,|
00000450  31 35 36 2c 36 30 2c 36  30 2c 36 30 2c 36 30 2c  |156,60,60,60,60,|
00000460  36 30 2c 32 35 32 2c 32  34 38 2c 32 32 34 2c 32  |60,252,248,224,2|
00000470  33 2c 31 35 37 2c 30 2c  30 2c 30 2c 32 35 35 2c  |3,157,0,0,0,255,|
00000480  30 2c 30 2c 30 2c 30 0d  00 46 23 de 6c 69 6e 65  |0,0,0,0..F#.line|
00000490  24 28 38 29 2c 66 69 6c  65 24 28 38 29 3a 49 25  |$(8),file$(8):I%|
000004a0  3d 35 32 3a 2a 46 58 34  20 31 0d 00 50 13 74 65  |=52:*FX4 1..P.te|
000004b0  78 74 25 3d 30 3a 2a 46  58 20 35 20 31 0d 00 5a  |xt%=0:*FX 5 1..Z|
000004c0  0e f2 62 6f 3a 2a 46 58  36 20 31 0d 00 64 16 2a  |..bo:*FX6 1..d.*|
000004d0  4c 4f 41 44 20 44 49 53  50 4c 41 59 20 35 38 30  |LOAD DISPLAY 580|
000004e0  30 0d 00 6e 0f f1 8a 33  37 2c 32 34 29 3b 49 25  |0..n...37,24);I%|
000004f0  0d 00 78 19 f4 52 65 61  64 20 49 6e 20 4d 65 6e  |..x..Read In Men|
00000500  75 20 43 6f 6c 6f 75 72  73 0d 00 82 3f 20 20 ee  |u Colours...?  .|
00000510  85 d9 20 23 6f 70 74 3a  62 61 63 6b 25 3d 32 3a  |.. #opt:back%=2:|
00000520  66 6f 72 65 25 3d 30 3a  4e 25 3d 33 3a 72 65 74  |fore%=0:N%=3:ret|
00000530  75 25 3d 31 32 37 3a 4b  25 3d 36 30 3a 4c 25 3d  |u%=127:K%=60:L%=|
00000540  31 32 3a e5 8d 74 6a 40  0d 00 8c 17 20 20 6f 70  |12:..tj@....  op|
00000550  74 3d 8e 20 22 24 2e 53  50 45 43 44 41 54 22 0d  |t=. "$.SPECDAT".|
00000560  00 96 27 20 20 e8 23 20  6f 70 74 2c 62 61 63 6b  |..'  .# opt,back|
00000570  25 2c 66 6f 72 65 25 2c  4e 25 2c 72 65 74 75 25  |%,fore%,N%,retu%|
00000580  2c 4b 25 2c 4c 25 0d 00  a0 0c 20 20 d9 23 20 6f  |,K%,L%....  .# o|
00000590  70 74 0d 00 aa 27 ee 85  eb 36 3a ff 28 22 46 58  |pt...'...6:.("FX|
000005a0  20 34 2c 31 22 29 3a f6  3a f1 22 20 61 74 20 6c  | 4,1"):.:." at l|
000005b0  69 6e 65 20 22 3b 9e 3a  e0 0d 00 b4 05 f5 0d 00  |ine ";.:........|
000005c0  be 0b 20 20 f2 73 68 6f  77 0d 00 c8 15 20 20 f2  |..  .show....  .|
000005d0  6b 3a e7 41 25 3d 39 39  39 e5 8d 64 48 40 0d 00  |k:.A%=999..dH@..|
000005e0  d2 2a 20 20 e7 41 25 3c  3e 72 65 74 75 25 20 8c  |.*  .A%<>retu% .|
000005f0  20 66 24 3d 66 69 6c 65  24 28 41 25 2d 36 34 29  | f$=file$(A%-64)|
00000600  20 8b 20 66 24 3d 22 22  0d 00 dc 09 20 20 f2 62  | . f$=""....  .b|
00000610  6f 0d 00 e6 15 20 20 e7  66 24 3d 22 58 22 20 8c  |o....  .f$="X" .|
00000620  20 66 24 3d 22 22 0d 00  f0 13 fd 66 24 3c 3e 22  | f$="".....f$<>"|
00000630  22 20 80 20 4d 25 3c 3e  31 0d 00 fa 13 63 68 65  |" . M%<>1....che|
00000640  63 6b 24 3d c1 66 24 2c  33 2c 31 29 0d 01 04 19  |ck$=.f$,3,1)....|
00000650  e7 63 68 65 63 6b 24 3d  22 2b 22 20 8c 20 74 65  |.check$="+" . te|
00000660  78 74 25 3d 31 0d 01 18  28 e7 74 65 78 74 25 3d  |xt%=1...(.text%=|
00000670  30 20 8c 20 ef 32 32 2c  36 3a ef 32 33 3b 38 32  |0 . .22,6:.23;82|
00000680  30 32 3b 30 3b 30 3b 30  3b 3a d7 66 24 0d 01 22  |02;0;0;0;:.f$.."|
00000690  39 e7 74 65 78 74 25 3d  31 20 8c 20 eb 33 3a ef  |9.text%=1 . .3:.|
000006a0  32 33 3b 38 32 30 32 3b  30 3b 30 3b 30 3b 3a 24  |23;8202;0;0;0;:$|
000006b0  26 31 35 43 3d 66 24 3a  5a 25 3d 31 3a d7 22 24  |&15C=f$:Z%=1:."$|
000006c0  2e 54 59 50 45 22 0d 01  2c 05 e0 0d 01 36 05 3a  |.TYPE"..,....6.:|
000006d0  0d 01 40 0a dd f2 73 68  6f 77 0d 01 4a 10 e7 4d  |..@...show..J..M|
000006e0  25 3d 31 20 f7 20 8d 64  44 44 0d 01 54 10 e7 4d  |%=1 . .dDD..T..M|
000006f0  25 3d 32 20 f7 20 8d 64  4e 44 0d 01 5e 10 e7 4d  |%=2 . .dND..^..M|
00000700  25 3d 33 20 f7 20 8d 64  58 44 0d 01 68 10 e7 4d  |%=3 . .dXD..h..M|
00000710  25 3d 34 20 f7 20 8d 64  62 44 0d 01 72 10 e7 4d  |%=4 . .dbD..r..M|
00000720  25 3d 35 20 f7 20 8d 64  6c 44 0d 01 7c 10 e7 4d  |%=5 . .dlD..|..M|
00000730  25 3d 36 20 f7 20 8d 64  76 44 0d 01 86 10 e7 4d  |%=6 . .dvD.....M|
00000740  25 3d 37 20 f7 20 8d 54  40 45 0d 01 90 10 e7 4d  |%=7 . .T@E.....M|
00000750  25 3d 38 20 f7 20 8d 54  4a 45 0d 01 9a 0f e3 63  |%=8 . .TJE.....c|
00000760  6f 75 6e 74 25 3d 31 b8  37 0d 01 a4 23 20 20 f3  |ount%=1.7...#  .|
00000770  20 6c 69 6e 65 24 28 63  6f 75 6e 74 25 29 2c 66  | line$(count%),f|
00000780  69 6c 65 24 28 63 6f 75  6e 74 25 29 0d 01 ae 0b  |ile$(count%)....|
00000790  ed 63 6f 75 6e 74 25 0d  01 b8 05 20 0d 01 c2 10  |.count%.... ....|
000007a0  ef 32 38 2c 31 2c 32 39  2c 34 2c 36 0d 01 cc 06  |.28,1,29,4,6....|
000007b0  f2 63 0d 01 d6 0f e3 63  6f 75 6e 74 25 3d 31 b8  |.c.....count%=1.|
000007c0  37 0d 01 e0 19 20 20 64  65 66 25 3d 28 63 6f 75  |7....  def%=(cou|
000007d0  6e 74 25 2a 32 29 2b 31  32 36 0d 01 ea 45 20 20  |nt%*2)+126...E  |
000007e0  e7 66 69 6c 65 24 28 63  6f 75 6e 74 25 29 20 3c  |.file$(count%) <|
000007f0  3e 20 22 22 20 f1 27 27  27 3b bd 28 64 65 66 25  |> "" .''';.(def%|
00000800  29 3b bd 28 64 65 66 25  2b 31 29 3b 22 20 20 22  |);.(def%+1);"  "|
00000810  3b 6c 69 6e 65 24 28 63  6f 75 6e 74 25 29 3b 0d  |;line$(count%);.|
00000820  01 f4 0b ed 63 6f 75 6e  74 25 0d 01 fe 2c ef 32  |....count%...,.2|
00000830  38 2c 30 2c 33 31 2c 33  39 2c 30 2c 31 39 2c 37  |8,0,31,39,0,19,7|
00000840  2c 62 61 63 6b 25 3b 30  3b 31 39 2c 30 2c 66 6f  |,back%;0;19,0,fo|
00000850  72 65 25 3b 30 3b 0d 02  08 05 e1 0d 02 12 05 3a  |re%;0;.........:|
00000860  0d 02 1c 2b dd f2 6b 3a  41 25 3d a5 3a e7 41 25  |...+..k:A%=.:.A%|
00000870  3d 72 65 74 75 25 20 80  20 4d 25 3c 3e 31 20 8c  |=retu% . M%<>1 .|
00000880  20 4d 25 3d 31 3a f2 62  6f 3a e1 0d 02 26 29 e7  | M%=1:.bo:...&).|
00000890  41 25 3d 39 30 20 f2 62  6f 3a f2 63 6f 6e 66 69  |A%=90 .bo:.confi|
000008a0  67 75 72 65 3a 4d 25 3d  31 3a 41 25 3d 72 65 74  |gure:M%=1:A%=ret|
000008b0  75 25 3a e1 0d 02 30 20  e7 41 25 3d 37 39 20 f2  |u%:...0 .A%=79 .|
000008c0  70 72 69 6e 74 3a f4 20  44 6f 6e 27 74 20 54 6f  |print:. Don't To|
000008d0  75 63 68 21 0d 02 3a 20  e7 41 25 3c 36 35 20 84  |uch!..: .A%<65 .|
000008e0  20 41 25 3e 37 31 20 8c  20 41 25 3d 39 39 39 3a  | A%>71 . A%=999:|
000008f0  ef 37 3a e1 0d 02 44 28  e7 4d 25 3d 31 20 4d 25  |.7:...D(.M%=1 M%|
00000900  3d 28 41 25 2d 36 33 29  3a e1 20 8b 20 66 24 3d  |=(A%-63):. . f$=|
00000910  66 69 6c 65 24 28 41 25  2d 36 34 29 0d 02 4e 28  |file$(A%-64)..N(|
00000920  e7 66 69 6c 65 24 28 41  25 2d 36 34 29 3d 22 22  |.file$(A%-64)=""|
00000930  20 80 20 4d 25 3c 3e 31  20 8c 20 41 25 3d 39 39  | . M%<>1 . A%=99|
00000940  39 3a ef 37 0d 02 58 05  e1 0d 02 62 05 3a 0d 02  |9:.7..X....b.:..|
00000950  6c 31 dd f2 70 72 69 6e  74 3a ef 32 32 2c 36 3a  |l1..print:.22,6:|
00000960  ef 32 33 3b 38 32 30 32  3b 30 3b 30 3b 30 3b 3a  |.23;8202;0;0;0;:|
00000970  5a 25 3d 30 3a d7 22 24  2e 50 52 49 4e 54 22 0d  |Z%=0:."$.PRINT".|
00000980  02 76 05 3a 0d 02 80 19  dd f2 63 3a ef 32 38 2c  |.v.:......c:.28,|
00000990  31 2c 32 39 2c 32 39 2c  37 3a db 3a e1 0d 02 8a  |1,29,29,7:.:....|
000009a0  05 3a 0d 02 94 1e dd f2  62 6f 3a ef 31 39 2c 30  |.:......bo:.19,0|
000009b0  2c 30 3b 30 3b 31 39 2c  37 2c 30 3b 30 3b 3a e1  |,0;0;19,7,0;0;:.|
000009c0  0d 02 9e 0b dd f2 77 72  69 74 65 0d 02 a8 15 6f  |......write....o|
000009d0  70 74 3d ae 20 22 24 2e  53 50 45 43 44 41 54 22  |pt=. "$.SPECDAT"|
000009e0  0d 02 b2 25 f1 23 20 6f  70 74 2c 62 61 63 6b 25  |...%.# opt,back%|
000009f0  2c 66 6f 72 65 25 2c 4e  25 2c 72 65 74 75 25 2c  |,fore%,N%,retu%,|
00000a00  4b 25 2c 4c 25 0d 02 bc  0a d9 23 20 6f 70 74 0d  |K%,L%.....# opt.|
00000a10  02 c6 05 e1 0d 02 d0 05  3a 0d 02 da 1f dd f2 63  |........:......c|
00000a20  6f 6e 66 69 67 75 72 65  3a ef 32 38 2c 31 2c 32  |onfigure:.28,1,2|
00000a30  39 2c 34 2c 36 3a f2 63  0d 02 e4 19 ef 32 38 2c  |9,4,6:.c.....28,|
00000a40  31 2c 32 39 2c 34 2c 36  3a f2 63 3a f7 8d 54 54  |1,29,4,6:.c:..TT|
00000a50  45 0d 02 ee 23 f1 27 22  20 20 20 44 49 53 4b 20  |E...#.'"   DISK |
00000a60  43 4f 4e 46 49 47 55 52  41 54 49 4f 4e 20 4d 45  |CONFIGURATION ME|
00000a70  4e 55 22 3b 0d 02 f8 0f  e3 63 6f 75 6e 74 25 3d  |NU";.....count%=|
00000a80  31 b8 37 0d 03 02 23 20  20 f3 20 6c 69 6e 65 24  |1.7...#  . line$|
00000a90  28 63 6f 75 6e 74 25 29  2c 66 69 6c 65 24 28 63  |(count%),file$(c|
00000aa0  6f 75 6e 74 25 29 0d 03  0c 19 20 20 64 65 66 25  |ount%)....  def%|
00000ab0  3d 28 63 6f 75 6e 74 25  2a 32 29 2b 31 32 36 0d  |=(count%*2)+126.|
00000ac0  03 16 43 20 20 e7 66 69  6c 65 24 28 63 6f 75 6e  |..C  .file$(coun|
00000ad0  74 25 29 20 3c 3e 20 22  22 20 f1 27 27 3b bd 28  |t%) <> "" .'';.(|
00000ae0  64 65 66 25 29 3b bd 28  64 65 66 25 2b 31 29 3b  |def%);.(def%+1);|
00000af0  22 20 20 22 3b 6c 69 6e  65 24 28 63 6f 75 6e 74  |"  ";line$(count|
00000b00  25 29 0d 03 20 0b ed 63  6f 75 6e 74 25 0d 03 2a  |%).. ..count%..*|
00000b10  05 f5 0d 03 34 0c 20 20  f2 75 70 63 6f 6e 0d 03  |....4.  .upcon..|
00000b20  3e 15 20 20 ff 28 22 46  58 20 32 31 22 29 3a 69  |>.  .("FX 21"):i|
00000b30  25 3d a5 0d 03 48 27 20  20 e7 69 25 3d 36 35 20  |%=...H'  .i%=65 |
00000b40  80 20 72 65 74 75 25 3d  31 32 37 20 72 65 74 75  |. retu%=127 retu|
00000b50  25 3d 38 32 3a e5 8d 44  5c 43 0d 03 52 21 20 20  |%=82:..D\C..R!  |
00000b60  e7 69 25 3d 36 35 20 80  20 72 65 74 75 25 3d 38  |.i%=65 . retu%=8|
00000b70  32 20 72 65 74 75 25 3d  31 32 37 0d 03 5c 18 20  |2 retu%=127..\. |
00000b80  20 e7 69 25 3d 36 36 20  8c f2 73 63 72 6f 6c 6c  | .i%=66 ..scroll|
00000b90  28 32 29 0d 03 66 18 20  20 e7 69 25 3d 36 37 20  |(2)..f.  .i%=67 |
00000ba0  8c f2 73 63 72 6f 6c 6c  28 31 29 0d 03 70 1e 20  |..scroll(1)..p. |
00000bb0  20 e7 69 25 3d 36 38 20  80 20 4e 25 3d 33 20 4e  | .i%=68 . N%=3 N|
00000bc0  25 3d 36 3a e5 8d 74 58  43 0d 03 7a 18 20 20 e7  |%=6:..tXC..z.  .|
00000bd0  69 25 3d 36 38 20 80 20  4e 25 3d 36 20 4e 25 3d  |i%=68 . N%=6 N%=|
00000be0  33 0d 03 84 24 20 20 e7  69 25 3d 36 39 20 8c 4b  |3...$  .i%=69 .K|
00000bf0  25 3d 4b 25 2b 31 3a e7  4b 25 3e 38 30 20 8c 20  |%=K%+1:.K%>80 . |
00000c00  4b 25 3d 34 30 0d 03 8e  23 20 20 e7 69 25 3d 37  |K%=40...#  .i%=7|
00000c10  30 20 8c 4c 25 3d 4c 25  2b 31 3a e7 4c 25 3e 31  |0 .L%=L%+1:.L%>1|
00000c20  34 20 8c 20 4c 25 3d 31  0d 03 98 30 fd 69 25 3d  |4 . L%=1...0.i%=|
00000c30  37 31 3a ef 37 3a f1 8a  31 30 2c 32 32 29 22 41  |71:.7:..10,22)"A|
00000c40  72 65 20 59 6f 75 20 53  75 72 65 20 28 59 2f 4e  |re You Sure (Y/N|
00000c50  29 22 3b 3a 6a 25 3d a5  0d 03 a2 1f e7 6a 25 3d  |)";:j%=......j%=|
00000c60  38 39 20 84 20 6a 25 3d  31 32 31 20 f2 77 72 69  |89 . j%=121 .wri|
00000c70  74 65 20 8b 20 ef 37 0d  03 ac 05 e1 0d 03 b6 05  |te . .7.........|
00000c80  3a 0d 03 c0 14 dd f2 75  70 63 6f 6e 3a f1 8a 32  |:......upcon:..2|
00000c90  31 2c 34 29 3b 0d 03 ca  1a e7 72 65 74 75 25 3d  |1,4);.....retu%=|
00000ca0  31 32 37 20 f1 22 3c 44  45 4c 45 54 45 3e 22 0d  |127 ."<DELETE>".|
00000cb0  03 d4 19 e7 72 65 74 75  25 3d 38 32 20 f1 22 20  |....retu%=82 ." |
00000cc0  20 20 20 20 3c 52 3e 22  0d 03 de 29 f2 64 69 73  |    <R>"...).dis|
00000cd0  28 66 6f 72 65 25 29 3a  f1 8a 39 2d 28 a9 28 41  |(fore%):..9-(.(A|
00000ce0  24 29 29 2b 31 37 2c 37  29 22 20 20 20 22 3b 41  |$))+17,7)"   ";A|
00000cf0  24 0d 03 e8 2a f2 64 69  73 28 62 61 63 6b 25 29  |$...*.dis(back%)|
00000d00  3a f1 8a 39 2d 28 a9 28  41 24 29 29 2b 31 37 2c  |:..9-(.(A$))+17,|
00000d10  31 30 29 22 20 20 20 22  3b 41 24 0d 03 f2 3a f1  |10)"   ";A$...:.|
00000d20  8a 32 38 2c 31 33 29 3b  4e 25 3b 8a 32 31 2c 31  |.28,13);N%;.21,1|
00000d30  36 29 3b 4b 25 3b 22 20  6c 69 6e 65 73 22 8a 32  |6);K%;" lines".2|
00000d40  31 2c 31 39 29 3b 3a e7  4c 25 3c 31 30 20 8c 20  |1,19);:.L%<10 . |
00000d50  f1 22 20 22 3b 0d 03 fc  11 f1 3b 4c 25 3b 22 20  |." ";.....;L%;" |
00000d60  6c 69 6e 65 73 22 0d 04  06 1f ef 31 39 2c 30 2c  |lines".....19,0,|
00000d70  66 6f 72 65 25 3b 30 3b  31 39 2c 37 2c 62 61 63  |fore%;0;19,7,bac|
00000d80  6b 25 3b 30 3b 0d 04 10  05 e1 0d 04 1a 05 3a 0d  |k%;0;.........:.|
00000d90  04 24 29 dd f2 73 63 72  6f 6c 6c 28 63 6f 6c 25  |.$)..scroll(col%|
00000da0  29 3a e7 63 6f 6c 25 3d  31 8c 20 62 61 63 6b 25  |):.col%=1. back%|
00000db0  3d 62 61 63 6b 25 2b 31  0d 04 2e 1a e7 63 6f 6c  |=back%+1.....col|
00000dc0  25 3d 32 8c 20 66 6f 72  65 25 3d 66 6f 72 65 25  |%=2. fore%=fore%|
00000dd0  2b 31 0d 04 38 18 e7 62  61 63 6b 25 20 3e 20 37  |+1..8..back% > 7|
00000de0  20 8c 20 62 61 63 6b 25  3d 30 0d 04 42 18 e7 66  | . back%=0..B..f|
00000df0  6f 72 65 25 20 3e 20 37  20 8c 20 66 6f 72 65 25  |ore% > 7 . fore%|
00000e00  3d 30 0d 04 4c 05 e1 0d  04 56 05 3a 0d 04 60 10  |=0..L....V.:..`.|
00000e10  dd f2 64 69 73 28 73 68  6f 77 25 29 0d 04 6a 1b  |..dis(show%)..j.|
00000e20  e7 73 68 6f 77 25 3d 30  20 41 24 3d 22 42 6c 61  |.show%=0 A$="Bla|
00000e30  63 6b 20 27 30 27 22 0d  04 74 19 e7 73 68 6f 77  |ck '0'"..t..show|
00000e40  25 3d 31 20 41 24 3d 22  52 65 64 20 27 31 27 22  |%=1 A$="Red '1'"|
00000e50  0d 04 7e 1b e7 73 68 6f  77 25 3d 32 20 41 24 3d  |..~..show%=2 A$=|
00000e60  22 47 72 65 65 6e 20 27  32 27 22 0d 04 88 1c e7  |"Green '2'".....|
00000e70  73 68 6f 77 25 3d 33 20  41 24 3d 22 59 65 6c 6c  |show%=3 A$="Yell|
00000e80  6f 77 20 27 33 27 22 0d  04 92 1a e7 73 68 6f 77  |ow '3'".....show|
00000e90  25 3d 34 20 41 24 3d 22  42 6c 75 65 20 27 34 27  |%=4 A$="Blue '4'|
00000ea0  22 0d 04 9c 1d e7 73 68  6f 77 25 3d 35 20 41 24  |".....show%=5 A$|
00000eb0  3d 22 4d 61 67 65 6e 74  61 20 27 35 27 22 0d 04  |="Magenta '5'"..|
00000ec0  a6 1a e7 73 68 6f 77 25  3d 36 20 41 24 3d 22 43  |...show%=6 A$="C|
00000ed0  79 61 6e 20 27 36 27 22  0d 04 b0 1b e7 73 68 6f  |yan '6'".....sho|
00000ee0  77 25 3d 37 20 41 24 3d  22 57 68 69 74 65 20 27  |w%=7 A$="White '|
00000ef0  37 27 22 0d 04 ba 05 e1  0d 04 c4 90 dc 20 21 46  |7'".......... !F|
00000f00  49 52 53 54 20 53 54 4f  50 20 45 44 49 54 4f 52  |IRST STOP EDITOR|
00000f10  49 41 4c 21 2c 58 2c 41  52 54 49 43 4c 45 53 2f  |IAL!,X,ARTICLES/|
00000f20  44 4f 43 53 20 4d 45 4e  55 2c 58 2c 55 54 49 4c  |DOCS MENU,X,UTIL|
00000f30  49 54 49 45 53 20 4d 45  4e 55 2c 58 2c 47 41 4d  |ITIES MENU,X,GAM|
00000f40  45 53 2f 44 45 4d 4f 20  4d 45 4e 55 2c 58 2c 52  |ES/DEMO MENU,X,R|
00000f50  45 56 49 45 57 53 20 4d  45 4e 55 2c 58 2c 41 44  |EVIEWS MENU,X,AD|
00000f60  56 45 4e 54 55 52 45 53  20 4d 45 4e 55 2c 58 2c  |VENTURES MENU,X,|
00000f70  41 44 56 45 52 54 49 53  45 4d 45 4e 54 53 2f 4d  |ADVERTISEMENTS/M|
00000f80  41 49 4c 42 41 47 2c 58  0d 04 ce a9 dc 20 21 43  |AILBAG,X..... !C|
00000f90  4f 4e 46 49 47 55 52 41  54 49 4f 4e 20 4d 45 4e  |ONFIGURATION MEN|
00000fa0  55 21 2c 56 2e 2b 43 4f  4e 46 49 47 2c 21 45 4c  |U!,V.+CONFIG,!EL|
00000fb0  45 43 54 52 4f 4e 20 55  53 45 52 20 47 52 4f 55  |ECTRON USER GROU|
00000fc0  50 21 2c 56 2e 2b 45 55  47 2c 21 49 4e 20 54 48  |P!,V.+EUG,!IN TH|
00000fd0  49 53 20 49 53 53 55 45  21 2c 56 2e 2b 43 4f 4e  |IS ISSUE!,V.+CON|
00000fe0  54 53 2c 21 4e 45 57 53  20 41 4e 44 20 54 48 45  |TS,!NEWS AND THE|
00000ff0  20 49 4e 54 45 52 4e 45  54 21 2c 56 2e 2b 4e 45  | INTERNET!,V.+NE|
00001000  57 53 2c 21 42 55 47 53  20 28 45 55 47 20 23 35  |WS,!BUGS (EUG #5|
00001010  31 29 21 2c 56 2e 2b 42  55 47 53 2c 3c 45 6d 70  |1)!,V.+BUGS,<Emp|
00001020  74 79 3e 2c 22 22 2c 3c  45 6d 70 74 79 3e 2c 22  |ty>,"",<Empty>,"|
00001030  22 0d 04 d8 cc dc 20 41  55 54 48 4f 52 44 41 53  |"..... AUTHORDAS|
00001040  48 45 44 21 20 41 72 74  69 63 6c 65 2c 56 2e 2b  |HED! Article,V.+|
00001050  41 55 54 48 4f 52 2c 42  52 41 49 4e 54 45 41 53  |AUTHOR,BRAINTEAS|
00001060  45 52 53 20 41 72 74 20  50 74 20 31 2c 56 2e 2b  |ERS Art Pt 1,V.+|
00001070  42 54 45 41 53 31 2c 52  45 50 54 4f 4e 20 49 4e  |BTEAS1,REPTON IN|
00001080  46 49 4e 49 54 59 20 50  61 73 73 77 72 64 73 2c  |FINITY Passwrds,|
00001090  56 2e 2b 49 4e 46 50 41  53 2c 53 55 4e 44 41 59  |V.+INFPAS,SUNDAY|
000010a0  20 52 45 56 45 41 4c 45  44 21 20 50 74 20 31 2c  | REVEALED! Pt 1,|
000010b0  56 2e 2b 53 53 52 31 2c  53 55 4e 44 41 59 20 52  |V.+SSR1,SUNDAY R|
000010c0  45 56 45 41 4c 45 44 21  20 50 74 20 32 2c 56 2e  |EVEALED! Pt 2,V.|
000010d0  2b 53 53 52 32 2c 53 75  6e 64 72 79 20 44 6f 63  |+SSR2,Sundry Doc|
000010e0  75 6d 65 6e 74 61 74 69  6f 6e 2c 56 2e 2b 52 55  |umentation,V.+RU|
000010f0  47 48 2c 3c 45 6d 70 74  79 3e 2c 22 22 0d 04 e2  |GH,<Empty>,""...|
00001100  c4 dc 20 43 4c 4f 57 4e  20 50 69 63 74 75 72 65  |.. CLOWN Picture|
00001110  2c 55 2e 43 4c 4f 57 4e  2c 45 52 4f 54 49 43 41  |,U.CLOWN,EROTICA|
00001120  20 50 69 63 74 75 72 65  2c 55 2e 61 50 54 31 2c  | Picture,U.aPT1,|
00001130  4d 49 43 4b 45 59 20 4d  4f 55 53 45 20 50 69 63  |MICKEY MOUSE Pic|
00001140  74 75 72 65 2c 55 2e 4d  49 43 4b 45 59 2c 57 4f  |ture,U.MICKEY,WO|
00001150  52 4d 20 50 69 63 74 75  72 65 2c 55 2e 57 4f 52  |RM Picture,U.WOR|
00001160  4d 2c 53 54 41 4d 50 20  46 52 41 4d 45 20 55 74  |M,STAMP FRAME Ut|
00001170  69 6c 69 74 79 2c 55 2e  53 54 4d 50 66 72 6d 2c  |ility,U.STMPfrm,|
00001180  53 55 4e 44 41 59 20 4c  6f 61 64 2f 53 61 76 65  |SUNDAY Load/Save|
00001190  20 55 74 69 6c 69 74 79  2c 55 2e 53 55 4e 53 41  | Utility,U.SUNSA|
000011a0  56 45 2c 53 55 4e 44 41  59 20 4c 2f 53 20 55 74  |VE,SUNDAY L/S Ut|
000011b0  69 6c 20 44 6f 63 73 2c  56 2e 2b 53 55 4e 53 41  |il Docs,V.+SUNSA|
000011c0  56 0d 04 ec ea dc 20 41  4e 54 49 51 55 45 20 43  |V..... ANTIQUE C|
000011d0  4f 4c 4c 45 43 54 4f 52  20 28 41 72 63 29 2c 47  |OLLECTOR (Arc),G|
000011e0  2e 41 4e 54 49 51 55 45  2c 42 4f 4d 42 48 55 4e  |.ANTIQUE,BOMBHUN|
000011f0  54 20 28 41 72 63 61 64  65 29 2c 47 2e 42 4f 4d  |T (Arcade),G.BOM|
00001200  42 48 55 4e 2c 46 52 55  49 54 20 4d 41 43 48 49  |BHUN,FRUIT MACHI|
00001210  4e 45 20 28 50 6f 74 20  4c 75 63 6b 29 2c 47 2e  |NE (Pot Luck),G.|
00001220  46 52 55 49 54 2c 47 4f  4f 44 20 4e 49 47 48 54  |FRUIT,GOOD NIGHT|
00001230  20 46 4f 4c 4b 53 20 44  65 6d 6f 2c 55 2e 47 4e  | FOLKS Demo,U.GN|
00001240  49 47 48 54 2c 48 45 58  41 47 4f 4e 20 28 42 72  |IGHT,HEXAGON (Br|
00001250  61 69 6e 74 65 61 73 65  72 29 2c 55 2e 48 45 58  |ainteaser),U.HEX|
00001260  41 47 4f 4e 2c 50 41 54  49 45 4e 43 45 20 4d 45  |AGON,PATIENCE ME|
00001270  4e 55 20 28 50 61 74 69  65 6e 63 65 29 2c 47 2e  |NU (Patience),G.|
00001280  50 41 54 4d 45 4e 55 2c  53 41 46 45 43 52 41 43  |PATMENU,SAFECRAC|
00001290  4b 45 52 20 28 42 72 61  69 6e 74 65 61 73 65 72  |KER (Brainteaser|
000012a0  29 2c 55 2e 53 41 46 45  43 52 41 0d 04 f6 90 dc  |),U.SAFECRA.....|
000012b0  20 45 55 47 20 23 30 20  52 65 76 69 65 77 2c 52  | EUG #0 Review,R|
000012c0  2e 2b 45 55 47 30 2c 46  4f 55 52 20 47 52 45 41  |.+EUG0,FOUR GREA|
000012d0  54 20 47 41 4d 45 53 20  31 20 52 65 76 2c 52 2e  |T GAMES 1 Rev,R.|
000012e0  2b 46 4f 55 52 47 41 2c  4d 59 53 54 45 52 59 20  |+FOURGA,MYSTERY |
000012f0  4f 46 20 4a 41 56 41 20  53 54 41 52 20 52 65 76  |OF JAVA STAR Rev|
00001300  2c 52 2e 2b 4d 59 53 54  45 52 2c 58 4c 43 52 20  |,R.+MYSTER,XLCR |
00001310  52 65 76 69 65 77 2c 52  2e 2b 58 4c 43 52 2c 3c  |Review,R.+XLCR,<|
00001320  45 6d 70 74 79 3e 2c 2c  3c 45 6d 70 74 79 3e 2c  |Empty>,,<Empty>,|
00001330  2c 3c 45 6d 70 74 79 3e  2c 22 22 0d 05 00 77 dc  |,<Empty>,""...w.|
00001340  20 53 55 50 45 52 47 52  41 4e 20 41 64 76 65 6e  | SUPERGRAN Adven|
00001350  74 75 72 65 2c 47 2e 53  47 52 41 4e 31 2c 46 55  |ture,G.SGRAN1,FU|
00001360  4e 20 48 4f 55 53 45 20  53 6f 6c 75 74 69 6f 6e  |N HOUSE Solution|
00001370  2c 53 2e 2b 4d 59 53 54  46 48 2c 3c 45 6d 70 74  |,S.+MYSTFH,<Empt|
00001380  79 3e 2c 2c 3c 45 6d 70  74 79 3e 2c 2c 3c 45 6d  |y>,,<Empty>,,<Em|
00001390  70 74 79 3e 2c 2c 3c 45  6d 70 74 79 3e 2c 2c 3c  |pty>,,<Empty>,,<|
000013a0  45 6d 70 74 79 3e 2c 2c  3c 45 6d 70 74 79 3e 2c  |Empty>,,<Empty>,|
000013b0  22 22 0d 05 0a 86 dc 20  43 6c 61 73 73 69 66 69  |""..... Classifi|
000013c0  65 64 20 41 64 73 2c 56  2e 2b 53 41 4c 45 31 2c  |ed Ads,V.+SALE1,|
000013d0  53 74 72 65 65 74 73 20  41 68 65 61 64 20 50 61  |Streets Ahead Pa|
000013e0  74 69 65 6e 63 65 2c 4c  2e 2b 53 54 52 45 45 54  |tience,L.+STREET|
000013f0  2c 55 74 69 6c 69 74 69  65 73 20 41 6e 64 20 41  |,Utilities And A|
00001400  67 72 65 65 6d 65 6e 74  2c 4c 2e 2b 55 54 49 4c  |greement,L.+UTIL|
00001410  49 54 2c 3c 45 6d 70 74  79 3e 2c 2c 3c 45 6d 70  |IT,<Empty>,,<Emp|
00001420  74 79 3e 2c 2c 3c 45 6d  70 74 79 3e 2c 2c 3c 45  |ty>,,<Empty>,,<E|
00001430  6d 70 74 79 3e 2c 22 22  0d 05 14 a3 dc 20 52 65  |mpty>,""..... Re|
00001440  74 75 72 6e 20 54 6f 20  4d 61 69 6e 20 4d 65 6e  |turn To Main Men|
00001450  75 20 4b 65 79 2c 58 2c  43 79 63 6c 65 20 42 61  |u Key,X,Cycle Ba|
00001460  63 6b 67 72 6f 75 6e 64  20 43 6f 6c 6f 75 72 2c  |ckground Colour,|
00001470  58 2c 43 79 63 6c 65 20  46 6f 72 65 67 72 6f 75  |X,Cycle Foregrou|
00001480  6e 64 20 43 6f 6c 6f 75  72 2c 58 2c 56 69 65 77  |nd Colour,X,View|
00001490  20 54 65 78 74 20 46 69  6c 65 73 20 4d 6f 64 65  | Text Files Mode|
000014a0  2c 58 2c 4f 6e 65 20 50  61 73 73 20 50 72 69 6e  |,X,One Pass Prin|
000014b0  74 2c 58 2c 50 65 72 66  6f 72 61 74 69 6f 6e 20  |t,X,Perforation |
000014c0  53 6b 69 70 2c 58 2c 53  61 76 65 20 43 6f 6e 66  |Skip,X,Save Conf|
000014d0  69 67 75 72 61 74 69 6f  6e 2c 58 0d ff           |iguration,X..|
000014dd
MENU.m0
MENU.m1
MENU.m2
MENU.m4
MENU.m5