一例ですが。 IF HASSHA==1 THEN LOCATE TX,TY:?" " IF TY==0 THEN  HASSHA=0 ELSE TY=TY-1 LOCATE TX,TY:?"@" ENDIF ENDIF IF (BUTTON(2) AND #A) && HASSHA==0 THEN HASSHA=1 TX=PLX+1:TY=PLY-1 LOCATE TX,TY:?"@" ENDIF