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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Еквалайзер, Частоты и т.п. 
:(
    Опции темы
SAVANE
  Дата 8.6.2007, 18:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Собствено вопрос не по програмированию а по акустике или Бог его знает по чем.
Сделал еквалайзер через Басс.длл.
Есть проблема если начинаешь регулировать звук с помощью него то получается такая бяка.
Вот у меня вопрос Какими должны быть частоты для еквалайзера, я так понимаю что еще нужно знать  ширину канала для каждой частоты и плюс еще амплитуда до какой надо увиличивать.

Наверное написал не оч понятно просто не знаю как по другом.
Если есть какая нить инфа по этому или у кого то есть позитивный опыт создания еквалайзера помогите плиз!

Выложу кусок кода где прописывал еквалайзер.

Код

p.fGain := 0;
    p.fBandwidth := 18;
    p.fCenter := 100;
    BASS_FXSetParameters(fx[1], @p);
    p.fBandwidth := 18;
    p.fCenter := 200;
    BASS_FXSetParameters(fx[2], @p);
    p.fBandwidth := 27;
    p.fCenter := 400;
    BASS_FXSetParameters(fx[3], @p);
    p.fBandwidth := 27;
    p.fCenter := 600;
    BASS_FXSetParameters(fx[4], @p);
    p.fBandwidth := 36;
    p.fCenter := 1000;
    BASS_FXSetParameters(fx[5], @p);
    p.fBandwidth := 100;
    p.fCenter := 3000;
    BASS_FXSetParameters(fx[6], @p);
    p.fBandwidth := 100;
    p.fCenter := 6000;
    BASS_FXSetParameters(fx[7], @p);
    p.fBandwidth := 3000;
    p.fCenter := 14000;
    BASS_FXSetParameters(fx[8], @p);
    p.fBandwidth := 100;
    p.fCenter := 16000;
    BASS_FXSetParameters(fx[9], @p);


Менять можно везде от 0 до 30 с помощю тракбаров


Менять можно везде от 0 до 30 с помощю тракбаров
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
Fiyanov
Дата 15.6.2007, 09:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 255
Регистрация: 19.4.2007
Где: Kazakhstan->Te mirtau

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



С Bass.dll в папке с примерами есть хороший пример с эквалайзером. Прям готовый как в WinAmp. Ты откуда взял Bass.dll? Лучше её скачать с офсайта там и примеры и прочее и прочее.
PM MAIL ICQ   Вверх
SAVANE
Дата 18.6.2007, 10:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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



Не там пример трехполосного.
Ладно оставил три полосы хватит. Вот теперь вторая проблема.
Считываю с реестра значения трекбара для эквалайзеров. Число от 0 до 30. теперь трабла как мне сделать так чтоб пи запуске проги стартовал и еквалайзер.

Пробывал так:
Код


BASS_FXGetParameters(fx[1], @p);
    p.fgain := 15-strtoint(kontrol[12]);
    BASS_FXSetParameters(fx[1], @p);
    BASS_FXGetParameters(fx[2], @p);
    p.fgain := 15-strtoint(kontrol[13]);
    BASS_FXSetParameters(fx[2], @p);
    BASS_FXGetParameters(fx[3], @p);
    p.fgain := 15-strtoint(kontrol[14]);
    BASS_FXSetParameters(fx[3], @p);


Где strtoint(kontrol[13]); считаные значения, но голяк. как тока трону трекбар так сразу меняется по одной полосе значения.
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

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

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

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

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


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

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


 




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


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

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