あと気になる点はアミダ移動をするループでEX,EYの値が 最初の1回目だけ不定である事です。今は問題にならない 様ですが思わぬバグの原因になるかもしれません。 28行目でSPOFS OUTの後にEX=AX:EY=AYを追加しておいた方が いいかなと思いました。