2 GOTO85
4 P=-22:GOTO39
5 P=+22:GOTO39
7 P=-1:GOTO39
8 P=-23:GOTO39
9 P=+21:GOTO39
11 P=+1:GOTO39
12 P=-21:GOTO39
13 P=+23:GOTO39
15 POKEE-2,241:O=O+7:POKEE,241:F=F+1:IFF=ZTHEN52
16 POKEE,135:POKEE-2,0:GOTO48
30 PRINT"[147]":V=36878:POKEV,15:POKEV-9,255:POKEV+1,8:E=36876:A=7911:B=30720:Z=Z+5:P=0
31 TT=INT(RND(1)*400)+7746:POKETT,3                                               
32 FORT=1TOZ+EC*2:POKEE,135:TT=INT(RND(1)*418)+7746:POKETT+B,4:POKETT,2:POKEE,0:NEXT
34 FORT=1TOZ:POKEE,241:TT=INT(RND(1)*418)+7746:IFPEEK(TT)=1THENF=F+1
35 POKETT+B,5:POKETT,1:POKEE,0:NEXT
36 FORT=1TO500:NEXT:POKEE,135:POKEE-1,135
38 POKEA+B,2:POKEA,.:POKEG,32:D=PEEK(828):SYS831:ONDGOTO4,5,6,7,8,9,10,11,12,13
39 G=A:A=A+P:PRINT"SCORE=";O;" CLONES=";S:Q=PEEK(A):IFQ=1THEN15
41 IFQ=2THEN60
42 IFQ=3THEN56
43 IFA>8142THENA=A-484
44 IFA<7724THENA=A+484
48 GOTO38
52 POKEG,32:POKEA,.:POKEA+B,2:POKEE-2,241:FORT=1TO500:NEXT:POKEE-1,241:FORT=1TO500:NEXT
53 RL=RL+1:POKEE,241:FORT=1TO900:NEXT:POKEE,.:POKEE-2,.:POKEE-1,.
54 S=S+1:P=0:F=0:GOTO30
56 POKEE,0:POKEG,32:POKEA,.:POKEA+B,2:POKEE,155:GOSUB59:POKEE,0:GOSUB59:POKEE,200
57 GOSUB59:POKEE,0:GOSUB59:POKEE,241:GOSUB59:POKEE,0:GOSUB59:POKEE,135:O=O+F*EC:P=0
58 GOTO43
59 FORT=1TO100:NEXT:RETURN
60 POKEG,32:POKEA,4:POKEA+B,7:FORT=15TO0STEP-1:POKEV,T:POKEE+1,225+T:NEXT:POKEE+1,0
62 S=S-1:IFS=0THEN65
63 P=0:F=0:Z=Z-5:GOTO30
65 O=O+RL*50:PRINT" [158]GAME OVER[144]":FORT=1TO1000:NEXT:IFO>LTHENL=O
66 POKE36879,24:PRINT"[147]YOUR[157][157][157][157]SCORE=";O:PRINT"HIGH[157][157][157][157]SCORE=";L
67 IFO<LANDL-O<50THENPRINT"CLOSE,BUT NOT CLOSE      ENOUGH."
68 PRINT"YOU GOT TO SCREEN";RL:PRINTRL*50;"BONUS.":PRINT"HIT A KEY TO TRY AGAIN"
69 GETA$:IFA$=""THEN69
70 P=0:O=0:F=0:Z=0:GOTO99
72 POKE36879,8:PRINT"[147][158]SPE[159]E[156]D[158]Y":PRINT"[156]BY[157][157]KEVIN[157][157][157][157][157]DEWEY"
73 POKE36869,240:PRINT"SKILL LEVEL(1-15)";:INPUTEC
74 IFEC<1OREC>15THEN72
75 GOTO30
85 POKE52,28:POKE56,28:CLR:FOR A=828 TO 881:READB:POKEA,B:NEXT
86 FORI=7168TO7679:POKEI,PEEK(I+25600):NEXT:FORC=7168TO7208:READB:POKEC,B:NEXT
90 DATA 0,0,0,169,127,141,34,145,169,0,141,19,145,173,32,145,74,74,41,32,141,62,3
91 DATA 173,17,145,41,28,13,62,3,74, 74,73,15,141,60,3,173,17,145,41,32
92 DATA 73,32,141,61,3,169,255,141,34,145,96
93 DATA60,126,219,255,231,189,66,60,255,126,90,255,165,189,129,255,255,90,126,231,255
94 DATA129,189,255,255,145,145,159,249,137,137,255,137,74,44,224,7,52,82,145,0,0
99 S=7:RL=1:GOTO72