roboforum.ru

//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//
// Arduino UNO
//
////////////////////////
//
//программа  ЭМИ вариант  со светодиодами //
unsigned int  n=0;
unsigned int  x=0;
unsigned int  n1=0;
unsigned int  x1=0;
long  y1=0;
long  y2=0;
int i=0;
int tabl [8] ={0,261,293,329,349,392,
                          440,494  };  // зашифрованные данные нот – их частоты


void setup()   
   {
          pinMode(13, OUTPUT);
          digitalWrite(13, LOW);
          pinMode(A0, INPUT);
   }
        void loop()
      {
        x=analogRead(A0); n=map(x, 0, 1025, 0, 8);
        if ( n>0) {tone (13, tabl[n]);} // исполнение вызванной ноты
        else { noTone(13) ;}
       
  //////////////// /////////////// мигающие светодиоды с регулятором частоты ////////////////////////////////////////
y2=millis();  pinMode(A1, INPUT);x1=analogRead(A1); n1=map(x1, 0, 700, 100, 2000);
pinMode(15, OUTPUT);if (i==1){digitalWrite(15,HIGH);}else{digitalWrite(15,LOW);}
if ( y2-y1>=n1&i==1) {y1=y2;i=0;} if ( y2-y1>=n1&i==0) {y1=y2;i=1;}
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
       }
//
// Конец /
//
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////   

x=analogRead(A0); n=map(x, 0, 1025, 0, 8);
if ( n>0) {tone (13, tabl[n]);} // исполнение вызванной ноты
else { noTone(13) ;