Перейти к содержанию

Получение синусоида c электретного микрофона с помощью STM32VLDISCOVERY


sucess

Рекомендуемые сообщения

Помогите пожалуйста!

Моя схема внизу. На входе электретный микрофон. Звуковой сигнал усиливается, смещается на 1,65В , фильтрируется и подается на АЦП отладочной платы STM32VLDISCOVERY. Никак не могу получить синусоид после UART.

Программа на COOCOX IDE

#include "stm32f10x.h"

char rx_buf[10], rx_length=0;
uint32_t adc_res;
uint8_t n = 0x00;
unsigned char rx_data;
unsigned char tx_data;

uint16_t i;


const int CC = 2048;
unsigned int counter=0;
unsigned short arr[2048];
int windowSize = 100;

void AdcInit(void)
{
    RCC->APB2ENR |= RCC_APB2ENR_IOPAEN;

    GPIOA->CRL &= ~GPIO_CRL_MODE1;
    GPIOA->CRL   &= ~GPIO_CRL_CNF1;

    RCC->APB2ENR |=  RCC_APB2ENR_ADC1EN;
    RCC->CFGR    &= ~RCC_CFGR_ADCPRE;

     ADC1->CR1     =  0;
     ADC1->CR1 |= ADC_CR1_EOCIE;
     ADC1->SQR1    =  0;
     ADC1->SQR3    =  1;


     ADC1->SMPR2 |=ADC_SMPR2_SMP1;

     ADC1->CR2     =  ADC_CR2_EXTSEL;       //выбрать источником запуска разряд  SWSTART
     ADC1->CR2    |=  ADC_CR2_EXTTRIG;
     ADC1->CR2    |=  ADC_CR2_ADON;
     ADC1->CR2    |=  ADC_CR2_CONT;
     ADC1->CR2    |=  ADC_CR2_CAL;          //запуск калибровки
                while (!(ADC1->CR2 & ADC_CR2_CAL)){};
       ADC1->CR2    |=  ADC_CR2_SWSTART;

 NVIC_SetPriority(ADC1_IRQn, 2);
  NVIC_EnableIRQ(ADC1_IRQn);

  __enable_irq();
}


void init_uart(void)
{
        RCC->APB2ENR |= RCC_APB2ENR_IOPAEN;
        RCC->APB2ENR |= RCC_APB2ENR_AFIOEN;
        RCC->APB2ENR |= RCC_APB2ENR_USART1EN;
        GPIOA->CRH &=~(GPIO_CRH_MODE9|GPIO_CRH_CNF9);
        GPIOA->CRH |= (GPIO_CRH_MODE9_1|GPIO_CRH_CNF9_1);

        USART1->CR1 |= USART_CR1_UE;

        USART1->BRR = 0x0D0;//0x9C4; // 9600Бит/с
        USART1->CR1 |= USART_CR1_TE; // Включение передатчика USART1
        USART1->CR1 |= USART_CR1_RE; // Включение приемника USART1
        USART1->CR1 |= USART_CR1_RXNEIE;
}
void USART1_Send(char chr) {
    while (!(USART1->SR& USART_SR_TXE));
    USART1->DR = chr;
}

void delay(uint32_t i) {
 volatile uint32_t j;
 for (j=0; j!= i * 1000; j++);
}

int main(void)
{

    init_uart();
    AdcInit();
    smooth();

    while(1)
    {

        send();

    }

}

//adc interruption...

unsigned short data_adc;
void ADC1_IRQHandler(void) {


    data_adc = ADC1->DR;
    arr[counter++]= data_adc;
    if (counter > CC-2) {
        counter = CC-1;

        ADC1->CR2 &=  ~ADC_CR2_ADON;
    }

    ADC1->SR |= ADC_SR_EOC;

}


void smooth(void)
{
        int k;
        unsigned short sum = 0;
        unsigned short movingAverage = 0;
        if (counter > CC-2) {

            for ( k = 0; k<= (CC-windowSize);k++)
                        {
                            int g;
                            sum = 0;
                            for (g = k; g < k+windowSize; g++)
                            {
                                sum += arr[g];
                                        }
                            movingAverage = sum/windowSize;
                            arr[k] = movingAverage;

                        }

        }

}


void send(void){
        if (counter > CC-2) {
        for (i = 0; i < CC-windowSize; i++)
//        for (i = 0; i < CC; i++)
        {

        USART1_Send((char)((arr) & 0xFF));
        USART1_Send((char)((arr >> 8) & 0x0F))    ;
        }

    counter = 0;
        ADC1->CR2 |=  ADC_CR2_ADON;
        ADC1->CR2    |=  ADC_CR2_SWSTART;
    }

 

Программа для построения данных с UART

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CommPort"
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
CommPort1->Open = true;
    but_stop = 0;
}
//---------------------------------------------------------------------------
unsigned short data;
int count_data = 0;
void __fastcall TForm2::CommPort1DataReceived(TObject *Sender, DWORD Count)
{
    if (Count == 0) {
        return;
    }

   static int status = 0;
    unsigned char temp;
    DWORD count_temp = 0;
    while (count_temp++ < Count) {
        temp = CommPort1->GetChar();
        switch(status) {
                      case 0x00 :
                data = temp;
                status = 0x01;
            break;
            case 0x01 :
                data |= temp >> 8;
                status = 0x00;
                if (!but_stop) {
                    Chart1->Series[0]->AddXY(count_data++, data);
                                    }
            break;
        }

//        else {
//            data = temp;
//        }
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
      but_stop = ~but_stop;
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button2Click(TObject *Sender)
{
    Chart1->Series[0]->Clear();
}
//---------------------------------------------------------------------------
 

2602117.png

Ссылка на комментарий
Поделиться на другие сайты

Реклама: ООО ТД Промэлектроника, ИНН: 6659197470, Тел: 8 (800) 1000-321

1 минуту назад, sucess сказал:

Никак не могу получить синусоид после UART

а может в него 220 воткнуть? Думаю должно помочь

Нужно делать то, что нужно. А то, что не нужно, делать не нужно. (С) Винни Пух

Ссылка на комментарий
Поделиться на другие сайты

20% скидка на весь каталог электронных компонентов в ТМ Электроникс!

Акция "Лето ближе - цены ниже", успей сделать выгодные покупки!

Плюс весь апрель действует скидка 10% по промокоду APREL24 + 15% кэшбэк и бесплатная доставка!

Перейти на страницу акции

Реклама: ООО ТМ ЭЛЕКТРОНИКС, ИНН: 7806548420, info@tmelectronics.ru, +7(812)4094849

Выбираем схему BMS для корректной работы литий-железофосфатных (LiFePO4) аккумуляторов

 Обязательным условием долгой и стабильной работы Li-FePO4-аккумуляторов, в том числе и производства EVE Energy, является применение специализированных BMS-микросхем. Литий-железофосфатные АКБ отличаются такими характеристиками, как высокая многократность циклов заряда-разряда, безопасность, возможность быстрой зарядки, устойчивость к буферному режиму работы и приемлемая стоимость. Но для этих АКБ, также как и для других, очень важен контроль процесса заряда и разряда, а специализированных микросхем для этого вида аккумуляторов не так много. Инженеры КОМПЭЛ подготовили список имеющихся микросхем и возможных решений от разных производителей. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

9 минут назад, Стальной сказал:

А что можешь?

13 минуты назад, mail_robot сказал:

синусом

на вход сунусоид с телефона 440Гц, на выход такой

260217_1.PNG

Изменено пользователем sucess
Ссылка на комментарий
Поделиться на другие сайты

 

7 минут назад, Стальной сказал:

А отладчик там есть? Данные верно пересылаются? Частота дискретизации какая?

да есть, всё верно. Частота дискретизации 50КГц

Изменено пользователем sucess
Ссылка на комментарий
Поделиться на другие сайты

5 минут назад, ALEN&Co сказал:

1. С выхода ОУ нормальный синус идет?

2. Для чего у Вас в схеме С5? Чем задается напряжение на входе АЦП по постоянному току?

если выход схемы не на АЦП подает, а прямо на компютер получили синусоид на программе Audacity.

C5- разделительный конденсатор

17 минут назад, Стальной сказал:

Сравни данные, которые видит отладчик и которые получает комп

Комп нормально получил, не знаю почему отладчик не правильно показал.

Ссылка на комментарий
Поделиться на другие сайты

27 минут назад, Стальной сказал:

C5 убери

Отладчик правильно показывает, ошиьбка в коде

C5 убрал, результат не изменился.

На ДМА не смог разобраться.

Ссылка на комментарий
Поделиться на другие сайты

Этапы решения такие

-отправлять заранее известные числа с тем же количеством значащих бит, что разрядность АЦП и проверять, правильно ли принимает программа в ПК

-подавать на АЦП постоянный сигнал известного напряжения и смотреть, насколько правильно измеряет его АЦП

-подавать постоянный сигнал, результат отправлять на ПК и смотреть, насколько правильно передаётся напряжение.

-определить максимальную частоту сигнала

Этапы выполнять по порядку, каждый раз убеждаясь, что узел работает верно.

Ссылка на комментарий
Поделиться на другие сайты

4 часа назад, Стальной сказал:

Этапы решения такие

-отправлять заранее известные числа с тем же количеством значащих бит, что разрядность АЦП и проверять, правильно ли принимает программа в ПК

-подавать на АЦП постоянный сигнал известного напряжения и смотреть, насколько правильно измеряет его АЦП

-подавать постоянный сигнал, результат отправлять на ПК и смотреть, насколько правильно передаётся напряжение.

-определить максимальную частоту сигнала

Этапы выполнять по порядку, каждый раз убеждаясь, что узел работает верно.

Всё проверил, все правильно и получил как на картине. Знаете как фильтровать с помощью цифрового фильтров

17006008_963913587044959_131800987_n.png

Ссылка на комментарий
Поделиться на другие сайты

2 минуты назад, Стальной сказал:

А что на входе было?

синусоид 440Гц с телефона. С постоянным напряжением проверил, все правильно.

 

Ссылка на комментарий
Поделиться на другие сайты

тогда 4 пункт, плавно увеличивай частоту и наблюдай за картинкой. Начни с 50 Гц или ниже, если телефон способен выдать. Осциллографом проверь входной сигнал.

Ссылка на комментарий
Поделиться на другие сайты

у меня нет Осциллографа, как частоту определить.

на 100Гц, 200Гц, 300Гц такие получил

 

 

1.png

2.png

3.png

Изменено пользователем sucess
Ссылка на комментарий
Поделиться на другие сайты

Мне вот интересно как этот участок кода работает вообще:

 USART1_Send((char)((arr) & 0xFF));
 USART1_Send((char)((arr >> 8) & 0x0F))    ;

Если 

unsigned short arr[2048];

Зачем-то проводятся действия над указателем на массив arr, а потом этот же указатель преобразовывается в тип char. 

Ну и для передачи потока данных сэмплованых на 50 кГц скорость USART повыше должна быть, где-то под 1М. + два буфера. Пока в один АЦП данные складывает, второй на ПК передается.

 

Ссылка на комментарий
Поделиться на другие сайты

23 минуты назад, Вуйко сказал:

Мне вот интересно как этот участок кода работает вообще:


 USART1_Send((char)((arr) & 0xFF));
 USART1_Send((char)((arr >> 8) & 0x0F))    ;

Если 


unsigned short arr[2048];

Зачем-то проводятся действия над указателем на массив arr, а потом этот же указатель преобразовывается в тип char. 

Ну и для передачи потока данных сэмплованых на 50 кГц скорость USART повыше должна быть, где-то под 1М. + два буфера. Пока в один АЦП данные складывает, второй на ПК передается.

 

первая строчка передается 8 младших битов, вторая 4 старших

Ссылка на комментарий
Поделиться на другие сайты

вот только в такой записи передается 8 младших и 4 старших бита адреса, а не данных.

Ругался на отсутствие форматирования исходного кода (включая отсутствие осмысленных комментариев и наличие неубранного после конфигуратора мусора) не менее 15 раз.

Часть моих наработок.

Ссылка на комментарий
Поделиться на другие сайты

Присоединяйтесь к обсуждению

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

Гость
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Ответить в этой теме...

×   Вставлено с форматированием.   Восстановить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...
  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
  • Сообщения

    • Не будут, тут разнос между на и вч огромный, я же написал Широколосный, все пропустит от 20 Гц до 20 кГц, далее магнитола срежет на какой надо частоте. 60, 80 , 120 Гц. Но сейчас осенило, вроде магнитолы режут 2 порядком, может этого будет и мало Вам, нужно слушать. 
    • Нет, изначально планировал дальний в полнакала, развел плату, заказал в Китае 5шт (первый заказ, скидки и просто красиво). Установка планировалась в семейный "парк" авто. Конечно, если все будет работать правильно, то каким-то знакомым или знакомым знакомых можно и сделать.  Но, как оказалось, есть куча нюансов. Потом присмотрел ДХО с режимом поворотника такого плана:   Как уже ранее писал, для ледов девайс можно перевести в режим реле. Но поскольку обычно в подобных лампах все на пределе по току и по нагреву, и живут они соответственно не долго,  хотелось бы оставить возможность ШИМ. Вот и интересно как реагирует светодиод на ШИМ. Пока ясно, что нужно поднять частоту. Может еще электролит по выходу добавить или нет особого смысла?  
    • Тут подробнее. Становится понятно что бета величина нифига не линейная.  
    • И что тут я должен сравнивать ? На последнем фото моя плата, сравните с видеороликом. В однофазной мотор подключается непосредственно к плате, в трёхфазной версии мотор подключается через контактор, а реле контактора подключаются к out motor (на L/S и N/R)  Если вы не верите, то я могу запустить плату и сделать фото загрузки блока, где на экране будет видна модель устройства... Или вы будете утверждать ещё и факт перепрошивки ?
    • Собственно вопрос - как увеличить выходной ток заряда? Вот в этой схеме какой именно резистор нужно подобрать для изменения тока заряда?  
    • @Ашот Чобанян Мда.... 1. Вы серьезно считаете что все частотники одинаковые и все вам отвечающие обладают экстрасенсорными способностями что бы узнать их модели через экран? 2. У частотников (ВНЕЗАПНО!!!) есть в комплекте такая вещь как инструкция. Говорят что в них открывают тайны их монтажа и подключения. 3. Если вы не смогли сами, поищите в ближнем своем окружении человека, который сможет. Есть большая вероятность что вам это будет стоить дешевле, чем несколько поломанных частотников, или поломанное оборудование.
    • Там же написано, при токе 1 ампер и 7 ампер. Практически, на токах до пары ампер 90 - 120
  • Похожий контент

×
×
  • Создать...