Нотная запись для микроконтроллера

[Martian]

Вот. Можно весь календарь построить. Или музыкальный калькулятор

[ARV]

[uquote="dgrett",url="/forum/viewtopic.php?p=4159066#p4159066"]ARV, не понял пауза R(t) или P(t)..
трубадур

Спойлер

B1(2),B1(8),A1(8),G1(8),B1(8),D2(2),Fs1(2),
G1(2),G1(8),Fs1(8),E1(8)G1(8),B1(0),B1(2),B1(8),
A1(8),G1(8),B1(8),D2(2),Fs1(2),G1(2),G1(8),Fs1(8),
E1(8),G1(8),Fs1(2),Fs1(8),E1(16),Fs1(16),G1(2),G1(4),
Fs1(8),G1(8),B1(2),A1(2),R(4),D2(8),D2(8),E2(8),D2(8),
B1(8),A1(8),G1(2),G1(4),G1(8),A1(8),G1(8),A1(4),
R(4),B1(8),(8),C2(8),B1(8),G1(8),E1(8),G1(2),A1(2),
R(4),B1(8),B1(8),C2(8),B1(8),G1(8),E1(8),G1(4),A1(4),
R(4),D2(8),D2(8),E2(8),D2(8),B1(8),A1(8),G1(4),G1(2),
G1(8),A1(4),G1(4),A1(4),B1(4),G1(8),G1(8),G1(4),G1(8),
E1(16),Fs1(16),G1(2),B1(4),A1(4),B1(4),G1(8),G1(8),
G1(2)

[/uquote]
в 7-й строке сверху третий макрос - какой? просто (8) стоит...

Добавлено after 6 minutes 26 seconds:
mickbell, вот обещанное:

[dgrett]

{в 7-й строке сверху третий макрос - какой? просто (8) стоит...}

Должно было быть В1(8), пардон, потерялась В1, то есть 2 подряд В1(8)
Может быть надо поднять всё на октаву выше, не знаю как лучше звучать будет.

[ARV]

похоже на какую-то шотландскую волынку... что за песня, не понятно. поначалу, вроде, показалось, что узнал, но потом... увы

[mickbell]

ARV,
1. Обе замедлите в два раза.
2. Но это ещё не всё. Немного музыкального ликбеза. Легато (legato) - это такое взятие нот, когда звук одной переходит в другую, так сказать, без зазора. Как у вас. Стаккато (staccato) - отрывистое звучание нот. Третий вариант - нон легато (non legato), это нечто среднее, то есть паузы между нотами есть, но они небольшие. По умолчанию принимается non legato. Критерии в цифрах: legato - 100% времени звучания ноты занимает звук, non legato - 90% времени звук, затем 10% - пауза, staccato - тут мнения разделились: кто-то говорит о 50%, я считаю, что 25% будет самое то, а 75% - потом пауза.
Вам надо сделать звучание non legato, то есть приблизительно 90% длительности каждой ноты звук и 10% молчание. Иначе всегда будет получаться, как в кобылах - одинаковые звуки звучат, как один.

[dgrett]

The beam of golden sun

[mickbell]

Три белых слона. Устранена октавная ошибка в конце первой фразы.
Fs2(8),
B2(4),Fs2(8),B2(4),Fs2(8),E2(8),D2(8),Cs2(4),D2(8),Cs2(4),B1(4),P(8),
P(8),A2(8),A2(8),A2(8),A2(8),B2(8),A2(8),G2(8),Fs2(1),
Fs2(4),E2(8),Fs2(4),E2(8),E2(8),E2(8),Fs2(4),E2(8),D3(4),Cs3(4),P(8),
E2(4),D2(8),E2(4),D2(8),D2(8),D2(8),E2(4),D2(8),Cs3(4),B2(4),P(8),
P(8),Cs2(4),Cs2(8),Cs2(8),Cs2(8),Cs2(8),Cs2(8),D2(4),Cs2(4),C2(4),Cs2(4),
Fs2(1),P(4),D3(2),Cs3(4),
Cs3(4),B2(8),Cs3(8),D3(8),D3(4),Cs3(8),Cs3(4),B2(8),Cs3(8),D3(4),P(8),D3(8),
Cs3(4),B2(8),A2(8),G2(4),Fs2(8),E2(8),Fs2(8),A2(2),P(8),A2(4),
A2(4),G2(8),E2(8),Cs2(8),G2(4),G2(8),G2(4),Fs2(8),B2(8),D3(4),P(8),D3(8),
Cs3(4),Gs2(8),B2(8),As2(4),B2(8),Cs3(8),B2(2),P(4),P(8)

Добавлено after 1 minute 9 seconds:
[uquote="dgrett",url="/forum/viewtopic.php?p=4159444#p4159444"]The beam of golden sun[/uquote]Where?

[ARV]

приблизительно 90% длительности каждой ноты звук и 10% молчание

я не могу сделать паузу между нотами меньше, чем 1/16...

[mickbell]

1/16 чего? Целой ноты или любой ноты? Как вообще построено формирование временных интервалов?

[ARV]

вру... могу. если целую сделать больше, то соответственно, минимальный интервал будет меньше. так, если целая нота длится 32 тика таймера (2 секунды), то минимальная длительность может быть 1/32. грубо говоря, 1/16 секунды - это минимальная длительность, относительно которой можно плясать.

подправил длительность целой в бОльшую сторону - стало лучше. и с паузами тоже неплохо. записывать для ознакомления?

Добавлено after 2 minutes 7 seconds:
кстати, "трубадур" тоже стал узнаваем

Добавлено after 18 minutes 59 seconds:
вот архив с mp3-файлом внутри, последняя редакция мелодий. звук немного отличается от реального (реальный более противный), т.к. битрейт я сделал минимально возможный, но интервалы и т.п. чётко слышно

[mickbell]

Не понял. Что они до конца не доигрывают все?
А так-то - не так уж плохо. Есть, конечно, над чем работать.
Что касается противности - попробуйте перед пищалкой забубенить какой-нибудь ФНЧ: в простейшем случае поледовательно пьезику резистор и параллельно конденсатор. Частоту среза можно взять, скажем, 1 кГц (постоянная времени 160 мкс), конкретные номиналы могут быть 1.6 кОм, 100 нФ. Вдруг поможет.

[dgrett]

mickbell, there: {кстати, "трубадур" тоже стал узнаваем }

ARV, а пришлось повысить на октаву? Если были бы точки, было бы более узнаваемо.

[HochReiter]

У прямоугольных импульсов амплитуда гармоник обратно пропорциональна номеру, такой звук противен по двум причинам: 1) мало гармоник с низкими номерами, от этого звук глухой. 2) много гармоник с большими номерами, они звенят. Поэтому ФНЧ лучше делать высокодобротным килогерц на 5-6, чтобы он задирал первые гармоники, а остальные давил. Тембр будет более похож на тембр натуральных инструментов. Ещё лучше сделать фильтр перестраиваемым в зависимости от номера ноты, но для будильника это слишком тонкий юмор. Ещё можно с помощью конденсатора большой ёмкости, пары резисторов и транзисторов сделать звук затухающим, это замаскирует противность тембра.

[ARV]

Не доигрыавают потому, что у меня автосброс режима в часах при неактивносьи кнопок. Поэтому или само прерывается, или я вручную переключаю мелодию

Добавлено after 2 minutes 13 seconds:
У меня не пьезик, а электромагнитый излучатель с металлической мембраной. Возможно, заменю на обычный динамик через электролит... Подумаю потом.

Добавлено after 1 minute 23 seconds:
Понизил я только "имперский марш", причем на 3 октавы. А темп везде замедлил по-разному от 3 до 1,5 раз

[mickbell]

Ещё немного музычки. Прошу исполнить.

A1(4),A1(3),Cs2(6),Bb1(8),A1(8),Cs2(4),Cs2(3),E2(6),D2(8),Cs2(8),
D2(4),D2(3),F2(6),E2(8),D2(8),Cs2(4),Bb1(8),A1(8),Cs2(4),P(4),
A1(4),A1(3),Cs2(6),Bb1(8),A1(8),Cs2(4),Cs2(3),E2(6),D2(8),Cs2(8),
D2(4),D2(3),F2(6),E2(8),D2(8),Cs2(4),Bb1(8),A1(8),A1(4),P(4),
Cs2(8),Cs2(4),Bb1(8),A1(8),Bb1(8),A1(8),P(8),Bb1(8),Bb1(4),A1(8),G1(8),A1(8),G1(8),P(8),
G1(4),Bb1(6),A1(12),G1(8),G1(8),D2(4),Cs2(4),Bb1(8),A1(8),A1(4),P(4),
Cs2(8),Cs2(4),Bb1(8),A1(8),Bb1(8),A1(8),P(8),Bb1(8),Bb1(4),A1(8),G1(8),A1(8),G1(8),P(8),
G1(4),Bb1(6),A1(12),G1(8),G1(8),D2(4),Cs2(4),Bb1(8),A1(8),A1(4),P(4),
D1(4),P(4),D1(4),P(4),D1(8),P(8),D1(8),P(8),D1(8),P(8),D1(8),P(8),
D1(8),D1(8),F1(6),E1(12),D1(8),F1(8),E1(8),D1(8),D1(8),D1(8),F1(6),E1(12),D1(8),F1(8),E1(8),D1(8),
E1(8),E1(8),G1(6),F1(12),E1(8),G1(8),F1(8),E1(8),E1(8),E1(8),G1(6),F1(12),E1(8),G1(8),F1(8),E1(8),
A1(8),A1(8),A2(2),P(4)A1(8),A1(8),A2(2),P(4)

Добавлено after 14 minutes 44 seconds:
И ещё немного.

A1(4),E1(8),A1(8),E1(8),A1(8),E1(8),A1(8),C2(4),A1(8),C2(8),A1(8),C2(8),A1(8),C2(8),
E2(4),C2(8),E2(8),D2(4),B1(8),D2(8),C2(4),B1(8),A1(8),B1(4),E2(4),
A1(4),E1(8),A1(8),E1(8),A1(8),E1(8),A1(8),C2(4),A1(8),C2(8),A1(8),C2(8),A1(8),C2(8),
E2(4),C1(8),E2(8),D2(4),B1(8),D2(8),C2(4),A1(8),Gs1(8),A1(4),P(4),
P(8),E2(8),F2(8),G2(8),F2(8),E2(8),D2(8),C1(8),P(8),E2(8),F2(8),G2(8),F2(8),E2(8),D2(8),C1(8),
P(8),E2(8),F2(8),G2(8),A2(8),G2(8),F2(8),E2(8),D2(4),F2(8),E2(8),D2(4),P(4),
P(8),D2(8),E2(8),F2(8),G2(8),F2(8),E2(8),D2(8),C1(4),E2(8),D2(8),C1(4),P(4),
E2(8),Ds2(8),Ds2(8),C2(8),C2(8),Bb1(8),Bb1(8),A1(8),A1(1)

[Martian]

Так-с, начал это дело немного автоматизировать.
Наверное, потихоньку (странно, думал через дефис пишется, а гуглхром не согласен) пойдёт, через неделю покажу.

[ARV]

начал это дело немного автоматизировать

что именно?

[Martian]

Ноты в любой тип записи для МК

[ARV]

ноты в каком виде? прямо с нотного стана?

[Martian]

да, кружочек с палочкой и хвостиком ))
программка видится очень простой, а я люблю простые - их можно довести до конца, а не бросить на полпути...