Воспроизведение звука на основе pic 16f628a

Hispanus

В общем, начитавшись датащитов, у меня родился вот такой алгоритм:
-устанавливаю период ШИМ(загружаю в регистр PR2 число , например 63).
-настраиваю порт В на выход
-настраиваю предделитель TMR2 (1:1), включаю TMR2. Частота дискретизации получается равна 78,12КГц (не много ли?)
-перевожу модуль ССР в режим ШИМ.
-жду пока таймер сравняется со значением в регистре PR2. Дальше два пути - либо через прерывания, чего у меня не получилось(МК упорно не хочет входить в подпрограмму обработки), либо тупо ждать пока флаг сброса установится. Дальше сбрасываю этот флаг ( всё это происходит в простом if() ) и записываю длительность ШИМ сигнала. Для этого беру число из массива данных, соответствующее wav, разбиваю его: первые два бита загружаю в регистр CCPxX:CCPxY, следующие 8 бит - в регистр ССP1L.
Есть во всем этом хоть доля правды?

Реклама

Частота дискретизации получается равна 78,12КГц (не много ли?)

Это всё-таки наверное не частота дискретизации, а частота ШИМа. Частота дискретизации это та частота, с которой Вы будете менять значение скважности, т.е. выбирать значения из таблицы.

Реклама

Dmitry Dubrovenko

Hispanus писал(а):Частота дискретизации получается равна 78,12КГц

Как уже правильно заметили, это - частота ШИМ, и то, при 8-битном разрешении и тактовой частоте 20MHz.
Частота дискретизации будет равна той, с которой Вы будете менять данные. Удобно это делать, используя прерывание от TMR2, установив необходимое значение посткалера.
Например, в своём речевом информаторе, я использовал тактовую частоту 16MHz. Соответственно, частота ШИМ получилась 62,5kHz. Установив посткалер равным 8, получилась частота сэмплирования 7812,5Hz. Поскольку стояла задача использовать дешёвые м/сх памяти I2C, то проблематично получить большую. В крайнем случае, удастся её поднять в два раза.
Во вложении - пример использования с массажным креслом (черновой вариант).
P.S.: К сожалению, презентацию форум не принимает. Кому интересно, кидайте мыло.

Hispanus писал(а):первые два бита загружаю в регистр CCPxX:CCPxY, следующие 8 бит - в регистр ССP1L

Как уже говорил, кодирование разумнее выбирать 8-битным. Следовательно, младшие два бита надо загружать в регистр CCP1CON, а старшие шесть - в младшие шесть битов регистра CCPR1L (старшие два бита надо обнулить).

Hispanus

Вот код:

Код: Выделить всё

#include <16f628a.h>
#use delay(clock=20000000)
#fuses  HS,NOWDT

#byte PORTB = 0x06
//Адрес регистра порта В

#byte INTCON = 0x0B
//Адрес регистра прерываний

#byte CCP1CON = 0x17
//Адрес управляющего регистра модуля CCP1

#byte CCPR1L = 0x15
//Адрес младшего байта CCP1

#byte CCPR1H = 0x16
//Адрес старшего байта CCP1

#byte T2CON = 0x12
//Адрес настройки регистра TMR2

#byte PR2 = 0x92
//Адрес регистра периода TMR2

#byte TRISB = 0x86
//Адрес регистра направления ввода\вывода порта В

#byte PIR1 = 0x0C
//Адрес  регистра флагов прерывний

#byte PIE1 = 0x8C
//Адрес регистра разрешения перифирийных прерываний

#byte TMR2 = 0x11

#bit DC1B0 = CCP1CON.4
#bit DC1B1 = CCP1CON.5
//Адрес младших битов длительности импульса

#bit GIE = INTCON.7
//Адрес бита глобального разрешения прерываний

#bit TMR2ON = T2CON.2
//Адрес бита включения TMR2

#bit T2CKPS0 = T2CON.0
#bit T2CKPS1 = T2CON.1
//Адрес битов коэффициента предделителя TMR2

#bit CCP1M2 =  CCP1CON.2
#bit CCP1M3 =  CCP1CON.3

#bit TMR2IF = PIR1.1
//Адрес флага прерывания по переполнению таймера2

#bit TMR2IE = PIE1.1

#bit PEIE = INTCON.6
//Адрес бита разрешения прерываний от периферийных устройств

int i=0;
//Переменная - счётчик

int hold;

const char number[]=
{
  255,127,10,30,40,37,100,50,127,255,255,255,255,90
};

#int_timer2
//Прерывание по переполнению TMR2
void timer2_isr()
{
  TMR2IF=0;
  CCPR1L=number[i];
  i++;
  hold=sizeof(number);
  if (i==hold)
    {
      i=0;
      PEIE=0;
      TMR2IE=0;
      GIE=0;
      TMR2ON=0;
      //PORTB=0b00000001;
    }
}

void main()
{
  PORTB=0;
  
  TRISB=0;
  //Порт В работает на выход
  
  T2CKPS1=0;
  T2CKPS0=0;
  //Коэффициент предделителя TMR2=1
  
  PR2=63;
  //Частота дискретизации ШИМ - сигналов равна 78КГц
  //Разрядность ШИМ = 8
  
  GIE=1;
  //Глобальное прерывание разрешено
  
  PEIE=1;
  //Прерывание разрешено от внешних прерываний
  
  TMR2IE=1;
  //Прерывания разрешены при совпадении TMR2 с PR2
  
  CCP1M3=1;
  CCP1M2=1;
  //Модуль ССР включён в режиме ШИМ
  
  TMR2ON=1;
  //TMR2 включён
  
  while (1)
    {
    }
}

Скажите, что не так

Реклама

urry

ну я ццс не знаю и собственно, не стремлюсь, но !

1. Вы забираете 8 битное значение в CCPR1L, забывая, что младшие 2 разряда нужно занести
CCP1CON
2. На 628 соорудить что-то терпимо говорящее невозможно.

Я это сам пробовал и почувствовал разницу между ним и 8 мегой, например.

Ну.. воспользуйтесь 18, 24 серией, в самом деле, не 37 год.

Реклама

Hispanus

Все наши сегодняшнии технологии родом из 19 века

На самом деле для меня результат, если хотя бы отдельные слова можно быдет различить)) главное понять и реализовать принцип.. такие детали как качество звучания и д.т. придут потом

Да, забыл про младшие и старшие биты)

Код: Выделить всё

void timer2_isr()
{
  TMR2IF=0;

  databits_order=number[i];
  CCPR1L=databits_order>>2;
  //Старшие 6 бит

  bit0=databits_order & 0x01;
  if (bit0==0x01)
    {
      DC1B0=1;
    }  
  else
    DC1B0=0;
  bit1=databits_order & 0x10;
  if (bit1==0x10)
    {
      DC1B1=1;
    }
  else
    DC1B1=0;
  //Младшие 2 бита

  i++;
  hold=sizeof(number);
  if (i==hold)
    {
      i=0;
      PEIE=0;
      TMR2IE=0;
      GIE=0;
      TMR2ON=0;
      //PORTB=0b00000001;
    }
}

Теперь так?

Реклама

Dmitry Dubrovenko

urry писал(а):На 628 соорудить что-то терпимо говорящее невозможно

Юр, а не ты ли стыковал его с MMC?
Короче говоря, гнусная клевета.

Именно "говорящее" очень даже можно (кто не верит, давайте мыло). Во всяком случае на Асме.
Причём, как уже упоминал, схема элементарная, и на дешёвых элементах.
Вот с "поющим", действительно, гораздо сложнее.

urry

да, я
http://www.remexpert.com/ipb/topic2548.html
а потом посмотрел как Чан делает
http://elm-chan.org/
и добавил буфер в 256 байт
http://vrtp.ru/index.php?showtopic=14534
разница - очень видна.

Dmitry Dubrovenko

urry писал(а):да, я

Да это был не вопрос, а утверждение (я прекрасно помню этот топик).

urry писал(а):а потом посмотрел как Чан делает

Если ты про "музыкальную шкатулку", таки оригинальное решение по поводу самого сэмпла (хотя и не уверен, что его личное). Я там пару других мелодий составил, но, как ты понимаешь, детально с работой не разбирался (компилировали другие люди).

urry писал(а):разница - очень видна.

Проект твой у меня не открывается, так что ничего не увидел.
Можешь на словах объяснить, что за буфер?

urry

Чтение с ммс карточки идет неравномерно - в конце каждого сектора (512 байт, килобайт, неважно) возникает пауза, связанная с необходимостью прочитать 2 байта контрольной суммы и выскочить в поиск начала нового сектора.
Чтобы сгладить эту неравномерность, Чан поставил кольцевой буфер в 256 байт, идет упреждающее чтение с карточки , запись в кольцевой буфер и по таймеру - читаются оттуда данные.
Неравномерность исчезла - качество звука возросло.
Все, собственно...

Hispanus

Залив, сию управляющую программку (с кое какими изменениями, установив постскалер, равным восьми) в протеус и подключив осцилограф, я увидел периодически изменяющиеся (с периодом, равным восьми) прямоугольные импульсы. Но так как 628 имеет скудную память, цифр сватает только на несколько милисекунд, что определенно недостаточно для человеческого уха.

urry

Объясните, на что Вы рассчитывали. При скромненькой частоте дискретизации 22 килогерца 10 секундная запись занимает 220 кБайт.
Теме этой уже лет 5, наверное, и здесь, и на казусе изжевана.
Сразу возникает вопрос о быстрой внешней памяти большого размера - и самый дешевый вариант получается ммс sd .
при маленьком количестве файлов в корне ммс нет необходимости поднимать на мк поддержку ФАТ - я читал, например, начало файла и длину с служебной области.
При большом количестве звуковых файлов - есть, в этом случае ставят библиотеку Чана FATFS - она написана очень грамотно и без труда портируется на любой компилятор.
Но не на 628 камень - нехватка памяти.

Поэтому предлагаю Вам сразу перейти с 628 пика на пик 24f16ка102, например, 3 бакса стоимости вместо 2 за 628, зато все проблемы - с поднятием файловой системы, память под кольцевой буфер - исчезают.

Dmitry Dubrovenko

urry писал(а):Неравномерность исчезла - качество звука возросло.

Вот тут не понял.
Описанная проблема может вызвать только "заикания" звука. Каким образом она влияет на качество?

urry писал(а):Сразу возникает вопрос о быстрой внешней памяти большого размера - и самый дешевый вариант получается ммс sd

Как уже говорил, я реализовал всё на 24cxx.
Увеличение частоты дискретизации практически не даст повышения качества. Необходимо повышать разрядность, что упирается в возможности модуля CCP.

urry

Там не заикание - посторонний шум, скорее, потому 512 байт пролетают быстро.
Особенно чувствуется на маленьких уровнях громкости.
Ну пример я уже выкладывал, ты наверняка слышал, может тс будет интересно.
Это - без буфера, 628 пик, снято перед входом УНЧ.

Hispanus

Обычные 16-ричные редакторы представляют цифры в 10-тичной форме, без характерной приставки 0х..Заболев этим вопросом, я написал мини - программку, добавляющую эту важную часть к каждой цифре+запятую в конец. Думаю, весьма полезная штука для записи какой нибудь wav в память МК.

Hispanus

Попробовал подключить внешнюю память типа 24СL256 по интерфейсу i2C и вот что из этого вышло: (только опять не работает

)

Код: Выделить всё

#include <16f628a.h>
#use delay(clock=1000000)
#fuses HS,NOWDT
#use i2c(master,sda=PIN_A1,scl=PIN_A0,FORCE_HW)
#byte TRISA = 0x05
#byte PORTB = 0x06
#byte TRISB = 0x86 

void main()
{
  int c1=5,c2;
 
  TRISA=0;
  TRISB=0;
  PORTB=0;
  
  
  while(1)
    {
      i2c_start();
      //Инициализация передачи
      i2c_write(0xA0);
      //Адрес Slave с запросом на запись
      i2c_write(c1);
      //Передача 
      i2c_start();
      i2c_write(0xA1);
      //Адрес Slave с запросом на чтение
      c2=i2c_read();
      //Чтение
      i2c_stop();
      //Конец
      
      if (c1==c2)
      PORTB=0xFF;
    }
}

Hispanus

Или вот так:

Код: Выделить всё

 while(1)
    {
      i2c_start();
      //Инициализация передачи
      i2c_write(0xA0);
      //Адрес Slave с запросом на запись
      i2c_write(c1);
      //Передача 
      i2c_stop();
      //Конец
      
      i2c_start();
       i2c_write(0xA0);
      //Адрес Slave с запросом на запись
      i2c_start();
      i2c_write(0xA1);
      //Адрес Slave с запросом на чтение
      c2=i2c_read();
      //Чтение
      i2c_stop();
      //Конец
      
      if (c2==5)
      PORTB=0xFF;
    }

urry

При всей моей нелюбви к ццс...

Трис а0, а1 в "1".
Чтение перед стоп делать без ожидания бита подтверждения c2=i2c_read(0);

(С)Я уже столько знаю о прокладках, что сам могу их носить...

Hispanus

Порт А на вход перевел, но не помогло..без бита подтверждения говорите..а как тогда?

urry

c2=i2c_read(0);
это и есть без бита подтверждения.
подтягивающие резисторы на сда и сдл, надеюсь, стоят ?