Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_15.ADF » Guardia
Guardia
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_15.ADF |
Filename: | Guardia |
Read OK: | ✔ |
File size: | 020A bytes |
Load address: | FFFFFB00 |
Exec address: | FFFF8023 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- AEW website » headfirst » headfirst_5_25_discs_HeadFirst-PD-Disk-004_D-E004.ssd » Guardia
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_15.ADF » Guardia
File contents
10MODE7 20PRINT''"Guardian Cheat" 30PRINT "==============" 40INPUT"Lives (0-255) : "lives 50INPUT"Smart bombs (0-255) : "smarts 60 OSCLI"KEY1 LOAD""GUARD#1""|M170VDU28,13,24,30,21:*L.GUARD#2|MRUN|M?&238D="+STR$lives+"|M?&2391="+STR$smarts+"|M" 70INPUT"Infinite lives (Y/N) : " inf$ 80INPUT"Infinite smart bombs (Y/N) : "sma$ 90*TAPE 100*KEY2 !&1521=&8A20EAEA|M 110*KEY3 !&26E1=&C30EAEA|M 120*KEY4 CALL&2300|F|M 130*FX138,0,129 140IF inf$="Y" THEN *FX138,0,130 150IF sma$="Y" THEN *FX138,0,131 160*FX138,0,132 170PRINT''"Forward tape to 'GUARD#1'" 180VDU21 190END
�7 �''"Guardian Cheat" � "==============" (�"Lives (0-255) : "lives 2#�"Smart bombs (0-255) : "smarts <k �"KEY1 LOAD""GUARD#1""|M170VDU28,13,24,30,21:*L.GUARD#2|MRUN|M?&238D="+�lives+"|M?&2391="+�smarts+"|M" F#�"Infinite lives (Y/N) : " inf$ P(�"Infinite smart bombs (Y/N) : "sma$ Z *TAPE d*KEY2 !&1521=&8A20EAEA|M n*KEY3 !&26E1=&C30EAEA|M x*KEY4 CALL&2300|F|M �*FX138,0,129 �� inf$="Y" � *FX138,0,130 �� sma$="Y" � *FX138,0,131 �*FX138,0,132 �"�''"Forward tape to 'GUARD#1'" ��21 �� �
00000000 0d 00 0a 06 eb 37 0d 00 14 17 f1 27 27 22 47 75 |.....7.....''"Gu| 00000010 61 72 64 69 61 6e 20 43 68 65 61 74 22 0d 00 1e |ardian Cheat"...| 00000020 17 f1 20 20 22 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |.. "===========| 00000030 3d 3d 3d 22 0d 00 28 1c e8 22 4c 69 76 65 73 20 |==="..(.."Lives | 00000040 28 30 2d 32 35 35 29 20 3a 20 22 6c 69 76 65 73 |(0-255) : "lives| 00000050 0d 00 32 23 e8 22 53 6d 61 72 74 20 62 6f 6d 62 |..2#."Smart bomb| 00000060 73 20 28 30 2d 32 35 35 29 20 3a 20 22 73 6d 61 |s (0-255) : "sma| 00000070 72 74 73 0d 00 3c 6b 20 ff 22 4b 45 59 31 20 4c |rts..<k ."KEY1 L| 00000080 4f 41 44 22 22 47 55 41 52 44 23 31 22 22 7c 4d |OAD""GUARD#1""|M| 00000090 31 37 30 56 44 55 32 38 2c 31 33 2c 32 34 2c 33 |170VDU28,13,24,3| 000000a0 30 2c 32 31 3a 2a 4c 2e 47 55 41 52 44 23 32 7c |0,21:*L.GUARD#2|| 000000b0 4d 52 55 4e 7c 4d 3f 26 32 33 38 44 3d 22 2b c3 |MRUN|M?&238D="+.| 000000c0 6c 69 76 65 73 2b 22 7c 4d 3f 26 32 33 39 31 3d |lives+"|M?&2391=| 000000d0 22 2b c3 73 6d 61 72 74 73 2b 22 7c 4d 22 0d 00 |"+.smarts+"|M"..| 000000e0 46 23 e8 22 49 6e 66 69 6e 69 74 65 20 6c 69 76 |F#."Infinite liv| 000000f0 65 73 20 28 59 2f 4e 29 20 3a 20 22 20 69 6e 66 |es (Y/N) : " inf| 00000100 24 0d 00 50 28 e8 22 49 6e 66 69 6e 69 74 65 20 |$..P(."Infinite | 00000110 73 6d 61 72 74 20 62 6f 6d 62 73 20 28 59 2f 4e |smart bombs (Y/N| 00000120 29 20 3a 20 22 73 6d 61 24 0d 00 5a 09 2a 54 41 |) : "sma$..Z.*TA| 00000130 50 45 0d 00 64 1c 2a 4b 45 59 32 20 21 26 31 35 |PE..d.*KEY2 !&15| 00000140 32 31 3d 26 38 41 32 30 45 41 45 41 7c 4d 0d 00 |21=&8A20EAEA|M..| 00000150 6e 1b 2a 4b 45 59 33 20 21 26 32 36 45 31 3d 26 |n.*KEY3 !&26E1=&| 00000160 43 33 30 45 41 45 41 7c 4d 0d 00 78 17 2a 4b 45 |C30EAEA|M..x.*KE| 00000170 59 34 20 43 41 4c 4c 26 32 33 30 30 7c 46 7c 4d |Y4 CALL&2300|F|M| 00000180 0d 00 82 10 2a 46 58 31 33 38 2c 30 2c 31 32 39 |....*FX138,0,129| 00000190 0d 00 8c 1d e7 20 69 6e 66 24 3d 22 59 22 20 8c |..... inf$="Y" .| 000001a0 20 2a 46 58 31 33 38 2c 30 2c 31 33 30 0d 00 96 | *FX138,0,130...| 000001b0 1d e7 20 73 6d 61 24 3d 22 59 22 20 8c 20 2a 46 |.. sma$="Y" . *F| 000001c0 58 31 33 38 2c 30 2c 31 33 31 0d 00 a0 10 2a 46 |X138,0,131....*F| 000001d0 58 31 33 38 2c 30 2c 31 33 32 0d 00 aa 22 f1 27 |X138,0,132...".'| 000001e0 27 22 46 6f 72 77 61 72 64 20 74 61 70 65 20 74 |'"Forward tape t| 000001f0 6f 20 27 47 55 41 52 44 23 31 27 22 0d 00 b4 07 |o 'GUARD#1'"....| 00000200 ef 32 31 0d 00 be 05 e0 0d ff |.21.......| 0000020a