Модераторы: Snowy, Alexeis, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Звуковой генератор, Помогите разобраться с кодом 
V
    Опции темы
Snowy
Дата 20.12.2006, 11:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484



Ну то, что воспроизводить будет - это я не сомневался.
А вот будет ли именно это значение на выходе звуковухи - это нужно замерять.
А приборов у меня нет smile
PM MAIL   Вверх
HmeL
Дата 27.12.2006, 14:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 21.12.2006

Репутация: нет
Всего: нет



Snowy, а ты не пытался избавиться от щелчков в начале и в конце звуковой волны? мои эксперименты ничего хорошего не дали...
PM MAIL WWW ICQ   Вверх
Snowy
Дата 27.12.2006, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484



У меня нет никаких щелчков.
Попробуй потестить код на другой звуковой карте.
Вероятно, проблема скорее аппаратная, нежели софтовая.
PM MAIL   Вверх
Alexeis
Дата 27.12.2006, 14:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



HmeL, Щелчки возникают при переключении буферов, вероятно не своевременно переключаются.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
HmeL
Дата 27.12.2006, 15:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 21.12.2006

Репутация: нет
Всего: нет



Snowy, попробую дома, на работе встроенный звук.


alexeis1, а программно это можно исправить?
PM MAIL WWW ICQ   Вверх
Alexeis
Дата 28.12.2006, 10:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(HmeL @  27.12.2006,  15:17 Найти цитируемый пост)
а программно это можно исправить? 

Ой я и не обратил внимание, что тут используется playsound  smile . Тогда советую попробовать сделать длинну такой, чтоб в буфере укладывалось целое число периодов. Т.е. конец трека плавно переходил в его начало, без ступеньки. 


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
HmeL
Дата 28.12.2006, 11:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 29
Регистрация: 21.12.2006

Репутация: нет
Всего: нет



alexeis1, т.е. ты имеешь в виду, чтобы синусоида завершалась под конец волны? Точно! в Саунд Форже это помагало, надо бы и здесь попробовать. Спасибо!
PM MAIL WWW ICQ   Вверх
HedgeR
Дата 4.2.2007, 21:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 3.2.2007
Где: Москва

Репутация: нет
Всего: нет



я пишу подобную программу, но она должна еще уметь выдавать стерео звук, с возможностью сдвига фаз каналов относительно друг друга. Вопрос: 
1.как это реализовать модификацией кода, приведенного выше?
2. если проверить генерируемый сигнал прогой (xttp://zeitnitz.de/Christian/Scope/Scope_en.html - там есть оч. много всего для генерации/анализа звука), то он не синусоидальный, как должен быть, а скорее квадратный. Дело в колебаниях, возникающих на частотах, кратных генерируемой. Вот что показывает та прога при анализе генерируемого моей прогой звука 500 гц:
спектр:
user posted image
А это сигнал:
user posted image
Если же "срезать" при анализе генерируемого сигнала все "лишние" частоты (напр., Band Pass 350-600 Гц), то получится собссно то требуется генерировать в чистом виде:
user posted image
Вопрос №2: откуда берутся эти "лишние" колебания и как с ними бороться (программно))?
 
PM MAIL ICQ   Вверх
Alexeis
Дата 5.2.2007, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



HedgeR, Очень вероятно, что вы неверно настрили генератор.
Я только, что вывел на экран аудио данные, которые должны направляться на проигрывание, и вот что получил

user posted image

Генератор настроен следующим образом

Код

procedure TForm1.btn1Click(Sender: TObject);
var
 sm : TSoundMaker;
 i : Integer;
 d : byte;
begin
 sm := TSoundMaker.Create;
 sm.Play(500, 100);

 sm.ms.Position := 0;
 sm.ms.Read(d, 1);
 canvas.MoveTo(20, 300 - d);
 for i := 1 to 109
 do
   Begin
     sm.ms.Read(d, 1);
     canvas.LineTo(20+i * 3, 300 - d);
   end;
end;


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

Масимально допустимый уровень при таких настройках 127, а частота 5000 Гц, но хорошее качество будет на частоте до 1000Гц.

Вот еще один момент. Тут генерируется короткий импульс, спектр которого может быть похожим скорее на гаусовский колокол, чем на линейчатый, но гармоник такой большой амплитуды быть не должно, они могли возникнуть, только если указали омплитуду выше 127, при этом сигнал должен получиться сильно искаженный и соотв. иметь много гармоник. 

Это сообщение отредактировал(а) Alexeis - 5.2.2007, 11:35


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
HedgeR
Дата 5.2.2007, 22:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 3.2.2007
Где: Москва

Репутация: нет
Всего: нет



забавно, но у меня прога, как и у   Alexeis, рисует идеальную синусоиду, а реально получается  - см выше... Настройки генератора: част. дискретизации - 44100 гц, звука - 500 гц, громкость- 100 (из 127). Непонятно откуда берутся гармоники... Хотя это, по сути, в необходимом мне применении генератора не суть важно, куда важнее сделать стерео звук со сдвигом фаз... вот с этим  smile ! тк простой заменой числа каналов с $0001 $0002 это очевидно не решается...
PM MAIL ICQ   Вверх
Alexeis
Дата 5.2.2007, 22:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Показанная выше синусойда бывает только при ограничении сигнала на выходе. Изучите акустический тракт после звуковой карты. Вероятно у вас чувствительный высокоомный вход, и транзисторы входного каскада переходят в режим насыщения, либо по входу стоят защитные диоды включенные встречно. Такого ограничения быть не может в звуковухе, иначе бы вместо музыки она бы воспроизводила какафонию smile

Добавлено @ 22:51 
Цитата(HedgeR @  5.2.2007,  22:23 Найти цитируемый пост)
Непонятно откуда берутся гармоники...

Гармоники всегда содержаться при любой форме сигнала отличной от синусоиды. Только синус и косинус при разложении в ряд фурье дают одну частоту, все остальные имеют широкий спектр и конечно гармоники сигнала с наибольшей амплитудой.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
HedgeR
Дата 6.2.2007, 02:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 3.2.2007
Где: Москва

Репутация: нет
Всего: нет



Цитата(Alexeis @  5.2.2007,  22:48 Найти цитируемый пост)
Изучите акустический тракт после звуковой карты.


после звуковой карты сигнал идет обратно в эту же звуковую карту на анализ.
а внутри куда он идет изучать не буду - счас, разберу я новый ноутбук  smile 

Цитата(Alexeis @  5.2.2007,  22:48 Найти цитируемый пост)
Вероятно у вас чувствительный высокоомный вход, и транзисторы входного каскада переходят в режим насыщения, либо по входу стоят защитные диоды включенные встречно.


можт я чего и не понимаю, но на анализ звук с генератора для проверки я подавал 2мя способами: через провод-петлю (выход-вход) и без оного, выбрав как канал записи "stereo mix"  (естессно, музыка на фоне не играла  smile ). В любом случае наблюдалась вышеуказанная картина, хотя( имхо - поправьте если не прав) во 2м случае транзисторы и диоды не играют роли пли анализе, тк петля софтовая. smile  

Цитата(Alexeis @  5.2.2007,  22:48 Найти цитируемый пост)
Цитата(HedgeR @  5.2.2007,  22:23 )Непонятно откуда берутся гармоники...Гармоники всегда содержаться при любой форме сигнала отличной от синусоиды.

а ПОЧЕМУ она отличается от синусоиды? насколько я понимаю, идет загон в буфер звуковухи сигнала  именно синусоидальной формы... да и судя по вашему скриншоту это именно так...

да, все тесты повторно проводились и на десктопе с неплохой звуковухой, с ровно тем же результатом  smile 

и вообще вешать все косяки на звуковуху неправильно, тк в той же проге-анализаторе есть генератор, который мне и требуется на делфях реализовать. так вот, он выдает идеальный синус... 

Это сообщение отредактировал(а) HedgeR - 6.2.2007, 02:27
PM MAIL ICQ   Вверх
Alexeis
Дата 6.2.2007, 10:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459



Цитата(HedgeR @  6.2.2007,  02:11 Найти цитируемый пост)
и вообще вешать все косяки на звуковуху неправильно, тк в той же проге-анализаторе есть генератор, который мне и требуется на делфях реализовать. так вот, он выдает идеальный синус... 


Цитата(Alexeis @  5.2.2007,  22:48 Найти цитируемый пост)
Изучите акустический тракт после звуковой карты. 

  Про звуковую карту я ничего не говорил. Но режим насыщения, на лицо. Нужно пробовать, менять амплитуду сигнала и т.д. Может вместо Line in, сигнал подавался на микрофон? У микрофона чувствительный усилитель и наверняка есть ограничитель по входу, ведь его рабочее напряжение исчисляются мВ, а диоды имеют ступеньку, около 0,5в. Т.е. вполне вероятно, что там он есть.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
HedgeR
Дата 6.2.2007, 13:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 3.2.2007
Где: Москва

Репутация: нет
Всего: нет



Alexeis,  а вы пробовали сами проанализировать генерируемый сигнал той прогой? (xttp://zeitnitz.de/Christian/Scope/Scope_en.html)
Очень интересен результат smile 
PM MAIL ICQ   Вверх
Snowy
Дата 6.2.2007, 14:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484



ИМХО, лишние шумы вносятся на аппаратном уровне.
Рекомендую захватить выход какой-нибудь программой, типа Total Recorder и проанализировать полученный результат. Это и будет результат до прохождения через звуковую карту.
А анализировать выведенный аналоговый сигнал и заново оцифрованный - дело неблагодарное smile
Особенно для встроенных звуковух.
PM MAIL   Вверх
Страницы: (3) Все 1 [2] 3 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.

 
2 Пользователей читают эту тему (2 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »


 




[ Время генерации скрипта: 0.1342 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.