10 GRAPHICS 11:X=0
20 FOR C=0 TO 15:COLOR C
30 FOR DX=0 TO 4
40 PLOT X+DX,0
50 DRAWTO X+DX,191
60 NEXT DX
70 X=X+5
80 NEXT C
90 REM WAIT FOR JOYSTICK FIRE BUTTON PRESS
100 IF STRIG(0)=1 THEN 100