10 GRAPHICS 3+16›20 START=PEEK(560)+PEEK(561)*256+4›30 POKE START-1,71›40 FOR R=2 TO 4:POKE START+R,7:NEXT R›50 POKE START+21,65:POKE START+22,PEEK(560):POKE START+23,PEEK(561)›60 POKE 87,3:POKE 712,10:B=6›70 FOR A=1 TO 3›80 COLOR A›90 FOR R=9 TO 18›100 PLOT A+B,R:DRAWTO A+10+B,R›110 NEXT R›120 B=B+10›130 NEXT A›140 POKE 87,2:DIM BL$(3):BL$=" "›150 POSITION 0,0:PRINT #6;"ทฑฒฌ 708, ทฐนฌ 710,"›160 POSITION 0,3:PRINT #6;"ใฎฃ"›170 POSITION 5,3:PRINT #6;"ONE two ิศาลล"›180 CL=3:S0=70:S1=150:S2=206:S4=10›190 GOSUB 270:GOSUB 300:GOSUB 330:GOSUB 340›200 IF STRIG(0)=0 THEN CL=CL+1›210 FOR W=1 TO 100:NEXT W›220 IF CL=4 THEN CL=0›230 ST=STICK(0):IF ST<>15 THEN POKE 77,0›240 ON CL+1 GOSUB 250,280,310,340:GOTO 200›250 IF ST=14 THEN S0=S0+2:IF S0>255 THEN S0=0›260 IF ST=13 THEN S0=S0-2:IF S0<0 THEN S0=254›270 POSITION 5,1:GOSUB 370:POSITION 5,1:PRINT #6;S0:POKE 708,S0:RETURN ›280 IF ST=14 THEN S1=S1+2:IF S1>255 THEN S1=0›290 IF ST=13 THEN S1=S1-2:IF S1<0 THEN S1=254›300 POSITION 10,1:GOSUB 370:POSITION 10,1:PRINT #6;S1:POKE 709,S1:RETURN ›310 IF ST=14 THEN S2=S2+2:IF S2>255 THEN S2=0›320 IF ST=13 THEN S2=S2-2:IF S2<0 THEN S2=254›330 POSITION 16,1:GOSUB 370:POSITION 16,1:PRINT #6;S2:POKE 710,S2:RETURN ›340 IF ST=14 THEN S4=S4+2:IF S4>255 THEN S4=0›350 IF ST=13 THEN S4=S4-2:IF S4<0 THEN S4=254›360 POSITION 0,1:GOSUB 370:POSITION 0,1:PRINT #6;S4:POKE 712,S4:RETURN ›370 PRINT #6;BL$:FOR W=1 TO 15:NEXT W:RETURN ›