[PD-cvs] externals/tbext/source fftbuf.cpp,1.1,1.2 main.cpp,1.8,1.9 tbfft2.cpp,1.1,1.2

timblech at projects.sourceforge.net timblech at projects.sourceforge.net
Wed Jan 28 12:09:16 CET 2004


Update of /cvsroot/pure-data/externals/tbext/source
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19880/source

Modified Files:
	fftbuf.cpp main.cpp tbfft2.cpp 
Log Message:


Index: fftbuf.cpp
===================================================================
RCS file: /cvsroot/pure-data/externals/tbext/source/fftbuf.cpp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** fftbuf.cpp	20 Sep 2003 00:02:58 -0000	1.1
--- fftbuf.cpp	28 Jan 2004 11:09:12 -0000	1.2
***************
*** 122,130 ****
  void fftbuf::m_signal(int n, t_float *const *in, t_float *const *out)
  {
!   outs = out[0];
!   
!   if (counter!=0)
      {
!       n=n/2+1;
        while (--n)
  	data[n] = data[n] - offset[n];
--- 122,132 ----
  void fftbuf::m_signal(int n, t_float *const *in, t_float *const *out)
  {
!   if (check(buf))
      {
!       outs = out[0];
!       
!       if (counter!=0)
! 	{
! 	  n=n/2+1;
        while (--n)
  	data[n] = data[n] - offset[n];
***************
*** 132,146 ****
        
        /*      for(int i=0;i!=bs;++i)
!       {
  	data[i] = data[i] - offset[i];
!       }
        */
! 
        --counter;
      }
! 
!   CopySamples(out[0],data,bs);
  }
  
  void fftbuf::perform()
  {
--- 134,155 ----
        
        /*      for(int i=0;i!=bs;++i)
! 	      {
  	data[i] = data[i] - offset[i];
! 	}
        */
!       
        --counter;
+ 	}
+       
+       CopySamples(out[0],data,bs);
      }
!   else
!     CopySamples(out[0],data,bs);
!   
  }
  
+ //perform und dsp gleichzeitig?!?
+ 
+ 
  void fftbuf::perform()
  {
***************
*** 197,201 ****
  
  template<typename T>
! /*inline*/ void fftbuf::clear(T* buf)
  {
    if (buf)
--- 206,210 ----
  
  template<typename T>
! inline void fftbuf::clear(T* buf)
  {
    if (buf)
***************
*** 208,211 ****
--- 217,222 ----
  inline bool fftbuf::check(buffer * buf) 
  {
+   if (buf==NULL)
+     return false;
  //code taken from the flext tutorial (buffer 1) by thomas grill
  
***************
*** 242,247 ****
  inline int fftbuf::blknumber()
  {
!   //  post("%i %i %i",delay,bs,sr);
!   //  post("computer counter: %i",delay*bs/sr*1000);
!   return delay*bs/sr*1000; //ms/sample
  }
--- 253,259 ----
  inline int fftbuf::blknumber()
  {
!   post("%i %i %i",delay,bs,sr);
!   post("blknumber: %i",delay*bs/sr);
! 
!   return delay*bs/sr; //ms/sample
  }

Index: main.cpp
===================================================================
RCS file: /cvsroot/pure-data/externals/tbext/source/main.cpp,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** main.cpp	20 Sep 2003 15:37:19 -0000	1.8
--- main.cpp	28 Jan 2004 11:09:13 -0000	1.9
***************
*** 52,59 ****
    post("version "TBEXT_VERSION);
    post("compiled on "__DATE__);
!   post("");
  
    FLEXT_SETUP(tbroute);
-   //FLEXT_SETUP(tbstrg);
    FLEXT_DSP_SETUP(tbsroute);
    //  FLEXT_DSP_SETUP(tbssel);
--- 52,59 ----
    post("version "TBEXT_VERSION);
    post("compiled on "__DATE__);
!   post("contains: tbroute(~), tbsig~, tbpow~, tbfft1~, tbfft2~, bufline~, fftgrrev~");
!   post("          fftgrsort~, fftgrshuf~");
  
    FLEXT_SETUP(tbroute);
    FLEXT_DSP_SETUP(tbsroute);
    //  FLEXT_DSP_SETUP(tbssel);
***************
*** 67,70 ****
--- 67,71 ----
    FLEXT_DSP_SETUP(fftgrshuf);
    FLEXT_DSP_SETUP(fftgrrev);
+   FLEXT_DSP_SETUP(spigot_tilde);
  }
  

Index: tbfft2.cpp
===================================================================
RCS file: /cvsroot/pure-data/externals/tbext/source/tbfft2.cpp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** tbfft2.cpp	20 Sep 2003 00:02:58 -0000	1.1
--- tbfft2.cpp	28 Jan 2004 11:09:13 -0000	1.2
***************
*** 73,77 ****
    float *outs;
    float *tmps;
!   t_float tmp[2049];
    
    t_float s;
--- 73,77 ----
    float *outs;
    float *tmps;
!   t_float tmp[17000];
    
    t_float s;





More information about the Pd-cvs mailing list