25-30行目を REPEAT B=BUTTON(2) IF B==2 THEN GOTO @C IF B==16 THEN GOTO @D VSYNC 1 UNTIL 1  にすれば大丈夫だと。