もしさわる範囲を指定したいなら、たとえば12行目と13行目の間にIF文を入れて、範囲を絞ってやればいいと思います。 ちょっと凝って、中心(160,120)から半径50の円内をさわったときだけ音を鳴らしたければ IF SQR(POW(TX-160,2)+POW(TY-120,2))<=50 THEN を12-13行目の間に入れ、 18行目のELSEの前にENDIFを入れるとできます。