Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_22.ADF » SCREEN
SCREEN
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_22.ADF |
| Filename: | SCREEN |
| Read OK: | ✔ |
| File size: | 01E8 bytes |
| Load address: | FFFF0E00 |
| Exec address: | FFFF802B |
File contents
10ON ERROR RUN 20MODE3 30FOR B%=100 TO 240 STEP 10 40ENVELOPE 1,1,0,0,0,0,0,0,126,-1,-1,-1,126,0 50SOUND1,1,A%,5 60IF B%< 240 GOSUB 400 ELSE GOTO 30 70IF INKEY(-99) THEN CHAIN"MENU" 80RESTORE B% 90READ A%:NEXT B% 100DATA 60 110DATA 68 120DATA 72 130DATA 72 140DATA 80 150DATA 96 160DATA 88 170DATA 72 180DATA 88 190DATA 80 200DATA 72 210DATA 80 220DATA 68 230DATA 60 240 400FOR E%=500 TO 600 STEP 10 410RESTORE E% 420READ D$ 430PRINT D$SPC1; 440NEXT 450RETURN 500DATA EUG22 510DATA MORE 520DATA FUN 530DATA PACKED 540DATA ENTERTAINMENT 550DATA PROGRAMMING 560DATA AND 570DATA FEATURES 580DATA FOR 590DATA EUG 600DATA MEMBERS
� � � �3 � B%=100 � 240 � 10 ((� 1,1,0,0,0,0,0,0,126,-1,-1,-1,126,0 2 �1,1,A%,5 < � B%< 240 � �tPA � � �T^@ F� �(-99) � �"MENU" P� B% Z � A%:� B% d � 60 n� 68 x� 72 �� 72 �� 80 � � 96 � � 88 � � 72 � � 88 � � 80 � � 72 � � 80 � � 68 � � 60 � �� E%=500 � 600 � 10 �� E% �� D$ � � D$�1; �� �� � � EUG22 � � MORE � FUN � PACKED � ENTERTAINMENT &� PROGRAMMING 0 � AND :� FEATURES D � FOR N � EUG X � MEMBERS �
00000000 0d 00 0a 09 ee 20 85 20 f9 0d 00 14 06 eb 33 0d |..... . ......3.| 00000010 00 1e 17 e3 20 42 25 3d 31 30 30 20 b8 20 32 34 |.... B%=100 . 24| 00000020 30 20 88 20 31 30 0d 00 28 28 e2 20 31 2c 31 2c |0 . 10..((. 1,1,| 00000030 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 32 36 2c |0,0,0,0,0,0,126,| 00000040 2d 31 2c 2d 31 2c 2d 31 2c 31 32 36 2c 30 0d 00 |-1,-1,-1,126,0..| 00000050 32 0d d4 31 2c 31 2c 41 25 2c 35 0d 00 3c 1e e7 |2..1,1,A%,5..<..| 00000060 20 42 25 3c 20 32 34 30 20 e4 20 8d 74 50 41 20 | B%< 240 . .tPA | 00000070 8b 20 e5 20 8d 54 5e 40 20 0d 00 46 16 e7 20 a6 |. . .T^@ ..F.. .| 00000080 28 2d 39 39 29 20 8c 20 d7 22 4d 45 4e 55 22 0d |(-99) . ."MENU".| 00000090 00 50 08 f7 20 42 25 0d 00 5a 0d f3 20 41 25 3a |.P.. B%..Z.. A%:| 000000a0 ed 20 42 25 0d 00 64 09 dc 20 36 30 20 0d 00 6e |. B%..d.. 60 ..n| 000000b0 08 dc 20 36 38 0d 00 78 08 dc 20 37 32 0d 00 82 |.. 68..x.. 72...| 000000c0 08 dc 20 37 32 0d 00 8c 08 dc 20 38 30 0d 00 96 |.. 72..... 80...| 000000d0 09 dc 20 39 36 20 0d 00 a0 09 dc 20 38 38 20 0d |.. 96 ..... 88 .| 000000e0 00 aa 09 dc 20 37 32 20 0d 00 b4 0a dc 20 38 38 |.... 72 ..... 88| 000000f0 20 20 0d 00 be 09 dc 20 38 30 20 0d 00 c8 09 dc | ..... 80 .....| 00000100 20 37 32 20 0d 00 d2 0a dc 20 38 30 20 20 0d 00 | 72 ..... 80 ..| 00000110 dc 09 dc 20 36 38 20 0d 00 e6 09 dc 20 36 30 20 |... 68 ..... 60 | 00000120 0d 00 f0 05 20 0d 01 90 18 e3 20 45 25 3d 35 30 |.... ..... E%=50| 00000130 30 20 b8 20 36 30 30 20 88 20 31 30 20 0d 01 9a |0 . 600 . 10 ...| 00000140 08 f7 20 45 25 0d 01 a4 08 f3 20 44 24 0d 01 ae |.. E%..... D$...| 00000150 0b f1 20 44 24 89 31 3b 0d 01 b8 05 ed 0d 01 c2 |.. D$.1;........| 00000160 05 f8 0d 01 f4 0b dc 20 45 55 47 32 32 0d 01 fe |....... EUG22...| 00000170 0a dc 20 4d 4f 52 45 0d 02 08 09 dc 20 46 55 4e |.. MORE..... FUN| 00000180 0d 02 12 0c dc 20 50 41 43 4b 45 44 0d 02 1c 13 |..... PACKED....| 00000190 dc 20 45 4e 54 45 52 54 41 49 4e 4d 45 4e 54 0d |. ENTERTAINMENT.| 000001a0 02 26 11 dc 20 50 52 4f 47 52 41 4d 4d 49 4e 47 |.&.. PROGRAMMING| 000001b0 0d 02 30 09 dc 20 41 4e 44 0d 02 3a 0e dc 20 46 |..0.. AND..:.. F| 000001c0 45 41 54 55 52 45 53 0d 02 44 09 dc 20 46 4f 52 |EATURES..D.. FOR| 000001d0 0d 02 4e 09 dc 20 45 55 47 0d 02 58 0d dc 20 4d |..N.. EUG..X.. M| 000001e0 45 4d 42 45 52 53 0d ff |EMBERS..| 000001e8
.