恐らくエラーの原因は、 １．「何が」１０００以上になったら＠Eにジャンプするのかが抜けている。 ２．THENの後ろにGOTO命令が抜けている。 ではないでしょうか？11行目のプログラムを IF　１０００＞＝A　THEN　GOTO ＠E とするとうまくいくと思われます。 間違ってたらすいません。