３４２行目のIFが通っているのかどうか、３５６で「STOP」して、「？Ｉ」してみたらどうでしょう。 そもそもこれ、 FOR Y=0 TO 39 　FOR X=0 TO 399 　　＜342～350の処理＞ 　NEXT NEXT と書いたほうがいいですね。