� Quest cheat
� Electron tape version
\�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0,17,1:�'"Quest cheat":�2:�"�����������"':�mc1
(�mc
2$�yn("Infinite energy",in_energy)
<�yn("Immortal",immortal)
F �yn("Infinite zaps",in_zaps)
P'�yn("Reincarnation option",reincar)
Z8�n("Diamonds to collect","(001-012)",1,12,install+1)
d�'
xE�a("`OK @-` Insert @Quest` cassette and press         play ....")
�(�':�17,2,28,0,20,20,15:*L.QUEST 2E00
�(*K.1 LO."NEXT"|F|M140CALL&A10|MRUN|M
��21:*FX138,0,129
��
���n(A$,B$,L%,M%,A%)
�0�a("`"+A$+�21-�A$," ")+"@"+B$+"` : @"):�""B%
�$� B%<L% � B%>M% � �7,11,13:�tt@
�?A%=B%:�
���mc
��I%=0�2 �2
�P%=&A10
�
[OPTI%
� LDY#load � 256:LDX#load �256

JSR&FFF7

LDA#&0D:LDX#4:JSR&FFF4

.install

"LDA#0:STA&24EF:\ diamonds

,JSRin_zaps

6JSRreincar

@JSRimmortal

JJSRin_energy

TJMP&5980

^.in_zaps

h	LDY#3

r	.loop

| LDAdata,Y:STA&48F0,Y:DEY:TYA

�BNEloop:RTS

�.data EQUD &A18508A9

�.reincar

�LDA#&EA:STA&3D6F:STA&3D70

�RTS

�
.immortal

�LDA#&A9:STA&438F

�LDA#&01:STA&4390

�RTS

�.in_energy

�LDA#&A9:STA&3D5B

�LDA#&00:STA&3D5C

�RTS
.load EQUS"L.QUEST1"
      EQUB&0D
]
&�
0�
:��yn(A$,A%)
DR�a("`"+A$+�25-�A$," ")+"@(Y/N)` : @"):A$=�:� A$="Y" � �;"Yes" � �;"No":?A%=&60
N�
X��a($&1600)
b�&1700:�
l	��mc1
v�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
�.colour1 LDA#2:JMPchange
.colour2 LDA#3
.change TAX:LDA#17:JSR&FFEE
        TXA:JSR&FFEE
         JMPbackin
*]
4�
>�
�

00000000  0d 00 0a 11 f4 20 51 75  65 73 74 20 63 68 65 61  |..... Quest chea|
00000010  74 0d 00 14 1b f4 20 45  6c 65 63 74 72 6f 6e 20  |t..... Electron |
00000020  74 61 70 65 20 76 65 72  73 69 6f 6e 0d 00 1e 5c  |tape version...\|
00000030  eb 31 3a ef 31 39 2c 33  2c 36 2c 30 2c 30 2c 30  |.1:.19,3,6,0,0,0|
00000040  2c 32 33 2c 32 33 30 2c  30 2c 26 46 46 2c 30 2c  |,23,230,0,&FF,0,|
00000050  26 46 46 2c 30 2c 30 2c  30 2c 30 2c 31 37 2c 31  |&FF,0,0,0,0,17,1|
00000060  3a f1 27 22 51 75 65 73  74 20 63 68 65 61 74 22  |:.'"Quest cheat"|
00000070  3a fb 32 3a f1 22 86 86  86 86 86 86 86 86 86 86  |:.2:."..........|
00000080  86 22 27 3a f2 6d 63 31  0d 00 28 07 f2 6d 63 0d  |."':.mc1..(..mc.|
00000090  00 32 24 f2 79 6e 28 22  49 6e 66 69 6e 69 74 65  |.2$.yn("Infinite|
000000a0  20 65 6e 65 72 67 79 22  2c 69 6e 5f 65 6e 65 72  | energy",in_ener|
000000b0  67 79 29 0d 00 3c 1c f2  79 6e 28 22 49 6d 6d 6f  |gy)..<..yn("Immo|
000000c0  72 74 61 6c 22 2c 69 6d  6d 6f 72 74 61 6c 29 0d  |rtal",immortal).|
000000d0  00 46 20 f2 79 6e 28 22  49 6e 66 69 6e 69 74 65  |.F .yn("Infinite|
000000e0  20 7a 61 70 73 22 2c 69  6e 5f 7a 61 70 73 29 0d  | zaps",in_zaps).|
000000f0  00 50 27 f2 79 6e 28 22  52 65 69 6e 63 61 72 6e  |.P'.yn("Reincarn|
00000100  61 74 69 6f 6e 20 6f 70  74 69 6f 6e 22 2c 72 65  |ation option",re|
00000110  69 6e 63 61 72 29 0d 00  5a 38 f2 6e 28 22 44 69  |incar)..Z8.n("Di|
00000120  61 6d 6f 6e 64 73 20 74  6f 20 63 6f 6c 6c 65 63  |amonds to collec|
00000130  74 22 2c 22 28 30 30 31  2d 30 31 32 29 22 2c 31  |t","(001-012)",1|
00000140  2c 31 32 2c 69 6e 73 74  61 6c 6c 2b 31 29 0d 00  |,12,install+1)..|
00000150  64 06 f1 27 0d 00 78 45  f2 61 28 22 60 4f 4b 20  |d..'..xE.a("`OK |
00000160  40 2d 60 20 49 6e 73 65  72 74 20 40 51 75 65 73  |@-` Insert @Ques|
00000170  74 60 20 63 61 73 73 65  74 74 65 20 61 6e 64 20  |t` cassette and |
00000180  70 72 65 73 73 20 20 20  20 20 20 20 20 20 70 6c  |press         pl|
00000190  61 79 20 2e 2e 2e 2e 22  29 0d 00 82 28 f1 27 3a  |ay ....")...(.':|
000001a0  ef 31 37 2c 32 2c 32 38  2c 30 2c 32 30 2c 32 30  |.17,2,28,0,20,20|
000001b0  2c 31 35 3a 2a 4c 2e 51  55 45 53 54 20 32 45 30  |,15:*L.QUEST 2E0|
000001c0  30 0d 00 8c 28 2a 4b 2e  31 20 4c 4f 2e 22 4e 45  |0...(*K.1 LO."NE|
000001d0  58 54 22 7c 46 7c 4d 31  34 30 43 41 4c 4c 26 41  |XT"|F|M140CALL&A|
000001e0  31 30 7c 4d 52 55 4e 7c  4d 0d 00 96 14 ef 32 31  |10|MRUN|M.....21|
000001f0  3a 2a 46 58 31 33 38 2c  30 2c 31 32 39 0d 00 a0  |:*FX138,0,129...|
00000200  05 e0 0d 00 aa 17 dd f2  6e 28 41 24 2c 42 24 2c  |........n(A$,B$,|
00000210  4c 25 2c 4d 25 2c 41 25  29 0d 00 b4 30 f2 61 28  |L%,M%,A%)...0.a(|
00000220  22 60 22 2b 41 24 2b c4  32 31 2d a9 41 24 2c 22  |"`"+A$+.21-.A$,"|
00000230  20 22 29 2b 22 40 22 2b  42 24 2b 22 60 20 3a 20  | ")+"@"+B$+"` : |
00000240  40 22 29 3a e8 22 22 42  25 0d 00 be 24 e7 20 42  |@"):.""B%...$. B|
00000250  25 3c 4c 25 20 84 20 42  25 3e 4d 25 20 8c 20 ef  |%<L% . B%>M% . .|
00000260  37 2c 31 31 2c 31 33 3a  e5 8d 74 74 40 0d 00 c8  |7,11,13:..tt@...|
00000270  0c 3f 41 25 3d 42 25 3a  e1 0d 00 d2 08 dd f2 6d  |.?A%=B%:.......m|
00000280  63 0d 00 dc 0e e3 49 25  3d 30 b8 32 20 88 32 0d  |c.....I%=0.2 .2.|
00000290  00 e6 0b 50 25 3d 26 41  31 30 0d 00 f0 0a 5b 4f  |...P%=&A10....[O|
000002a0  50 54 49 25 0d 00 fa 20  4c 44 59 23 6c 6f 61 64  |PTI%... LDY#load|
000002b0  20 81 20 32 35 36 3a 4c  44 58 23 6c 6f 61 64 20  | . 256:LDX#load |
000002c0  83 32 35 36 0d 01 04 0c  4a 53 52 26 46 46 46 37  |.256....JSR&FFF7|
000002d0  0d 01 0e 1a 4c 44 41 23  26 30 44 3a 4c 44 58 23  |....LDA#&0D:LDX#|
000002e0  34 3a 4a 53 52 26 46 46  46 34 0d 01 18 0c 2e 69  |4:JSR&FFF4.....i|
000002f0  6e 73 74 61 6c 6c 0d 01  22 1d 4c 44 41 23 30 3a  |nstall..".LDA#0:|
00000300  53 54 41 26 32 34 45 46  3a 5c 20 64 69 61 6d 6f  |STA&24EF:\ diamo|
00000310  6e 64 73 0d 01 2c 0e 4a  53 52 69 6e 5f 7a 61 70  |nds..,.JSRin_zap|
00000320  73 0d 01 36 0e 4a 53 52  72 65 69 6e 63 61 72 0d  |s..6.JSRreincar.|
00000330  01 40 0f 4a 53 52 69 6d  6d 6f 72 74 61 6c 0d 01  |.@.JSRimmortal..|
00000340  4a 10 4a 53 52 69 6e 5f  65 6e 65 72 67 79 0d 01  |J.JSRin_energy..|
00000350  54 0c 4a 4d 50 26 35 39  38 30 0d 01 5e 0c 2e 69  |T.JMP&5980..^..i|
00000360  6e 5f 7a 61 70 73 0d 01  68 09 4c 44 59 23 33 0d  |n_zaps..h.LDY#3.|
00000370  01 72 09 2e 6c 6f 6f 70  0d 01 7c 20 4c 44 41 64  |.r..loop..| LDAd|
00000380  61 74 61 2c 59 3a 53 54  41 26 34 38 46 30 2c 59  |ata,Y:STA&48F0,Y|
00000390  3a 44 45 59 3a 54 59 41  0d 01 86 0f 42 4e 45 6c  |:DEY:TYA....BNEl|
000003a0  6f 6f 70 3a 52 54 53 0d  01 90 18 2e 64 61 74 61  |oop:RTS.....data|
000003b0  20 45 51 55 44 20 26 41  31 38 35 30 38 41 39 0d  | EQUD &A18508A9.|
000003c0  01 9a 0c 2e 72 65 69 6e  63 61 72 0d 01 a4 1d 4c  |....reincar....L|
000003d0  44 41 23 26 45 41 3a 53  54 41 26 33 44 36 46 3a  |DA#&EA:STA&3D6F:|
000003e0  53 54 41 26 33 44 37 30  0d 01 ae 07 52 54 53 0d  |STA&3D70....RTS.|
000003f0  01 b8 0d 2e 69 6d 6d 6f  72 74 61 6c 0d 01 c2 14  |....immortal....|
00000400  4c 44 41 23 26 41 39 3a  53 54 41 26 34 33 38 46  |LDA#&A9:STA&438F|
00000410  0d 01 cc 14 4c 44 41 23  26 30 31 3a 53 54 41 26  |....LDA#&01:STA&|
00000420  34 33 39 30 0d 01 d6 07  52 54 53 0d 01 e0 0e 2e  |4390....RTS.....|
00000430  69 6e 5f 65 6e 65 72 67  79 0d 01 ea 14 4c 44 41  |in_energy....LDA|
00000440  23 26 41 39 3a 53 54 41  26 33 44 35 42 0d 01 f4  |#&A9:STA&3D5B...|
00000450  14 4c 44 41 23 26 30 30  3a 53 54 41 26 33 44 35  |.LDA#&00:STA&3D5|
00000460  43 0d 01 fe 07 52 54 53  0d 02 08 18 2e 6c 6f 61  |C....RTS.....loa|
00000470  64 20 45 51 55 53 22 4c  2e 51 55 45 53 54 31 22  |d EQUS"L.QUEST1"|
00000480  0d 02 12 11 20 20 20 20  20 20 45 51 55 42 26 30  |....      EQUB&0|
00000490  44 0d 02 1c 05 5d 0d 02  26 05 ed 0d 02 30 05 e1  |D....]..&....0..|
000004a0  0d 02 3a 0f dd f2 79 6e  28 41 24 2c 41 25 29 0d  |..:...yn(A$,A%).|
000004b0  02 44 52 f2 61 28 22 60  22 2b 41 24 2b c4 32 35  |.DR.a("`"+A$+.25|
000004c0  2d a9 41 24 2c 22 20 22  29 2b 22 40 28 59 2f 4e  |-.A$," ")+"@(Y/N|
000004d0  29 60 20 3a 20 40 22 29  3a 41 24 3d be 3a e7 20  |)` : @"):A$=.:. |
000004e0  41 24 3d 22 59 22 20 8c  20 f1 3b 22 59 65 73 22  |A$="Y" . .;"Yes"|
000004f0  20 8b 20 f1 3b 22 4e 6f  22 3a 3f 41 25 3d 26 36  | . .;"No":?A%=&6|
00000500  30 0d 02 4e 05 e1 0d 02  58 0f dd f2 61 28 24 26  |0..N....X...a($&|
00000510  31 36 30 30 29 0d 02 62  0c d6 26 31 37 30 30 3a  |1600)..b..&1700:|
00000520  e1 0d 02 6c 09 dd f2 6d  63 31 0d 02 76 0e e3 49  |...l...mc1..v..I|
00000530  25 3d 30 b8 32 20 88 32  0d 02 80 0c 50 25 3d 26  |%=0.2 .2....P%=&|
00000540  31 37 30 30 0d 02 8a 0a  5b 4f 50 54 49 25 0d 02  |1700....[OPTI%..|
00000550  94 10 4c 44 59 23 30 3a  2e 6c 6f 6f 70 32 0d 02  |..LDY#0:.loop2..|
00000560  9e 0e 4c 44 41 26 31 36  30 30 2c 59 0d 02 a8 11  |..LDA&1600,Y....|
00000570  43 4d 50 23 31 33 3a 42  45 51 65 6e 64 0d 02 b2  |CMP#13:BEQend...|
00000580  17 43 4d 50 23 97 22 40  22 3a 42 45 51 63 6f 6c  |.CMP#."@":BEQcol|
00000590  6f 75 72 31 0d 02 bc 17  43 4d 50 23 97 22 60 22  |our1....CMP#."`"|
000005a0  3a 42 45 51 63 6f 6c 6f  75 72 32 0d 02 c6 0c 4a  |:BEQcolour2....J|
000005b0  53 52 26 46 46 45 45 0d  02 d0 0b 2e 62 61 63 6b  |SR&FFEE.....back|
000005c0  69 6e 0d 02 da 16 49 4e  59 3a 43 50 59 23 30 3a  |in....INY:CPY#0:|
000005d0  42 4e 45 6c 6f 6f 70 32  0d 02 e4 08 2e 65 6e 64  |BNEloop2.....end|
000005e0  0d 02 ee 07 52 54 53 0d  02 f8 1c 2e 63 6f 6c 6f  |....RTS.....colo|
000005f0  75 72 31 20 4c 44 41 23  32 3a 4a 4d 50 63 68 61  |ur1 LDA#2:JMPcha|
00000600  6e 67 65 0d 03 02 12 2e  63 6f 6c 6f 75 72 32 20  |nge.....colour2 |
00000610  4c 44 41 23 33 0d 03 0c  1f 2e 63 68 61 6e 67 65  |LDA#3.....change|
00000620  20 54 41 58 3a 4c 44 41  23 31 37 3a 4a 53 52 26  | TAX:LDA#17:JSR&|
00000630  46 46 45 45 0d 03 16 18  20 20 20 20 20 20 20 20  |FFEE....        |
00000640  54 58 41 3a 4a 53 52 26  46 46 45 45 0d 03 20 15  |TXA:JSR&FFEE.. .|
00000650  20 20 20 20 20 20 20 20  4a 4d 50 62 61 63 6b 69  |        JMPbacki|
00000660  6e 0d 03 2a 05 5d 0d 03  34 05 ed 0d 03 3e 05 e1  |n..*.]..4....>..|
00000670  0d ff                                             |..|
00000672