CLS WHILE 1 IF BUTTON(2)==16 THEN INC COUNT LOCATE 0,0:? COUNT BEEP 1 ENDIF IF SECOND==60*10 THEN BREAK INC SECOND WEND ? COUNT/10 最後は平均にしてみました