Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_37.ADF » F/PICS
F/PICS
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_37.ADF |
| Filename: | F/PICS |
| Read OK: | ✔ |
| File size: | 017E bytes |
| Load address: | FFFF1900 |
| Exec address: | FFFF8023 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_37.ADF » F/PICS
- Personal collection » Acorn hard disk » zipped_disks » elk03 » eug37/F/PICS
File contents
10REM JOHNS PHOTOS 20 MODE2:VDU23,1,0;0;0;0; 30FOR R=0 TO 7 40COLOUR 127+R:CLS 50NEXT 60 MODE 6:VDU23,1,0;0;0;0; 70PRINT''" MUG SHOTS" 71PRINT" *********" 80PRINT''"Keep pressing SPACEBAR to view" 90IF GET 110MODE0:VDU23,1,0;0;0;0; 120*LOAD JOHN 3000 130IF GET 140*LOAD FAMILY 3000 150IF GET 160*LOAD COUNTRY 3000 170IF GET 216CLS 220INPUTTAB(5,5) "ANOTHER Y/N " ans$ 230IF ans$ = "Y" THEN RUN 240IF ans$ = "N" THEN END
� JOHNS PHOTOS �2:�23,1,0;0;0;0; � R=0 � 7 ( � 127+R:� 2� < � 6:�23,1,0;0;0;0; F�''" MUG SHOTS" G�" *********" P'�''"Keep pressing SPACEBAR to view" Z� � n�0:�23,1,0;0;0;0; x*LOAD JOHN 3000 �� � �*LOAD FAMILY 3000 �� � �*LOAD COUNTRY 3000 �� � �� �!�5,5) "ANOTHER Y/N " ans$ �� ans$ = "Y" � � �� ans$ = "N" � � �
00000000 0d 00 0a 12 f4 20 4a 4f 48 4e 53 20 50 48 4f 54 |..... JOHNS PHOT| 00000010 4f 53 0d 00 14 16 20 eb 32 3a ef 32 33 2c 31 2c |OS.... .2:.23,1,| 00000020 30 3b 30 3b 30 3b 30 3b 0d 00 1e 0d e3 20 52 3d |0;0;0;0;..... R=| 00000030 30 20 b8 20 37 0d 00 28 0d fb 20 31 32 37 2b 52 |0 . 7..(.. 127+R| 00000040 3a db 0d 00 32 05 ed 0d 00 3c 17 20 eb 20 36 3a |:...2....<. . 6:| 00000050 ef 32 33 2c 31 2c 30 3b 30 3b 30 3b 30 3b 0d 00 |.23,1,0;0;0;0;..| 00000060 46 1b f1 27 27 22 20 20 20 20 20 20 20 20 20 4d |F..''" M| 00000070 55 47 20 53 48 4f 54 53 22 0d 00 47 19 f1 22 20 |UG SHOTS"..G.." | 00000080 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a | ********| 00000090 2a 22 0d 00 50 27 f1 27 27 22 4b 65 65 70 20 70 |*"..P'.''"Keep p| 000000a0 72 65 73 73 69 6e 67 20 53 50 41 43 45 42 41 52 |ressing SPACEBAR| 000000b0 20 74 6f 20 76 69 65 77 22 0d 00 5a 07 e7 20 a5 | to view"..Z.. .| 000000c0 0d 00 6e 15 eb 30 3a ef 32 33 2c 31 2c 30 3b 30 |..n..0:.23,1,0;0| 000000d0 3b 30 3b 30 3b 0d 00 78 14 2a 4c 4f 41 44 20 4a |;0;0;..x.*LOAD J| 000000e0 4f 48 4e 20 33 30 30 30 20 0d 00 82 07 e7 20 a5 |OHN 3000 ..... .| 000000f0 0d 00 8c 18 2a 4c 4f 41 44 20 46 41 4d 49 4c 59 |....*LOAD FAMILY| 00000100 20 33 30 30 30 20 20 20 0d 00 96 07 e7 20 a5 0d | 3000 ..... ..| 00000110 00 a0 18 2a 4c 4f 41 44 20 43 4f 55 4e 54 52 59 |...*LOAD COUNTRY| 00000120 20 33 30 30 30 20 20 0d 00 aa 07 e7 20 a5 0d 00 | 3000 ..... ...| 00000130 d8 05 db 0d 00 dc 21 e8 8a 35 2c 35 29 20 22 41 |......!..5,5) "A| 00000140 4e 4f 54 48 45 52 20 59 2f 4e 20 20 20 22 20 61 |NOTHER Y/N " a| 00000150 6e 73 24 20 0d 00 e6 14 e7 20 61 6e 73 24 20 3d |ns$ ..... ans$ =| 00000160 20 22 59 22 20 8c 20 f9 0d 00 f0 14 e7 20 61 6e | "Y" . ...... an| 00000170 73 24 20 3d 20 22 4e 22 20 8c 20 e0 0d ff |s$ = "N" . ...| 0000017e
.