Rysowanie wykresu dźwięku

[kriss]

Witajcie!

Mam stworzyć wykres dźwięku (amplituda od czasu) taki jak na tym rysunku:



Tyle, że nie wiem jak się za niego zabrać. Udało mi się wczytać plik do programu poprzez bibliotekę BASS i narysować na komponencie TChart wykres poziomu dźwięku:

Kod: Zaznacz cały

  HSTREAM Uchwyt;
  BASS_Init(-1, 48000, 0, Handle, NULL);
  BASS_Start();
  Uchwyt = BASS_StreamCreateFile(False, "jmj-mf2.wav", 0, 0, 0); 
  BASS_ChannelPlay(Uchwyt, false);
  DWORD OK = BASS_ChannelGetLevel(Uchwyt);
  r=HIWORD(OK);
  l=LOWORD(OK);
  Chart1->Series[0]->Add(l, b, clGreen);
  Chart2->Series[0]->Add(r, b, clGreen);


Wykres rysuje się podczas odtwarzania, lecz niestety nie o taki wykres dźwięku mi chodziło. Z tego co dobrze rozumiem trzeba wykorzystać jakoś BASS_ChannelGetData, tylko pozostaje pytanie - JAK?

Chyba, że jest jakiś inny, łatwiejszy sposób wyrysowania na TChart takiego wykresu?

[Cyfrowy Baron]

Gdy używasz jakiejś niestandardowej biblioteki, to nie oznacza, że inni również ją znają. Powinieneś podać skąd można pobrać tą bibliotekę, oraz udzielić informacji o tym dla jakich kompilatorów jest dostępna, lub wskazać adres pod którym można takie informacje znaleźć. Ponadto nie wszyscy potrafią korzystać z tej biblioteki, więc przydałoby się więcej kodu. Ja osobiście nigdy nie słyszałem o takiej bibliotece i gdybym, miał ją przetestować, to nie wiedziałbym od czego zacząć
Ostatnio nad czymś podobnym pracuje Corvis. Przejrzyj więc jego posty.

[kriss]

Biblioteka zwie się BASS http://www.un4seen.com/. Bezpośredni link do ostatniej wersji: http://us2.un4seen.com/files/bass24.zip (jest tutaj plik z dokumentacją). Biblioteka jest dostępna dla C/C++, Delphi, VB. W załączniku daję przygotowaną już wersję plików .LIB dla C++ Buildera. Próbowałem rysować wykres poprzez BASS_ChannelGetLevel - ale tu jest poziom dźwięku w wartościach od 0 do 65536 na obydwa kanały.

Wrzucam tutaj kod dzięki któremu rysuję wykres na obydwu komponentach TChart:

Kod: Zaznacz cały

void __fastcall TForm1::Button1Click(TObject *Sender)
{

   BASS_Init(-1, 48000, 0, Handle, NULL);
   BASS_Start();
   Uchwyt = BASS_StreamCreateFile(False, "jmj-mf2.wav", 0, 0, 0);

  // odtwarzam wczytany plik
  BASS_ChannelPlay(Uchwyt, false);
  DWORD OK = BASS_ChannelGetLevel(Uchwyt);
  r=HIWORD(OK);
  l=LOWORD(OK);
  float rozmiar = BASS_ChannelGetLength(Uchwyt);
  double time=BASS_ChannelBytes2Seconds(Uchwyt, rozmiar);
  ListBox->Items->Clear();
  ListBox->Items->Add(time); //sprawdzam ile sec trwa .wav
}

Mam też Buttony, które uaktywniają/dezaktywują timer (Interval = 1) rysujący obecnie odtwarzany plik na TChart:

Kod: Zaznacz cały

void __fastcall TForm1::Timer3Timer(TObject *Sender)
{
  r2=20*log10(r/32768); //dB
  l2=20*log10(l/32768); //dB
  Chart1->Series[0]->Add(l2, b, clGreen);
  Chart2->Series[0]->Add(r2, b, clGreen);
}


... i teraz myślę jak zrobić bym mógł rysować wykres amplitudy od czasu. Amplituda chyba jest znormalizowana (wartości <-1;1>).

[polymorphism]

Coś w ten deseń:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

float buffer[2048];

read = BASS_ChannelGetData(Uchwyt, buffer, sizeof(buffer) | BASS_DATA_FLOAT);
if(read != -1)
{
        read /= sizeof(float); /* 'read' to liczba pobranych float'ów  */

        /* tu rysujesz wykres */
}
 

[kriss]

Ok, wielkie dzięki, wykres rysuje się jak należy

[Giewont]

Witam. Mam podobny problem z wyrysowaniem przebiegu czasowego dźwięku za pomocą biblioteki BASS.
Czy mógłbym prosić o dokładniejsze wyjaśnienie jak użyć w tym celu funkcji BASS_ChannelGetData ?
Rozumiem, że funkcja w przedstawionym wyżej fragmencie kodu zwraca próbkę do zmiennej read, ale jak teraz
wyciągnąć z niej znormalizowaną amplitudę dla lewego i prawego kanału ?

Początkowo próbowałem zrealizować wykres za pomocą wspominanej już w tym temacie funkcji ChannelGetLevel, niestety wykres
wyglądał nieprawidłowo Funkcja ta zwraca wartości z zakresu od 0 do 32768, próbowałem przekonwertować je na zakres <-1, +1> za pomocą
poniższego kodu:

Kod: Zaznacz cały

          DWORD r, l;
          float r2, l2;
          OK = BASS_ChannelGetLevel(Uchwyt);
          r=HIWORD(OK);
          l=LOWORD(OK);
          if (r <= 16384)
          {
                r2 = (float)r/16384;
                r2 = (1-r2)*-1;
          }
          else
          {
                r2 = (float)(r-16384);
                r2 = r2/16384;
          }
          if (l <= 16384)
          {
                l2 = (float)l/16384;
                l2 = (1-l2)*-1;
          }
          else
          {
                l2 = (float)(l-16384);
                l2 = l2/16384;
          }

Wykres wyrysowywany był następnie z wartości l2 i r2. Mimo, że mieściły się one w pożądanym zakresie - wygląd wykresu moim zdaniem był nieprawidłowy:

[polymorphism]

Rozumiem, że funkcja w przedstawionym wyżej fragmencie kodu zwraca próbkę do zmiennej read (...)

Przecież tam masz napisane jak wół, czym jest wartość w zmiennej read!

[Giewont]

Przecież tam masz napisane jak wół, czym jest wartość w zmiennej read!

sorry, chodziło mi oczywiście o buffer

[polymorphism]

No to w takim razie odpowiedź brzmi: tak, buffer zawiera serię znormalizowanych próbek.

[Giewont]

dzięki, wykres rysuje się poprawnie

ostateczne rozwiązanie wygląda tak:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

DWORD read;
float r2, l2;
float buffer[2048];
read = BASS_ChannelGetData(Uchwyt, buffer, sizeof(buffer) | BASS_DATA_FLOAT);
          if(read != -1)
          {
                read /= sizeof(float);
                for (int i=0 ; i<read ; i+=2)
                {
                        l2=buffer[i];                    // lewy
                        r2=buffer[i+1];                // prawy
                }
          }

pozdrawiam !