タッチの情報は1フレームごとに更新されているためタッチした瞬間のみ反応するようにするためにはループ中にVSYNCを入れる必要があります。 そうすればタッチした際に1回のみ反応できるようになります。 CLS WHILE 1 　TOUCH OUT T,X,Y 　IF T==1 THEN PRINT "タッチしたよ" 　VSYNC WEND VSYNCを削除したときの動作と比較してその効果を確かめてみてください。