10DEFFNS="ETYPECH"
20t$="K.0 "
30MODE7:PRINT" E TYPE Cheat by C.J.Ri
chardson"
40PRINT" STOP TIMER? Y/N":A$=GET$:IF
A$="N" t$=t$+"200|M"
50PRINT" OTHER VEHICLES ON ROAD? Y/N"
:A$=GET$:IF A$="Y" t$=t$+"210|M"
60PRINT" INFINITE PRANGS? Y/N":A$=GET
$:IF A$="N" t$=t$+"220|M"
70PRINT" INSERT E TYPE AND PRESS A KE
Y PLEASE":REPEATUNTILGET
80OSCLI t$+"DEL.10,100|MRUN|M"
90*FX138 0 128
100END
110FORI%=0TO2STEP2
120P%=&C00
130[:OPTI%:LDA#0:STA&1C0F
140LDA#inter MOD256:STA&220
150LDA#inter DIV256:STA&221
160LDA#14:LDX#4:JSR&FFF4
170RTS
180.inter:PHP:PHA:TXA:PHA:TXA:PHA:LDA&
1C0F:CMP#&A5:BNE out
190LDA#7:JSR&FFEE
200LDA#0:STA&117B ½ TIMER
210LDA#&60:STA&1823 ½ NO OTHER VEHICLE
S
220LDA#&60:STA&1359 ½ STA&1C0F CUTS
THE LOT OUT ½ COLLISION DETECTION
230LDA#13:LDX#4:JSR&FFF4
240.out:PLA:TAY:PLA:TAX:PLA:PLP:RTS
250]:NEXT:CALL&C00
260*EX. !BOOT