Home » Personal collection » Acorn ADFS disks » Greaseweazled » adfs_EUG_55.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 » Greaseweazled » adfs_EUG_55.adf |
Filename: | MENU |
Read OK: | ✔ |
File size: | 1519 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_55.ADF » MENU
- Personal collection » Acorn ADFS disks » Greaseweazled » adfs_EUG_55.adf » MENU
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%=55:*FX4 1 80text%=0:*FX 5 1 90PROCbo:*FX6 1 100*LOAD DISPLAY 5800 110PRINTTAB(37,24);I% 120 ONERRORCLOSE #opt:back%=2:fore%=0:N%=3:retu%=127:K%=60:L%=12:GOTO160 130 opt=OPENIN "$.SPECDAT" 140 INPUT# opt,back%,fore%,N%,retu%,K%,L% 150 CLOSE# opt 160ONERRORMODE6:OSCLI("FX 4,1"):REPORT:PRINT" at line ";ERL:END 170REPEAT 180 PROCshow 190 PROCk:IFA%=999GOTO190 200 IFA%<>retu% THEN f$=file$(A%-64) ELSE f$="" 210 PROCbo 220 IFf$="X" THEN f$="" 230UNTILf$<>"" AND M%<>1 240check$=MID$(f$,3,1) 250IFcheck$="+" THEN text%=1 260IFf$="G.CW" THEN VDU22,6:VDU23;8202;0;0;0;:PAGE=&1700:CHAINf$ 270IFtext%=0 THEN VDU22,6:VDU23;8202;0;0;0;:CHAINf$ 280IFtext%=1 THEN MODE3:VDU23;8202;0;0;0;:$&15C=f$:Z%=1:CHAIN"$.TYPE" 290END 300: 310DEFPROCshow 320IFM%=1 RESTORE 1210 330IFM%=2 RESTORE 1220 340IFM%=3 RESTORE 1230 350IFM%=4 RESTORE 1240 360IFM%=5 RESTORE 1250 370IFM%=6 RESTORE 1260 380IFM%=7 RESTORE 1270 390IFM%=8 RESTORE 1280 400FORcount%=1TO7 410 READ line$(count%),file$(count%) 420NEXTcount% 430 440VDU28,1,29,4,6 450PROCc 460FORcount%=1TO7 470 def%=(count%*2)+126 480 IFfile$(count%) <> "" PRINT''';CHR$(def%);CHR$(def%+1);" ";line$(count%); 490NEXTcount% 500VDU28,0,31,39,0,19,7,back%;0;19,0,fore%;0; 510ENDPROC 520: 530DEFPROCk:A%=GET:IFA%=retu% AND M%<>1 THEN M%=1:PROCbo:ENDPROC 540IFA%=90 PROCbo:PROCconfigure:M%=1:A%=retu%:ENDPROC 550IFA%=79 PROCprint:REM Don't Touch! 560IFA%<65 OR A%>71 THEN A%=999:VDU7:ENDPROC 570IFM%=1 M%=(A%-63):ENDPROC ELSE f$=file$(A%-64) 580IFfile$(A%-64)="" AND M%<>1 THEN A%=999:VDU7 590ENDPROC 600: 610DEFPROCprint:VDU22,6:VDU23;8202;0;0;0;:Z%=0:CHAIN"$.PRINT" 620: 630DEFPROCc:VDU28,1,29,29,7:CLS:ENDPROC 640: 650DEFPROCbo:VDU19,0,0;0;19,7,0;0;:ENDPROC 660DEFPROCwrite 670opt=OPENOUT "$.SPECDAT" 680PRINT# opt,back%,fore%,N%,retu%,K%,L% 690CLOSE# opt 700ENDPROC 710: 720DEFPROCconfigure:VDU28,1,29,4,6:PROCc 730VDU28,1,29,4,6:PROCc:RESTORE1290 740PRINT'" DISK CONFIGURATION MENU"; 750FORcount%=1TO7 760 READ line$(count%),file$(count%) 770 def%=(count%*2)+126 780 IFfile$(count%) <> "" PRINT'';CHR$(def%);CHR$(def%+1);" ";line$(count%) 790NEXTcount% 800REPEAT 810 PROCupcon 820 OSCLI("FX 21"):i%=GET 830 IFi%=65 AND retu%=127 retu%=82:GOTO850 840 IFi%=65 AND retu%=82 retu%=127 850 IFi%=66 THENPROCscroll(2) 860 IFi%=67 THENPROCscroll(1) 870 IFi%=68 AND N%=3 N%=6:GOTO910 880 IFi%=68 AND N%=6 N%=3 890 IFi%=69 THENK%=K%+1:IFK%>80 THEN K%=40 900 IFi%=70 THENL%=L%+1:IFL%>14 THEN L%=1 910UNTILi%=71:VDU7:PRINTTAB(10,22)"Are You Sure (Y/N)";:j%=GET 920IFj%=89 OR j%=121 PROCwrite ELSE VDU7 930ENDPROC 940: 950DEFPROCupcon:PRINTTAB(21,4); 960IFretu%=127 PRINT"<DELETE>" 970IFretu%=82 PRINT" <R>" 980PROCdis(fore%):PRINTTAB(9-(LEN(A$))+17,7)" ";A$ 990PROCdis(back%):PRINTTAB(9-(LEN(A$))+17,10)" ";A$ 1000PRINTTAB(28,13);N%;TAB(21,16);K%;" lines"TAB(21,19);:IFL%<10 THEN PRINT" "; 1010PRINT;L%;" lines" 1020VDU19,0,fore%;0;19,7,back%;0; 1030ENDPROC 1040: 1050DEFPROCscroll(col%):IFcol%=1THEN back%=back%+1 1060IFcol%=2THEN fore%=fore%+1 1070IFback% > 7 THEN back%=0 1080IFfore% > 7 THEN fore%=0 1090ENDPROC 1100: 1110DEFPROCdis(show%) 1120IFshow%=0 A$="Black '0'" 1130IFshow%=1 A$="Red '1'" 1140IFshow%=2 A$="Green '2'" 1150IFshow%=3 A$="Yellow '3'" 1160IFshow%=4 A$="Blue '4'" 1170IFshow%=5 A$="Magenta '5'" 1180IFshow%=6 A$="Cyan '6'" 1190IFshow%=7 A$="White '7'" 1200ENDPROC 1210DATA !FIRST STOP EDITORIAL!,X,ARTS/BTEASERS MENU,X,DEMOS/UTILITIES MENU,X,GAMES MENU,X,REVIEWS MENU,X,ADVENTURES MENU,X,ADVERTISEMENTS/MAILBAG,X 1220DATA !CONFIGURATION MENU!,V.+CONFIG,!ELECTRON USER GROUP!,V.+EUG,!IN THIS ISSUE!,V.+CONTS,!NEWS AND THE INTERNET!,V.+NEWS,<Empty>,"",<Empty>,"",<Empty>,"" 1230DATA BASIC ROM ROUTINES Pt 1,V.+BRR1,BASIC ROM ROUTINES Pt 2,V.+BRR2,BASIC ROM ROUTINES Pt 3,V.+BRR3,BRAINTEASERS Art Pt 4,V.+BTEAS4,DON'T PAINT THE CAT (BT),U.DONTPAI,NAME THE GRAPH (BT),U.NAMETHE,<Empty>,"" 1240DATA BONES II Demo,G.BONES2a,CLIPART Pictures,U.CASLIDE,COPYING UTILTIES Menu,U.CPYMENU,COPYING UTILITIES Docs,V.+COPIER,EXILE RUNES Demo,U.RUNES1,SCROLLING STARS Utility,U.STARS,SCROLLING STARS Docs,V.+STARS 1250DATA BOMBER (Classic Arcade),G.BOMBER2,CODEWORD (New Crossword),G.CW,ETERNITY (Epic Puzzle),G.ETE-L,POWERBALL (Arcade),G.POWERBA,CODEWORD Documentation,V.+CW1,CODEWORD Technical Info,V.+CW2,ETERNITY Documentation,V.+ETERNI 1260DATA BAR BILLIARDS Review,R.+BARBIL,EUG #2 ON DISK Review,R.+EUG2,SPECTIPEDE Review,R.+SPECTI,WHOOPSY Review,R.+WHOOPS,<Empty>,,<Empty>,,<Empty>,"" 1270DATA CASTLE OF SKULL LORD Ad,G.CAS,THE SEA QUEEN Adventure,G.TSQ,SAVAGE ISLAND 1 Solution,S.+ADV10a,<Empty>,"",<Empty>,,<Empty>,,<Empty>,"" 1280DATA "Et Tu, Readers?",L.+ETTURE,"Help me, EUG!",L.+DEAREU,PROACTION's Bargains,U.PROACT1,Something About Me,L.+SOMETH,<Empty>,,<Empty>,"",<Empty>,"" 1290DATA 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%=55:*FX4 1 Ptext%=0:*FX 5 1 Z�bo:*FX6 1 d*LOAD DISPLAY 5800 n�37,24);I% x? �� #opt:back%=2:fore%=0:N%=3:retu%=127:K%=60:L%=12:�t`@ � opt=� "$.SPECDAT" �' �# opt,back%,fore%,N%,retu%,K%,L% � �# opt �'��6:�("FX 4,1"):�:�" at line ";�:� �� � �show � �k:�A%=999�t~@ �* �A%<>retu% � f$=file$(A%-64) � f$="" � �bo � �f$="X" � f$="" ��f$<>"" � M%<>1 �check$=�f$,3,1) ��check$="+" � text%=1 2�f$="G.CW" � �22,6:�23;8202;0;0;0;:�=&1700:�f$ (�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 @�M%=1 � �tzD J�M%=2 � �dDD T�M%=3 � �dND ^�M%=4 � �dXD h�M%=5 � �dbD r�M%=6 � �dlD |�M%=7 � �dvD ��M%=8 � �T@E ��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%:� & �A%=79 �print:� Don't Touch! 0 �A%<65 � A%>71 � A%=999:�7:� :(�M%=1 M%=(A%-63):� � f$=file$(A%-64) D(�file$(A%-64)="" � M%<>1 � A%=999:�7 N� X: b1��print:�22,6:�23;8202;0;0;0;:Z%=0:�"$.PRINT" l: 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:��TJE �#�'" DISK CONFIGURATION MENU"; ��count%=1�7 �# � line$(count%),file$(count%) def%=(count%*2)+126 C �file$(count%) <> "" �'';�(def%);�(def%+1);" ";line$(count%) �count% � * �upcon 4 �("FX 21"):i%=� >' �i%=65 � retu%=127 retu%=82:�DRC H! �i%=65 � retu%=82 retu%=127 R �i%=66 ��scroll(2) \ �i%=67 ��scroll(1) f �i%=68 � N%=3 N%=6:�tNC p �i%=68 � N%=6 N%=3 z$ �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 .�back% > 7 � back%=0 8�fore% > 7 � fore%=0 B� L: V��dis(show%) `�show%=0 A$="Black '0'" j�show%=1 A$="Red '1'" t�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,ARTS/BTEASERS MENU,X,DEMOS/UTILITIES MENU,X,GAMES 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,<Empty>,"",<Empty>,"",<Empty>,"" ��� BASIC ROM ROUTINES Pt 1,V.+BRR1,BASIC ROM ROUTINES Pt 2,V.+BRR2,BASIC ROM ROUTINES Pt 3,V.+BRR3,BRAINTEASERS Art Pt 4,V.+BTEAS4,DON'T PAINT THE CAT (BT),U.DONTPAI,NAME THE GRAPH (BT),U.NAMETHE,<Empty>,"" ��� BONES II Demo,G.BONES2a,CLIPART Pictures,U.CASLIDE,COPYING UTILTIES Menu,U.CPYMENU,COPYING UTILITIES Docs,V.+COPIER,EXILE RUNES Demo,U.RUNES1,SCROLLING STARS Utility,U.STARS,SCROLLING STARS Docs,V.+STARS ��� BOMBER (Classic Arcade),G.BOMBER2,CODEWORD (New Crossword),G.CW,ETERNITY (Epic Puzzle),G.ETE-L,POWERBALL (Arcade),G.POWERBA,CODEWORD Documentation,V.+CW1,CODEWORD Technical Info,V.+CW2,ETERNITY Documentation,V.+ETERNI �� BAR BILLIARDS Review,R.+BARBIL,EUG #2 ON DISK Review,R.+EUG2,SPECTIPEDE Review,R.+SPECTI,WHOOPSY Review,R.+WHOOPS,<Empty>,,<Empty>,,<Empty>,"" ��� CASTLE OF SKULL LORD Ad,G.CAS,THE SEA QUEEN Adventure,G.TSQ,SAVAGE ISLAND 1 Solution,S.+ADV10a,<Empty>,"",<Empty>,,<Empty>,,<Empty>,"" �� "Et Tu, Readers?",L.+ETTURE,"Help me, EUG!",L.+DEAREU,PROACTION's Bargains,U.PROACT1,Something About Me,L.+SOMETH,<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 35 3a 2a 46 58 34 20 31 0d 00 50 13 74 65 |=55:*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 3f 20 20 ee 85 d9 20 23 6f 70 74 3a 62 |..x? ... #opt:b| 00000500 61 63 6b 25 3d 32 3a 66 6f 72 65 25 3d 30 3a 4e |ack%=2:fore%=0:N| 00000510 25 3d 33 3a 72 65 74 75 25 3d 31 32 37 3a 4b 25 |%=3:retu%=127:K%| 00000520 3d 36 30 3a 4c 25 3d 31 32 3a e5 8d 74 60 40 0d |=60:L%=12:..t`@.| 00000530 00 82 17 20 20 6f 70 74 3d 8e 20 22 24 2e 53 50 |... opt=. "$.SP| 00000540 45 43 44 41 54 22 0d 00 8c 27 20 20 e8 23 20 6f |ECDAT"...' .# o| 00000550 70 74 2c 62 61 63 6b 25 2c 66 6f 72 65 25 2c 4e |pt,back%,fore%,N| 00000560 25 2c 72 65 74 75 25 2c 4b 25 2c 4c 25 0d 00 96 |%,retu%,K%,L%...| 00000570 0c 20 20 d9 23 20 6f 70 74 0d 00 a0 27 ee 85 eb |. .# opt...'...| 00000580 36 3a ff 28 22 46 58 20 34 2c 31 22 29 3a f6 3a |6:.("FX 4,1"):.:| 00000590 f1 22 20 61 74 20 6c 69 6e 65 20 22 3b 9e 3a e0 |." at line ";.:.| 000005a0 0d 00 aa 05 f5 0d 00 b4 0b 20 20 f2 73 68 6f 77 |......... .show| 000005b0 0d 00 be 15 20 20 f2 6b 3a e7 41 25 3d 39 39 39 |.... .k:.A%=999| 000005c0 e5 8d 74 7e 40 0d 00 c8 2a 20 20 e7 41 25 3c 3e |..t~@...* .A%<>| 000005d0 72 65 74 75 25 20 8c 20 66 24 3d 66 69 6c 65 24 |retu% . f$=file$| 000005e0 28 41 25 2d 36 34 29 20 8b 20 66 24 3d 22 22 0d |(A%-64) . f$="".| 000005f0 00 d2 09 20 20 f2 62 6f 0d 00 dc 15 20 20 e7 66 |... .bo.... .f| 00000600 24 3d 22 58 22 20 8c 20 66 24 3d 22 22 0d 00 e6 |$="X" . f$=""...| 00000610 13 fd 66 24 3c 3e 22 22 20 80 20 4d 25 3c 3e 31 |..f$<>"" . M%<>1| 00000620 0d 00 f0 13 63 68 65 63 6b 24 3d c1 66 24 2c 33 |....check$=.f$,3| 00000630 2c 31 29 0d 00 fa 19 e7 63 68 65 63 6b 24 3d 22 |,1).....check$="| 00000640 2b 22 20 8c 20 74 65 78 74 25 3d 31 0d 01 04 32 |+" . text%=1...2| 00000650 e7 66 24 3d 22 47 2e 43 57 22 20 8c 20 ef 32 32 |.f$="G.CW" . .22| 00000660 2c 36 3a ef 32 33 3b 38 32 30 32 3b 30 3b 30 3b |,6:.23;8202;0;0;| 00000670 30 3b 3a d0 3d 26 31 37 30 30 3a d7 66 24 0d 01 |0;:.=&1700:.f$..| 00000680 0e 28 e7 74 65 78 74 25 3d 30 20 8c 20 ef 32 32 |.(.text%=0 . .22| 00000690 2c 36 3a ef 32 33 3b 38 32 30 32 3b 30 3b 30 3b |,6:.23;8202;0;0;| 000006a0 30 3b 3a d7 66 24 0d 01 18 39 e7 74 65 78 74 25 |0;:.f$...9.text%| 000006b0 3d 31 20 8c 20 eb 33 3a ef 32 33 3b 38 32 30 32 |=1 . .3:.23;8202| 000006c0 3b 30 3b 30 3b 30 3b 3a 24 26 31 35 43 3d 66 24 |;0;0;0;:$&15C=f$| 000006d0 3a 5a 25 3d 31 3a d7 22 24 2e 54 59 50 45 22 0d |:Z%=1:."$.TYPE".| 000006e0 01 22 05 e0 0d 01 2c 05 3a 0d 01 36 0a dd f2 73 |."....,.:..6...s| 000006f0 68 6f 77 0d 01 40 10 e7 4d 25 3d 31 20 f7 20 8d |how..@..M%=1 . .| 00000700 74 7a 44 0d 01 4a 10 e7 4d 25 3d 32 20 f7 20 8d |tzD..J..M%=2 . .| 00000710 64 44 44 0d 01 54 10 e7 4d 25 3d 33 20 f7 20 8d |dDD..T..M%=3 . .| 00000720 64 4e 44 0d 01 5e 10 e7 4d 25 3d 34 20 f7 20 8d |dND..^..M%=4 . .| 00000730 64 58 44 0d 01 68 10 e7 4d 25 3d 35 20 f7 20 8d |dXD..h..M%=5 . .| 00000740 64 62 44 0d 01 72 10 e7 4d 25 3d 36 20 f7 20 8d |dbD..r..M%=6 . .| 00000750 64 6c 44 0d 01 7c 10 e7 4d 25 3d 37 20 f7 20 8d |dlD..|..M%=7 . .| 00000760 64 76 44 0d 01 86 10 e7 4d 25 3d 38 20 f7 20 8d |dvD.....M%=8 . .| 00000770 54 40 45 0d 01 90 0f e3 63 6f 75 6e 74 25 3d 31 |T@E.....count%=1| 00000780 b8 37 0d 01 9a 23 20 20 f3 20 6c 69 6e 65 24 28 |.7...# . line$(| 00000790 63 6f 75 6e 74 25 29 2c 66 69 6c 65 24 28 63 6f |count%),file$(co| 000007a0 75 6e 74 25 29 0d 01 a4 0b ed 63 6f 75 6e 74 25 |unt%).....count%| 000007b0 0d 01 ae 05 20 0d 01 b8 10 ef 32 38 2c 31 2c 32 |.... .....28,1,2| 000007c0 39 2c 34 2c 36 0d 01 c2 06 f2 63 0d 01 cc 0f e3 |9,4,6.....c.....| 000007d0 63 6f 75 6e 74 25 3d 31 b8 37 0d 01 d6 19 20 20 |count%=1.7.... | 000007e0 64 65 66 25 3d 28 63 6f 75 6e 74 25 2a 32 29 2b |def%=(count%*2)+| 000007f0 31 32 36 0d 01 e0 45 20 20 e7 66 69 6c 65 24 28 |126...E .file$(| 00000800 63 6f 75 6e 74 25 29 20 3c 3e 20 22 22 20 f1 27 |count%) <> "" .'| 00000810 27 27 3b bd 28 64 65 66 25 29 3b bd 28 64 65 66 |'';.(def%);.(def| 00000820 25 2b 31 29 3b 22 20 20 22 3b 6c 69 6e 65 24 28 |%+1);" ";line$(| 00000830 63 6f 75 6e 74 25 29 3b 0d 01 ea 0b ed 63 6f 75 |count%);.....cou| 00000840 6e 74 25 0d 01 f4 2c ef 32 38 2c 30 2c 33 31 2c |nt%...,.28,0,31,| 00000850 33 39 2c 30 2c 31 39 2c 37 2c 62 61 63 6b 25 3b |39,0,19,7,back%;| 00000860 30 3b 31 39 2c 30 2c 66 6f 72 65 25 3b 30 3b 0d |0;19,0,fore%;0;.| 00000870 01 fe 05 e1 0d 02 08 05 3a 0d 02 12 2b dd f2 6b |........:...+..k| 00000880 3a 41 25 3d a5 3a e7 41 25 3d 72 65 74 75 25 20 |:A%=.:.A%=retu% | 00000890 80 20 4d 25 3c 3e 31 20 8c 20 4d 25 3d 31 3a f2 |. M%<>1 . M%=1:.| 000008a0 62 6f 3a e1 0d 02 1c 29 e7 41 25 3d 39 30 20 f2 |bo:....).A%=90 .| 000008b0 62 6f 3a f2 63 6f 6e 66 69 67 75 72 65 3a 4d 25 |bo:.configure:M%| 000008c0 3d 31 3a 41 25 3d 72 65 74 75 25 3a e1 0d 02 26 |=1:A%=retu%:...&| 000008d0 20 e7 41 25 3d 37 39 20 f2 70 72 69 6e 74 3a f4 | .A%=79 .print:.| 000008e0 20 44 6f 6e 27 74 20 54 6f 75 63 68 21 0d 02 30 | Don't Touch!..0| 000008f0 20 e7 41 25 3c 36 35 20 84 20 41 25 3e 37 31 20 | .A%<65 . A%>71 | 00000900 8c 20 41 25 3d 39 39 39 3a ef 37 3a e1 0d 02 3a |. A%=999:.7:...:| 00000910 28 e7 4d 25 3d 31 20 4d 25 3d 28 41 25 2d 36 33 |(.M%=1 M%=(A%-63| 00000920 29 3a e1 20 8b 20 66 24 3d 66 69 6c 65 24 28 41 |):. . f$=file$(A| 00000930 25 2d 36 34 29 0d 02 44 28 e7 66 69 6c 65 24 28 |%-64)..D(.file$(| 00000940 41 25 2d 36 34 29 3d 22 22 20 80 20 4d 25 3c 3e |A%-64)="" . M%<>| 00000950 31 20 8c 20 41 25 3d 39 39 39 3a ef 37 0d 02 4e |1 . A%=999:.7..N| 00000960 05 e1 0d 02 58 05 3a 0d 02 62 31 dd f2 70 72 69 |....X.:..b1..pri| 00000970 6e 74 3a ef 32 32 2c 36 3a ef 32 33 3b 38 32 30 |nt:.22,6:.23;820| 00000980 32 3b 30 3b 30 3b 30 3b 3a 5a 25 3d 30 3a d7 22 |2;0;0;0;:Z%=0:."| 00000990 24 2e 50 52 49 4e 54 22 0d 02 6c 05 3a 0d 02 76 |$.PRINT"..l.:..v| 000009a0 19 dd f2 63 3a ef 32 38 2c 31 2c 32 39 2c 32 39 |...c:.28,1,29,29| 000009b0 2c 37 3a db 3a e1 0d 02 80 05 3a 0d 02 8a 1e dd |,7:.:.....:.....| 000009c0 f2 62 6f 3a ef 31 39 2c 30 2c 30 3b 30 3b 31 39 |.bo:.19,0,0;0;19| 000009d0 2c 37 2c 30 3b 30 3b 3a e1 0d 02 94 0b dd f2 77 |,7,0;0;:.......w| 000009e0 72 69 74 65 0d 02 9e 15 6f 70 74 3d ae 20 22 24 |rite....opt=. "$| 000009f0 2e 53 50 45 43 44 41 54 22 0d 02 a8 25 f1 23 20 |.SPECDAT"...%.# | 00000a00 6f 70 74 2c 62 61 63 6b 25 2c 66 6f 72 65 25 2c |opt,back%,fore%,| 00000a10 4e 25 2c 72 65 74 75 25 2c 4b 25 2c 4c 25 0d 02 |N%,retu%,K%,L%..| 00000a20 b2 0a d9 23 20 6f 70 74 0d 02 bc 05 e1 0d 02 c6 |...# opt........| 00000a30 05 3a 0d 02 d0 1f dd f2 63 6f 6e 66 69 67 75 72 |.:......configur| 00000a40 65 3a ef 32 38 2c 31 2c 32 39 2c 34 2c 36 3a f2 |e:.28,1,29,4,6:.| 00000a50 63 0d 02 da 19 ef 32 38 2c 31 2c 32 39 2c 34 2c |c.....28,1,29,4,| 00000a60 36 3a f2 63 3a f7 8d 54 4a 45 0d 02 e4 23 f1 27 |6:.c:..TJE...#.'| 00000a70 22 20 20 20 44 49 53 4b 20 43 4f 4e 46 49 47 55 |" DISK CONFIGU| 00000a80 52 41 54 49 4f 4e 20 4d 45 4e 55 22 3b 0d 02 ee |RATION MENU";...| 00000a90 0f e3 63 6f 75 6e 74 25 3d 31 b8 37 0d 02 f8 23 |..count%=1.7...#| 00000aa0 20 20 f3 20 6c 69 6e 65 24 28 63 6f 75 6e 74 25 | . line$(count%| 00000ab0 29 2c 66 69 6c 65 24 28 63 6f 75 6e 74 25 29 0d |),file$(count%).| 00000ac0 03 02 19 20 20 64 65 66 25 3d 28 63 6f 75 6e 74 |... def%=(count| 00000ad0 25 2a 32 29 2b 31 32 36 0d 03 0c 43 20 20 e7 66 |%*2)+126...C .f| 00000ae0 69 6c 65 24 28 63 6f 75 6e 74 25 29 20 3c 3e 20 |ile$(count%) <> | 00000af0 22 22 20 f1 27 27 3b bd 28 64 65 66 25 29 3b bd |"" .'';.(def%);.| 00000b00 28 64 65 66 25 2b 31 29 3b 22 20 20 22 3b 6c 69 |(def%+1);" ";li| 00000b10 6e 65 24 28 63 6f 75 6e 74 25 29 0d 03 16 0b ed |ne$(count%).....| 00000b20 63 6f 75 6e 74 25 0d 03 20 05 f5 0d 03 2a 0c 20 |count%.. ....*. | 00000b30 20 f2 75 70 63 6f 6e 0d 03 34 15 20 20 ff 28 22 | .upcon..4. .("| 00000b40 46 58 20 32 31 22 29 3a 69 25 3d a5 0d 03 3e 27 |FX 21"):i%=...>'| 00000b50 20 20 e7 69 25 3d 36 35 20 80 20 72 65 74 75 25 | .i%=65 . retu%| 00000b60 3d 31 32 37 20 72 65 74 75 25 3d 38 32 3a e5 8d |=127 retu%=82:..| 00000b70 44 52 43 0d 03 48 21 20 20 e7 69 25 3d 36 35 20 |DRC..H! .i%=65 | 00000b80 80 20 72 65 74 75 25 3d 38 32 20 72 65 74 75 25 |. retu%=82 retu%| 00000b90 3d 31 32 37 0d 03 52 18 20 20 e7 69 25 3d 36 36 |=127..R. .i%=66| 00000ba0 20 8c f2 73 63 72 6f 6c 6c 28 32 29 0d 03 5c 18 | ..scroll(2)..\.| 00000bb0 20 20 e7 69 25 3d 36 37 20 8c f2 73 63 72 6f 6c | .i%=67 ..scrol| 00000bc0 6c 28 31 29 0d 03 66 1e 20 20 e7 69 25 3d 36 38 |l(1)..f. .i%=68| 00000bd0 20 80 20 4e 25 3d 33 20 4e 25 3d 36 3a e5 8d 74 | . N%=3 N%=6:..t| 00000be0 4e 43 0d 03 70 18 20 20 e7 69 25 3d 36 38 20 80 |NC..p. .i%=68 .| 00000bf0 20 4e 25 3d 36 20 4e 25 3d 33 0d 03 7a 24 20 20 | N%=6 N%=3..z$ | 00000c00 e7 69 25 3d 36 39 20 8c 4b 25 3d 4b 25 2b 31 3a |.i%=69 .K%=K%+1:| 00000c10 e7 4b 25 3e 38 30 20 8c 20 4b 25 3d 34 30 0d 03 |.K%>80 . K%=40..| 00000c20 84 23 20 20 e7 69 25 3d 37 30 20 8c 4c 25 3d 4c |.# .i%=70 .L%=L| 00000c30 25 2b 31 3a e7 4c 25 3e 31 34 20 8c 20 4c 25 3d |%+1:.L%>14 . L%=| 00000c40 31 0d 03 8e 30 fd 69 25 3d 37 31 3a ef 37 3a f1 |1...0.i%=71:.7:.| 00000c50 8a 31 30 2c 32 32 29 22 41 72 65 20 59 6f 75 20 |.10,22)"Are You | 00000c60 53 75 72 65 20 28 59 2f 4e 29 22 3b 3a 6a 25 3d |Sure (Y/N)";:j%=| 00000c70 a5 0d 03 98 1f e7 6a 25 3d 38 39 20 84 20 6a 25 |......j%=89 . j%| 00000c80 3d 31 32 31 20 f2 77 72 69 74 65 20 8b 20 ef 37 |=121 .write . .7| 00000c90 0d 03 a2 05 e1 0d 03 ac 05 3a 0d 03 b6 14 dd f2 |.........:......| 00000ca0 75 70 63 6f 6e 3a f1 8a 32 31 2c 34 29 3b 0d 03 |upcon:..21,4);..| 00000cb0 c0 1a e7 72 65 74 75 25 3d 31 32 37 20 f1 22 3c |...retu%=127 ."<| 00000cc0 44 45 4c 45 54 45 3e 22 0d 03 ca 19 e7 72 65 74 |DELETE>".....ret| 00000cd0 75 25 3d 38 32 20 f1 22 20 20 20 20 20 3c 52 3e |u%=82 ." <R>| 00000ce0 22 0d 03 d4 29 f2 64 69 73 28 66 6f 72 65 25 29 |"...).dis(fore%)| 00000cf0 3a f1 8a 39 2d 28 a9 28 41 24 29 29 2b 31 37 2c |:..9-(.(A$))+17,| 00000d00 37 29 22 20 20 20 22 3b 41 24 0d 03 de 2a f2 64 |7)" ";A$...*.d| 00000d10 69 73 28 62 61 63 6b 25 29 3a f1 8a 39 2d 28 a9 |is(back%):..9-(.| 00000d20 28 41 24 29 29 2b 31 37 2c 31 30 29 22 20 20 20 |(A$))+17,10)" | 00000d30 22 3b 41 24 0d 03 e8 3a f1 8a 32 38 2c 31 33 29 |";A$...:..28,13)| 00000d40 3b 4e 25 3b 8a 32 31 2c 31 36 29 3b 4b 25 3b 22 |;N%;.21,16);K%;"| 00000d50 20 6c 69 6e 65 73 22 8a 32 31 2c 31 39 29 3b 3a | lines".21,19);:| 00000d60 e7 4c 25 3c 31 30 20 8c 20 f1 22 20 22 3b 0d 03 |.L%<10 . ." ";..| 00000d70 f2 11 f1 3b 4c 25 3b 22 20 6c 69 6e 65 73 22 0d |...;L%;" lines".| 00000d80 03 fc 1f ef 31 39 2c 30 2c 66 6f 72 65 25 3b 30 |....19,0,fore%;0| 00000d90 3b 31 39 2c 37 2c 62 61 63 6b 25 3b 30 3b 0d 04 |;19,7,back%;0;..| 00000da0 06 05 e1 0d 04 10 05 3a 0d 04 1a 29 dd f2 73 63 |.......:...)..sc| 00000db0 72 6f 6c 6c 28 63 6f 6c 25 29 3a e7 63 6f 6c 25 |roll(col%):.col%| 00000dc0 3d 31 8c 20 62 61 63 6b 25 3d 62 61 63 6b 25 2b |=1. back%=back%+| 00000dd0 31 0d 04 24 1a e7 63 6f 6c 25 3d 32 8c 20 66 6f |1..$..col%=2. fo| 00000de0 72 65 25 3d 66 6f 72 65 25 2b 31 0d 04 2e 18 e7 |re%=fore%+1.....| 00000df0 62 61 63 6b 25 20 3e 20 37 20 8c 20 62 61 63 6b |back% > 7 . back| 00000e00 25 3d 30 0d 04 38 18 e7 66 6f 72 65 25 20 3e 20 |%=0..8..fore% > | 00000e10 37 20 8c 20 66 6f 72 65 25 3d 30 0d 04 42 05 e1 |7 . fore%=0..B..| 00000e20 0d 04 4c 05 3a 0d 04 56 10 dd f2 64 69 73 28 73 |..L.:..V...dis(s| 00000e30 68 6f 77 25 29 0d 04 60 1b e7 73 68 6f 77 25 3d |how%)..`..show%=| 00000e40 30 20 41 24 3d 22 42 6c 61 63 6b 20 27 30 27 22 |0 A$="Black '0'"| 00000e50 0d 04 6a 19 e7 73 68 6f 77 25 3d 31 20 41 24 3d |..j..show%=1 A$=| 00000e60 22 52 65 64 20 27 31 27 22 0d 04 74 1b e7 73 68 |"Red '1'"..t..sh| 00000e70 6f 77 25 3d 32 20 41 24 3d 22 47 72 65 65 6e 20 |ow%=2 A$="Green | 00000e80 27 32 27 22 0d 04 7e 1c e7 73 68 6f 77 25 3d 33 |'2'"..~..show%=3| 00000e90 20 41 24 3d 22 59 65 6c 6c 6f 77 20 27 33 27 22 | A$="Yellow '3'"| 00000ea0 0d 04 88 1a e7 73 68 6f 77 25 3d 34 20 41 24 3d |.....show%=4 A$=| 00000eb0 22 42 6c 75 65 20 27 34 27 22 0d 04 92 1d e7 73 |"Blue '4'".....s| 00000ec0 68 6f 77 25 3d 35 20 41 24 3d 22 4d 61 67 65 6e |how%=5 A$="Magen| 00000ed0 74 61 20 27 35 27 22 0d 04 9c 1a e7 73 68 6f 77 |ta '5'".....show| 00000ee0 25 3d 36 20 41 24 3d 22 43 79 61 6e 20 27 36 27 |%=6 A$="Cyan '6'| 00000ef0 22 0d 04 a6 1b e7 73 68 6f 77 25 3d 37 20 41 24 |".....show%=7 A$| 00000f00 3d 22 57 68 69 74 65 20 27 37 27 22 0d 04 b0 05 |="White '7'"....| 00000f10 e1 0d 04 ba 91 dc 20 21 46 49 52 53 54 20 53 54 |...... !FIRST ST| 00000f20 4f 50 20 45 44 49 54 4f 52 49 41 4c 21 2c 58 2c |OP EDITORIAL!,X,| 00000f30 41 52 54 53 2f 42 54 45 41 53 45 52 53 20 4d 45 |ARTS/BTEASERS ME| 00000f40 4e 55 2c 58 2c 44 45 4d 4f 53 2f 55 54 49 4c 49 |NU,X,DEMOS/UTILI| 00000f50 54 49 45 53 20 4d 45 4e 55 2c 58 2c 47 41 4d 45 |TIES MENU,X,GAME| 00000f60 53 20 4d 45 4e 55 2c 58 2c 52 45 56 49 45 57 53 |S MENU,X,REVIEWS| 00000f70 20 4d 45 4e 55 2c 58 2c 41 44 56 45 4e 54 55 52 | MENU,X,ADVENTUR| 00000f80 45 53 20 4d 45 4e 55 2c 58 2c 41 44 56 45 52 54 |ES MENU,X,ADVERT| 00000f90 49 53 45 4d 45 4e 54 53 2f 4d 41 49 4c 42 41 47 |ISEMENTS/MAILBAG| 00000fa0 2c 58 0d 04 c4 9b dc 20 21 43 4f 4e 46 49 47 55 |,X..... !CONFIGU| 00000fb0 52 41 54 49 4f 4e 20 4d 45 4e 55 21 2c 56 2e 2b |RATION MENU!,V.+| 00000fc0 43 4f 4e 46 49 47 2c 21 45 4c 45 43 54 52 4f 4e |CONFIG,!ELECTRON| 00000fd0 20 55 53 45 52 20 47 52 4f 55 50 21 2c 56 2e 2b | USER GROUP!,V.+| 00000fe0 45 55 47 2c 21 49 4e 20 54 48 49 53 20 49 53 53 |EUG,!IN THIS ISS| 00000ff0 55 45 21 2c 56 2e 2b 43 4f 4e 54 53 2c 21 4e 45 |UE!,V.+CONTS,!NE| 00001000 57 53 20 41 4e 44 20 54 48 45 20 49 4e 54 45 52 |WS AND THE INTER| 00001010 4e 45 54 21 2c 56 2e 2b 4e 45 57 53 2c 3c 45 6d |NET!,V.+NEWS,<Em| 00001020 70 74 79 3e 2c 22 22 2c 3c 45 6d 70 74 79 3e 2c |pty>,"",<Empty>,| 00001030 22 22 2c 3c 45 6d 70 74 79 3e 2c 22 22 0d 04 ce |"",<Empty>,""...| 00001040 d1 dc 20 42 41 53 49 43 20 52 4f 4d 20 52 4f 55 |.. BASIC ROM ROU| 00001050 54 49 4e 45 53 20 50 74 20 31 2c 56 2e 2b 42 52 |TINES Pt 1,V.+BR| 00001060 52 31 2c 42 41 53 49 43 20 52 4f 4d 20 52 4f 55 |R1,BASIC ROM ROU| 00001070 54 49 4e 45 53 20 50 74 20 32 2c 56 2e 2b 42 52 |TINES Pt 2,V.+BR| 00001080 52 32 2c 42 41 53 49 43 20 52 4f 4d 20 52 4f 55 |R2,BASIC ROM ROU| 00001090 54 49 4e 45 53 20 50 74 20 33 2c 56 2e 2b 42 52 |TINES Pt 3,V.+BR| 000010a0 52 33 2c 42 52 41 49 4e 54 45 41 53 45 52 53 20 |R3,BRAINTEASERS | 000010b0 41 72 74 20 50 74 20 34 2c 56 2e 2b 42 54 45 41 |Art Pt 4,V.+BTEA| 000010c0 53 34 2c 44 4f 4e 27 54 20 50 41 49 4e 54 20 54 |S4,DON'T PAINT T| 000010d0 48 45 20 43 41 54 20 28 42 54 29 2c 55 2e 44 4f |HE CAT (BT),U.DO| 000010e0 4e 54 50 41 49 2c 4e 41 4d 45 20 54 48 45 20 47 |NTPAI,NAME THE G| 000010f0 52 41 50 48 20 28 42 54 29 2c 55 2e 4e 41 4d 45 |RAPH (BT),U.NAME| 00001100 54 48 45 2c 3c 45 6d 70 74 79 3e 2c 22 22 0d 04 |THE,<Empty>,""..| 00001110 d8 d1 dc 20 42 4f 4e 45 53 20 49 49 20 44 65 6d |... BONES II Dem| 00001120 6f 2c 47 2e 42 4f 4e 45 53 32 61 2c 43 4c 49 50 |o,G.BONES2a,CLIP| 00001130 41 52 54 20 50 69 63 74 75 72 65 73 2c 55 2e 43 |ART Pictures,U.C| 00001140 41 53 4c 49 44 45 2c 43 4f 50 59 49 4e 47 20 55 |ASLIDE,COPYING U| 00001150 54 49 4c 54 49 45 53 20 4d 65 6e 75 2c 55 2e 43 |TILTIES Menu,U.C| 00001160 50 59 4d 45 4e 55 2c 43 4f 50 59 49 4e 47 20 55 |PYMENU,COPYING U| 00001170 54 49 4c 49 54 49 45 53 20 44 6f 63 73 2c 56 2e |TILITIES Docs,V.| 00001180 2b 43 4f 50 49 45 52 2c 45 58 49 4c 45 20 52 55 |+COPIER,EXILE RU| 00001190 4e 45 53 20 44 65 6d 6f 2c 55 2e 52 55 4e 45 53 |NES Demo,U.RUNES| 000011a0 31 2c 53 43 52 4f 4c 4c 49 4e 47 20 53 54 41 52 |1,SCROLLING STAR| 000011b0 53 20 55 74 69 6c 69 74 79 2c 55 2e 53 54 41 52 |S Utility,U.STAR| 000011c0 53 2c 53 43 52 4f 4c 4c 49 4e 47 20 53 54 41 52 |S,SCROLLING STAR| 000011d0 53 20 44 6f 63 73 2c 56 2e 2b 53 54 41 52 53 0d |S Docs,V.+STARS.| 000011e0 04 e2 df dc 20 42 4f 4d 42 45 52 20 28 43 6c 61 |.... BOMBER (Cla| 000011f0 73 73 69 63 20 41 72 63 61 64 65 29 2c 47 2e 42 |ssic Arcade),G.B| 00001200 4f 4d 42 45 52 32 2c 43 4f 44 45 57 4f 52 44 20 |OMBER2,CODEWORD | 00001210 28 4e 65 77 20 43 72 6f 73 73 77 6f 72 64 29 2c |(New Crossword),| 00001220 47 2e 43 57 2c 45 54 45 52 4e 49 54 59 20 28 45 |G.CW,ETERNITY (E| 00001230 70 69 63 20 50 75 7a 7a 6c 65 29 2c 47 2e 45 54 |pic Puzzle),G.ET| 00001240 45 2d 4c 2c 50 4f 57 45 52 42 41 4c 4c 20 28 41 |E-L,POWERBALL (A| 00001250 72 63 61 64 65 29 2c 47 2e 50 4f 57 45 52 42 41 |rcade),G.POWERBA| 00001260 2c 43 4f 44 45 57 4f 52 44 20 44 6f 63 75 6d 65 |,CODEWORD Docume| 00001270 6e 74 61 74 69 6f 6e 2c 56 2e 2b 43 57 31 2c 43 |ntation,V.+CW1,C| 00001280 4f 44 45 57 4f 52 44 20 54 65 63 68 6e 69 63 61 |ODEWORD Technica| 00001290 6c 20 49 6e 66 6f 2c 56 2e 2b 43 57 32 2c 45 54 |l Info,V.+CW2,ET| 000012a0 45 52 4e 49 54 59 20 44 6f 63 75 6d 65 6e 74 61 |ERNITY Documenta| 000012b0 74 69 6f 6e 2c 56 2e 2b 45 54 45 52 4e 49 0d 04 |tion,V.+ETERNI..| 000012c0 ec 94 dc 20 42 41 52 20 42 49 4c 4c 49 41 52 44 |... BAR BILLIARD| 000012d0 53 20 52 65 76 69 65 77 2c 52 2e 2b 42 41 52 42 |S Review,R.+BARB| 000012e0 49 4c 2c 45 55 47 20 23 32 20 4f 4e 20 44 49 53 |IL,EUG #2 ON DIS| 000012f0 4b 20 52 65 76 69 65 77 2c 52 2e 2b 45 55 47 32 |K Review,R.+EUG2| 00001300 2c 53 50 45 43 54 49 50 45 44 45 20 52 65 76 69 |,SPECTIPEDE Revi| 00001310 65 77 2c 52 2e 2b 53 50 45 43 54 49 2c 57 48 4f |ew,R.+SPECTI,WHO| 00001320 4f 50 53 59 20 52 65 76 69 65 77 2c 52 2e 2b 57 |OPSY Review,R.+W| 00001330 48 4f 4f 50 53 2c 3c 45 6d 70 74 79 3e 2c 2c 3c |HOOPS,<Empty>,,<| 00001340 45 6d 70 74 79 3e 2c 2c 3c 45 6d 70 74 79 3e 2c |Empty>,,<Empty>,| 00001350 22 22 0d 04 f6 8c dc 20 43 41 53 54 4c 45 20 4f |""..... CASTLE O| 00001360 46 20 53 4b 55 4c 4c 20 4c 4f 52 44 20 41 64 2c |F SKULL LORD Ad,| 00001370 47 2e 43 41 53 2c 54 48 45 20 53 45 41 20 51 55 |G.CAS,THE SEA QU| 00001380 45 45 4e 20 41 64 76 65 6e 74 75 72 65 2c 47 2e |EEN Adventure,G.| 00001390 54 53 51 2c 53 41 56 41 47 45 20 49 53 4c 41 4e |TSQ,SAVAGE ISLAN| 000013a0 44 20 31 20 53 6f 6c 75 74 69 6f 6e 2c 53 2e 2b |D 1 Solution,S.+| 000013b0 41 44 56 31 30 61 2c 3c 45 6d 70 74 79 3e 2c 22 |ADV10a,<Empty>,"| 000013c0 22 2c 3c 45 6d 70 74 79 3e 2c 2c 3c 45 6d 70 74 |",<Empty>,,<Empt| 000013d0 79 3e 2c 2c 3c 45 6d 70 74 79 3e 2c 22 22 0d 05 |y>,,<Empty>,""..| 000013e0 00 96 dc 20 22 45 74 20 54 75 2c 20 52 65 61 64 |... "Et Tu, Read| 000013f0 65 72 73 3f 22 2c 4c 2e 2b 45 54 54 55 52 45 2c |ers?",L.+ETTURE,| 00001400 22 48 65 6c 70 20 6d 65 2c 20 45 55 47 21 22 2c |"Help me, EUG!",| 00001410 4c 2e 2b 44 45 41 52 45 55 2c 50 52 4f 41 43 54 |L.+DEAREU,PROACT| 00001420 49 4f 4e 27 73 20 42 61 72 67 61 69 6e 73 2c 55 |ION's Bargains,U| 00001430 2e 50 52 4f 41 43 54 31 2c 53 6f 6d 65 74 68 69 |.PROACT1,Somethi| 00001440 6e 67 20 41 62 6f 75 74 20 4d 65 2c 4c 2e 2b 53 |ng About Me,L.+S| 00001450 4f 4d 45 54 48 2c 3c 45 6d 70 74 79 3e 2c 2c 3c |OMETH,<Empty>,,<| 00001460 45 6d 70 74 79 3e 2c 22 22 2c 3c 45 6d 70 74 79 |Empty>,"",<Empty| 00001470 3e 2c 22 22 0d 05 0a a3 dc 20 52 65 74 75 72 6e |>,""..... Return| 00001480 20 54 6f 20 4d 61 69 6e 20 4d 65 6e 75 20 4b 65 | To Main Menu Ke| 00001490 79 2c 58 2c 43 79 63 6c 65 20 42 61 63 6b 67 72 |y,X,Cycle Backgr| 000014a0 6f 75 6e 64 20 43 6f 6c 6f 75 72 2c 58 2c 43 79 |ound Colour,X,Cy| 000014b0 63 6c 65 20 46 6f 72 65 67 72 6f 75 6e 64 20 43 |cle Foreground C| 000014c0 6f 6c 6f 75 72 2c 58 2c 56 69 65 77 20 54 65 78 |olour,X,View Tex| 000014d0 74 20 46 69 6c 65 73 20 4d 6f 64 65 2c 58 2c 4f |t Files Mode,X,O| 000014e0 6e 65 20 50 61 73 73 20 50 72 69 6e 74 2c 58 2c |ne Pass Print,X,| 000014f0 50 65 72 66 6f 72 61 74 69 6f 6e 20 53 6b 69 70 |Perforation Skip| 00001500 2c 58 2c 53 61 76 65 20 43 6f 6e 66 69 67 75 72 |,X,Save Configur| 00001510 61 74 69 6f 6e 2c 58 0d ff |ation,X..| 00001519