*|

� Round Ones cheat
� Electron tape version
d�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0:�2:�'"Round Ones cheat":�1:�"����������������"':�mc1
(�mc
2&�ask("Infinite B.A.L.L.s",inballs)
<*�ask("Infinite force shield",inshield)
FM�:�a("`OK @- `Insert @Round Ones` tape and press        `play ..."):�':�2
P�install
Z�=&E00:�"ROUND_ONES"
d�
n��ask(A$,A%)
xR�a("`"+A$+�22-�A$," ")+" @(Y/N) `: @"):A$=�:�A$="Y" � �;"Yes" � �;"No":?A%=&60
��
���mc
��I%=0�2 �2
�P%=&2400
�
[OPTI%
�PHP:PHA
�LDA&2000:CMP#7:BNEout
�JSRinballs:JSRinshield
�%LDAbyte:STA&204:LDAbyte+1:STA&205
�.out
�PLA:PLP:JMP(byte)
�.byte NOP:NOP
�i.inballs LDA#&EA:STA&1684:STA&1685:STA&1686:STA&1957:STA&1958:STA&1959:STA&1BEF:STA&1BF0:STA&1BF1:RTS

4.inshield LDA#&EA:STA&1515:STA&1516:STA&1517:RTS

.install SEI

LDA#0:STA&2000

"%LDA&204:STAbyte:LDA&205:STAbyte+1

,!LDA#0:STA&204:LDA#&24:STA&205

6CLI:RTS

@]:�

J�

T	��mc1

^��I%=0�2 �2:P%=&1700:[OPTI%:LDY#0:.loop2 LDA&1600,Y:CMP#13:BEQend:CMP#�"@":BEQcolour1:CMP#�"`":BEQcolour2:JSR&FFEE:.backin:INY:CPY#0:BNEloop2:.end:RTS

h^.colour1 LDA#2:JMPchange:.colour2 LDA#3:.change TAX:LDA#17:JSR&FFEE:TXA:JSR&FFEE:JMPbackin

r	]:�:�

|��a($&1600)

��&1700:�
�

00000000  0d 00 01 07 2a 7c 15 0d  00 0a 16 f4 20 52 6f 75  |....*|...... Rou|
00000010  6e 64 20 4f 6e 65 73 20  63 68 65 61 74 0d 00 14  |nd Ones cheat...|
00000020  1b f4 20 45 6c 65 63 74  72 6f 6e 20 74 61 70 65  |.. Electron tape|
00000030  20 76 65 72 73 69 6f 6e  0d 00 1e 64 eb 31 3a ef  | version...d.1:.|
00000040  31 39 2c 33 2c 36 2c 30  2c 30 2c 30 2c 32 33 2c  |19,3,6,0,0,0,23,|
00000050  32 33 30 2c 30 2c 26 46  46 2c 30 2c 26 46 46 2c  |230,0,&FF,0,&FF,|
00000060  30 2c 30 2c 30 2c 30 3a  fb 32 3a f1 27 22 52 6f  |0,0,0,0:.2:.'"Ro|
00000070  75 6e 64 20 4f 6e 65 73  20 63 68 65 61 74 22 3a  |und Ones cheat":|
00000080  fb 31 3a f1 22 86 86 86  86 86 86 86 86 86 86 86  |.1:."...........|
00000090  86 86 86 86 86 22 27 3a  f2 6d 63 31 0d 00 28 07  |....."':.mc1..(.|
000000a0  f2 6d 63 0d 00 32 26 f2  61 73 6b 28 22 49 6e 66  |.mc..2&.ask("Inf|
000000b0  69 6e 69 74 65 20 42 2e  41 2e 4c 2e 4c 2e 73 22  |inite B.A.L.L.s"|
000000c0  2c 69 6e 62 61 6c 6c 73  29 0d 00 3c 2a f2 61 73  |,inballs)..<*.as|
000000d0  6b 28 22 49 6e 66 69 6e  69 74 65 20 66 6f 72 63  |k("Infinite forc|
000000e0  65 20 73 68 69 65 6c 64  22 2c 69 6e 73 68 69 65  |e shield",inshie|
000000f0  6c 64 29 0d 00 46 4d f1  3a f2 61 28 22 60 4f 4b  |ld)..FM.:.a("`OK|
00000100  20 40 2d 20 60 49 6e 73  65 72 74 20 40 52 6f 75  | @- `Insert @Rou|
00000110  6e 64 20 4f 6e 65 73 60  20 74 61 70 65 20 61 6e  |nd Ones` tape an|
00000120  64 20 70 72 65 73 73 20  20 20 20 20 20 20 20 60  |d press        `|
00000130  70 6c 61 79 20 2e 2e 2e  22 29 3a f1 27 3a fb 32  |play ..."):.':.2|
00000140  0d 00 50 0c d6 69 6e 73  74 61 6c 6c 0d 00 5a 18  |..P..install..Z.|
00000150  d0 3d 26 45 30 30 3a d7  22 52 4f 55 4e 44 5f 4f  |.=&E00:."ROUND_O|
00000160  4e 45 53 22 0d 00 64 05  e0 0d 00 6e 10 dd f2 61  |NES"..d....n...a|
00000170  73 6b 28 41 24 2c 41 25  29 0d 00 78 52 f2 61 28  |sk(A$,A%)..xR.a(|
00000180  22 60 22 2b 41 24 2b c4  32 32 2d a9 41 24 2c 22  |"`"+A$+.22-.A$,"|
00000190  20 22 29 2b 22 20 40 28  59 2f 4e 29 20 60 3a 20  | ")+" @(Y/N) `: |
000001a0  40 22 29 3a 41 24 3d be  3a e7 41 24 3d 22 59 22  |@"):A$=.:.A$="Y"|
000001b0  20 8c 20 f1 3b 22 59 65  73 22 20 8b 20 f1 3b 22  | . .;"Yes" . .;"|
000001c0  4e 6f 22 3a 3f 41 25 3d  26 36 30 0d 00 82 05 e1  |No":?A%=&60.....|
000001d0  0d 00 8c 08 dd f2 6d 63  0d 00 96 0e e3 49 25 3d  |......mc.....I%=|
000001e0  30 b8 32 20 88 32 0d 00  a0 0c 50 25 3d 26 32 34  |0.2 .2....P%=&24|
000001f0  30 30 0d 00 aa 0a 5b 4f  50 54 49 25 0d 00 b4 0b  |00....[OPTI%....|
00000200  50 48 50 3a 50 48 41 0d  00 be 19 4c 44 41 26 32  |PHP:PHA....LDA&2|
00000210  30 30 30 3a 43 4d 50 23  37 3a 42 4e 45 6f 75 74  |000:CMP#7:BNEout|
00000220  0d 00 c8 1a 4a 53 52 69  6e 62 61 6c 6c 73 3a 4a  |....JSRinballs:J|
00000230  53 52 69 6e 73 68 69 65  6c 64 0d 00 d2 25 4c 44  |SRinshield...%LD|
00000240  41 62 79 74 65 3a 53 54  41 26 32 30 34 3a 4c 44  |Abyte:STA&204:LD|
00000250  41 62 79 74 65 2b 31 3a  53 54 41 26 32 30 35 0d  |Abyte+1:STA&205.|
00000260  00 dc 08 2e 6f 75 74 0d  00 e6 15 50 4c 41 3a 50  |....out....PLA:P|
00000270  4c 50 3a 4a 4d 50 28 62  79 74 65 29 0d 00 f0 11  |LP:JMP(byte)....|
00000280  2e 62 79 74 65 20 4e 4f  50 3a 4e 4f 50 0d 00 fa  |.byte NOP:NOP...|
00000290  69 2e 69 6e 62 61 6c 6c  73 20 4c 44 41 23 26 45  |i.inballs LDA#&E|
000002a0  41 3a 53 54 41 26 31 36  38 34 3a 53 54 41 26 31  |A:STA&1684:STA&1|
000002b0  36 38 35 3a 53 54 41 26  31 36 38 36 3a 53 54 41  |685:STA&1686:STA|
000002c0  26 31 39 35 37 3a 53 54  41 26 31 39 35 38 3a 53  |&1957:STA&1958:S|
000002d0  54 41 26 31 39 35 39 3a  53 54 41 26 31 42 45 46  |TA&1959:STA&1BEF|
000002e0  3a 53 54 41 26 31 42 46  30 3a 53 54 41 26 31 42  |:STA&1BF0:STA&1B|
000002f0  46 31 3a 52 54 53 0d 01  04 34 2e 69 6e 73 68 69  |F1:RTS...4.inshi|
00000300  65 6c 64 20 4c 44 41 23  26 45 41 3a 53 54 41 26  |eld LDA#&EA:STA&|
00000310  31 35 31 35 3a 53 54 41  26 31 35 31 36 3a 53 54  |1515:STA&1516:ST|
00000320  41 26 31 35 31 37 3a 52  54 53 0d 01 0e 10 2e 69  |A&1517:RTS.....i|
00000330  6e 73 74 61 6c 6c 20 53  45 49 0d 01 18 12 4c 44  |nstall SEI....LD|
00000340  41 23 30 3a 53 54 41 26  32 30 30 30 0d 01 22 25  |A#0:STA&2000.."%|
00000350  4c 44 41 26 32 30 34 3a  53 54 41 62 79 74 65 3a  |LDA&204:STAbyte:|
00000360  4c 44 41 26 32 30 35 3a  53 54 41 62 79 74 65 2b  |LDA&205:STAbyte+|
00000370  31 0d 01 2c 21 4c 44 41  23 30 3a 53 54 41 26 32  |1..,!LDA#0:STA&2|
00000380  30 34 3a 4c 44 41 23 26  32 34 3a 53 54 41 26 32  |04:LDA#&24:STA&2|
00000390  30 35 0d 01 36 0b 43 4c  49 3a 52 54 53 0d 01 40  |05..6.CLI:RTS..@|
000003a0  07 5d 3a ed 0d 01 4a 05  e1 0d 01 54 09 dd f2 6d  |.]:...J....T...m|
000003b0  63 31 0d 01 5e 99 e3 49  25 3d 30 b8 32 20 88 32  |c1..^..I%=0.2 .2|
000003c0  3a 50 25 3d 26 31 37 30  30 3a 5b 4f 50 54 49 25  |:P%=&1700:[OPTI%|
000003d0  3a 4c 44 59 23 30 3a 2e  6c 6f 6f 70 32 20 4c 44  |:LDY#0:.loop2 LD|
000003e0  41 26 31 36 30 30 2c 59  3a 43 4d 50 23 31 33 3a  |A&1600,Y:CMP#13:|
000003f0  42 45 51 65 6e 64 3a 43  4d 50 23 97 22 40 22 3a  |BEQend:CMP#."@":|
00000400  42 45 51 63 6f 6c 6f 75  72 31 3a 43 4d 50 23 97  |BEQcolour1:CMP#.|
00000410  22 60 22 3a 42 45 51 63  6f 6c 6f 75 72 32 3a 4a  |"`":BEQcolour2:J|
00000420  53 52 26 46 46 45 45 3a  2e 62 61 63 6b 69 6e 3a  |SR&FFEE:.backin:|
00000430  49 4e 59 3a 43 50 59 23  30 3a 42 4e 45 6c 6f 6f  |INY:CPY#0:BNEloo|
00000440  70 32 3a 2e 65 6e 64 3a  52 54 53 0d 01 68 5e 2e  |p2:.end:RTS..h^.|
00000450  63 6f 6c 6f 75 72 31 20  4c 44 41 23 32 3a 4a 4d  |colour1 LDA#2:JM|
00000460  50 63 68 61 6e 67 65 3a  2e 63 6f 6c 6f 75 72 32  |Pchange:.colour2|
00000470  20 4c 44 41 23 33 3a 2e  63 68 61 6e 67 65 20 54  | LDA#3:.change T|
00000480  41 58 3a 4c 44 41 23 31  37 3a 4a 53 52 26 46 46  |AX:LDA#17:JSR&FF|
00000490  45 45 3a 54 58 41 3a 4a  53 52 26 46 46 45 45 3a  |EE:TXA:JSR&FFEE:|
000004a0  4a 4d 50 62 61 63 6b 69  6e 0d 01 72 09 5d 3a ed  |JMPbackin..r.]:.|
000004b0  3a e1 0d 01 7c 0f dd f2  61 28 24 26 31 36 30 30  |:...|...a($&1600|
000004c0  29 0d 01 86 0c d6 26 31  37 30 30 3a e1 0d ff     |).....&1700:...|
000004cf