Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_15.ADF » Vertigo
Vertigo
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: | Vertigo |
Read OK: | ✔ |
File size: | 032E bytes |
Load address: | FFFFFB00 |
Exec address: | FFFF8023 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » headfirst » headfirst_5_25_discs_HeadFirst-PD-Disk-004_D-E004.ssd » Vertigo
- AEW website » eug » eug_5_25_discs_Eug-15_D-EUG15.dsd » Vertigo
- Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_15.ADF » Vertigo
File contents
4*TAPE 5IF PAGE>&E00 THEN OSCLI"KEY0 FORI=0 TO TOP-PAGE STEP4:I!&E00=I!PAGE:N.|MPA.=&E00|MO.|MRUN|M":OSCLI"FX138,0,128":END 10REM Vertigo Cheat 20REM By James Treadwell 30REM HeadFirst PD 1992 40MODE6 50PRINT''"Vertigo Cheat" 60PRINT "-------------" 70PRINT 80PRINT "Infinite Lives (Y/N)?"; 90A$=GET$ 100IF A$="Y" THEN IL=1:GOTO130 110IF A$="N" THEN IL=0:GOTO130 120VDU7:GOTO90 130PRINTA$ 140PRINT "Infinite Time (Y/N)?"; 150A$=GET$ 160IF A$="N" THEN IT=0:GOTO190 170IF A$="Y" THEN IT=1:GOTO190 180VDU7:GOTO150 190PRINTA$ 200PRINT''"Forward tape to second file - VERTIGO" 210PRINT 220VDU11 240PROCass 250*KEY0 LO."VERTIGO"|M31GOTO140|M220*L. VERTLEV|M221CALL&110|MRUN|M 260*FX 138,0,128 270END 280DEFPROCass 290?&70=IL:?&71=IT 300FORI=0TO2STEP2 310P%=&110 320[OPTI 330LDA&70:CMP#0:BEQp2 340LDA#&75:STA&1799:LDA#&79:STA&179B 350.p2 360LDA&71:CMP#0:BEQend 370LDA#&EA:STA&137B:STA&137C 380.end JMP&6507 390] 400NEXT 410ENDPROC
*TAPE f� �>&E00 � �"KEY0 FORI=0 TO TOP-PAGE STEP4:I!&E00=I!PAGE:N.|MPA.=&E00|MO.|MRUN|M":�"FX138,0,128":� � Vertigo Cheat � By James Treadwell � HeadFirst PD 1992 (�6 2�''"Vertigo Cheat" <� "-------------" F� P� "Infinite Lives (Y/N)?"; ZA$=� d� A$="Y" � IL=1:�tB@ n� A$="N" � IL=0:�tB@ x�7:�DZ@ ��A$ �� "Infinite Time (Y/N)?"; �A$=� �� A$="N" � IT=0:�t~@ �� A$="Y" � IT=1:�t~@ ��7:�tV@ ��A$ �.�''"Forward tape to second file - VERTIGO" �� ��11 ��ass �E*KEY0 LO."VERTIGO"|M31GOTO140|M220*L. VERTLEV|M221CALL&110|MRUN|M *FX 138,0,128 � ��ass "?&70=IL:?&71=IT ,�I=0�2�2 6P%=&110 @ [OPTI JLDA&70:CMP#0:BEQp2 T%LDA#&75:STA&1799:LDA#&79:STA&179B ^.p2 hLDA&71:CMP#0:BEQend rLDA#&EA:STA&137B:STA&137C |.end JMP&6507 �] �� �� �
00000000 0d 00 04 09 2a 54 41 50 45 0d 00 05 66 e7 20 90 |....*TAPE...f. .| 00000010 3e 26 45 30 30 20 8c 20 ff 22 4b 45 59 30 20 46 |>&E00 . ."KEY0 F| 00000020 4f 52 49 3d 30 20 54 4f 20 54 4f 50 2d 50 41 47 |ORI=0 TO TOP-PAG| 00000030 45 20 53 54 45 50 34 3a 49 21 26 45 30 30 3d 49 |E STEP4:I!&E00=I| 00000040 21 50 41 47 45 3a 4e 2e 7c 4d 50 41 2e 3d 26 45 |!PAGE:N.|MPA.=&E| 00000050 30 30 7c 4d 4f 2e 7c 4d 52 55 4e 7c 4d 22 3a ff |00|MO.|MRUN|M":.| 00000060 22 46 58 31 33 38 2c 30 2c 31 32 38 22 3a e0 0d |"FX138,0,128":..| 00000070 00 0a 13 f4 20 56 65 72 74 69 67 6f 20 43 68 65 |.... Vertigo Che| 00000080 61 74 0d 00 14 18 f4 20 42 79 20 4a 61 6d 65 73 |at..... By James| 00000090 20 54 72 65 61 64 77 65 6c 6c 0d 00 1e 17 f4 20 | Treadwell..... | 000000a0 48 65 61 64 46 69 72 73 74 20 50 44 20 31 39 39 |HeadFirst PD 199| 000000b0 32 0d 00 28 06 eb 36 0d 00 32 16 f1 27 27 22 56 |2..(..6..2..''"V| 000000c0 65 72 74 69 67 6f 20 43 68 65 61 74 22 0d 00 3c |ertigo Cheat"..<| 000000d0 16 f1 20 20 22 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d |.. "-----------| 000000e0 2d 2d 22 0d 00 46 05 f1 0d 00 50 1e f1 20 22 49 |--"..F....P.. "I| 000000f0 6e 66 69 6e 69 74 65 20 4c 69 76 65 73 20 28 59 |nfinite Lives (Y| 00000100 2f 4e 29 3f 22 3b 0d 00 5a 08 41 24 3d be 0d 00 |/N)?";..Z.A$=...| 00000110 64 19 e7 20 41 24 3d 22 59 22 20 8c 20 49 4c 3d |d.. A$="Y" . IL=| 00000120 31 3a e5 8d 74 42 40 0d 00 6e 19 e7 20 41 24 3d |1:..tB@..n.. A$=| 00000130 22 4e 22 20 8c 20 49 4c 3d 30 3a e5 8d 74 42 40 |"N" . IL=0:..tB@| 00000140 0d 00 78 0c ef 37 3a e5 8d 44 5a 40 0d 00 82 07 |..x..7:..DZ@....| 00000150 f1 41 24 0d 00 8c 1d f1 20 22 49 6e 66 69 6e 69 |.A$..... "Infini| 00000160 74 65 20 54 69 6d 65 20 28 59 2f 4e 29 3f 22 3b |te Time (Y/N)?";| 00000170 0d 00 96 08 41 24 3d be 0d 00 a0 19 e7 20 41 24 |....A$=...... A$| 00000180 3d 22 4e 22 20 8c 20 49 54 3d 30 3a e5 8d 74 7e |="N" . IT=0:..t~| 00000190 40 0d 00 aa 19 e7 20 41 24 3d 22 59 22 20 8c 20 |@..... A$="Y" . | 000001a0 49 54 3d 31 3a e5 8d 74 7e 40 0d 00 b4 0c ef 37 |IT=1:..t~@.....7| 000001b0 3a e5 8d 74 56 40 0d 00 be 07 f1 41 24 0d 00 c8 |:..tV@.....A$...| 000001c0 2e f1 27 27 22 46 6f 72 77 61 72 64 20 74 61 70 |..''"Forward tap| 000001d0 65 20 74 6f 20 73 65 63 6f 6e 64 20 66 69 6c 65 |e to second file| 000001e0 20 2d 20 56 45 52 54 49 47 4f 22 0d 00 d2 05 f1 | - VERTIGO".....| 000001f0 0d 00 dc 07 ef 31 31 0d 00 f0 08 f2 61 73 73 0d |.....11.....ass.| 00000200 00 fa 45 2a 4b 45 59 30 20 4c 4f 2e 22 56 45 52 |..E*KEY0 LO."VER| 00000210 54 49 47 4f 22 7c 4d 33 31 47 4f 54 4f 31 34 30 |TIGO"|M31GOTO140| 00000220 7c 4d 32 32 30 2a 4c 2e 20 56 45 52 54 4c 45 56 ||M220*L. VERTLEV| 00000230 7c 4d 32 32 31 43 41 4c 4c 26 31 31 30 7c 4d 52 ||M221CALL&110|MR| 00000240 55 4e 7c 4d 0d 01 04 11 2a 46 58 20 31 33 38 2c |UN|M....*FX 138,| 00000250 30 2c 31 32 38 0d 01 0e 05 e0 0d 01 18 09 dd f2 |0,128...........| 00000260 61 73 73 0d 01 22 13 3f 26 37 30 3d 49 4c 3a 3f |ass..".?&70=IL:?| 00000270 26 37 31 3d 49 54 0d 01 2c 0c e3 49 3d 30 b8 32 |&71=IT..,..I=0.2| 00000280 88 32 0d 01 36 0b 50 25 3d 26 31 31 30 0d 01 40 |.2..6.P%=&110..@| 00000290 09 5b 4f 50 54 49 0d 01 4a 16 4c 44 41 26 37 30 |.[OPTI..J.LDA&70| 000002a0 3a 43 4d 50 23 30 3a 42 45 51 70 32 0d 01 54 25 |:CMP#0:BEQp2..T%| 000002b0 4c 44 41 23 26 37 35 3a 53 54 41 26 31 37 39 39 |LDA#&75:STA&1799| 000002c0 3a 4c 44 41 23 26 37 39 3a 53 54 41 26 31 37 39 |:LDA#&79:STA&179| 000002d0 42 0d 01 5e 07 2e 70 32 0d 01 68 17 4c 44 41 26 |B..^..p2..h.LDA&| 000002e0 37 31 3a 43 4d 50 23 30 3a 42 45 51 65 6e 64 0d |71:CMP#0:BEQend.| 000002f0 01 72 1d 4c 44 41 23 26 45 41 3a 53 54 41 26 31 |.r.LDA#&EA:STA&1| 00000300 33 37 42 3a 53 54 41 26 31 33 37 43 0d 01 7c 11 |37B:STA&137C..|.| 00000310 2e 65 6e 64 20 4a 4d 50 26 36 35 30 37 0d 01 86 |.end JMP&6507...| 00000320 05 5d 0d 01 90 05 ed 0d 01 9a 05 e1 0d ff |.]............| 0000032e