私がアドバイスした内容が残ってしまっていますね。 3行目と8行目と14行目を削除して下さい。 エラーが発生したのは13行目のGOTO命令の後にラベル名が 記載されていなかったためです。