home *** CD-ROM | disk | FTP | other *** search
/ PC World 2008 February / PCWorld_2008-02_cd.bin / audio-video / reaper / reaper2028-install.exe / Effects / Delay / time_adjustment < prev   
Encoding:
Text File  |  2007-12-03  |  699 b   |  36 lines
  1. desc:time adjustment
  2.  
  3. slider1:0<-1000,1000,1>delay amount (ms)
  4. slider2:0<-120,12,1>wet mix (dB)
  5. slider3:-120<-120,12,1>dry mix (dB)
  6. slider4:0<-40000,40000,1>additional delay amount (samples)
  7.  
  8. @init
  9. bpos=0;
  10.  
  11. @slider
  12. wet=2^(slider2/6);
  13. dry=2^(slider3/6);
  14. delaylen = slider1*srate*0.001 + slider4;
  15. delaylen<0?(
  16.   pdc_delay=-delaylen;  
  17.   pdc_top_ch=2;
  18.   pdc_bot_ch=0;
  19.   delaylen=0;
  20. ):(
  21. delaylen+=pdc_delay;
  22. //pdc_delay=0;
  23. );
  24. bufsize=srate*4.0; // extra in case the user wants to go over
  25.  
  26. @sample
  27. bpos[0]=spl0;
  28. bpos[1]=spl1;
  29.  
  30. rdpos=bpos-delaylen*2;
  31. rdpos<0 ? rdpos+=bufsize*2;
  32. spl0=spl0*dry+rdpos[0]*wet;
  33. spl1=spl1*dry+rdpos[1]*wet;
  34.  
  35. bpos+=2;
  36. bpos>=bufsize*2 ? bpos=0;