40 Grand Prix
420 PEN 2:LOCATE 1,5:PRINT"Steer your ca r around the Race-track andtry to beat
[A] car driven by the computer.":PE N 1
430 PEN 3:PRINT:PRINT"Turn left with the left arrow key and	right with the rig
ht arrow key.":PEN 1
440 PRINT:PRINT"You can select gears wit h [1] slow and [2] fast-The computer wi 11 stay in [1]"
450 PEN 3:PRINT:PRINT"If you crash you w ill restart randomly. So you must sort y ourself out as fast aspossible.Your car is the Yellow one.":PEN 1
460 PRINT:PRINT:PRINT"	PRESS ANY
KEY TO START"
470 PEN 1:B$=STRING$(40,46)+A$4-STRING$(4 0,46):FOR N=1 TO LEN(B$)-40:IF INKEY$<>" " THEN CLS ELSE LOCATE 1,1:PRINT CHR$(24 );MID$(B$,N,40);CHR$(24):PEN 1:LOCATE 1, 24:PRINT CHR$(24);M1D$(B$,N,40);CHR$(24) :NEXT:PEN 1 : GOTO 470
480 RETURN
490 RESTORE 510
500 SYMBOL AFTER 219
510 SYMBOL 220,0,110,132,252,252,172,110
0
520 SYMBOL 221,40,109,240,58,223,76,24,8
530 SYMBOL 222,60,90,90,24,90,126,90,0 540 SYMBOL 223,20,54,15,92,251,50,24,16
550 SYMBOL 224,0,118,33,63,63,33,118,0 560 SYMBOL 225,16,24,50,251,92,15,54,20 570 SYMBOL 226,0,90,126,90,24,90,90,60 580 SYMBOL 227,8,24,76,223,58,240,108,40
590 SYMBOL 228,60,66,189,165,165,189,66, 60
600 LOCATE 1,2