12行目でエラーが出るんすけど

複数行のIFはIFの行の終わりがTHENじゃないとだめだと思います。 IF ～ GOTO を1行で書けばエラー出ないんじゃないかと。

IF ～ GOTO ～ ELSE ～ を1行です

基本形は IF 条件 THEN 処理 ELSE 処理 ENDIF THENとENDIFは忘れがち 1行にするタイプは省略形の派生が多すぎるから、サンプルもそんなに参考にならないような気がするのです

ゆうたんさんの言う基本形パターンをベースにして、もし1行にする（ENDIFを使わない）タイプの場合は中途半端にせずに全て1行にするというのを基本にすればほとんど問題ないんじゃないかと思います。（混在しようとするとわけわからなくなるしほとんどエラーになると思う）

ゆうたさんの基本形で書かれているように、処理の部分をFOR文やWHILE文の入れ子の様に字下げしてやれば混乱し難くなりますよね。

AND PY==QY の後にTHENをつけて見た方がいいのでは？

解決しました。 ご指摘ありがとうございます…(_ _)