uos

From Lazarus wiki
Revision as of 16:22, 20 April 2013 by Fredvs (talk | contribs)
Jump to navigationJump to search

UOS (United OpenLib of Sound).


uoslogo.png

UOS unifies the best open-source audio libraries.



With UOS you can:

. Listen to mp3, ogg, wav, flac,... audio files.

. With 16, 32 or float 32 bit resolution.

. Record all types of input into file.

. Add DSP effects and filters, however many you want and record it.

. Listen to multiple inputs and outputs.




UOS uses the PortAudio, SndFile and Mpg123 audio libraries.

Included in the package: Examples and binary libraries for Linux 32/64, Windows 32/64, Mac OSX 32.

http://sites.google.com/site/fiensprototyping/U_OS_Test.tar.gz

http://github.com/fredvs/uos/




Here some examples how to use UOS :

First : add uos.pas in your uses section.

Then load libraries with:

  LoadLib;           
  InitLib; 
          

-Let's play a sound file...

Create the player :

  Player1 := TUOS_Player.Create(True);     
  Player1.AddIntoDevOut ;               //// Output into OUT Device
  Player1.AddFromFile('MySong.mp3');    //// Input from audio file 

And lets play it...

  Player1.Play;                         //// Play the song...

-Let's play a sound file with some dsp effect:

First create the player :

  Player1 := TUOS_Player.Create(True);     
  Player1.AddIntoDevOut ;               //// Output into OUT Device
  Player1.AddFromFile('MySong.ogg');    //// Input from audio file 
  Player1.AddDSPIn(1);                  //// Add how many dsp you want
  Player1.AddDSPIn(2);

And lets play it...

  Player1.Play;                         //// Play the song with DSP effect...


-Listen to your mic into your loudspeakers :

Create the player:

  Player1 := TUOS_Player.Create(True);     
  Player1.AddIntoDevOut ;               //// Output into OUT Device
  Player1.AddFromDevIn ;               //// Input from IN Device

And lets play it...

  Player1.Play;                         //// Listen to your mic in your loudspeakers...


-Now, ear your mic, listen to a mp3, apply some effects and record the mic into wav file at same time:

Create the player :

  Player1 := TUOS_Player.Create(True);  
  Player1.AddIntoDevOut ;               //// Output into OUT Device
  Player1.AddIntoFile('Myrecord.wav') ;               //// Output into OUT Device
  Player1.AddFromDevIn ; ;             //// Input from IN Device
  Player1.AddDSPIn(1);                 //// Add how many dsp you want
  Player1.AddDSPIn(2)
  Player2 := TUOS_Player.Create(True);
  Player2.AddFromFile('MySong.mp3')    //// the background audio file
  Player2.AddIntoDevOut ;               //// Output into OUT Device;

And lets play it...

  Player1.Play;                         //// Listen your mic with DSP effects and record it ...
  Player2.Play;        //// Listen to mp3 together with recording


Here are the basic UOS procedure : Each procedure has his equivalent with argument for custom parameters...

Quote

   Init Procedures :
   LoadLib;                 //// Load dynamic libraries
   InitLib();               //// Init those libraries
   Output Procedures:
   AddIntoDevOut();         //// Output into OUT Device
   AddIntoFile();           //// Output into Wav File
   Input Procedures:
   AddFromDevIn();          //// Input from IN device
   AddFromFile();           //// Input from Audio File
   InputLength();           //// Lenght of Input in samples
   InputPosition();         //// Get position
   Seek();                  //// Change position
   Player Procedures:   
   Play;                    //// Start playing
   RePlay;                  //// Resume playing after pause
   Stop;                    //// Stop playing and free thread
   Pause;                   //// Pause playing
   DSP Procedures :                 
   AddDSPIn()               //// DSP procedure for input
   AddDSPOut()              //// DSP procedure for output
   SetDSPin()               //// Set DSP In
   SetDSPout()              //// Set DSP out