roboforum.ru

#define buz 9
#define datpin 7

unsigned long d=0;
unsigned long D=140;
unsigned long T=0;
byte i;
void setup()
{
Serial.begin(9600);
pinMode(datpin,INPUT);

}

void loop()
{
 
  for ( i=0;i<50;i++)
  {
   d=d+pulseIn(datpin, LOW);
  }
  d=d/((i+1));//считаем среднее значение длительности напряжения низкого уровня на датчике, измеренное i+1 раз
  D=max(D,d);
  if (millis()-T>10000){T=millis();D=d;}//условие оключения звука при длительном контакте с металлом, обновление текущее для значения D
  if (d<D-5){ tone(buz,500);}else {noTone(buz);}
// условия переключения по датчику пищалки

}