Home » Personal collection » Acorn ADFS disks » Electron » Play_it_again_Sam_13.ADF » Sam13/Hyperball/TapeCheat

Sam13/Hyperball/TapeCheat

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 » Play_it_again_Sam_13.ADF
Filename: Sam13/Hyperball/TapeCheat
Read OK:
File size: 01B5 bytes
Load address: FFFF1D00
Exec address: FFFF8023
Duplicates

There are 3 duplicate copies of this file in the archive:

File contents
   10 REM Hyperball Cheat
   20 REM Electron tape (Play it Again Sam 13) version
   30 REM by M. Ford for EUG, July 1995
   40 MODE6:PRINT TAB(1,1)"Hyperball Cheat"'" ==============="
   50 PRINT'" Infinite lives (Y/N)?";
   60 A$=GET$:IF INSTR("YyNn",A$)=0 THEN 60
   70 PRINT A$:IF A$="N" OR A$="n" THEN GOTO 130
   80 P%=&100
   90 [OPT2:LDA#4:STA&42FE:RTS:]
  100 *FX13,4
  110 ?&220=0:?&221=1
  120 *FX14,4
  130 PRINT'"OK - Loading Hyperball"
  140 A%=TIME:REPEAT UNTIL TIME>=A%+100
  150 *TAPE
  160 PAGE=&E00
  170 CHAIN"HYPER"

 � Hyperball Cheat
3 � Electron tape (Play it Again Sam 13) version
$ � by M. Ford for EUG, July 1995
(3 �6:� �1,1)"Hyperball Cheat"'" ==============="
2  �'" Infinite lives (Y/N)?";
<  A$=�:� �"YyNn",A$)=0 � �T|@
F$ � A$:� A$="N" � A$="n" � � �tB@
P P%=&100
Z [OPT2:LDA#4:STA&42FE:RTS:]
d *FX13,4
n ?&220=0:?&221=1
x *FX14,4
� �'"OK - Loading Hyperball"
� A%=�:� � �>=A%+100
�
 *TAPE
� �=&E00
�
 �"HYPER"
�
00000000  0d 00 0a 16 20 f4 20 48  79 70 65 72 62 61 6c 6c  |.... . Hyperball|
00000010  20 43 68 65 61 74 0d 00  14 33 20 f4 20 45 6c 65  | Cheat...3 . Ele|
00000020  63 74 72 6f 6e 20 74 61  70 65 20 28 50 6c 61 79  |ctron tape (Play|
00000030  20 69 74 20 41 67 61 69  6e 20 53 61 6d 20 31 33  | it Again Sam 13|
00000040  29 20 76 65 72 73 69 6f  6e 0d 00 1e 24 20 f4 20  |) version...$ . |
00000050  62 79 20 4d 2e 20 46 6f  72 64 20 66 6f 72 20 45  |by M. Ford for E|
00000060  55 47 2c 20 4a 75 6c 79  20 31 39 39 35 0d 00 28  |UG, July 1995..(|
00000070  33 20 eb 36 3a f1 20 8a  31 2c 31 29 22 48 79 70  |3 .6:. .1,1)"Hyp|
00000080  65 72 62 61 6c 6c 20 43  68 65 61 74 22 27 22 20  |erball Cheat"'" |
00000090  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 22  |==============="|
000000a0  0d 00 32 20 20 f1 27 22  20 49 6e 66 69 6e 69 74  |..2  .'" Infinit|
000000b0  65 20 6c 69 76 65 73 20  28 59 2f 4e 29 3f 22 3b  |e lives (Y/N)?";|
000000c0  0d 00 3c 20 20 41 24 3d  be 3a e7 20 a7 22 59 79  |..<  A$=.:. ."Yy|
000000d0  4e 6e 22 2c 41 24 29 3d  30 20 8c 20 8d 54 7c 40  |Nn",A$)=0 . .T|@|
000000e0  0d 00 46 24 20 f1 20 41  24 3a e7 20 41 24 3d 22  |..F$ . A$:. A$="|
000000f0  4e 22 20 84 20 41 24 3d  22 6e 22 20 8c 20 e5 20  |N" . A$="n" . . |
00000100  8d 74 42 40 0d 00 50 0c  20 50 25 3d 26 31 30 30  |.tB@..P. P%=&100|
00000110  0d 00 5a 1f 20 5b 4f 50  54 32 3a 4c 44 41 23 34  |..Z. [OPT2:LDA#4|
00000120  3a 53 54 41 26 34 32 46  45 3a 52 54 53 3a 5d 0d  |:STA&42FE:RTS:].|
00000130  00 64 0c 20 2a 46 58 31  33 2c 34 0d 00 6e 14 20  |.d. *FX13,4..n. |
00000140  3f 26 32 32 30 3d 30 3a  3f 26 32 32 31 3d 31 0d  |?&220=0:?&221=1.|
00000150  00 78 0c 20 2a 46 58 31  34 2c 34 0d 00 82 1f 20  |.x. *FX14,4.... |
00000160  f1 27 22 4f 4b 20 2d 20  4c 6f 61 64 69 6e 67 20  |.'"OK - Loading |
00000170  48 79 70 65 72 62 61 6c  6c 22 0d 00 8c 17 20 41  |Hyperball".... A|
00000180  25 3d 91 3a f5 20 fd 20  91 3e 3d 41 25 2b 31 30  |%=.:. . .>=A%+10|
00000190  30 0d 00 96 0a 20 2a 54  41 50 45 0d 00 a0 0b 20  |0.... *TAPE.... |
000001a0  d0 3d 26 45 30 30 0d 00  aa 0d 20 d7 22 48 59 50  |.=&E00.... ."HYP|
000001b0  45 52 22 0d ff                                    |ER"..|
000001b5
Sam13/Hyperball/TapeCheat.m0
Sam13/Hyperball/TapeCheat.m1
Sam13/Hyperball/TapeCheat.m2
Sam13/Hyperball/TapeCheat.m4
Sam13/Hyperball/TapeCheat.m5