PT2313 + энкодер + ИК пульт + анализатор спектра (Страница 1 из 9)
Данный контент доступен только зарегистрированным пользователям.
Анализатор спектра активируется после 10 секунд не активности органов управления. Аналоговый сигнал (с линейного выхода) необходимо подать на вход А0 через разделительный конденсатор 0,1 мкФ.
#define AUTO_GAIN 1 // автонастройка по громкости #define VOL_THR 35 // порог тишины (ниже него отображения на матрице не будет) #define LOW_PASS 30 // нижний порог чувствительности шумов (нет скачков при отсутствии звука) #define DEF_GAIN 80 // максимальный порог по умолчанию #define FHT_N 256 // ширина спектра х2 #define LOG_OUT 1 #include #include #include #include #include #include #include #include #include LiquidCrystal lcd(7, 6, 2, 3, 4, 5);// RS,E,D4,D5,D6,D7 PT2313 audioChip; IRrecv irrecv(12); // указываем вывод модуля IR приемника Encoder myEnc(9, 8);//CLK, DT decode_results ir; byte posOffset[16] = ; // вч выше byte menu,in,w,w2,gr1,gr2,www,z,z0,z1; int vol,vol_d,bass,bass_d,treb,treb_d,balans,gain,gain0,gain1,gain2; unsigned long time,oldPosition = -999,newPosition; unsigned long gainTimer; byte maxValue, maxValue_f,spek; float k = 0.1; byte gain_sp = DEF_GAIN; int i1,yyy; void setup() < Serial.begin(9600);Wire.begin(); lcd.begin(16, 2);irrecv.enableIRIn(); // запускаем модуль IR audioChip.initialize(0,true); pinMode(10,INPUT);// МЕНЮ КНОПКА SW энкодера pinMode(11,INPUT);// ВЫБОР ВХОДА КНОПКА IN ADMUX = 0b01100000; ADCSRA = 0b11010100; // http://rcl-radio.ru/?p=57478 MsTimer2::set(3, to_Timer);MsTimer2::start(); // АКТИВИРУЕМ ПРЕРЫВАНИЯ ДЛЯ ЭНКОДЕРА vol = EEPROM.read(0);// vol eeprom bass = EEPROM.read(1)-7;// bass eeprom treb = EEPROM.read(3)-7;// treb eeprom balans = EEPROM.read(4)-4;// balans eeprom in = EEPROM.read(5);// in eeprom gain0 = EEPROM.read(6); gain1 = EEPROM.read(7); gain2 = EEPROM.read(8); audio(); >void loop()< if (newPosition != oldPosition) > if(spek==0)< byte a1[8] = ; byte a2[8] = ; byte a3[8] = ; lcd.createChar(0,a1);lcd.createChar(1,a2);lcd.createChar(2,a3); >else< byte v1[8] = ; byte v2[8] = ; byte v3[8] = ; byte v4[8] = ; byte v5[8] = ; byte v6[8] = ; byte v7[8] = ; byte v8[8] = ; lcd.createChar(0, v1);lcd.createChar(1, v2);lcd.createChar(2, v3);lcd.createChar(3, v4);lcd.createChar(4, v5);lcd.createChar(5, v6);lcd.createChar(6, v7);lcd.createChar(7, v8); > ///////////////////// управление //////////////////////////////////////////////////// if(digitalRead(10)==LOW)4)>// меню if(digitalRead(11)==HIGH)2);audio();>// КНОПКА ВЫБОРА ВХОДА IN ////////////////// ИК приемник - обработка кодов кнопок /////////////////////////////////////// if ( irrecv.decode( &ir )) >// IR приемник - чтение, в мониторе порта отображаются коды кнопок if(ir.value==0x2FDD02F)4)>// меню кнопка вверх if(ir.value==0x2FD32CD)>// меню кнопка вниз if(ir.value==0x2FD708F)1);gr1=0;gr2=0;audio();>// IN /////////////////////// VOLUME ////////////// if(menu==0)< if(ir.value==0x2FD906F)// кнопка > if(ir.value==0xFFFFFFFF and gr1==1)// кнопка >>>>>> if(ir.value==0x2FDF20D)// кнопка < if(ir.value==0xFFFFFFFF and gr2==1)// кнопка lcd.setCursor(0,0);lcd.print("Volume "); lcd.print(" ");lcd.print(-62+vol);lcd.print(" ");lcd.setCursor(13,0);lcd.print("dB");vol_d=vol-14; if(w2==1)< for(z=0,z0=0,z1=0;z<=vol_d;z++,z1++)2) if(z1==1)> if(z1==3) if(z1==2)w2=0;>> /////////////////// BASS ////////////// if(menu==1)< if(ir.value==0x2FD906F)// кнопка > if(ir.value==0xFFFFFFFF and gr1==1)// кнопка >>>>>> if(ir.value==0x2FDF20D)// кнопка < if(ir.value==0xFFFFFFFF and gr2==1)// кнопка lcd.setCursor(0,0);lcd.print("Bass "); lcd.print(" ");lcd.print(bass*2);lcd.print(" ");lcd.setCursor(13,0);lcd.print("dB");bass_d=bass*2+15; if(w2==1)< for(z=0,z0=0,z1=0;z<=bass_d;z++,z1++)2) if(z1==1)> if(z1==3) if(z1==2)w2=0;>> ///////////////// TREBLE ////////////////// if(menu==2)< if(ir.value==0x2FD906F)// кнопка > if(ir.value==0xFFFFFFFF and gr1==1)// кнопка >>>>>> if(ir.value==0x2FDF20D)// кнопка < if(ir.value==0xFFFFFFFF and gr2==1)// кнопка lcd.setCursor(0,0);lcd.print("Treble "); lcd.print(" ");lcd.print(treb*2);lcd.print(" ");lcd.setCursor(13,0);lcd.print("dB");treb_d=treb*2+15; if(w2==1)< for(z=0,z0=0,z1=0;z<=treb_d;z++,z1++)2) if(z1==1)> if(z1==3) if(z1==2)w2=0;>> //////////////// BALANSE +\- 4 dB ///////////// if(menu==3)< if(ir.value==0x2FD906F)// кнопка > if(ir.value==0xFFFFFFFF and gr1==1)// кнопка >>>>>> if(ir.value==0x2FDF20D)// кнопка < if(ir.value==0xFFFFFFFF and gr2==1)// кнопка lcd.setCursor(0,0); if(balans>=0)else lcd.print(abs(balans));lcd.print(" dB "); if(balans==0) ");> if(balans <0)if(balans>0) ");> if(balans>=0)else lcd.print(abs(balans));lcd.print(" dB "); lcd.setCursor(0,1);lcd.print("L"); lcd.setCursor(15,1);lcd.print("R"); if(balans <0)if(balans>0) if(balans==0)> ///////////////////////////////////////////////////////////// /////////// input + gain ///////////////////////////////////////// if(menu==4) < switch(in)< case 0: gain = gain0;break; case 1: gain = gain1;break; case 2: gain = gain2;break; >if(ir.value==0x2FD906F)// кнопка > if(ir.value==0xFFFFFFFF and gr1==1)// кнопка >>>>>> if(ir.value==0x2FDF20D)// кнопка < if(ir.value==0xFFFFFFFF and gr2==1)// кнопка switch(in) < case 0: gain0 = gain;break; case 1: gain1 = gain;break; case 2: gain2 = gain;break; >lcd.setCursor(0,0);lcd.print(" INPUT ");lcd.print(in); lcd.setCursor(0,1);lcd.print(" GAIN "); switch(gain) < case 3: lcd.print(" +11.25 dB");break; case 2: lcd.print(" +7.5 dB");break; case 1: lcd.print(" +3.75 dB");break; case 0: lcd.print(" 0 dB");break; >> ///////////////////////////////////////////////////////////// // запись всех настроек в EEPROM если кнопки + и - не нажимались в течении 10 сек // если настройки тембра, баланса и номер входа не менялись в течении 10 сек, переход в рег. Громкости if(millis()-time>10000 && w==1) < EEPROM.update(0,vol); EEPROM.update(4,balans+4); EEPROM.update(1,bass+7); EEPROM.update(3,treb+7); EEPROM.update(5,in); EEPROM.update(6,gain0); EEPROM.update(7,gain1); EEPROM.update(8,gain2); menu=100;lcd.clear();w=0;w2=1;cl();spek=1; >if(spek==1) < analyzeAudio(); // функция FHT, забивает массив fht_log_out[] величинами по спектру for (int pos = 0; pos < 16; pos++) < // для окошек дисплея с 0 по 15 // найти максимум из пачки тонов if (fht_log_out[posOffset[pos]] >maxValue) maxValue = fht_log_out[posOffset[pos]]; lcd.setCursor(pos, 0); // преобразовать значение величины спектра в диапазон 0..15 с учётом настроек int posLevel = map(fht_log_out[posOffset[pos]], LOW_PASS, gain_sp, 0, 15); posLevel = constrain(posLevel, 0, 15); while(yyy <2)7) < // если значение больше 7 (значит нижний квадратик будет полный) lcd.write((uint8_t)posLevel - 8); // верхний квадратик залить тем что осталось lcd.setCursor(pos, 1); // перейти на нижний квадратик lcd.write((uint8_t)7); // залить его полностью >else < // если значение меньше 8 lcd.print(" "); // верхний квадратик пустой lcd.setCursor(pos, 1); // нижний квадратик lcd.write((uint8_t)posLevel); // залить полосками >> yyy=0; > if (AUTO_GAIN) < maxValue_f = maxValue * k + maxValue_f * (1 - k); if (millis() - gainTimer >1500) < // каждые 1500 мс // если максимальное значение больше порога, взять его как максимум для отображения if (maxValue_f >VOL_THR) gain_sp = maxValue_f; // если нет, то взять порог побольше, чтобы шумы вообще не проходили else gain_sp = 100; gainTimer = millis(); > >else > ////////////////////////////////// >// LOOP void audio() < audioChip.source(in);//select your source 1. 3 вход 3. 1 audioChip.volume(vol);//Vol 0. 62 шаг 1 дБ audioChip.gain(gain);//gain 0. 3 шаг 3.75 дБ audioChip.bass(bass);//bass -7. +7 шаг 2 дБ audioChip.treble(treb);//treble -7. +7 шаг 2 дБ audioChip.balance(balans);//-31. +31 программно ограничено до +\-8 дБ audioChip.loudness(true);//true or false // тонкомпенсация >void gain_func()if(gain>3)> void balans_func()4)if(balans<-4)> void treb_func()7)if(treb<-7)> void bass_func()7)if(bass<-7)> void vol_func()if(vol>62)> void cl() void to_Timer() void analyzeAudio() < cli(); while( i1 < FHT_N ) < i1++; dowhile((ADCSRA & (1 i1=0; fht_window(); // window the data for better frequency response fht_reorder(); // reorder the data before doing the fht fht_run(); // process the data in the fht fht_mag_log(); // take the output of the fht sei(); > Pt2313l как проверить работоспособность
Все бы ничего, ток я в MK pic не шарю. Был бы тот проект под АВР.
По второй ссылке ясно тока то что человеку удалось приспособить и все, а вот как он это сделал осталось загадкой.
Желательно бы знать какие команды нужны этой микрухе для работы.
Сборка печатных плат от $30 + БЕСПЛАТНАЯ доставка по всему миру + трафарет
Заголовок сообщения: Re: Звуковой проц PT2313L
Добавлено: Сб июл 09, 2011 19:57:48
| Мудрый кот |
pirat777 писал(а):
Все бы ничего, ток я в MK pic не шарю. Был бы тот проект под АВР.
По второй ссылке ясно тока то что человеку удалось приспособить и все, а вот как он это сделал осталось загадкой.
Желательно бы знать какие команды нужны этой микрухе для работы.
схема таже из той ссылки на статью. собираете схему из статьи и ставите вместо тда7313 рт2313. делов то. прошивка есть уже готовая. вы хоть статью почитали?
Опубликованы материалы вебинара Компэл, посвященного литиевым аккумуляторам EVE Energy и решениям для управления перезаряжаемыми источниками тока. На вебинаре мы представили информацию не только по линейкам аккумуляторной продукции EVE, но и по решениям для управления ею, что поможет рассмотреть эти ХИТ в качестве дополнительной альтернативы для уже выпускающихся изделий. Также рассмотрели нюансы работы с производителем и сервисы, предоставляемые Компэл по данной продукции.
Заголовок сообщения: Re: Звуковой проц PT2313L
Добавлено: Сб июл 09, 2011 20:29:59
| Первый раз сказал Мяу! |
Дык я ж грю что в пиковских МК ничего не секу даж программировать нечем
Компания Компэл, официальный дистрибьютор EVE Energy, бренда №1 по производству химических источников тока (ХИТ) в мире, предлагает продукцию EVE как со склада, так и под заказ. Компания EVE широко известна в странах Европы, Америки и Юго-Восточной Азии уже более 20 лет. Недавно EVE была объявлена поставщиком новых аккумуляторных элементов круглого формата для электрических моделей «нового класса» компании BMW. Продукция EVE предназначена для самого широкого спектра применений – от бытового до промышленного.
Заголовок сообщения: Re: Звуковой проц PT2313L
Добавлено: Сб июл 09, 2011 21:30:38
| Мудрый кот |
программатор собирается за пару сек. в той теме я выкладывал схему простого программатора. которым я успешно прошил..
Pt2313l как проверить работоспособность
Архив — только для чтения
| Форум радиолюбителей » СХЕМЫ » УСИЛИТЕЛИ » Нет звука на выходе PT2313L (Странное поведение темброблока) |
Постов: 1503 Друзья
Кто имел дела с PT2313 или TDA7313, отзовитесь.
Собрал темброблок на PT2313L (полный аналог TDA7313) по этой схеме:
Процессорная часть: 
Аудиопроцессор: 
Темброблок работает, но очень странно — звук появляется и регулируется только когда дотрагиваюсь пальцем (а еще лучше металлическим предметом) до дорожек платы. Во всех остальных случаях — тишина. На замыкания и неконтакт проверял — все нормально. Что за ерунда? Кондеры пробитые? Или аудиопроцессор дохлый? Но ведь все работает, только через одно место.
Смущает вот что: на схеме в даташите сопротивления резисторов тоже 5.6 кОм, а ниже написано:
Цитата
Note: 1. The Resistor ( R ) Range = 2.0K Ohms to 3.6 K Ohms.
2. Resistor ( R ) Recommended Value = 2.4 K Ohms
Поставил на 2.2 кОм. Не из-за этого ли?
Фото прилагаются. 
Постов: 2270 Х
PT2313 часто попадается брак. За TDA7313 не знаю, в жизни ее не видел. Проверь шину i2c, вообще отсоедини ее и касайся тех участков где проц оживает. Может там по шине вовсе что попало бежит.
Постов: 1456 ОК
Не люблю я эти желтые кондюки, там внутри смд-шка которая любит очень разламыватся и часто отпадают от неё ножки.
Постов: 2291 Друзья
я ставил 5,6к на предусилитель. все норм рабатает. единственно что на беззвучном режиме все равно еле еле слышна музыка. но это не напрягает
Постов: 1503 Друзья
BIOS, вряд ли бы кондеры там развалились. Все из одной партии, другие работают нормально.
Цитата nickolay78 ( )
PT2313 часто попадается брак.
Я про TDA7313 такое читал, что почти стопроцентный брак, поэтому и взял PT. Попробую тогда сначала поменять резисторы, а если не пойдет, поставлю запасную 2313.
Постов: 2291 Друзья
я думаю резисторы не при чем.
Постов: 2114 Друзья
делал на TDA7313, отличная тема, работает классно, резисторов на Ом там нет.
Кондёры нормальные, но вот по входу и выходу ставил бы другие.
Схема преда вот: 
я управляю этим: 
подозрений 2
1. проверьSDA и SCL
2. подваленая микра
Файлы: 6789163.gif (63.4 Kb) · 7271621.gif (82.1 Kb)
Постов: 1503 Друзья
ГУБЕРНАТОР, о, это же схема МИНИ-16. Вначале тоже склонялся к ней, но за 16-й мегой надо было специально ехать, а пик валялся без дела.
Правильность SDA/SCL проверил сразу — там без ошибок (у автора на схеме они перепутаны).
Все больше склоняюсь к тому, что бракованная микра попалась.
Постов: 1503 Друзья
А дело становится все интереснее. Во-первых, нашел на 1-м входе перепутанные землю и правый канал — исправил. Звук появился. Но.
звук есть, если прикладываю провода от левого и правого каналов (естественно, голос «срезается»), стоит же приложить общий — тишина. Прозвонил всю плату на замыкания — все в норме. Что я опять делаю не так? Может, земля разведена неправильно? В даташитах земля разделена на GND и DGND, у меня — нет.
Руководство
Pt2313l как проверить работоспособность Саундбар Philips HTS5120. Независимо от источника сигнала(AUX, MP3, FM-tuner, CD/DVD), после переключения источника звук очень плавно пропадает до нуля в течение… Подробнее » Pt2313l как проверить работоспособность
Pci8402 в плате iskaa3481 что это такое
- автор: admin
- 27.07.2023
Ноутбук Toshiba Sattelit A200-23J ISKAA LA-3481P Нет питания Неисправности комьютеров Как найти дефект в компьютере Сигналы BIOS и POST Прошивка BIOS компьютера Схемы компьютеров и… Подробнее » Pci8402 в плате iskaa3481 что это такое
Qvi 2101 что это
- автор: admin
- 27.07.2023
VoIP Шлюз QTECH QVI-2101 v2 , 1 порт 10/100 LAN, 1 порт 10/100 WAN, 1 порт FXS Получить коммерческое предложение Компания QTECH предлагает вниманию клиентов… Подробнее » Qvi 2101 что это
Pdu что это в электрике
- автор: admin
- 27.07.2023
PDU и все-все-все: распределение питания в стойке Одна из стоек внутренней виртуализации. Заморочились с цветовой индикацией кабелей: оранжевый обозначает нечетный ввод по питанию, зеленый –… Подробнее » Pdu что это в электрике
Q умножить на u что за формула
- автор: admin
- 27.07.2023
Работа электрического тока. Закон Джоуля-Ленца. Для определения работы, которая совершается током, проходящим по некоторому участку цепи, нужно воспользоваться определением напряжения: . Значит, где А —… Подробнее » Q умножить на u что за формула