� Repton cheat
� Original version
� Electron tape version
(^�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:�'"Repton cheat":�2:�"������������"':�mc1
2�mc
<"�ask("Infinite lives",inlives)
F#�ask("Turn off timer",timeroff)
P%�ask("Immortal to boulders",boff)
Z$�ask("Immortal to lizards",imml)
d�ask("View all maps",maps)
n�passwords
xW�:�a("`OK@ - `Insert @Repton` tape and press            play ..."):�7,13,10,10,17,2
�#�&2A00:�28,0,27,20,23:�"REPTON"
��
���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
�
[OPTI%
�LDY#0:.loop2
�LDA&1600,Y

CMP#13:BEQend

CMP#�"@":BEQcolour1

CMP#�"`":BEQcolour2

"JSR&FFEE

,.backin

6INY:CPY#0:BNEloop2

@.end

JRTS

T.colour1 LDA#2:JMPchange

^.colour2 LDA#3

h.change TAX:LDA#17:JSR&FFEE

r        TXA:JSR&FFEE

|        JMPbackin

�]

��

��

���mc

��I%=0�2 �2

�P%=&900

�
[OPTI%

�PHA:TXA:PHA:TYA:PHA

�LDA&2100:CMP#&09:BNEout

�JSRinlives

�JSRtimeroff

�JSRboff

�JSRimml
JSRmaps
LDA#&0D:LDX#4:JSR&FFF4
%LDAbyte:STA&220:LDAbyte+1:STA&221
&.out PLA:TAY:PLA:TAX:PLA
0RTS
:.byte NOP:NOP
D3.inlives LDA#&EA:STA&1EA6:STA&1EA7:STA&1EA8:RTS
N .timeroff LDA#0:STA&13F6:RTS
X0.boff LDA#&EA:STA&1E42:STA&1E43:STA&1E44:RTS
b0.imml LDA#&EA:STA&208F:STA&2090:STA&2091:RTS
l'.maps LDA#&EA:STA&196D:STA&196E:RTS
v]
�P%=&2A00
�
[OPTI%
�SEI
�%LDA&220:STAbyte:LDA&221:STAbyte+1
�#LDA#&00:STA&220:LDA#&09:STA&221
�LDA#14:LDX#4:JSR&FFF4
�CLI
�RTS
�]:�
�?&2100=0
��
���passwords
�%�1:�'"Passwords":�2:�"���������"'
�I%=0�11 �2:�P$,Q$
C�2:�;�(65+I%);") ";:�3:�;P$;�16-�P$," ");�(66+I%);") ";:�2:�;Q$
�:�
 v� Screen One,Chameleon,Terrapin,Sidewinder,Gecko,Python,Salamander,Iguana,Cuttlefish,Octopus,Giant Clam,The Kraken
�

00000000  0d 00 0a 12 f4 20 52 65  70 74 6f 6e 20 63 68 65  |..... Repton che|
00000010  61 74 0d 00 14 16 f4 20  4f 72 69 67 69 6e 61 6c  |at..... Original|
00000020  20 76 65 72 73 69 6f 6e  0d 00 1e 1b f4 20 45 6c  | version..... El|
00000030  65 63 74 72 6f 6e 20 74  61 70 65 20 76 65 72 73  |ectron tape vers|
00000040  69 6f 6e 0d 00 28 5e eb  31 3a ef 31 39 2c 33 2c  |ion..(^.1:.19,3,|
00000050  36 2c 30 2c 30 2c 30 2c  32 33 2c 32 33 30 2c 30  |6,0,0,0,23,230,0|
00000060  2c 26 46 46 2c 30 2c 26  46 46 2c 30 2c 30 2c 30  |,&FF,0,&FF,0,0,0|
00000070  2c 30 2c 31 37 2c 31 3a  f1 27 22 52 65 70 74 6f  |,0,17,1:.'"Repto|
00000080  6e 20 63 68 65 61 74 22  3a fb 32 3a f1 22 86 86  |n cheat":.2:."..|
00000090  86 86 86 86 86 86 86 86  86 86 22 27 3a f2 6d 63  |.........."':.mc|
000000a0  31 0d 00 32 07 f2 6d 63  0d 00 3c 22 f2 61 73 6b  |1..2..mc..<".ask|
000000b0  28 22 49 6e 66 69 6e 69  74 65 20 6c 69 76 65 73  |("Infinite lives|
000000c0  22 2c 69 6e 6c 69 76 65  73 29 0d 00 46 23 f2 61  |",inlives)..F#.a|
000000d0  73 6b 28 22 54 75 72 6e  20 6f 66 66 20 74 69 6d  |sk("Turn off tim|
000000e0  65 72 22 2c 74 69 6d 65  72 6f 66 66 29 0d 00 50  |er",timeroff)..P|
000000f0  25 f2 61 73 6b 28 22 49  6d 6d 6f 72 74 61 6c 20  |%.ask("Immortal |
00000100  74 6f 20 62 6f 75 6c 64  65 72 73 22 2c 62 6f 66  |to boulders",bof|
00000110  66 29 0d 00 5a 24 f2 61  73 6b 28 22 49 6d 6d 6f  |f)..Z$.ask("Immo|
00000120  72 74 61 6c 20 74 6f 20  6c 69 7a 61 72 64 73 22  |rtal to lizards"|
00000130  2c 69 6d 6d 6c 29 0d 00  64 1e f2 61 73 6b 28 22  |,imml)..d..ask("|
00000140  56 69 65 77 20 61 6c 6c  20 6d 61 70 73 22 2c 6d  |View all maps",m|
00000150  61 70 73 29 0d 00 6e 0e  f2 70 61 73 73 77 6f 72  |aps)..n..passwor|
00000160  64 73 0d 00 78 57 f1 3a  f2 61 28 22 60 4f 4b 40  |ds..xW.:.a("`OK@|
00000170  20 2d 20 60 49 6e 73 65  72 74 20 40 52 65 70 74  | - `Insert @Rept|
00000180  6f 6e 60 20 74 61 70 65  20 61 6e 64 20 70 72 65  |on` tape and pre|
00000190  73 73 20 20 20 20 20 20  20 20 20 20 20 20 70 6c  |ss            pl|
000001a0  61 79 20 2e 2e 2e 22 29  3a ef 37 2c 31 33 2c 31  |ay ..."):.7,13,1|
000001b0  30 2c 31 30 2c 31 37 2c  32 0d 00 82 23 d6 26 32  |0,10,17,2...#.&2|
000001c0  41 30 30 3a ef 32 38 2c  30 2c 32 37 2c 32 30 2c  |A00:.28,0,27,20,|
000001d0  32 33 3a d7 22 52 45 50  54 4f 4e 22 0d 00 8c 05  |23:."REPTON"....|
000001e0  e0 0d 00 96 10 dd f2 61  73 6b 28 41 24 2c 41 25  |.......ask(A$,A%|
000001f0  29 0d 00 a0 52 f2 61 28  22 60 22 2b 41 24 2b c4  |)...R.a("`"+A$+.|
00000200  32 35 2d a9 41 24 2c 22  20 22 29 2b 22 40 28 59  |25-.A$," ")+"@(Y|
00000210  2f 4e 29 60 20 3a 20 40  22 29 3a 41 24 3d be 3a  |/N)` : @"):A$=.:|
00000220  e7 20 41 24 3d 22 59 22  20 8c 20 f1 3b 22 59 65  |. A$="Y" . .;"Ye|
00000230  73 22 20 8b 20 f1 3b 22  4e 6f 22 3a 3f 41 25 3d  |s" . .;"No":?A%=|
00000240  26 36 30 0d 00 aa 05 e1  0d 00 b4 0f dd f2 61 28  |&60...........a(|
00000250  24 26 31 36 30 30 29 0d  00 be 0c d6 26 31 37 30  |$&1600).....&170|
00000260  30 3a e1 0d 00 c8 09 dd  f2 6d 63 31 0d 00 d2 0e  |0:.......mc1....|
00000270  e3 49 25 3d 30 b8 32 20  88 32 0d 00 dc 0c 50 25  |.I%=0.2 .2....P%|
00000280  3d 26 31 37 30 30 0d 00  e6 0a 5b 4f 50 54 49 25  |=&1700....[OPTI%|
00000290  0d 00 f0 10 4c 44 59 23  30 3a 2e 6c 6f 6f 70 32  |....LDY#0:.loop2|
000002a0  0d 00 fa 0e 4c 44 41 26  31 36 30 30 2c 59 0d 01  |....LDA&1600,Y..|
000002b0  04 11 43 4d 50 23 31 33  3a 42 45 51 65 6e 64 0d  |..CMP#13:BEQend.|
000002c0  01 0e 17 43 4d 50 23 97  22 40 22 3a 42 45 51 63  |...CMP#."@":BEQc|
000002d0  6f 6c 6f 75 72 31 0d 01  18 17 43 4d 50 23 97 22  |olour1....CMP#."|
000002e0  60 22 3a 42 45 51 63 6f  6c 6f 75 72 32 0d 01 22  |`":BEQcolour2.."|
000002f0  0c 4a 53 52 26 46 46 45  45 0d 01 2c 0b 2e 62 61  |.JSR&FFEE..,..ba|
00000300  63 6b 69 6e 0d 01 36 16  49 4e 59 3a 43 50 59 23  |ckin..6.INY:CPY#|
00000310  30 3a 42 4e 45 6c 6f 6f  70 32 0d 01 40 08 2e 65  |0:BNEloop2..@..e|
00000320  6e 64 0d 01 4a 07 52 54  53 0d 01 54 1c 2e 63 6f  |nd..J.RTS..T..co|
00000330  6c 6f 75 72 31 20 4c 44  41 23 32 3a 4a 4d 50 63  |lour1 LDA#2:JMPc|
00000340  68 61 6e 67 65 0d 01 5e  12 2e 63 6f 6c 6f 75 72  |hange..^..colour|
00000350  32 20 4c 44 41 23 33 0d  01 68 1f 2e 63 68 61 6e  |2 LDA#3..h..chan|
00000360  67 65 20 54 41 58 3a 4c  44 41 23 31 37 3a 4a 53  |ge TAX:LDA#17:JS|
00000370  52 26 46 46 45 45 0d 01  72 18 20 20 20 20 20 20  |R&FFEE..r.      |
00000380  20 20 54 58 41 3a 4a 53  52 26 46 46 45 45 0d 01  |  TXA:JSR&FFEE..|
00000390  7c 15 20 20 20 20 20 20  20 20 4a 4d 50 62 61 63  ||.        JMPbac|
000003a0  6b 69 6e 0d 01 86 05 5d  0d 01 90 05 ed 0d 01 9a  |kin....]........|
000003b0  05 e1 0d 01 a4 08 dd f2  6d 63 0d 01 ae 0e e3 49  |........mc.....I|
000003c0  25 3d 30 b8 32 20 88 32  0d 01 b8 0b 50 25 3d 26  |%=0.2 .2....P%=&|
000003d0  39 30 30 0d 01 c2 0a 5b  4f 50 54 49 25 0d 01 cc  |900....[OPTI%...|
000003e0  17 50 48 41 3a 54 58 41  3a 50 48 41 3a 54 59 41  |.PHA:TXA:PHA:TYA|
000003f0  3a 50 48 41 0d 01 d6 1b  4c 44 41 26 32 31 30 30  |:PHA....LDA&2100|
00000400  3a 43 4d 50 23 26 30 39  3a 42 4e 45 6f 75 74 0d  |:CMP#&09:BNEout.|
00000410  01 e0 0e 4a 53 52 69 6e  6c 69 76 65 73 0d 01 ea  |...JSRinlives...|
00000420  0f 4a 53 52 74 69 6d 65  72 6f 66 66 0d 01 f4 0b  |.JSRtimeroff....|
00000430  4a 53 52 62 6f 66 66 0d  01 fe 0b 4a 53 52 69 6d  |JSRboff....JSRim|
00000440  6d 6c 0d 02 08 0b 4a 53  52 6d 61 70 73 0d 02 12  |ml....JSRmaps...|
00000450  1a 4c 44 41 23 26 30 44  3a 4c 44 58 23 34 3a 4a  |.LDA#&0D:LDX#4:J|
00000460  53 52 26 46 46 46 34 0d  02 1c 25 4c 44 41 62 79  |SR&FFF4...%LDAby|
00000470  74 65 3a 53 54 41 26 32  32 30 3a 4c 44 41 62 79  |te:STA&220:LDAby|
00000480  74 65 2b 31 3a 53 54 41  26 32 32 31 0d 02 26 1c  |te+1:STA&221..&.|
00000490  2e 6f 75 74 20 50 4c 41  3a 54 41 59 3a 50 4c 41  |.out PLA:TAY:PLA|
000004a0  3a 54 41 58 3a 50 4c 41  0d 02 30 07 52 54 53 0d  |:TAX:PLA..0.RTS.|
000004b0  02 3a 11 2e 62 79 74 65  20 4e 4f 50 3a 4e 4f 50  |.:..byte NOP:NOP|
000004c0  0d 02 44 33 2e 69 6e 6c  69 76 65 73 20 4c 44 41  |..D3.inlives LDA|
000004d0  23 26 45 41 3a 53 54 41  26 31 45 41 36 3a 53 54  |#&EA:STA&1EA6:ST|
000004e0  41 26 31 45 41 37 3a 53  54 41 26 31 45 41 38 3a  |A&1EA7:STA&1EA8:|
000004f0  52 54 53 0d 02 4e 20 2e  74 69 6d 65 72 6f 66 66  |RTS..N .timeroff|
00000500  20 4c 44 41 23 30 3a 53  54 41 26 31 33 46 36 3a  | LDA#0:STA&13F6:|
00000510  52 54 53 0d 02 58 30 2e  62 6f 66 66 20 4c 44 41  |RTS..X0.boff LDA|
00000520  23 26 45 41 3a 53 54 41  26 31 45 34 32 3a 53 54  |#&EA:STA&1E42:ST|
00000530  41 26 31 45 34 33 3a 53  54 41 26 31 45 34 34 3a  |A&1E43:STA&1E44:|
00000540  52 54 53 0d 02 62 30 2e  69 6d 6d 6c 20 4c 44 41  |RTS..b0.imml LDA|
00000550  23 26 45 41 3a 53 54 41  26 32 30 38 46 3a 53 54  |#&EA:STA&208F:ST|
00000560  41 26 32 30 39 30 3a 53  54 41 26 32 30 39 31 3a  |A&2090:STA&2091:|
00000570  52 54 53 0d 02 6c 27 2e  6d 61 70 73 20 4c 44 41  |RTS..l'.maps LDA|
00000580  23 26 45 41 3a 53 54 41  26 31 39 36 44 3a 53 54  |#&EA:STA&196D:ST|
00000590  41 26 31 39 36 45 3a 52  54 53 0d 02 76 05 5d 0d  |A&196E:RTS..v.].|
000005a0  02 80 0c 50 25 3d 26 32  41 30 30 0d 02 8a 0a 5b  |...P%=&2A00....[|
000005b0  4f 50 54 49 25 0d 02 94  07 53 45 49 0d 02 9e 25  |OPTI%....SEI...%|
000005c0  4c 44 41 26 32 32 30 3a  53 54 41 62 79 74 65 3a  |LDA&220:STAbyte:|
000005d0  4c 44 41 26 32 32 31 3a  53 54 41 62 79 74 65 2b  |LDA&221:STAbyte+|
000005e0  31 0d 02 a8 23 4c 44 41  23 26 30 30 3a 53 54 41  |1...#LDA#&00:STA|
000005f0  26 32 32 30 3a 4c 44 41  23 26 30 39 3a 53 54 41  |&220:LDA#&09:STA|
00000600  26 32 32 31 0d 02 b2 19  4c 44 41 23 31 34 3a 4c  |&221....LDA#14:L|
00000610  44 58 23 34 3a 4a 53 52  26 46 46 46 34 0d 02 bc  |DX#4:JSR&FFF4...|
00000620  07 43 4c 49 0d 02 c6 07  52 54 53 0d 02 d0 07 5d  |.CLI....RTS....]|
00000630  3a ed 0d 02 da 0c 3f 26  32 31 30 30 3d 30 0d 02  |:.....?&2100=0..|
00000640  e4 05 e1 0d 02 ee 0f dd  f2 70 61 73 73 77 6f 72  |.........passwor|
00000650  64 73 0d 02 f8 25 fb 31  3a f1 27 22 50 61 73 73  |ds...%.1:.'"Pass|
00000660  77 6f 72 64 73 22 3a fb  32 3a f1 22 86 86 86 86  |words":.2:."....|
00000670  86 86 86 86 86 22 27 0d  03 02 16 e3 49 25 3d 30  |....."'.....I%=0|
00000680  b8 31 31 20 88 32 3a f3  50 24 2c 51 24 0d 03 0c  |.11 .2:.P$,Q$...|
00000690  43 fb 32 3a f1 3b bd 28  36 35 2b 49 25 29 3b 22  |C.2:.;.(65+I%);"|
000006a0  29 20 22 3b 3a fb 33 3a  f1 3b 50 24 3b c4 31 36  |) ";:.3:.;P$;.16|
000006b0  2d a9 50 24 2c 22 20 22  29 3b bd 28 36 36 2b 49  |-.P$," ");.(66+I|
000006c0  25 29 3b 22 29 20 22 3b  3a fb 32 3a f1 3b 51 24  |%);") ";:.2:.;Q$|
000006d0  0d 03 16 07 ed 3a e1 0d  03 20 76 dc 20 53 63 72  |.....:... v. Scr|
000006e0  65 65 6e 20 4f 6e 65 2c  43 68 61 6d 65 6c 65 6f  |een One,Chameleo|
000006f0  6e 2c 54 65 72 72 61 70  69 6e 2c 53 69 64 65 77  |n,Terrapin,Sidew|
00000700  69 6e 64 65 72 2c 47 65  63 6b 6f 2c 50 79 74 68  |inder,Gecko,Pyth|
00000710  6f 6e 2c 53 61 6c 61 6d  61 6e 64 65 72 2c 49 67  |on,Salamander,Ig|
00000720  75 61 6e 61 2c 43 75 74  74 6c 65 66 69 73 68 2c  |uana,Cuttlefish,|
00000730  4f 63 74 6f 70 75 73 2c  47 69 61 6e 74 20 43 6c  |Octopus,Giant Cl|
00000740  61 6d 2c 54 68 65 20 4b  72 61 6b 65 6e 0d ff     |am,The Kraken..|
0000074f