Overdriv-T

Home » Personal collection » Acorn tapes » Commercial_Releases » box03_tape12a_acorn_cheat_it_again_joe_3.wav » Overdriv-T

Overdriv-T

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 » box03_tape12a_acorn_cheat_it_again_joe_3.wav
Filename:	Overdriv-T
Read OK:	✔
File size:	0787 bytes
Load address:	3000
Exec address:	3000

File contents

    1*|
   10REM Overdrive cheat
   20REM Original version
   30REM Electron tape version
   40MODE1:VDU19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:PRINT'"Overdrive cheat":COLOUR2:PRINT"���������������"':PROCmc1
   50PROCa("`(@O`)riginal or (@C`)ompilation version @:` ")
   60A$=GET$:IFA$="C" THEN PRINT;A$'':GOTO500 ELSE IF A$<>"O" THEN GOTO60
   70PRINT;A$'':$&1800="K.1 LO.""OVER2""|M"
   80PROCa("`Starting stage         @(1-5)` : @"):INPUT""s%
   90IF s%<1 OR s%>5 THEN GOTO80
  100$&1810="101?STAGE%="+STR$s%+"|M"
  110IF FNb("Always qualify") THEN $&181E="201?STAGE%=?STAGE%+1:GOTO150|MRUN|F|M" ELSE $&181E="RUN|F|M"
  120Y%=&18:X%=0:CALL&FFF7
  130PRINT:PROCa("`OK@ - `Insert @Overdrive` tape and               press play ..."):VDU7,13,10,10,17,2
  140*L.OVERDRIVE 2400
  150*K.0 LOAD""|F|M*FX13,4|M120*FX138,0,129|M110|MMO.2|MRUN|M
  160P%=&880:[OPT0:LDA&3CA:AND#254:STA&3CA:RTS:]
  170?&220=&80:?&221=8:*FX14,4
  180VDU21:*FX138,0,128
  190END
  200DEFFNb(A$)
  210PROCa("`"+A$+STRING$(22-LENA$," ")+"@ (Y/N) `: @"):A$=GET$:IFA$="Y" THEN PRINT;"Yes":=TRUE ELSE PRINT;"No":=FALSE
  220END
  230DEFPROCask(A$,A%)
  240PROCa("`"+A$+STRING$(25-LENA$," ")+"@(Y/N)` : @"):A$=GET$:IF A$="Y" THEN PRINT;"Yes" ELSE PRINT;"No":?A%=&60
  250ENDPROC
  260DEFPROCa($&1600)
  270CALL&1700:ENDPROC
  280DEFPROCmc1
  290FORI%=0TO2 STEP2
  300P%=&1700
  310[OPTI%
  320LDY#0:.loop2
  330LDA&1600,Y
  340CMP#13:BEQend
  350CMP#ASC"@":BEQcolour1
  360CMP#ASC"`":BEQcolour2
  370JSR&FFEE
  380.backin
  390INY:CPY#0:BNEloop2
  400.end
  410RTS
  420.colour1 LDA#2:JMPchange
  430.colour2 LDA#3
  440.change TAX:LDA#17:JSR&FFEE
  450        TXA:JSR&FFEE
  460        JMPbackin
  470]
  480NEXT
  490ENDPROC
  500$&1800="K.1 LO.""OVER2""|M"
  510PROCa("`Starting stage         @(1-5)` : @"):INPUT""s%
  520IF s%<1 OR s%>5 THEN GOTO510
  530$&1810="101?STAGE%="+STR$s%+"|M"
  540IF FNb("Always qualify") THEN $&181E="201?STAGE%=?STAGE%+1:GOTO150|MRUN|F|M" ELSE $&181E="RUN|F|M"
  550Y%=&18:X%=0:CALL&FFF7
  560PRINT:PROCa("`OK@ - `Insert @Overdrive` tape and               press play ..."):VDU7,13,10,10,17,2
  570*K.0 PAGE=&1900|MLOAD"OVERDRIVE"|F|M120*FX138,0,129|M110|MMODE4|MRUN|M
  580VDU21:*FX138,0,128
  590END
  600DEFFNb(A$)
  610PROCa("`"+A$+STRING$(22-LENA$," ")+"@ (Y/N) `: @"):A$=GET$:IFA$="Y" THEN PRINT;"Yes":=TRUE ELSE PRINT;"No":=FALSE
  620END

*|

� Overdrive cheat
� Original version
� Electron tape version
(d�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:�'"Overdrive cheat":�2:�"���������������"':�mc1
27�a("`(@O`)riginal or (@C`)ompilation version @:` ")
<3A$=�:�A$="C" � �;A$'':�dtA � � A$<>"O" � �T|@
F&�;A$'':$&1800="K.1 LO.""OVER2""|M"
P3�a("`Starting stage         @(1-5)` : @"):�""s%
Z� s%<1 � s%>5 � �DP@
d!$&1810="101?STAGE%="+�s%+"|M"
n^� �b("Always qualify") � $&181E="201?STAGE%=?STAGE%+1:GOTO150|MRUN|F|M" � $&181E="RUN|F|M"
xY%=&18:X%=0:�&FFF7
�]�:�a("`OK@ - `Insert @Overdrive` tape and               press play ..."):�7,13,10,10,17,2
�*L.OVERDRIVE 2400
�=*K.0 LOAD""|F|M*FX13,4|M120*FX138,0,129|M110|MMO.2|MRUN|M
�-P%=&880:[OPT0:LDA&3CA:�#254:STA&3CA:RTS:]
�?&220=&80:?&221=8:*FX14,4
��21:*FX138,0,128
��
�ݤb(A$)
�P�a("`"+A$+�22-�A$," ")+"@ (Y/N) `: @"):A$=�:�A$="Y" � �;"Yes":=� � �;"No":=�
��
���ask(A$,A%)
�R�a("`"+A$+�25-�A$," ")+"@(Y/N)` : @"):A$=�:� A$="Y" � �;"Yes" � �;"No":?A%=&60
��
��a($&1600)
�&1700:�
	��mc1
"�I%=0�2 �2
,P%=&1700
6
[OPTI%
@LDY#0:.loop2
JLDA&1600,Y
TCMP#13:BEQend
^CMP#�"@":BEQcolour1
hCMP#�"`":BEQcolour2
rJSR&FFEE
|.backin
�INY:CPY#0:BNEloop2
�.end
�RTS
�.colour1 LDA#2:JMPchange
�.colour2 LDA#3
�.change TAX:LDA#17:JSR&FFEE
�        TXA:JSR&FFEE
�        JMPbackin
�]
��
��
�$&1800="K.1 LO.""OVER2""|M"
�3�a("`Starting stage         @(1-5)` : @"):�""s%
� s%<1 � s%>5 � �d~A
!$&1810="101?STAGE%="+�s%+"|M"
^� �b("Always qualify") � $&181E="201?STAGE%=?STAGE%+1:GOTO150|MRUN|F|M" � $&181E="RUN|F|M"
&Y%=&18:X%=0:�&FFF7
0]�:�a("`OK@ - `Insert @Overdrive` tape and               press play ..."):�7,13,10,10,17,2
:J*K.0 PAGE=&1900|MLOAD"OVERDRIVE"|F|M120*FX138,0,129|M110|MMODE4|MRUN|M
D�21:*FX138,0,128
N�
Xݤb(A$)
bP�a("`"+A$+�22-�A$," ")+"@ (Y/N) `: @"):A$=�:�A$="Y" � �;"Yes":=� � �;"No":=�
l�
�

00000000  0d 00 01 07 2a 7c 15 0d  00 0a 15 f4 20 4f 76 65  |....*|...... Ove|
00000010  72 64 72 69 76 65 20 63  68 65 61 74 0d 00 14 16  |rdrive cheat....|
00000020  f4 20 4f 72 69 67 69 6e  61 6c 20 76 65 72 73 69  |. Original versi|
00000030  6f 6e 0d 00 1e 1b f4 20  45 6c 65 63 74 72 6f 6e  |on..... Electron|
00000040  20 74 61 70 65 20 76 65  72 73 69 6f 6e 0d 00 28  | tape version..(|
00000050  64 eb 31 3a ef 31 39 2c  33 2c 36 2c 30 2c 30 2c  |d.1:.19,3,6,0,0,|
00000060  30 2c 32 33 2c 32 33 30  2c 30 2c 26 46 46 2c 30  |0,23,230,0,&FF,0|
00000070  2c 26 46 46 2c 30 2c 30  2c 30 2c 30 2c 31 37 2c  |,&FF,0,0,0,0,17,|
00000080  31 3a f1 27 22 4f 76 65  72 64 72 69 76 65 20 63  |1:.'"Overdrive c|
00000090  68 65 61 74 22 3a fb 32  3a f1 22 86 86 86 86 86  |heat":.2:.".....|
000000a0  86 86 86 86 86 86 86 86  86 86 22 27 3a f2 6d 63  |.........."':.mc|
000000b0  31 0d 00 32 37 f2 61 28  22 60 28 40 4f 60 29 72  |1..27.a("`(@O`)r|
000000c0  69 67 69 6e 61 6c 20 6f  72 20 28 40 43 60 29 6f  |iginal or (@C`)o|
000000d0  6d 70 69 6c 61 74 69 6f  6e 20 76 65 72 73 69 6f  |mpilation versio|
000000e0  6e 20 40 3a 60 20 22 29  0d 00 3c 33 41 24 3d be  |n @:` ")..<3A$=.|
000000f0  3a e7 41 24 3d 22 43 22  20 8c 20 f1 3b 41 24 27  |:.A$="C" . .;A$'|
00000100  27 3a e5 8d 64 74 41 20  8b 20 e7 20 41 24 3c 3e  |':..dtA . . A$<>|
00000110  22 4f 22 20 8c 20 e5 8d  54 7c 40 0d 00 46 26 f1  |"O" . ..T|@..F&.|
00000120  3b 41 24 27 27 3a 24 26  31 38 30 30 3d 22 4b 2e  |;A$'':$&1800="K.|
00000130  31 20 4c 4f 2e 22 22 4f  56 45 52 32 22 22 7c 4d  |1 LO.""OVER2""|M|
00000140  22 0d 00 50 33 f2 61 28  22 60 53 74 61 72 74 69  |"..P3.a("`Starti|
00000150  6e 67 20 73 74 61 67 65  20 20 20 20 20 20 20 20  |ng stage        |
00000160  20 40 28 31 2d 35 29 60  20 3a 20 40 22 29 3a e8  | @(1-5)` : @"):.|
00000170  22 22 73 25 0d 00 5a 19  e7 20 73 25 3c 31 20 84  |""s%..Z.. s%<1 .|
00000180  20 73 25 3e 35 20 8c 20  e5 8d 44 50 40 0d 00 64  | s%>5 . ..DP@..d|
00000190  21 24 26 31 38 31 30 3d  22 31 30 31 3f 53 54 41  |!$&1810="101?STA|
000001a0  47 45 25 3d 22 2b c3 73  25 2b 22 7c 4d 22 0d 00  |GE%="+.s%+"|M"..|
000001b0  6e 5e e7 20 a4 62 28 22  41 6c 77 61 79 73 20 71  |n^. .b("Always q|
000001c0  75 61 6c 69 66 79 22 29  20 8c 20 24 26 31 38 31  |ualify") . $&181|
000001d0  45 3d 22 32 30 31 3f 53  54 41 47 45 25 3d 3f 53  |E="201?STAGE%=?S|
000001e0  54 41 47 45 25 2b 31 3a  47 4f 54 4f 31 35 30 7c  |TAGE%+1:GOTO150||
000001f0  4d 52 55 4e 7c 46 7c 4d  22 20 8b 20 24 26 31 38  |MRUN|F|M" . $&18|
00000200  31 45 3d 22 52 55 4e 7c  46 7c 4d 22 0d 00 78 16  |1E="RUN|F|M"..x.|
00000210  59 25 3d 26 31 38 3a 58  25 3d 30 3a d6 26 46 46  |Y%=&18:X%=0:.&FF|
00000220  46 37 0d 00 82 5d f1 3a  f2 61 28 22 60 4f 4b 40  |F7...].:.a("`OK@|
00000230  20 2d 20 60 49 6e 73 65  72 74 20 40 4f 76 65 72  | - `Insert @Over|
00000240  64 72 69 76 65 60 20 74  61 70 65 20 61 6e 64 20  |drive` tape and |
00000250  20 20 20 20 20 20 20 20  20 20 20 20 20 20 70 72  |              pr|
00000260  65 73 73 20 70 6c 61 79  20 2e 2e 2e 22 29 3a ef  |ess play ..."):.|
00000270  37 2c 31 33 2c 31 30 2c  31 30 2c 31 37 2c 32 0d  |7,13,10,10,17,2.|
00000280  00 8c 15 2a 4c 2e 4f 56  45 52 44 52 49 56 45 20  |...*L.OVERDRIVE |
00000290  32 34 30 30 0d 00 96 3d  2a 4b 2e 30 20 4c 4f 41  |2400...=*K.0 LOA|
000002a0  44 22 22 7c 46 7c 4d 2a  46 58 31 33 2c 34 7c 4d  |D""|F|M*FX13,4|M|
000002b0  31 32 30 2a 46 58 31 33  38 2c 30 2c 31 32 39 7c  |120*FX138,0,129||
000002c0  4d 31 31 30 7c 4d 4d 4f  2e 32 7c 4d 52 55 4e 7c  |M110|MMO.2|MRUN||
000002d0  4d 0d 00 a0 2d 50 25 3d  26 38 38 30 3a 5b 4f 50  |M...-P%=&880:[OP|
000002e0  54 30 3a 4c 44 41 26 33  43 41 3a 80 23 32 35 34  |T0:LDA&3CA:.#254|
000002f0  3a 53 54 41 26 33 43 41  3a 52 54 53 3a 5d 0d 00  |:STA&3CA:RTS:]..|
00000300  aa 1d 3f 26 32 32 30 3d  26 38 30 3a 3f 26 32 32  |..?&220=&80:?&22|
00000310  31 3d 38 3a 2a 46 58 31  34 2c 34 0d 00 b4 14 ef  |1=8:*FX14,4.....|
00000320  32 31 3a 2a 46 58 31 33  38 2c 30 2c 31 32 38 0d  |21:*FX138,0,128.|
00000330  00 be 05 e0 0d 00 c8 0b  dd a4 62 28 41 24 29 0d  |..........b(A$).|
00000340  00 d2 50 f2 61 28 22 60  22 2b 41 24 2b c4 32 32  |..P.a("`"+A$+.22|
00000350  2d a9 41 24 2c 22 20 22  29 2b 22 40 20 28 59 2f  |-.A$," ")+"@ (Y/|
00000360  4e 29 20 60 3a 20 40 22  29 3a 41 24 3d be 3a e7  |N) `: @"):A$=.:.|
00000370  41 24 3d 22 59 22 20 8c  20 f1 3b 22 59 65 73 22  |A$="Y" . .;"Yes"|
00000380  3a 3d b9 20 8b 20 f1 3b  22 4e 6f 22 3a 3d a3 0d  |:=. . .;"No":=..|
00000390  00 dc 05 e0 0d 00 e6 10  dd f2 61 73 6b 28 41 24  |..........ask(A$|
000003a0  2c 41 25 29 0d 00 f0 52  f2 61 28 22 60 22 2b 41  |,A%)...R.a("`"+A|
000003b0  24 2b c4 32 35 2d a9 41  24 2c 22 20 22 29 2b 22  |$+.25-.A$," ")+"|
000003c0  40 28 59 2f 4e 29 60 20  3a 20 40 22 29 3a 41 24  |@(Y/N)` : @"):A$|
000003d0  3d be 3a e7 20 41 24 3d  22 59 22 20 8c 20 f1 3b  |=.:. A$="Y" . .;|
000003e0  22 59 65 73 22 20 8b 20  f1 3b 22 4e 6f 22 3a 3f  |"Yes" . .;"No":?|
000003f0  41 25 3d 26 36 30 0d 00  fa 05 e1 0d 01 04 0f dd  |A%=&60..........|
00000400  f2 61 28 24 26 31 36 30  30 29 0d 01 0e 0c d6 26  |.a($&1600).....&|
00000410  31 37 30 30 3a e1 0d 01  18 09 dd f2 6d 63 31 0d  |1700:.......mc1.|
00000420  01 22 0e e3 49 25 3d 30  b8 32 20 88 32 0d 01 2c  |."..I%=0.2 .2..,|
00000430  0c 50 25 3d 26 31 37 30  30 0d 01 36 0a 5b 4f 50  |.P%=&1700..6.[OP|
00000440  54 49 25 0d 01 40 10 4c  44 59 23 30 3a 2e 6c 6f  |TI%..@.LDY#0:.lo|
00000450  6f 70 32 0d 01 4a 0e 4c  44 41 26 31 36 30 30 2c  |op2..J.LDA&1600,|
00000460  59 0d 01 54 11 43 4d 50  23 31 33 3a 42 45 51 65  |Y..T.CMP#13:BEQe|
00000470  6e 64 0d 01 5e 17 43 4d  50 23 97 22 40 22 3a 42  |nd..^.CMP#."@":B|
00000480  45 51 63 6f 6c 6f 75 72  31 0d 01 68 17 43 4d 50  |EQcolour1..h.CMP|
00000490  23 97 22 60 22 3a 42 45  51 63 6f 6c 6f 75 72 32  |#."`":BEQcolour2|
000004a0  0d 01 72 0c 4a 53 52 26  46 46 45 45 0d 01 7c 0b  |..r.JSR&FFEE..|.|
000004b0  2e 62 61 63 6b 69 6e 0d  01 86 16 49 4e 59 3a 43  |.backin....INY:C|
000004c0  50 59 23 30 3a 42 4e 45  6c 6f 6f 70 32 0d 01 90  |PY#0:BNEloop2...|
000004d0  08 2e 65 6e 64 0d 01 9a  07 52 54 53 0d 01 a4 1c  |..end....RTS....|
000004e0  2e 63 6f 6c 6f 75 72 31  20 4c 44 41 23 32 3a 4a  |.colour1 LDA#2:J|
000004f0  4d 50 63 68 61 6e 67 65  0d 01 ae 12 2e 63 6f 6c  |MPchange.....col|
00000500  6f 75 72 32 20 4c 44 41  23 33 0d 01 b8 1f 2e 63  |our2 LDA#3.....c|
00000510  68 61 6e 67 65 20 54 41  58 3a 4c 44 41 23 31 37  |hange TAX:LDA#17|
00000520  3a 4a 53 52 26 46 46 45  45 0d 01 c2 18 20 20 20  |:JSR&FFEE....   |
00000530  20 20 20 20 20 54 58 41  3a 4a 53 52 26 46 46 45  |     TXA:JSR&FFE|
00000540  45 0d 01 cc 15 20 20 20  20 20 20 20 20 4a 4d 50  |E....        JMP|
00000550  62 61 63 6b 69 6e 0d 01  d6 05 5d 0d 01 e0 05 ed  |backin....].....|
00000560  0d 01 ea 05 e1 0d 01 f4  1f 24 26 31 38 30 30 3d  |.........$&1800=|
00000570  22 4b 2e 31 20 4c 4f 2e  22 22 4f 56 45 52 32 22  |"K.1 LO.""OVER2"|
00000580  22 7c 4d 22 0d 01 fe 33  f2 61 28 22 60 53 74 61  |"|M"...3.a("`Sta|
00000590  72 74 69 6e 67 20 73 74  61 67 65 20 20 20 20 20  |rting stage     |
000005a0  20 20 20 20 40 28 31 2d  35 29 60 20 3a 20 40 22  |    @(1-5)` : @"|
000005b0  29 3a e8 22 22 73 25 0d  02 08 19 e7 20 73 25 3c  |):.""s%..... s%<|
000005c0  31 20 84 20 73 25 3e 35  20 8c 20 e5 8d 64 7e 41  |1 . s%>5 . ..d~A|
000005d0  0d 02 12 21 24 26 31 38  31 30 3d 22 31 30 31 3f  |...!$&1810="101?|
000005e0  53 54 41 47 45 25 3d 22  2b c3 73 25 2b 22 7c 4d  |STAGE%="+.s%+"|M|
000005f0  22 0d 02 1c 5e e7 20 a4  62 28 22 41 6c 77 61 79  |"...^. .b("Alway|
00000600  73 20 71 75 61 6c 69 66  79 22 29 20 8c 20 24 26  |s qualify") . $&|
00000610  31 38 31 45 3d 22 32 30  31 3f 53 54 41 47 45 25  |181E="201?STAGE%|
00000620  3d 3f 53 54 41 47 45 25  2b 31 3a 47 4f 54 4f 31  |=?STAGE%+1:GOTO1|
00000630  35 30 7c 4d 52 55 4e 7c  46 7c 4d 22 20 8b 20 24  |50|MRUN|F|M" . $|
00000640  26 31 38 31 45 3d 22 52  55 4e 7c 46 7c 4d 22 0d  |&181E="RUN|F|M".|
00000650  02 26 16 59 25 3d 26 31  38 3a 58 25 3d 30 3a d6  |.&.Y%=&18:X%=0:.|
00000660  26 46 46 46 37 0d 02 30  5d f1 3a f2 61 28 22 60  |&FFF7..0].:.a("`|
00000670  4f 4b 40 20 2d 20 60 49  6e 73 65 72 74 20 40 4f  |OK@ - `Insert @O|
00000680  76 65 72 64 72 69 76 65  60 20 74 61 70 65 20 61  |verdrive` tape a|
00000690  6e 64 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |nd              |
000006a0  20 70 72 65 73 73 20 70  6c 61 79 20 2e 2e 2e 22  | press play ..."|
000006b0  29 3a ef 37 2c 31 33 2c  31 30 2c 31 30 2c 31 37  |):.7,13,10,10,17|
000006c0  2c 32 0d 02 3a 4a 2a 4b  2e 30 20 50 41 47 45 3d  |,2..:J*K.0 PAGE=|
000006d0  26 31 39 30 30 7c 4d 4c  4f 41 44 22 4f 56 45 52  |&1900|MLOAD"OVER|
000006e0  44 52 49 56 45 22 7c 46  7c 4d 31 32 30 2a 46 58  |DRIVE"|F|M120*FX|
000006f0  31 33 38 2c 30 2c 31 32  39 7c 4d 31 31 30 7c 4d  |138,0,129|M110|M|
00000700  4d 4f 44 45 34 7c 4d 52  55 4e 7c 4d 0d 02 44 14  |MODE4|MRUN|M..D.|
00000710  ef 32 31 3a 2a 46 58 31  33 38 2c 30 2c 31 32 38  |.21:*FX138,0,128|
00000720  0d 02 4e 05 e0 0d 02 58  0b dd a4 62 28 41 24 29  |..N....X...b(A$)|
00000730  0d 02 62 50 f2 61 28 22  60 22 2b 41 24 2b c4 32  |..bP.a("`"+A$+.2|
00000740  32 2d a9 41 24 2c 22 20  22 29 2b 22 40 20 28 59  |2-.A$," ")+"@ (Y|
00000750  2f 4e 29 20 60 3a 20 40  22 29 3a 41 24 3d be 3a  |/N) `: @"):A$=.:|
00000760  e7 41 24 3d 22 59 22 20  8c 20 f1 3b 22 59 65 73  |.A$="Y" . .;"Yes|
00000770  22 3a 3d b9 20 8b 20 f1  3b 22 4e 6f 22 3a 3d a3  |":=. . .;"No":=.|
00000780  0d 02 6c 05 e0 0d ff                              |..l....|
00000787

Overdriv-T.m0

Overdriv-T.m1

Overdriv-T.m2

Overdriv-T.m4

Overdriv-T.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .