Home » Personal collection » Acorn ADFS disks » Greaseweazled » dfs_box04_disk01b_adfs_welcome_disk_interleaved.adf » WELCOME/Graphic3
WELCOME/Graphic3
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 » dfs_box04_disk01b_adfs_welcome_disk_interleaved.adf |
Filename: | WELCOME/Graphic3 |
Read OK: | ✔ |
File size: | 011D bytes |
Load address: | FFFF1D00 |
Exec address: | FFFF8023 |
Duplicates
There are 5 duplicate copies of this file in the archive:
- AEW website » acornsoft » acornsoft_3_5_discs_Electron_Welcome_Disc_HA-WELC.adf » Welcome/Graphic3
- AEW website » acp_pres » acp_pres_3_5_discs_Electron-Adfs-E00_A-E00.adf » WELCOME/Graphic3
- Personal collection » Acorn ADFS disks » Electron » PRES_E00.ADF » WELCOME/Graphic3
- Personal collection » Acorn ADFS disks » Electron » PRES_E00_backup.ADF » Welcome/Graphic3
- Personal collection » Acorn ADFS disks » Greaseweazled » adfs_E00.adf » WELCOME/Graphic3
- Personal collection » Acorn ADFS disks » Greaseweazled » dfs_box04_disk01b_adfs_welcome_disk_interleaved.adf » WELCOME/Graphic3
File contents
5ONERRORGOTO110 90MODE1:VDU5:FORC=1TO2:M%=400:REPEATVDU19,RND(3),RND(7);0;:GCOL3,RND(3):PROCD(600,500,512):M%=M%DIV2:UNTILM%<16:NEXT:A=INKEY200 100DEFPROCD(X%,Y%,S%)IFS%<M%ENDPROCELSES%=S%DIV2:PROCD(X%+S%,Y%,S%):PROCD(X%-S%,Y%,S%):PROCD(X%,Y%-S%,S%):PROCD(X%,Y%+S%,S%):VDU29,X%;Y%;:MOVE0,S%:DRAWS%,0:DRAW0,-S%:DRAW-S%,0:DRAW0,S%:ENDPROC 110MODE1:FORZ%=0TO4:VDU19,Z%,0;0;:NEXT:CHAIN"GRAPHIC5":END
��Dn@ ZY�1:�5:�C=1�2:M%=400:��19,�(3),�(7);0;:�3,�(3):�D(600,500,512):M%=M%�2:�M%<16:�:A=�200 d���D(X%,Y%,S%)�S%<M%�S%=S%�2:�D(X%+S%,Y%,S%):�D(X%-S%,Y%,S%):�D(X%,Y%-S%,S%):�D(X%,Y%+S%,S%):�29,X%;Y%;:�0,S%:�S%,0:�0,-S%:�-S%,0:�0,S%:� n*�1:�Z%=0�4:�19,Z%,0;0;:�:�"GRAPHIC5":� �
00000000 0d 00 05 0b ee 85 e5 8d 44 6e 40 0d 00 5a 59 eb |........Dn@..ZY.| 00000010 31 3a ef 35 3a e3 43 3d 31 b8 32 3a 4d 25 3d 34 |1:.5:.C=1.2:M%=4| 00000020 30 30 3a f5 ef 31 39 2c b3 28 33 29 2c b3 28 37 |00:..19,.(3),.(7| 00000030 29 3b 30 3b 3a e6 33 2c b3 28 33 29 3a f2 44 28 |);0;:.3,.(3):.D(| 00000040 36 30 30 2c 35 30 30 2c 35 31 32 29 3a 4d 25 3d |600,500,512):M%=| 00000050 4d 25 81 32 3a fd 4d 25 3c 31 36 3a ed 3a 41 3d |M%.2:.M%<16:.:A=| 00000060 a6 32 30 30 0d 00 64 8d dd f2 44 28 58 25 2c 59 |.200..d...D(X%,Y| 00000070 25 2c 53 25 29 e7 53 25 3c 4d 25 e1 8b 53 25 3d |%,S%).S%<M%..S%=| 00000080 53 25 81 32 3a f2 44 28 58 25 2b 53 25 2c 59 25 |S%.2:.D(X%+S%,Y%| 00000090 2c 53 25 29 3a f2 44 28 58 25 2d 53 25 2c 59 25 |,S%):.D(X%-S%,Y%| 000000a0 2c 53 25 29 3a f2 44 28 58 25 2c 59 25 2d 53 25 |,S%):.D(X%,Y%-S%| 000000b0 2c 53 25 29 3a f2 44 28 58 25 2c 59 25 2b 53 25 |,S%):.D(X%,Y%+S%| 000000c0 2c 53 25 29 3a ef 32 39 2c 58 25 3b 59 25 3b 3a |,S%):.29,X%;Y%;:| 000000d0 ec 30 2c 53 25 3a df 53 25 2c 30 3a df 30 2c 2d |.0,S%:.S%,0:.0,-| 000000e0 53 25 3a df 2d 53 25 2c 30 3a df 30 2c 53 25 3a |S%:.-S%,0:.0,S%:| 000000f0 e1 0d 00 6e 2a eb 31 3a e3 5a 25 3d 30 b8 34 3a |...n*.1:.Z%=0.4:| 00000100 ef 31 39 2c 5a 25 2c 30 3b 30 3b 3a ed 3a d7 22 |.19,Z%,0;0;:.:."| 00000110 47 52 41 50 48 49 43 35 22 3a e0 0d ff |GRAPHIC5":...| 0000011d