まず。重力やジャンプという概念を付けるときには、地面という概念はほぼ必用です。 僕のFALLでは、GLINEで表現しています。 スプライトがその地面をすり抜けないようにするには、スプライトが画面外に出ないようにするのと、同じような感じで出来ます。FALLの場合MIN関数を使っています。 SPSET 0,6 GLINE 0,216,480,216 '画面にy=216の線を描く (中略) WHILE 1 '無限ループ  (中略)  SX=SX+X 'x座標更新  SY=MIN(SY-Y,200) 'Y座標更新。ただし、Yは地面-16より大きくならない。 WEND