ATNEL tech-forum

Re: Generowanie dźwięku

2013-08-16T16:51:11+01:00

Polecam do tego celu program guitar pro. Otworzysz midi i bez problemu rozszyfrujesz nuty:)

Wysłane z mojego GT-I9500 za pomocą Tapatalk 4

Statystyki: Napisane przez mikandrzej — 16 sie 2013, o 16:51

Re: Generowanie dźwięku

2013-06-01T13:28:00+01:00

Panowie z powodu mojego słabe łącza, proszę o linki z zapisem nutowym najlepiej A, C, D...
Dodatkowo jeżeli ktoś ma dobry opis formatu MIDI.
Z góry dziękuję.

Statystyki: Napisane przez Badman — 1 cze 2013, o 13:28

Re: Generowanie dźwięku

2013-04-28T16:46:41+01:00

spoko niema sprawy

Statystyki: Napisane przez SunRiver — 28 kwi 2013, o 16:46

Re: Generowanie dźwięku

2013-04-28T16:37:00+01:00

zmieniłem buzzer, coś zaczyna wychodzić, dzięki

Statystyki: Napisane przez wireless — 28 kwi 2013, o 16:37

Re: Generowanie dźwięku

2013-04-28T15:57:27+01:00

skompiluj na 8mhz i tyle
jak będzie za wolno piszczał dopasuj opóźnienia ... w main i to wszystko

Statystyki: Napisane przez SunRiver — 28 kwi 2013, o 15:57

Re: Generowanie dźwięku

2013-04-28T15:04:02+01:00

SunRiver napisał(a):

spróbuj tak

Kwarc 16Mhz
M32 głośnik na PB3

ten pierwszy, chciałbym bez zewnętrznego na 8Mhz

Statystyki: Napisane przez wireless — 28 kwi 2013, o 15:04

Re: Generowanie dźwięku

2013-04-28T15:00:52+01:00

A który kod i na jaką megę ??
bo na m32 to żaden problem wystarczy zmienić ustawienia kwarcu i to wszystko
a potem dobrać opóźnienia

Statystyki: Napisane przez SunRiver — 28 kwi 2013, o 15:00

Re: Generowanie dźwięku

2013-04-28T14:33:33+01:00

wireless napisał(a):

masz działające kody w tym temacie , pierwszy udaje syrenę jakąś , a drugi gra melodyjkę Axela F.

a jak to przerobić na 8MHz wewnętrzny?

Statystyki: Napisane przez wireless — 28 kwi 2013, o 14:33

Re: Generowanie dźwięku

2013-04-28T12:42:12+01:00

wireless napisał(a):

a sprezentowałbyś jakieś gotowce tych syren i piszczków?

masz działające kody w tym temacie , pierwszy udaje syrenę jakąś , a drugi gra melodyjkę Axela F.

miłego używania:)

Statystyki: Napisane przez SunRiver — 28 kwi 2013, o 12:42

Re: Generowanie dźwięku

2013-04-28T12:36:40+01:00

SunRiver napisał(a):

powyższy kod bardzie pasuje do generowania dźwięków syren i takich tam piszczyków

a sprezentowałbyś jakieś gotowce tych syren i piszczków?

Statystyki: Napisane przez wireless — 28 kwi 2013, o 12:36

Re: Generowanie dźwięku

2013-04-28T09:37:16+01:00

nio oczywiście i to z poziomu atmegi nawet obsługę robiłem
niebawem również zaprezentuję projekcik na forum prostego syntezatora opartego na kilku SIDACH

Statystyki: Napisane przez SunRiver — 28 kwi 2013, o 09:37

Re: Generowanie dźwięku

2013-04-28T09:01:19+01:00

Pobrałem, usłyszałem i widziałem
Tak na marginesie neta mam z komóry z transferem download max. 6,5 KB/s
Faktycznie z tego co pamiętam, na tyle ile pozwala moja pamięć muzyka (ostatni raz słyszałem około 1993 roku) do gierek na Commodore 64 brzmiała lepiej. Pewnie na byle jakim przetworniku cyfrowo-analogowym brzmiała by lepiej niż na PWM.
Zastanawiam się w jaki sposób można nagrywać dźwięk z wyjścia AVR'a bezpośrednio do karty muzycznej komputera, pewnie należałoby zastosować filtr który nie pozwoli przekroczyć jakiegoś tam napięcia ?
BTW. SID'a w C64 też programowałeś ?

Statystyki: Napisane przez Badman — 28 kwi 2013, o 09:01

Re: Generowanie dźwięku

2013-04-27T19:11:57+01:00

1. dlatego by uzyskać zblizoną do multitimbralu ciągłość dźwięku
2. dokładnie 3 kanały użyłem , ale nie ważne bo oryginalny sid brzmi dużo lepiej
niemniej jednak niebawem przedstawię nowszy kod .

co słychać tu np :

https://www.dropbox.com/s/0norwwrajwdyflz/CAM00028.mp4

Statystyki: Napisane przez SunRiver — 27 kwi 2013, o 19:11

Re: Generowanie dźwięku

2013-04-27T19:05:35+01:00

SunRiver staram się zrozumieć kod i mam kilka pytań:
1. Dlaczego przepełnienie co 32150 Hz ?
2. Po co dzielone jest INT_PER_SEC przez częstotliwości z tabelki (np. INT_PER_SEC/F_A_4) ?

Piszesz, że napisałeś emuacje SID'a. Rozumie, że także na PWM ? Czy zaimplementowałeś 2 kanały ?

Statystyki: Napisane przez Badman — 27 kwi 2013, o 19:05

Re: Generowanie dźwięku

2013-02-24T15:13:16+01:00

ja nie przerabiam melodyjek .... po prostu znam częstotliwości nut - przyzwyczajenie z C64 i Amigi

a tu masz tabelkę :

Statystyki: Napisane przez SunRiver — 24 lut 2013, o 15:13

Re: Generowanie dźwięku

2013-02-24T14:16:51+01:00

Działa fajnie.
A mam pytanie jakim programem przerobić inną melodyjkę na częstotliwość i długość trwania? Abym mógł to wpisać?

Statystyki: Napisane przez Janadamis — 24 lut 2013, o 14:16

Re: Generowanie dźwięku

2013-02-23T15:07:08+01:00

powyższy kod bardzie pasuje do generowania dźwięków syren i takich tam piszczyków
ale zawsze mam asa w rękawie

generowanie dźwięków nawet polifonicznych nie stanowi duzego kłopotu na avr
sam kiedyś popełniłem na medze emulator słynnego SIDA

spróbujmy tak :

[syntax=c]
// kwarc 8MHz
#include
#include
#include

// wartosc przepełnienia timera0
#define INT_PER_SEC 31250

// Częstotliwość (w Hz) odpowiadająca nutom
#define F_FSH_4 370
#define F_A_4 440
#define F_B_4 494
#define F_E_4 330
#define F_CSH_5 554
#define F_D_5 587
#define F_FSH_5 740
#define F_CSH_4 277
#define F_GSH_4 415

#define REST -1 // specialne wyjście
#define FSH_4 INT_PER_SEC/F_FSH_4
#define A_4 INT_PER_SEC/F_A_4
#define B_4 INT_PER_SEC/F_B_4
#define E_4 INT_PER_SEC/F_E_4
#define CSH_5 INT_PER_SEC/F_CSH_5
#define D_5 INT_PER_SEC/F_D_5
#define FSH_5 INT_PER_SEC/F_FSH_5
#define CSH_4 INT_PER_SEC/F_CSH_4
#define GSH_4 INT_PER_SEC/F_GSH_4

#define SEMIQUAVER_TIME 60 // ms
#define BREATH_TIME 20 // ms

volatile uint32_t intrs = 0;
volatile int32_t curNote = REST;

// Przepełnienie Timer0
ISR(TIMER0_OVF_vect)
{
if (curNote == REST)
intrs = 0;
else
{
intrs++;
if (intrs >= curNote)
{
PORTD ^= _BV(PD4);
intrs = 0;
}
}
}

void play(int32_t note, uint32_t len)
{
int i;
curNote = note;
for (i = 0; i< len; i++)
_delay_ms(SEMIQUAVER_TIME);
curNote = REST;
_delay_ms(BREATH_TIME);
}

int main(void)
{
/* Ustawiamy dzielnik. Timer0 zlicza do 256.
* 8Mhz / 1 (CS0=1) = 8000000 incrementacja/sec. przepełnienie co 256, czyli 31250
* przepełnienie przerwanie/sec */

TCCR0 |= _BV(CS00);

// prerwanie od przepełnienia licznika
TIMSK0 |= _BV(TOIE0);

// PD4 jako wyjście
DDRD = _BV(PD4);

TCNT0 = 0;
intrs = 0;

curNote = REST;

// włączamy przerwania
sei();

while (1)
{
// Axel F --- bo jakos tak prosta melodyjka że mykam ja z pamieci
// jak sie nie podoba to sobie zmieńcie na inną

play(FSH_4, 2);
play(REST, 2);
play(A_4, 3);
play(FSH_4, 2);
play(FSH_4, 1);
play(B_4, 2);
play(FSH_4, 2);
play(E_4, 2);
play(FSH_4, 2);
play(REST, 2);
play(CSH_5, 3);
play(FSH_4, 2);
play(FSH_4, 1);
play(D_5, 2);
play(CSH_5, 2);
play(A_4, 2);
play(FSH_4, 2);
play(CSH_5, 2);
play(FSH_5, 2);
play(FSH_4, 1);
play(E_4, 2);
play(E_4, 1);
play(CSH_4, 2);
play(GSH_4, 2);
play(FSH_4, 6);
play(REST, 12);
}
}

[/syntax]

tak na szybko z pamieci kod powinien działac , ale nie sprawdzałem

------------------------ [ Dodano po: 37 minutach ]

Macie wersję dla M32 8Mhz

kompilowane pod Eclipse Hatsune Toolchain ATMEL 3.4.xxx

[syntax=c]

/*
* main.c
*
* Created on: 23-02-2013
* Author: SunRiver
* Toolchain: Atmel GNU 3.4.0_663
* Compiler: avr-gcc 4.6.2
*/

// kwarc 8MHz
#include
#include
#include

// wartosc przepełnienia timera0
#define INT_PER_SEC 31250

// Częstotliwość (w Hz) odpowiadająca nutom
#define F_FSH_4 370
#define F_A_4 440
#define F_B_4 494
#define F_E_4 330
#define F_CSH_5 554
#define F_D_5 587
#define F_FSH_5 740
#define F_CSH_4 277
#define F_GSH_4 415

#define REST -1 // specialne wyjście
#define FSH_4 INT_PER_SEC/F_FSH_4
#define A_4 INT_PER_SEC/F_A_4
#define B_4 INT_PER_SEC/F_B_4
#define E_4 INT_PER_SEC/F_E_4
#define CSH_5 INT_PER_SEC/F_CSH_5
#define D_5 INT_PER_SEC/F_D_5
#define FSH_5 INT_PER_SEC/F_FSH_5
#define CSH_4 INT_PER_SEC/F_CSH_4
#define GSH_4 INT_PER_SEC/F_GSH_4

#define SEMIQUAVER_TIME 60 // ms
#define BREATH_TIME 20 // ms

volatile uint32_t intrs = 0;
volatile int32_t curNote = REST;

// Przepełnienie Timer0
ISR(TIMER0_OVF_vect)
{
if (curNote == REST)
intrs = 0;
else
{
intrs++;
if (intrs >= curNote)
{
PORTD ^= _BV(PD4);
intrs = 0;
}
}
}

void play(int32_t note, uint32_t len)
{
int i;
curNote = note;
for (i = 0; i< len; i++)
_delay_ms(SEMIQUAVER_TIME);
curNote = REST;
_delay_ms(BREATH_TIME);
}

int main(void)
{
/* Ustawiamy dzielnik. Timer0 zlicza do 256.
* 8Mhz / 1 (CS0=1) = 8000000 incrementacja/sec. przepełnienie co 256, czyli 31250
* przepełnienie przerwanie/sec */

TCCR0 |= _BV(CS00);

// prerwanie od przepełnienia licznika
TIMSK |= _BV(TOIE0);

// PD4 jako wyjście
DDRD = _BV(PD4);

TCNT0 = 0;
intrs = 0;

curNote = REST;

// włączamy przerwania
sei();

while (1)
{
// Axel F --- bo jakos tak prosta melodyjka że mykam ja z pamieci
// jak sie nie podoba to sobie zmieńcie na inną

play(FSH_4, 2);
play(REST, 2);
play(A_4, 3);
play(FSH_4, 2);
play(FSH_4, 1);
play(B_4, 2);
play(FSH_4, 2);
play(E_4, 2);
play(FSH_4, 2);
play(REST, 2);
play(CSH_5, 3);
play(FSH_4, 2);
play(FSH_4, 1);
play(D_5, 2);
play(CSH_5, 2);
play(A_4, 2);
play(FSH_4, 2);
play(CSH_5, 2);
play(FSH_5, 2);
play(FSH_4, 1);
play(E_4, 2);
play(E_4, 1);
play(CSH_4, 2);
play(GSH_4, 2);
play(FSH_4, 6);
play(REST, 12);
}
}

[/syntax]

A tu ładnie słychać ....

https://www.dropbox.com/s/lnq997wi9ljn2zh/SS102996.AVI

Statystyki: Napisane przez SunRiver — 23 lut 2013, o 15:07

Re: Generowanie dźwięku

2013-02-22T22:50:41+01:00

Mam taki kłopot z tym w pliku piszczek.h w tej tablicy wpisałem pod rząd od początku z 50razy liczbę 110 ale dźwięk się nic nie zmienił. To działa inaczej niż myślałem, nie wiem jak

------------------------ [ Dodano po: 39 minutach ]

I mam takie pytanie:
Próbuje przeanalizować ten kod programu jak on ma działać. Czyli wyrzucając te niepotrzebne pętle for, to wystarczy że do rejestru wpiszę odpowiednią częstotliwość nuty jaka chcę zagrać i to będzie to? Czy dobrze to zrozumiałem?
Proszę o pomoc

Statystyki: Napisane przez Janadamis — 22 lut 2013, o 22:50

Re: Generowanie dźwięku

2013-02-22T22:21:43+01:00

miłej zabawy ci życzę
dokładnie tak jak myślisz każda wartość to częstotliwość dźwięku odpowiadająca mniej więcej nutkom:)

Statystyki: Napisane przez SunRiver — 22 lut 2013, o 22:21

Re: Generowanie dźwięku

2013-02-22T22:18:23+01:00

Dzięki działa. Fajna nutka
Czyli w tej tablicy sine są tam częstotliwości nut?
Wystarczy że tam wpisze częstotliwość nuty i to będzie ten dźwięk? Czy tak?
Już zabieram się za sprawdzanie.

Statystyki: Napisane przez Janadamis — 22 lut 2013, o 22:18

Re: Generowanie dźwięku

2013-02-22T22:00:58+01:00

spróbuj tak

Kwarc 16Mhz
M32 głośnik na PB3

tak na szybko

[syntax=c]
#include
#include
#include

#include "piszczek.h"

/*
TIMER0 w trybie FastPWM Mode.
*/

void InitPWM()
{

TCCR0|=(1<
//Ustawiam OC0 jako wyjście. PB3 na ATmega16 / ATmega32
// tu podłączamy głośniczek
DDRB|=(1<}

void main()
{
uint8_t i;

InitPWM();

while(1)
{

uint8_t delay,n;

for(delay=1;delay<=50;delay++)
{
for(n=0;n<(51-delay);n++)
{
for(i=0;i<=254;i++)
{
OCR0=pgm_read_byte_near(sine+i);
_delay_loop_2(delay);

}
}
}
for(delay=50;delay>=2;delay--)
{
for(n=0;n<(51-delay);n++)
{
for(i=0;i<=254;i++)
{
OCR0=pgm_read_byte_near(sine+i);
_delay_loop_2(delay);
}
}
}

}
}

[/syntax]

a tu plik z naszym dźwiękiem ....

piszczek.h

[syntax=c]

#include

prog_uint8_t sine[256]={
127,
130,
133,
136,
139,
143,
146,
149,
152,
155,
158,
161,
164,
167,
170,
173,
176,
178,
181,
184,
187,
189,
192,
195,
197,
200,
203,
205,
207,
210,
212,
214,
217,
219,
221,
223,
225,
227,
229,
231,
232,
234,
236,
237,
239,
240,
242,
243,
244,
245,
246,
248,
248,
249,
250,
251,
251,
252,
253,
253,
253,
254,
254,
254,
254,
254,
254,
254,
253,
253,
253,
252,
252,
251,
250,
250,
249,
248,
247,
246,
245,
243,
242,
241,
239,
238,
236,
235,
233,
231,
229,
227,
225,
224,
221,
219,
217,
215,
213,
210,
208,
206,
203,
201,
198,
195,
193,
190,
187,
185,
182,
179,
176,
173,
170,
167,
164,
161,
158,
155,
152,
149,
146,
143,
140,
137,
134,
131,
128,
125,
121,
118,
115,
112,
109,
106,
103,
100,
97,
94,
91,
88,
85,
82,
79,
76,
73,
71,
68,
65,
62,
60,
57,
55,
52,
50,
47,
45,
42,
40,
38,
36,
34,
31,
29,
27,
26,
24,
22,
20,
19,
17,
15,
14,
13,
11,
10,
9,
8,
7,
6,
5,
4,
3,
3,
2,
2,
1,
1,
0,
0,
0,
0,
0,
0,
0,
1,
1,
1,
2,
2,
3,
4,
4,
5,
6,
7,
8,
9,
10,
12,
13,
14,
16,
17,
19,
21,
22,
24,
26,
28,
30,
32,
34,
36,
39,
41,
43,
45,
48,
50,
53,
55,
58,
61,
63,
66,
69,
72,
74,
77,
80,
83,
86,
89,
92,
95,
98,
101,
104,
107,
110,
113,
116,
119,
122,
};

[/syntax]

Statystyki: Napisane przez SunRiver — 22 lut 2013, o 22:00

Generowanie dźwięku

2013-02-22T21:42:04+01:00

Witam
Zafascynowało mnie generowanie muzyki przez AVR. Dlatego chciałem pójść o krok dalej i sam tworzyć muzykę.
Znalazłem taką stronę na której jest podane jaka ma być częstotliwość aby było słychać odpowiednia nutę:
http://obrazki.elektroda.net/58_1256150128.gif
Postanowiłem to zrealizować na PWM programowym na timerze2.
Oto co naskrobałem:
[syntax=c]
/*
* main.c
*
* Created on: 2012-04-08
* Author: Janadamis
*/

#include
#include
#include
#include
#include
#include "Keyboard/keyboard.h"
#include "LCD/lcd44780.h"

// definicje zmiennych do sterowania 6 kanałami programowych PWM
// zmienne typu uint8_t, rozdzielczość 8-bitowa
volatile uint8_t pwm1, pwm2, pwm3;

// główna funkcja programu main()
int main (void)
{

lcd_on();//Włączenie podświetlenia lcd
lcd_init();//inicjalizacja lcd
lcd_str("AVR WAV Player.");
initkeyboard();//inicjalizacja klawiatury od PC

//***** PROGRAMOWY PWM - 3 KANAŁÓW *******
// ustawienie pinów kanałów programowych PWM jako WYJŚCIA
DDRC |= (1<// wyłączenie diod LED podłączonych katodami do wyjść
PORTC |= (1<
// ustawienia TIMER2 w tryb CTC
TCCR2 |= (1<TCCR2 |= (1<OCR2 = 100;// dodatkowy podział częsttotliwości przez 200
TIMSK |= (1<sei();// odblokowanie globalne przerwań

pwm1=90;
pwm2=70;
pwm3=50;

while(1)
{

if(key_board=='a')
{
DDRC |= (1<lcd_locate(1,0);
lcd_str("OKA");
OCR2 = 142;
}

if(key_board=='B')
{
DDRC |= (1<lcd_locate(1,0);
lcd_str("OKB");
OCR2 = 71;
}

if(key_board==0)
{
DDRC &= ~ (1<lcd_locate(1,0);
lcd_str("OKC");
}

}//while
}//main

// ciało procedury obsługi przerwania Compare Match Timera2
ISR( TIMER2_COMP_vect )
{
static uint8_t cnt; // definicja naszego licznika PWM
// bezpośrednie sterowanie wyjściami kanałów PWM
if(cnt>=pwm1) PORTC &= ~(1<if(cnt>=pwm2) PORTC &= ~(1<if(cnt>=pwm3) PORTC &= ~(1<cnt++;// zwiększanie licznika o 1
}
[/syntax]
Jednak efekt jest całkowicie inny niż zakładałem.
Po podłączeniu głośnika poprzez wzmacniacz do uC. To z głośnika wydobywa się dźwięk ale to takie jakby pierdzenie.
Możliwe że coś źle zrozumiałem w tym generowaniu dźwięku dlatego proszę o pomoc.
I czy to się podobnie generuje jak muzykę że dajemy próbki na PWM a innym timerem częstotliwość samplowania? Czy jak??
Ja zrobiłem program na podstawie informacji z internetu że wysyłamy sygnał prostokątny z częstotliwością odpowiadającą nucie.
Proszę o pomoc

Statystyki: Napisane przez Janadamis — 22 lut 2013, o 21:42