xを表現するすべがないので「動かない「ように見える」」のは普通のことで、上のコードを読んだところ、xはちゃんと変化してるみたいよ(読み間違いがあったらゴメンしてね) 83行と84行の間に locate 0,0:print x または spofs 0,x,192 または spanim 0,"xy",t,x,192 と入れてみたらxが変化しているのがわかるはず あと蛇足だけど、while~wendループの中のどこかにvsyncを入れれば幸せになるかも?