10 'Dr. Who & The Mines Of Terror
11 'Infinite Lives Cheat
12 '(C) 1989 1st Choice Software Ltd.
13 s=0:FOR i=&BE80 TO &BEC6:READ a$
14 a=VAL("&"+a$):s=s+(a*i):POKE i,a:NEXT
15 IF s<>-123439574 THEN PRINT"Data Error":END
16 CALL &BC02:MODE 1:BORDER 0:INK 0,0
17 PRINT "Insert Your Fully Re-Wound"
18 PRINT "Dr. Who & The Mines Of Terror"
19 PRINT "Cassette And Press Play"
20 CALL &BE80
21 DATA F3,31,00,C0,CD,37,BD,3E,FF,CD
22 DATA 6B,BC,06,00,11,00,10,D5,CD,77
23 DATA BC,EB,CD,83,BC,CD,7A,BC,21,A3
24 DATA BE,22,17,10,C9,21,AC,BE,22,75
25 DATA 44,C3,00,44,21,C0,BE,11,09,1D
26 DATA 01,06,00,ED,B0,21,03,BB,22,75
27 DATA 44,C3,03,BB,21,2C,82,36,06,3E
28 DATA 04
