10 GRAPHICS 8:COLOR 1›20 SETCOLOR 1,0,14:SETCOLOR 2,0,0›30 FOR X=0 TO 318 STEP 4›40 PLOT X,0:DRAWTO X+1,159:NEXT X›50 FOR X=0 TO 308 STEP 4›60 PLOT X,0:DRAWTO X+9,159:NEXT X›199 REM *** CHANGE HUE ***›200 OPEN #1,4,0,"K:"›210 ? :? "ASSIGNED HUE IS NOW ";H›220 ? "HIT H KEY TO CHANGE HUE"›230 GET #1,X:IF X<>72 THEN 230›240 H=H+1:IF H=16 THEN H=0›250 SETCOLOR 2,H,0:GOTO 210›