90・91・92行と、98行を無くして、Y座標のはみ出し判定も加えてみましょう。 ざざっと書き直してみましたので、参考にどうぞ。