WHILE 1 BT=BUTTON() X=X-(BT==4)+(BT==8) Y=Y-(BT==1)+(BT==2) BGOFS (マップのレイヤー番号),X,Y VSYNC 1 WEND