7行のあとから、 INC X,SX*3 IF X<0 THEN X=0 …(Xの大きい方とYのぶん略) SPOFS 0,X,Y とするわけです。