138 Motocross
650 LOCATE 5,21:PRINT CHR$(236);:FOR F=1
TO BUSES:PEN 2:PRINT CHR$(237);:PEN 1:N
EXT F:PRINT CHR$(238);CHR$(239);CHR$(240
660 RETURN
670 SYMBOL AFTER 230
680 SYMBOL 231,32,62,50,254,152,90,231,6 6
690 SYMBOL 232,2,119,82,92,124,242,23,26 700 SYMBOL 233,66,231,90,25,127,76,124,4 710 SYMBOL 234,88,232,79,62,58,74,238,64 720 SYMBOL 235,0,0,0,0,0,32,112,248
730 SYMBOL 236,1,3,7,15,31,63,127,255 740 SYMBOL 237,126,66,126,126,66,126,126 ,36
750 SYMBOL 238,224,252,255,255,255,255,2 55,255
760 SYMBOL 239,0,0,128,240,254,255,255,2 55
770 SYMBOL 240,0,0,0,0,0,192,248,255 780 RETURN
790 A$="MOTOCROSS":LOCATE 16,25:PEN 3:PR INT A$;:PEN 1:FOR F=1 TO 9:FOR 6=24 TO 1 STEP -1:SOUND 2,(6*F*3),3:LOCATE F+15,G :PEN 2:PRINT MID$(A$,F,1):PEN I:LOCATE F +15,G+1:PRINT" ":NEXT G,F
800 FOR F=1 TO 39:SOUND 1,120,3:SOUND 1, 90,5:SOUND 1,180,4:SOUND 1,220,4:LOCATE F+1,3:PRINT " ";CHR$(231);:NEXT:LOCATE 1 ,4:PRINT"
810 LOCATE 1,5:PRINT"This program consis ts of two Motorbike games."
820 PEN 3:PRINT:PRINT"For [Moto-cross],i ump with COPY key onlywhen you reach the obstacle":PEN I
830 PRINT:PRINT"For both programs, acc eleration and deceleration are both possible by holding left and right c ursor arrow keys"
840 PEN 3:LOCATE 1,16:PRINT CHR$(24);" 1 ....Moto-cross ";CHR$(24):PEN I
850 LOCATE 1,18:PRINT CHR$(24);" 2....St unt-cycle ";CHR$(24):PEN 1
860 PEN 3:LOCATE 1,20:PRINT CHR$(24);" 7 ....To quit	";CHR$(24):PEN 1