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

Получение синусоида 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 пользователей онлайн

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

    • Доброго времени суток. Столкнулся с проблемой: не получается скачать пакет STM32F4 (пробовал и другие, ошибка та же) при нажатии кнопки install появляется ошибка (первый скриншот). Такое ощущение, что CubeIDE не может подключиться к сети, постоянно появляется окно как на втором скиншоте. Подскажите как можно исправить проблему?
    • Я вас конечно уважаю, но хамить мне не надо. Все УНЧ что я создавал сначала до идеала дорабатывались в симуляторе, и только потом собирались. В 98% случаев они сразу работали корректно. Были исключения, но там проблемы были в разводке платы и деталях а не симуляторе. Тот же мой VAC 2.0 ПОЛНОСТЬЮ совпал по результатам тестов в железе с результатами тестов в симуляторе.  Эта схема это простейший ВК в AB классе к которому подключили ОУ для усиления напряжения. Нет ни единой причины этой схеме работать некорректно или плохо. Единственные 2 варианта почему будет работать плохо/не работать, это либо накосячено при сборке или детали обвязки неисправны, либо сам ОУ палëный. Качество работы этой схемы очень сильно будет зависеть от качества ОУ и симулятор тут не при чëм. И опять же, этой схеме уже больше 30 лет и еë собирали сотни человек! Если собрано на нормальных деталях, эта схема будет работать как надо и выдаст качественный звук. 
    • У многих в голове "битые ячейки". Ясно сказано, что работает видео в помещении, опробовано десятки раз. Весь снятый материал в лесу и в поле пошёл в корзину и также опробовано не один раз. Приобретена новая карта за 1К. Видео ещё хуже, чем с тех "чудо флешек". https://disk.yandex.ru/i/Ww52T3leg99VxA
    • Сорри, вопрос звучит не однозначно. Меня интересовало - нужен ли вынос наружу головок или не нужен, а не их расположение на передней панели относительно друг друга.
    • Когда то я тоже был от неё в ужасе, но быстро прошло. К тому же это одно из лучших технических решений, если не лучшее.
    • Совершенно верно. Смысл сближения +/- шин в том чтобы получить эти контуры максимально симметрично расположенными относительно чувствительных к помехам точек монтажа. Однако при этом сами контуры увеличиваются по площади и меняют плоскость расположения на менее выгодную по помехам по сравнению с "классикой" (полигон земли под шинами). Поэтому, лично я предпочитаю трассировать прямые и возвратные проводники  друг над другом, чтобы минимизировать излучение изначально.
    • Почитайте Часть вопросов отпадет.
  • Похожий контент

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