Аккорд (смешивание частот нот)

[JekaDefer]

Привет! Давно искал но что то так и не нашел ответ на вопрос... Как правильно смешать ну допустим 2 звуковых сигнала синусоидальной формы разной частоты. При заполнении буферов структуры TWAVEFORMATEX на заполнение одного 16 битного сэмпла у нас есть диапазон -32768..32767. То есть максимум амплитуда у 1 синусоидального сигнала будет 32767 а минимум -32768. А если смешивать 2 сигнала с амплитудой 32767 то при их смешивании придется вылезать за диапазон. Есть ли алгоритм как сделать это грамотно и без тресков?)

[raxp]

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

[JekaDefer]

Сообщение от raxp

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

так то оно так но это 2 сигнала... а если их например 10? тогда при проигрывании одного сигнала он поделится на 10 и будет один звучать совсем тихо.... просто я пытаюсь это сформировать в 1 потоке... пробовал запускать отдельными потоками и звуковая карта нормально все плюсует и никаких тресков и все играет с 1 установленной громкостью... но если так делать то чтобы услышать 3 частоты с 1 громкостью надо запустить 3 потока... а если их 20 или 100? тогда как?)

[raxp]

так то оно так но это 2 сигнала... а если их например 10?

да хоть сто, среднее берем при прочих равных частотах дискретизации и битрейте для того, чтобы не было зашкаливания сэмпла (к примеру, для 16 бит один из каналов равен +32767, и вдруг второй 100, сумма даст ограничение). Синус там или речь не имеет значения. Что же касается тихо-громко - нормируйте уровни, отслеживайте тишину в каналах.

[JekaDefer]

в общем выкладываю программу. В ней каждая одиночно звучащая нота звучит с урезанной громкостью в 10 раз... как сделать чтоб звучало при любом раскладе(и одиночно и одновременно и тд...) с максимальной громкостью?

[raxp]

...разве не в 7?

  nSounds = 7; // Максимальное количество одновременно звучащих нот
  MaxSoundAmplitude = trunc(MaxAmplitude / nSounds); // Максимальная амплитуда ноты

...
procedure SinthezSetVolume(Volume: Byte);
begin
  SinthezSoundAmplitude := Trunc(MaxSoundAmplitude / 100 * Volume); // Перевод громкости в int16
end;

Повторяю, отслеживайте "тишину". Если у вас есть один звучащий канал на фоне остальных приостановленных, то сумма амплитуд отсчетов всех каналов в единицу времени не должна превысить максимума (32767 по модулю), дабы не было ограничения и соответственно искажений.

К примеру, складываем амплитуды 2-х каналов:
|Am1| + |Am2| < 32767

К примеру, складываем амплитуды 5-х каналов:
|Am1| + |Am2| + |Am3| + |Am4| + |Am5| < 32767

Тогда, максимальная амплитуда каждого из каналов:
Amn = 32767 div n

Это гарантирует, что сумма амплитуд всех каналов, звучащих на данный момент не превысит int16. А что мы видим в вашем коде выше, у вас это деление забито константой, т.е. звучит-не звучит канал из ваших семи, а амплитуда делится на всех. Ферштеен?

[JekaDefer]

да так то оно так но смотрите.. по вашему методу (я его кстати уже думал раньше) выходит что если я нажимаю 1 клавишу то она звучит во весь диапазон... но если я затем нажимаю вторую то этим самым я сразу понижаю громкость первой в 2 раза и тд.. это очень некрасиво звучит... почему когда в разных потоках запускаю то звуковуха все нормально смешивает?

[raxp]

Согласен, да, именно так - результирующая громкость будет в n-раз ниже. Однако никто не мешает опосля уровень при смешивании поднять общий в 200% (для двух сигналов).

Вот тут "Описание API вызова библиотеки MixerWAV.DLL" это можно делать с двумя WAV PCM одноканальными (работа непосредственно с отсчетами, уровень результирующий поднимаем-опускаем-регулирем скорость)

Видео:

http://www.youtube.com/watch?v=Lv0J2-WD2XE

[JekaDefer]

Сообщение от raxp

Вот тут "Описание API вызова библиотеки MixerWAV.DLL" это можно делать с двумя WAV PCM одноканальными (работа непосредственно с отсчетами, уровень результирующий поднимаем-опускаем-регулирем скорость)

Чтото я даже примерно не могу сообразить как это может мне тут помочь...

[JekaDefer]

Есть еще какие нибудь варианты как увеличить общую громкость после суммирования сигналов?