Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape32b_acorn_eu_1992_march.wav » Bomber
Bomber
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 » Electron_User » Electron_User_tape32b_acorn_eu_1992_march.wav |
Filename: | Bomber |
Read OK: | ✔ |
File size: | 0260 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » mu » mu_5_25_discs_Micro_User_10_01_D-MU10_01.ssd » bomber
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape32a_acorn_eu_1992_march.wav » Bomber
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape32b_acorn_eu_1992_march.wav » Bomber
File contents
0*FX144,0,1 10MODE7 20VDU23,1,0;0;0;0; 30PROCheader("City Bomber") 40PRINT 50PROCdouble(CHR$&86+"Instructions ") 60PRINTTAB(3,8);"Mission: to destroy city by bombing" 70PRINTTAB(5,11);"Score: 10 points for each hit"TAB(16,13)"-5 for a miss" 80PRINTTAB(6,16);"Keys:" 90PROCjustify("RETURN - Drop Bomb",16) 100PROCcentre("Press any key",20) 110PRINT 120PROCheader("City Bomber") 130SOUND-1,246,0,0:SOUND-1,168,0,0:SOUND-1,212,0,0 140X$=INKEY$(1000):IFX$="" THEN GOTO 130 150CHAIN"BOMB1" 160DEFPROCcentre(A$,vpos)PRINTTAB((20-LENA$DIV2),vpos);A$:ENDPROC 170DEFPROCheader(A$):FORI=0TO1:PRINTCHR$&81;CHR$&9D;CHR$&83;CHR$&8D;:PROCcentre(A$,VPOS):NEXT:ENDPROC 180DEFPROCjustify(A$,vpos)PRINTTAB(15,vpos);A$:ENDPROC 190DEFPROCdouble(A$)FORI=0TO1:PROCcentre(CHR$&8D+A$,VPOS):NEXT:ENDPROC
*FX144,0,1 �7 �23,1,0;0;0;0; �header("City Bomber") (� 2"�double(�&86+"Instructions ") <0�3,8);"Mission: to destroy city by bombing" FA�5,11);"Score: 10 points for each hit"�16,13)"-5 for a miss" P�6,16);"Keys:" Z%�justify("RETURN - Drop Bomb",16) d�centre("Press any key",20) n� x�header("City Bomber") �'�-1,246,0,0:�-1,168,0,0:�-1,212,0,0 �X$=�(1000):�X$="" � � �tB@ ��"BOMB1" �,��centre(A$,vpos)�(20-�A$�2),vpos);A$:� �?��header(A$):�I=0�1:�&81;�&9D;�&83;�&8D;:�centre(A$,�):�:� �%��justify(A$,vpos)�15,vpos);A$:� �-��double(A$)�I=0�1:�centre(�&8D+A$,�):�:� �
00000000 0d 00 00 0e 2a 46 58 31 34 34 2c 30 2c 31 0d 00 |....*FX144,0,1..| 00000010 0a 06 eb 37 0d 00 14 12 ef 32 33 2c 31 2c 30 3b |...7.....23,1,0;| 00000020 30 3b 30 3b 30 3b 0d 00 1e 1b f2 68 65 61 64 65 |0;0;0;.....heade| 00000030 72 28 22 43 69 74 79 20 20 42 6f 6d 62 65 72 22 |r("City Bomber"| 00000040 29 0d 00 28 05 f1 0d 00 32 22 f2 64 6f 75 62 6c |)..(....2".doubl| 00000050 65 28 bd 26 38 36 2b 22 49 6e 73 74 72 75 63 74 |e(.&86+"Instruct| 00000060 69 6f 6e 73 20 20 22 29 0d 00 3c 30 f1 8a 33 2c |ions ")..<0..3,| 00000070 38 29 3b 22 4d 69 73 73 69 6f 6e 3a 20 74 6f 20 |8);"Mission: to | 00000080 64 65 73 74 72 6f 79 20 63 69 74 79 20 62 79 20 |destroy city by | 00000090 62 6f 6d 62 69 6e 67 22 0d 00 46 41 f1 8a 35 2c |bombing"..FA..5,| 000000a0 31 31 29 3b 22 53 63 6f 72 65 3a 20 31 30 20 70 |11);"Score: 10 p| 000000b0 6f 69 6e 74 73 20 66 6f 72 20 65 61 63 68 20 68 |oints for each h| 000000c0 69 74 22 8a 31 36 2c 31 33 29 22 2d 35 20 66 6f |it".16,13)"-5 fo| 000000d0 72 20 61 20 6d 69 73 73 22 0d 00 50 13 f1 8a 36 |r a miss"..P...6| 000000e0 2c 31 36 29 3b 22 4b 65 79 73 3a 22 0d 00 5a 25 |,16);"Keys:"..Z%| 000000f0 f2 6a 75 73 74 69 66 79 28 22 52 45 54 55 52 4e |.justify("RETURN| 00000100 20 2d 20 44 72 6f 70 20 42 6f 6d 62 22 2c 31 36 | - Drop Bomb",16| 00000110 29 0d 00 64 1f f2 63 65 6e 74 72 65 28 22 50 72 |)..d..centre("Pr| 00000120 65 73 73 20 61 6e 79 20 6b 65 79 22 2c 32 30 29 |ess any key",20)| 00000130 0d 00 6e 05 f1 0d 00 78 1b f2 68 65 61 64 65 72 |..n....x..header| 00000140 28 22 43 69 74 79 20 20 42 6f 6d 62 65 72 22 29 |("City Bomber")| 00000150 0d 00 82 27 d4 2d 31 2c 32 34 36 2c 30 2c 30 3a |...'.-1,246,0,0:| 00000160 d4 2d 31 2c 31 36 38 2c 30 2c 30 3a d4 2d 31 2c |.-1,168,0,0:.-1,| 00000170 32 31 32 2c 30 2c 30 0d 00 8c 1e 58 24 3d bf 28 |212,0,0....X$=.(| 00000180 31 30 30 30 29 3a e7 58 24 3d 22 22 20 8c 20 e5 |1000):.X$="" . .| 00000190 20 8d 74 42 40 0d 00 96 0c d7 22 42 4f 4d 42 31 | .tB@....."BOMB1| 000001a0 22 0d 00 a0 2c dd f2 63 65 6e 74 72 65 28 41 24 |"...,..centre(A$| 000001b0 2c 76 70 6f 73 29 f1 8a 28 32 30 2d a9 41 24 81 |,vpos)..(20-.A$.| 000001c0 32 29 2c 76 70 6f 73 29 3b 41 24 3a e1 0d 00 aa |2),vpos);A$:....| 000001d0 3f dd f2 68 65 61 64 65 72 28 41 24 29 3a e3 49 |?..header(A$):.I| 000001e0 3d 30 b8 31 3a f1 bd 26 38 31 3b bd 26 39 44 3b |=0.1:..&81;.&9D;| 000001f0 bd 26 38 33 3b bd 26 38 44 3b 3a f2 63 65 6e 74 |.&83;.&8D;:.cent| 00000200 72 65 28 41 24 2c bc 29 3a ed 3a e1 0d 00 b4 25 |re(A$,.):.:....%| 00000210 dd f2 6a 75 73 74 69 66 79 28 41 24 2c 76 70 6f |..justify(A$,vpo| 00000220 73 29 f1 8a 31 35 2c 76 70 6f 73 29 3b 41 24 3a |s)..15,vpos);A$:| 00000230 e1 0d 00 be 2d dd f2 64 6f 75 62 6c 65 28 41 24 |....-..double(A$| 00000240 29 e3 49 3d 30 b8 31 3a f2 63 65 6e 74 72 65 28 |).I=0.1:.centre(| 00000250 bd 26 38 44 2b 41 24 2c bc 29 3a ed 3a e1 0d ff |.&8D+A$,.):.:...| 00000260