Home » Personal collection » Acorn tapes » Commercial_Releases » box02_tape07b_acorn_eu_arcade_game_creator.wav » CONVERT
CONVERT
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 tapes » Commercial_Releases » box02_tape07b_acorn_eu_arcade_game_creator.wav |
Filename: | CONVERT |
Read OK: | ✔ |
File size: | 01BC bytes |
Load address: | 2000 |
Exec address: | 1900 |
Duplicates
There are 5 duplicate copies of this file in the archive:
- AEW website » database » database_3_5_discs_Arcade-Game-Creator_A-AGC.adf » CONVERT
- AEW website » eupres » eupres_3_5_discs_Electron-User-5-12_A-E512.adf » CONVERT
- AEW website » database » database_5_25_discs_Electron-User-5-12_D-E512.ssd » CONVERT
- AEW website » database » database_tapes_Electron-User-5-12_EU5-12_E.uef » CONVERT
- Personal collection » Acorn tapes » Commercial_Releases » box02_tape07b_acorn_eu_arcade_game_creator.wav » CONVERT
- Personal collection » Acorn tapes » Commercial_Releases » box02_tape07a_acorn_eu_arcade_game_creator.wav » CONVERT
File contents
10REM Sprite Converter 20REM By R.A.Waddilove 30REM (c) Electron User 40MODE 6 50INPUT''"File to load:"name$ 60OSCLI"LOAD "+name$+" B00" 70MODE 5 80A%=&5BC0 90B%=&B02 100FOR X%=0 TO ?&B00-1 110FOR Y%=0 TO ?&B01-1 120?(A%+X%*8+&140*(Y%DIV8)+Y%MOD8)=?B% 130B%=B%+1 140NEXT 150NEXT 160 170A%=&5BC0 180B%=&B02 190FOR Y%=0 TO (?&B01-1)DIV 8 200FOR X%=0 TO ?&B00*8-1 STEP 4 210!B%=!(A%+X%+&140*Y%) 220B%=B%+4 230NEXT 240NEXT 250MODE 6 260INPUT''"File to save:"name$ 270OSCLI "SAVE "+name$+" B00 "+STR$~B%
� Sprite Converter � By R.A.Waddilove � (c) Electron User (� 6 2�''"File to load:"name$ <�"LOAD "+name$+" B00" F� 5 PA%=&5BC0 ZB%=&B02 d� X%=0 � ?&B00-1 n� Y%=0 � ?&B01-1 x#?(A%+X%*8+&140*(Y%�8)+Y%�8)=?B% �B%=B%+1 �� �� � �A%=&5BC0 �B%=&B02 �� Y%=0 � (?&B01-1)� 8 �� X%=0 � ?&B00*8-1 � 4 �!B%=!(A%+X%+&140*Y%) �B%=B%+4 �� �� �� 6 �''"File to save:"name$ � "SAVE "+name$+" B00 "+�~B% �
00000000 0d 00 0a 16 f4 20 53 70 72 69 74 65 20 43 6f 6e |..... Sprite Con| 00000010 76 65 72 74 65 72 0d 00 14 16 f4 20 42 79 20 52 |verter..... By R| 00000020 2e 41 2e 57 61 64 64 69 6c 6f 76 65 0d 00 1e 17 |.A.Waddilove....| 00000030 f4 20 28 63 29 20 45 6c 65 63 74 72 6f 6e 20 55 |. (c) Electron U| 00000040 73 65 72 0d 00 28 07 eb 20 36 0d 00 32 1b e8 27 |ser..(.. 6..2..'| 00000050 27 22 46 69 6c 65 20 74 6f 20 6c 6f 61 64 3a 22 |'"File to load:"| 00000060 6e 61 6d 65 24 0d 00 3c 19 ff 22 4c 4f 41 44 20 |name$..<.."LOAD | 00000070 22 2b 6e 61 6d 65 24 2b 22 20 42 30 30 22 0d 00 |"+name$+" B00"..| 00000080 46 07 eb 20 35 0d 00 50 0c 41 25 3d 26 35 42 43 |F.. 5..P.A%=&5BC| 00000090 30 0d 00 5a 0b 42 25 3d 26 42 30 32 0d 00 64 14 |0..Z.B%=&B02..d.| 000000a0 e3 20 58 25 3d 30 20 b8 20 3f 26 42 30 30 2d 31 |. X%=0 . ?&B00-1| 000000b0 0d 00 6e 14 e3 20 59 25 3d 30 20 b8 20 3f 26 42 |..n.. Y%=0 . ?&B| 000000c0 30 31 2d 31 0d 00 78 23 3f 28 41 25 2b 58 25 2a |01-1..x#?(A%+X%*| 000000d0 38 2b 26 31 34 30 2a 28 59 25 81 38 29 2b 59 25 |8+&140*(Y%.8)+Y%| 000000e0 83 38 29 3d 3f 42 25 0d 00 82 0b 42 25 3d 42 25 |.8)=?B%....B%=B%| 000000f0 2b 31 0d 00 8c 05 ed 0d 00 96 05 ed 0d 00 a0 05 |+1..............| 00000100 20 0d 00 aa 0c 41 25 3d 26 35 42 43 30 0d 00 b4 | ....A%=&5BC0...| 00000110 0b 42 25 3d 26 42 30 32 0d 00 be 19 e3 20 59 25 |.B%=&B02..... Y%| 00000120 3d 30 20 b8 20 28 3f 26 42 30 31 2d 31 29 81 20 |=0 . (?&B01-1). | 00000130 38 0d 00 c8 1a e3 20 58 25 3d 30 20 b8 20 3f 26 |8..... X%=0 . ?&| 00000140 42 30 30 2a 38 2d 31 20 88 20 34 0d 00 d2 18 21 |B00*8-1 . 4....!| 00000150 42 25 3d 21 28 41 25 2b 58 25 2b 26 31 34 30 2a |B%=!(A%+X%+&140*| 00000160 59 25 29 0d 00 dc 0b 42 25 3d 42 25 2b 34 0d 00 |Y%)....B%=B%+4..| 00000170 e6 05 ed 0d 00 f0 05 ed 0d 00 fa 07 eb 20 36 0d |............. 6.| 00000180 01 04 1b e8 27 27 22 46 69 6c 65 20 74 6f 20 73 |....''"File to s| 00000190 61 76 65 3a 22 6e 61 6d 65 24 0d 01 0e 20 ff 20 |ave:"name$... . | 000001a0 22 53 41 56 45 20 22 2b 6e 61 6d 65 24 2b 22 20 |"SAVE "+name$+" | 000001b0 42 30 30 20 22 2b c3 7e 42 25 0d ff |B00 "+.~B%..| 000001bc