ACLS WHILE 1'メインループ GCLS GPUTCHR X,Y,"キャラ" B=BUTTON() IF B AND 1 THEN Y=Y-1 IF B AND 2 THEN Y=Y+1 IF B AND 4 THEN X=X-1 IF B AND 8 THEN X=X+1 VSYNC WEND