Try to hit all the crosses without leaving the screen!
1. Start the game.
2. Press EXE.
3. Steer with left and right arrow key and brake with down arrow key.
Before playing the first time, set Mat A[9,1] to zero.
-> means right arrow.
=> means the right arrow in the "jump" menu.
\= means the “not equal to” symbol.
_ means the display symbol
'VER 1.10
CoordOn
GridOff
LabelOff
BG-None
ViewWindow 1,31,5,1,16,5
Cls
{15,30}->Dim Mat C
For 1->N To 5
Do
Int 30Ran#+1->A
Int 15Ran#+1->B
LpWhile Mat C[B,A]
F-Line A,B,A+1,B+1
F-Line A+1,B,A,b+1
Next
Text1,1,""_
Do
LpWhile Getkey=31
0->A~D
45->C
0->T
1->X~Y
Do
Isz T
B<1=>B+1/4->B
Getkey->K
K=27=>C+20->C
K=38=>C-20->C
K=37 And B>=1/2=>B-1/2->B
D+B->D
BsinC+X->G
BcosC+Y->H
Plot G,H
Int G->G
Int H->H
G<1 Or G>30 Or H<1 Or H>15=>Break
If Mat C[H,G]=1
Then Isz A
9->Mat C[H,G]
F-Line G,H,G,H+1
F-Line G,H+1,G+1,H+1
F-Line G+1,H+1,G+1,H
F-Line G+1,H,G,H
IfEnd
LpWhile A\=5
[[0]]->Mat C
1EXP3A-D-T->P
Mat A[9,1]->R
P>R=>P->Mat A[9,1]
ClrText
Locate 4,1,"==SCORE:=="
Locate 15,1,P
Locate 4,2,"HIGHSCORE:"
Locate 15,2,R
Locate 4,3,"HITS:"
Locate 15,4,A
Locate 4,4,"LENGTH:"
Locate 15,4,D
Locate 4,5,"TIME:"
Locate 15,5,T
Locate 7,6,"~CAR RACE~"
Locate 8,7,"BY OLLE"