Самое простое пианино, которое воспроизводит заданную мелодию:
# Определить DO 7 / / высокая / низкая
# Определить RE 8 / / высокая / низкая
# Определить MI 9 / / ~
# Определить FA 10 / / ~
# Определить SO 11 / / ~
# Определить LA 12 / / высокая / низкая
# Определить С.И. 13 / / высокая / низкая
внутр пол = 1000;
внутр Chet = 500;
недействительными установки () {
для (внутр х = 7; х == 13; х + +) {
pinMode (х, ВЫХОД);
}
}
недействительными петля () {
analogWrite (MI, 0);
digitalWrite (Л.А., HIGH);
задержка (POL);
digitalWrite (Л.А., LOW);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
analogWrite (SO, 255);
задержка (Chet);
analogWrite (SO, 0);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
analogWrite (ИМ, 255);
задержка (POL);
analogWrite (MI, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., 0);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
analogWrite (SO, HIGH);
задержка (Chet);
analogWrite (SO, LOW);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
analogWrite (ИМ, 255);
задержка (POL);
}
диоды - ноты от ДО до СИ
# Определить DO 7 / / высокая / низкая
# Определить RE 8 / / высокая / низкая
# Определить MI 9 / / ~
# Определить FA 10 / / ~
# Определить SO 11 / / ~
# Определить LA 12 / / высокая / низкая
# Определить С.И. 13 / / высокая / низкая
внутр пол = 1000;
внутр Chet = 500;
недействительными установки () {
для (внутр х = 7; х == 13; х + +) {
pinMode (х, ВЫХОД);
}
}
недействительными петля () {
analogWrite (MI, 0);
digitalWrite (Л.А., HIGH);
задержка (POL);
digitalWrite (Л.А., LOW);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
analogWrite (SO, 255);
задержка (Chet);
analogWrite (SO, 0);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
analogWrite (ИМ, 255);
задержка (POL);
analogWrite (MI, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., 0);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
digitalWrite (Л.А., HIGH);
задержка (Chet);
digitalWrite (Л.А., LOW);
analogWrite (SO, HIGH);
задержка (Chet);
analogWrite (SO, LOW);
analogWrite (FA, 255);
задержка (Chet);
analogWrite (FA, 0);
analogWrite (ИМ, 255);
задержка (POL);
}
Комментариев нет:
Отправить комментарий