falkTX
/
paulstretchplugin
mirror of https://bitbucket.org/xenakios/paulstretchplugin.git
1
0
Fork 0
Code Issues 0 Releases 10 Wiki Activity
Browse Source

Removed the redundant spectrum processing methods

tags/v100_p5
xenakios 7 years ago
parent
0c394e9e36
commit
fbd337bf5d
2 changed files with 2 additions and 243 deletions
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. +0
    -233
      Source/PS_Source/ProcessedStretch.cpp
  2. +2
    -10
      Source/PS_Source/ProcessedStretch.h

+ 0
- 233
Source/PS_Source/ProcessedStretch.cpp View File

@@ -178,132 +178,7 @@ void ProcessedStretch::process_spectrum(REALTYPE *freq)
//void ProcessedStretch::process_output(REALTYPE *smps,int nsmps){
//};

void ProcessedStretch::do_harmonics(REALTYPE *freq1,REALTYPE *freq2){
REALTYPE freq=pars.harmonics.freq;
REALTYPE bandwidth=pars.harmonics.bandwidth;
int nharmonics=pars.harmonics.nharmonics;

if (freq<10.0) freq=10.0;

REALTYPE *amp=tmpfreq1.data();
for (int i=0;i<nfreq;i++) amp[i]=0.0;

for (int nh=1;nh<=nharmonics;nh++){//for each harmonic
REALTYPE bw_Hz;//bandwidth of the current harmonic measured in Hz
REALTYPE bwi;
REALTYPE fi;
REALTYPE f=nh*freq;

if (f>=samplerate/2) break;

bw_Hz=(pow(2.0f,bandwidth/1200.0f)-1.0f)*f;
bwi=bw_Hz/(2.0f*samplerate);
fi=f/samplerate;

REALTYPE sum=0.0f;
REALTYPE max=0.0f;
for (int i=1;i<nfreq;i++){//todo: optimize here
REALTYPE hprofile;
hprofile=profile((i/(REALTYPE)nfreq*0.5f)-fi,bwi);
amp[i]+=hprofile;
if (max<hprofile) max=hprofile;
sum+=hprofile;
};
};

REALTYPE max=0.0;
for (int i=1;i<nfreq;i++){
if (amp[i]>max) max=amp[i];
};
if (max<1e-8f) max=1e-8f;

for (int i=1;i<nfreq;i++){
//REALTYPE c,s;
REALTYPE a=amp[i]/max;
if (!pars.harmonics.gauss) a=(a<0.368f?0.0f:1.0f);
freq2[i]=freq1[i]*a;
};

};


void ProcessedStretch::do_freq_shift(REALTYPE *freq1,REALTYPE *freq2){
zero(freq2);
int ifreq=(int)(pars.freq_shift.Hz/(samplerate*0.5)*nfreq);
for (int i=0;i<nfreq;i++){
int i2=ifreq+i;
if ((i2>0)&&(i2<nfreq)) freq2[i2]=freq1[i];
};
};
void ProcessedStretch::do_pitch_shift(REALTYPE *freq1,REALTYPE *freq2,REALTYPE _rap){
zero(freq2);
if (_rap<1.0){//down
for (int i=0;i<nfreq;i++){
int i2=(int)(i*_rap);
if (i2>=nfreq) break;
freq2[i2]+=freq1[i];
};
};
if (_rap>=1.0){//up
_rap=1.0f/_rap;
for (int i=0;i<nfreq;i++){
freq2[i]=freq1[(int)(i*_rap)];
};

};
};
void ProcessedStretch::do_octave(REALTYPE *freq1,REALTYPE *freq2){
zero(sumfreq.data());
if (pars.octave.om2>1e-3){
do_pitch_shift(freq1,tmpfreq1.data(),0.25);
add(sumfreq.data(),tmpfreq1.data(),pars.octave.om2);
};
if (pars.octave.om1>1e-3){
do_pitch_shift(freq1,tmpfreq1.data(),0.5);
add(sumfreq.data(),tmpfreq1.data(),pars.octave.om1);
};
if (pars.octave.o0>1e-3){
add(sumfreq.data(),freq1,pars.octave.o0);
};
if (pars.octave.o1>1e-3){
do_pitch_shift(freq1,tmpfreq1.data(),2.0);
add(sumfreq.data(),tmpfreq1.data(),pars.octave.o1);
};
if (pars.octave.o15>1e-3){
do_pitch_shift(freq1,tmpfreq1.data(),3.0);
add(sumfreq.data(),tmpfreq1.data(),pars.octave.o15);
};
if (pars.octave.o2>1e-3){
do_pitch_shift(freq1,tmpfreq1.data(),4.0);
add(sumfreq.data(),tmpfreq1.data(),pars.octave.o2);
};

REALTYPE sum=0.01f+pars.octave.om2+pars.octave.om1+pars.octave.o0+pars.octave.o1+pars.octave.o15+pars.octave.o2;
if (sum<0.5f) sum=0.5f;
for (int i=0;i<nfreq;i++) freq2[i]=sumfreq[i]/sum;
};

void ProcessedStretch::do_filter(REALTYPE *freq1,REALTYPE *freq2){
REALTYPE low=0,high=0;
if (pars.filter.low<pars.filter.high){//sort the low/high freqs
low=pars.filter.low;
high=pars.filter.high;
}else{
high=pars.filter.low;
low=pars.filter.high;
};
int ilow=(int) (low/samplerate*nfreq*2.0f);
int ihigh=(int) (high/samplerate*nfreq*2.0f);
REALTYPE dmp=1.0;
REALTYPE dmprap=1.0f-pow(pars.filter.hdamp*0.5f,4.0f);
for (int i=0;i<nfreq;i++){
REALTYPE a=0.0f;
if ((i>=ilow)&&(i<ihigh)) a=1.0f;
if (pars.filter.stop) a=1.0f-a;
freq2[i]=freq1[i]*a*dmp;
dmp*=dmprap+1e-8f;
};
};

void ProcessedStretch::update_free_filter()
{
@@ -322,114 +197,6 @@ void ProcessedStretch::update_free_filter()
*/
};

void ProcessedStretch::do_free_filter(REALTYPE *freq1,REALTYPE *freq2){
for (int i=0;i<nfreq;i++){
freq2[i]=freq1[i]*free_filter_freqs[i];
};
};

void ProcessedStretch::do_spread(REALTYPE *freq1,REALTYPE *freq2){
spread(freq1,freq2,pars.spread.bandwidth);
};

void ProcessedStretch::spread(REALTYPE *freq1,REALTYPE *freq2,REALTYPE spread_bandwidth){
//convert to log spectrum
REALTYPE minfreq=20.0f;
REALTYPE maxfreq=0.5f*samplerate;

REALTYPE log_minfreq=log(minfreq);
REALTYPE log_maxfreq=log(maxfreq);
for (int i=0;i<nfreq;i++){
REALTYPE freqx=i/(REALTYPE) nfreq;
REALTYPE x=exp(log_minfreq+freqx*(log_maxfreq-log_minfreq))/maxfreq*nfreq;
REALTYPE y=0.0f;
int x0=(int)floor(x); if (x0>=nfreq) x0=nfreq-1;
int x1=x0+1; if (x1>=nfreq) x1=nfreq-1;
REALTYPE xp=x-x0;
if (x<nfreq){
y=freq1[x0]*(1.0f-xp)+freq1[x1]*xp;
};
tmpfreq1[i]=y;
};

//increase the bandwidth of each harmonic (by smoothing the log spectrum)
int n=2;
REALTYPE bandwidth=spread_bandwidth;
REALTYPE a=1.0f-pow(2.0f,-bandwidth*bandwidth*10.0f);
a=pow(a,8192.0f/nfreq*n);

for (int k=0;k<n;k++){
tmpfreq1[0]=0.0f;
for (int i=1;i<nfreq;i++){
tmpfreq1[i]=tmpfreq1[i-1]*a+tmpfreq1[i]*(1.0f-a);
};
tmpfreq1[nfreq-1]=0.0f;
for (int i=nfreq-2;i>0;i--){
tmpfreq1[i]=tmpfreq1[i+1]*a+tmpfreq1[i]*(1.0f-a);
};
};

freq2[0]=0;
REALTYPE log_maxfreq_d_minfreq=log(maxfreq/minfreq);
for (int i=1;i<nfreq;i++){
REALTYPE freqx=i/(REALTYPE) nfreq;
REALTYPE x=log((freqx*maxfreq)/minfreq)/log_maxfreq_d_minfreq*nfreq;
REALTYPE y=0.0;
if ((x>0.0)&&(x<nfreq)){
int x0=(int)floor(x); if (x0>=nfreq) x0=nfreq-1;
int x1=x0+1; if (x1>=nfreq) x1=nfreq-1;
REALTYPE xp=x-x0;
y=tmpfreq1[x0]*(1.0f-xp)+tmpfreq1[x1]*xp;
};
freq2[i]=y;
};


};


void ProcessedStretch::do_compressor(REALTYPE *freq1,REALTYPE *freq2){
REALTYPE rms=0.0;
for (int i=0;i<nfreq;i++) rms+=freq1[i]*freq1[i];
rms=sqrt(rms/nfreq)*0.1f;
if (rms<1e-3f) rms=1e-3f;

REALTYPE _rap=pow(rms,-pars.compressor.power);
for (int i=0;i<nfreq;i++) freq2[i]=freq1[i]*_rap;
};

void ProcessedStretch::do_tonal_vs_noise(REALTYPE *freq1,REALTYPE *freq2){
spread(freq1,tmpfreq1.data(),pars.tonal_vs_noise.bandwidth);

if (pars.tonal_vs_noise.preserve>=0.0){
REALTYPE mul=(pow(10.0f,pars.tonal_vs_noise.preserve)-1.0f);
for (int i=0;i<nfreq;i++) {
REALTYPE x=freq1[i];
REALTYPE smooth_x=tmpfreq1[i]+1e-6f;

REALTYPE result=0.0f;
result=x-smooth_x*mul;
if (result<0.0f) result=0.0f;
freq2[i]=result;
};
}else{
REALTYPE mul=(pow(5.0f,1.0f+pars.tonal_vs_noise.preserve)-1.0f);
for (int i=0;i<nfreq;i++) {
REALTYPE x=freq1[i];
REALTYPE smooth_x=tmpfreq1[i]+1e-6f;

REALTYPE result=0.0f;
result=x-smooth_x*mul+0.1f*mul;
if (result<0.0f) result=x;
else result=0.0f;

freq2[i]=result;
};
};

};

std::vector<SpectrumProcess> make_spectrum_processes()
{
std::vector<SpectrumProcess> m_spectrum_processes;


+ 2
- 10
Source/PS_Source/ProcessedStretch.h View File

@@ -464,22 +464,14 @@ private:
REALTYPE get_stretch_multiplier(REALTYPE pos_percents) override;
// void process_output(REALTYPE *smps,int nsmps);
void process_spectrum(REALTYPE *freq) override;
void do_harmonics(REALTYPE *freq1,REALTYPE *freq2);
void do_pitch_shift(REALTYPE *freq1,REALTYPE *freq2,REALTYPE rap);
void do_freq_shift(REALTYPE *freq1,REALTYPE *freq2);
void do_octave(REALTYPE *freq1,REALTYPE *freq2);
void do_filter(REALTYPE *freq1,REALTYPE *freq2);
void do_free_filter(REALTYPE *freq1,REALTYPE *freq2);
void do_compressor(REALTYPE *freq1,REALTYPE *freq2);
void do_spread(REALTYPE *freq1,REALTYPE *freq2);
void do_tonal_vs_noise(REALTYPE *freq1,REALTYPE *freq2);

//void copy(const realvector& freq1,realvector& freq2);
void copy(REALTYPE* freq1, REALTYPE* freq2);
void add(REALTYPE *freq2,REALTYPE *freq1,REALTYPE a=1.0);
void mul(REALTYPE *freq1,REALTYPE a);
void zero(REALTYPE *freq1);
void spread(REALTYPE *freq1,REALTYPE *freq2,REALTYPE spread_bandwidth);

void update_free_filter();
int nfreq=0;


Write Preview
Loading…
Cancel
Save