こんなんでいいんですか？初心者なんで。

動かしてないので正確にOKかはわからないんですが、WHILEのところの無限ループを作る場合は、あいだ（大抵は最後のループの前）にVSYNCを入れた方がいいと思いますよ。

いいですねー IF I THEN SPOFS 0,X,Y:GPSET X,Y と足してみるのはどうでしょう？