� Zenon cheat
� Electron version
:
(�4:�'"Zenon cheat"'
2-L=�num("Number of lives",1,9,"001","009")
</SL=�num("Starting level",1,250,"001","250")
FC� SL<10 � SL$="00"+�(SL) � � SL<100 � SL$="0"+�(SL) � SL$=�(SL)
PC=�(�SL$,1))+&44
ZA=�(�SL$,1))+&44
dB=�(�SL$,2,1))+&44
nf�'"1) ... Repeat laser"'"2) ... Twin shot laser"'"3) ... Machine laser"'"4) ... Atomic blaster":�'
x.wep=�num("Default weapon",1,4,"001","004")
��mc
�"�ask("Infinite lives",inlives)
��ask("Immortal",imm)
�&�ask("Increased energy pods",pods)
�>�'"OK - Insert Zenon tape and press             play ..."'
�	*FX18
�:*K.1 LOAD"START"|F|M145HIMEN=&8000|M180CALL&A10|MRUN|M
��7,21:*FX138,0,129
��
���ask(A$,A%)
�J�;A$;�26-�A$," ");"(Y/N) : ";:A$=�:� A$="Y" � �;"Yes" � �;"No":?A%=&60
��
�ݤnum(A$,L%,M%,L$,M$)

+�;A$;�22-�A$," ");"(";L$;"-";M$;") : ";

'�""a%:� a%<L% � a%>M% � �TDA � =a%

��mc

"�I%=0 � 2 �2

,P%=&A10

6
[OPTI%

@+LDA#i � 256:STA&220:LDA#i � 256:STA&221

JLDA#14:LDX#4:JSR&FFF4

T!LDY#load � 256:LDX#load � 256

^JSR&FFF7

h&LDA#wep:STA&137C:STA&1E8D:STA&2AAC

rLDA#(L+&44):STA&138F

|JSRinlives:JSRimm

�JSRlevel:JSRpods

�LDA#13:LDX#4:JSR&FFF4

�JMP&1100

�.inlives LDA#0:STA&2AA7:RTS

�U.level LDA#&20:STA&193A:LDA#&80:STA&193B:LDA#3:STA&193C:LDA#&EA:STA&193D:STA&193E

�LDA#C:STA&1943

�LDA#SL:STA&1948:RTS

�8.imm LDA#&EA:STA&12CC:STA&12CD:STA&12D2:STA&12D3:RTS

�'.pods LDA#&EA:STA&12B1:STA&12B2:RTS

� .i LDA&3CA:�#254:STA&3CA:RTS

�	.load

�]:$P%="LOAD MC"+�13

�P%=&380:[OPTI%
LDA#A:STA&BE2:LDA#B:RTS
]:�
�
�

00000000  0d 00 0a 11 f4 20 5a 65  6e 6f 6e 20 63 68 65 61  |..... Zenon chea|
00000010  74 0d 00 14 16 f4 20 45  6c 65 63 74 72 6f 6e 20  |t..... Electron |
00000020  76 65 72 73 69 6f 6e 0d  00 1e 05 3a 0d 00 28 17  |version....:..(.|
00000030  eb 34 3a f1 27 22 5a 65  6e 6f 6e 20 63 68 65 61  |.4:.'"Zenon chea|
00000040  74 22 27 0d 00 32 2d 4c  3d a4 6e 75 6d 28 22 4e  |t"'..2-L=.num("N|
00000050  75 6d 62 65 72 20 6f 66  20 6c 69 76 65 73 22 2c  |umber of lives",|
00000060  31 2c 39 2c 22 30 30 31  22 2c 22 30 30 39 22 29  |1,9,"001","009")|
00000070  0d 00 3c 2f 53 4c 3d a4  6e 75 6d 28 22 53 74 61  |..</SL=.num("Sta|
00000080  72 74 69 6e 67 20 6c 65  76 65 6c 22 2c 31 2c 32  |rting level",1,2|
00000090  35 30 2c 22 30 30 31 22  2c 22 32 35 30 22 29 0d  |50,"001","250").|
000000a0  00 46 43 e7 20 53 4c 3c  31 30 20 8c 20 53 4c 24  |.FC. SL<10 . SL$|
000000b0  3d 22 30 30 22 2b c3 28  53 4c 29 20 8b 20 e7 20  |="00"+.(SL) . . |
000000c0  53 4c 3c 31 30 30 20 8c  20 53 4c 24 3d 22 30 22  |SL<100 . SL$="0"|
000000d0  2b c3 28 53 4c 29 20 8b  20 53 4c 24 3d c3 28 53  |+.(SL) . SL$=.(S|
000000e0  4c 29 0d 00 50 14 43 3d  bb 28 c2 53 4c 24 2c 31  |L)..P.C=.(.SL$,1|
000000f0  29 29 2b 26 34 34 0d 00  5a 14 41 3d bb 28 c0 53  |))+&44..Z.A=.(.S|
00000100  4c 24 2c 31 29 29 2b 26  34 34 0d 00 64 16 42 3d  |L$,1))+&44..d.B=|
00000110  bb 28 c1 53 4c 24 2c 32  2c 31 29 29 2b 26 34 34  |.(.SL$,2,1))+&44|
00000120  0d 00 6e 66 f1 27 22 31  29 20 2e 2e 2e 20 52 65  |..nf.'"1) ... Re|
00000130  70 65 61 74 20 6c 61 73  65 72 22 27 22 32 29 20  |peat laser"'"2) |
00000140  2e 2e 2e 20 54 77 69 6e  20 73 68 6f 74 20 6c 61  |... Twin shot la|
00000150  73 65 72 22 27 22 33 29  20 2e 2e 2e 20 4d 61 63  |ser"'"3) ... Mac|
00000160  68 69 6e 65 20 6c 61 73  65 72 22 27 22 34 29 20  |hine laser"'"4) |
00000170  2e 2e 2e 20 41 74 6f 6d  69 63 20 62 6c 61 73 74  |... Atomic blast|
00000180  65 72 22 3a f1 27 0d 00  78 2e 77 65 70 3d a4 6e  |er":.'..x.wep=.n|
00000190  75 6d 28 22 44 65 66 61  75 6c 74 20 77 65 61 70  |um("Default weap|
000001a0  6f 6e 22 2c 31 2c 34 2c  22 30 30 31 22 2c 22 30  |on",1,4,"001","0|
000001b0  30 34 22 29 0d 00 82 07  f2 6d 63 0d 00 8c 22 f2  |04").....mc...".|
000001c0  61 73 6b 28 22 49 6e 66  69 6e 69 74 65 20 6c 69  |ask("Infinite li|
000001d0  76 65 73 22 2c 69 6e 6c  69 76 65 73 29 0d 00 96  |ves",inlives)...|
000001e0  18 f2 61 73 6b 28 22 49  6d 6d 6f 72 74 61 6c 22  |..ask("Immortal"|
000001f0  2c 69 6d 6d 29 0d 00 a0  26 f2 61 73 6b 28 22 49  |,imm)...&.ask("I|
00000200  6e 63 72 65 61 73 65 64  20 65 6e 65 72 67 79 20  |ncreased energy |
00000210  70 6f 64 73 22 2c 70 6f  64 73 29 0d 00 aa 3e f1  |pods",pods)...>.|
00000220  27 22 4f 4b 20 2d 20 49  6e 73 65 72 74 20 5a 65  |'"OK - Insert Ze|
00000230  6e 6f 6e 20 74 61 70 65  20 61 6e 64 20 70 72 65  |non tape and pre|
00000240  73 73 20 20 20 20 20 20  20 20 20 20 20 20 20 70  |ss             p|
00000250  6c 61 79 20 2e 2e 2e 22  27 0d 00 b4 09 2a 46 58  |lay ..."'....*FX|
00000260  31 38 0d 00 be 3a 2a 4b  2e 31 20 4c 4f 41 44 22  |18...:*K.1 LOAD"|
00000270  53 54 41 52 54 22 7c 46  7c 4d 31 34 35 48 49 4d  |START"|F|M145HIM|
00000280  45 4e 3d 26 38 30 30 30  7c 4d 31 38 30 43 41 4c  |EN=&8000|M180CAL|
00000290  4c 26 41 31 30 7c 4d 52  55 4e 7c 4d 0d 00 c8 16  |L&A10|MRUN|M....|
000002a0  ef 37 2c 32 31 3a 2a 46  58 31 33 38 2c 30 2c 31  |.7,21:*FX138,0,1|
000002b0  32 39 0d 00 d2 05 e0 0d  00 dc 10 dd f2 61 73 6b  |29...........ask|
000002c0  28 41 24 2c 41 25 29 0d  00 e6 4a f1 3b 41 24 3b  |(A$,A%)...J.;A$;|
000002d0  c4 32 36 2d a9 41 24 2c  22 20 22 29 3b 22 28 59  |.26-.A$," ");"(Y|
000002e0  2f 4e 29 20 3a 20 22 3b  3a 41 24 3d be 3a e7 20  |/N) : ";:A$=.:. |
000002f0  41 24 3d 22 59 22 20 8c  20 f1 3b 22 59 65 73 22  |A$="Y" . .;"Yes"|
00000300  20 8b 20 f1 3b 22 4e 6f  22 3a 3f 41 25 3d 26 36  | . .;"No":?A%=&6|
00000310  30 0d 00 f0 05 e1 0d 00  fa 19 dd a4 6e 75 6d 28  |0...........num(|
00000320  41 24 2c 4c 25 2c 4d 25  2c 4c 24 2c 4d 24 29 0d  |A$,L%,M%,L$,M$).|
00000330  01 04 2b f1 3b 41 24 3b  c4 32 32 2d a9 41 24 2c  |..+.;A$;.22-.A$,|
00000340  22 20 22 29 3b 22 28 22  3b 4c 24 3b 22 2d 22 3b  |" ");"(";L$;"-";|
00000350  4d 24 3b 22 29 20 3a 20  22 3b 0d 01 0e 27 e8 22  |M$;") : ";...'."|
00000360  22 61 25 3a e7 20 61 25  3c 4c 25 20 84 20 61 25  |"a%:. a%<L% . a%|
00000370  3e 4d 25 20 8c 20 e5 8d  54 44 41 20 8b 20 3d 61  |>M% . ..TDA . =a|
00000380  25 0d 01 18 08 dd f2 6d  63 0d 01 22 10 e3 49 25  |%......mc.."..I%|
00000390  3d 30 20 b8 20 32 20 88  32 0d 01 2c 0b 50 25 3d  |=0 . 2 .2..,.P%=|
000003a0  26 41 31 30 0d 01 36 0a  5b 4f 50 54 49 25 0d 01  |&A10..6.[OPTI%..|
000003b0  40 2b 4c 44 41 23 69 20  83 20 32 35 36 3a 53 54  |@+LDA#i . 256:ST|
000003c0  41 26 32 32 30 3a 4c 44  41 23 69 20 81 20 32 35  |A&220:LDA#i . 25|
000003d0  36 3a 53 54 41 26 32 32  31 0d 01 4a 19 4c 44 41  |6:STA&221..J.LDA|
000003e0  23 31 34 3a 4c 44 58 23  34 3a 4a 53 52 26 46 46  |#14:LDX#4:JSR&FF|
000003f0  46 34 0d 01 54 21 4c 44  59 23 6c 6f 61 64 20 81  |F4..T!LDY#load .|
00000400  20 32 35 36 3a 4c 44 58  23 6c 6f 61 64 20 83 20  | 256:LDX#load . |
00000410  32 35 36 0d 01 5e 0c 4a  53 52 26 46 46 46 37 0d  |256..^.JSR&FFF7.|
00000420  01 68 26 4c 44 41 23 77  65 70 3a 53 54 41 26 31  |.h&LDA#wep:STA&1|
00000430  33 37 43 3a 53 54 41 26  31 45 38 44 3a 53 54 41  |37C:STA&1E8D:STA|
00000440  26 32 41 41 43 0d 01 72  18 4c 44 41 23 28 4c 2b  |&2AAC..r.LDA#(L+|
00000450  26 34 34 29 3a 53 54 41  26 31 33 38 46 0d 01 7c  |&44):STA&138F..||
00000460  15 4a 53 52 69 6e 6c 69  76 65 73 3a 4a 53 52 69  |.JSRinlives:JSRi|
00000470  6d 6d 0d 01 86 14 4a 53  52 6c 65 76 65 6c 3a 4a  |mm....JSRlevel:J|
00000480  53 52 70 6f 64 73 0d 01  90 19 4c 44 41 23 31 33  |SRpods....LDA#13|
00000490  3a 4c 44 58 23 34 3a 4a  53 52 26 46 46 46 34 0d  |:LDX#4:JSR&FFF4.|
000004a0  01 9a 0c 4a 4d 50 26 31  31 30 30 0d 01 a4 1f 2e  |...JMP&1100.....|
000004b0  69 6e 6c 69 76 65 73 20  4c 44 41 23 30 3a 53 54  |inlives LDA#0:ST|
000004c0  41 26 32 41 41 37 3a 52  54 53 0d 01 ae 55 2e 6c  |A&2AA7:RTS...U.l|
000004d0  65 76 65 6c 20 4c 44 41  23 26 32 30 3a 53 54 41  |evel LDA#&20:STA|
000004e0  26 31 39 33 41 3a 4c 44  41 23 26 38 30 3a 53 54  |&193A:LDA#&80:ST|
000004f0  41 26 31 39 33 42 3a 4c  44 41 23 33 3a 53 54 41  |A&193B:LDA#3:STA|
00000500  26 31 39 33 43 3a 4c 44  41 23 26 45 41 3a 53 54  |&193C:LDA#&EA:ST|
00000510  41 26 31 39 33 44 3a 53  54 41 26 31 39 33 45 0d  |A&193D:STA&193E.|
00000520  01 b8 12 4c 44 41 23 43  3a 53 54 41 26 31 39 34  |...LDA#C:STA&194|
00000530  33 0d 01 c2 17 4c 44 41  23 53 4c 3a 53 54 41 26  |3....LDA#SL:STA&|
00000540  31 39 34 38 3a 52 54 53  0d 01 cc 38 2e 69 6d 6d  |1948:RTS...8.imm|
00000550  20 4c 44 41 23 26 45 41  3a 53 54 41 26 31 32 43  | LDA#&EA:STA&12C|
00000560  43 3a 53 54 41 26 31 32  43 44 3a 53 54 41 26 31  |C:STA&12CD:STA&1|
00000570  32 44 32 3a 53 54 41 26  31 32 44 33 3a 52 54 53  |2D2:STA&12D3:RTS|
00000580  0d 01 d6 27 2e 70 6f 64  73 20 4c 44 41 23 26 45  |...'.pods LDA#&E|
00000590  41 3a 53 54 41 26 31 32  42 31 3a 53 54 41 26 31  |A:STA&12B1:STA&1|
000005a0  32 42 32 3a 52 54 53 0d  01 e0 20 2e 69 20 4c 44  |2B2:RTS... .i LD|
000005b0  41 26 33 43 41 3a 80 23  32 35 34 3a 53 54 41 26  |A&3CA:.#254:STA&|
000005c0  33 43 41 3a 52 54 53 0d  01 ea 09 2e 6c 6f 61 64  |3CA:RTS.....load|
000005d0  0d 01 f4 17 5d 3a 24 50  25 3d 22 4c 4f 41 44 20  |....]:$P%="LOAD |
000005e0  4d 43 22 2b bd 31 33 0d  01 fe 12 50 25 3d 26 33  |MC"+.13....P%=&3|
000005f0  38 30 3a 5b 4f 50 54 49  25 0d 02 08 1b 4c 44 41  |80:[OPTI%....LDA|
00000600  23 41 3a 53 54 41 26 42  45 32 3a 4c 44 41 23 42  |#A:STA&BE2:LDA#B|
00000610  3a 52 54 53 0d 02 12 07  5d 3a ed 0d 02 1c 05 e1  |:RTS....]:......|
00000620  0d ff                                             |..|
00000622