Construa um compressor de áudio
Construa um compressor de áudio
In[1]:=

a = Import["ExampleData/rule30.wav"]
In[2]:=

AudioPlot[a, ImageSize -> Medium]
Out[2]=

Calcule a amplitude RMS do sinal com um limite de 0,02.
In[3]:=

amplitude = AudioBlockMap[Max[.02, Sqrt@Mean[#^2]] &, a, {.01, .005}]
Out[3]=

Comprima o intervalo dinâmico do sinal.
In[4]:=

AudioNormalize[a/AudioGenerator[amplitude]]
In[5]:=

AudioNormalize[a/AudioGenerator[amplitude]];
AudioPlot[%, ImageSize -> Medium]
Out[5]=
