Генератор для изучения азбуки морзе с изменением тональности

[R8ABB]

В продолжение темы:     Генератор для изучения азбуки морзе

Для этого проекта понадобится:

• Плата ардуино
• Пьезоизлучатель
• Кнопка
• Резистор(10кОм)2шт.
• Переменный резистор(10кОм)

void setup() {  pinMode(8, INPUT);  //8 пин работает на вход  pinMode(13, OUTPUT); //13 пин работает на выход } void loop() {  int frequency, val; //Объявляются переменные"val","frequency"  val = analogRead(A0); //Переменная "val" равняется значению на нулевом аналоговом пину  frequency = map(val, 0, 1023, 500, 1200); //Переменная "frequency" равняется значению "val" перенесенному в диапозон от 500 до 1200  if (digitalRead( 8 ) == HIGH) //Если на 8 пину высокое напряжение, то:  {  tone(13,frequency,1); //Воспроизводится тональный звук  }  else //Иначе  {  digitalWrite(13, LOW); //Звук на 13 пину останавливается  } }

Заливаем программу в ардуино и теперь когда мы крутим ручку переменного резистора, тональность изменяется.