そのために、例えば KX,KYという変数を用意して IF (B～ THEN Y=Y～ IF (B～ THEN X=X～ のところを IF (B～ THEN KY=Y～ IF (B～ THEN KX=X～ として、それに続いて ～=BGGET(0,KX,KY,1) … と4点のチェックをします。 そのあとで X=KX:Y=KY SPOFS 100,X,Y とするといいと思います。