home *** CD-ROM | disk | FTP | other *** search
/ PC World 2008 February / PCWorld_2008-02_cd.bin / audio-video / reaper / reaper2028-install.exe / Effects / LOSER / 5BandJoiner < prev    next >
Text File  |  2007-12-03  |  1KB  |  37 lines
  1. // (C) 2006, Michael Gruhn.
  2.  
  3. // NO WARRANTY IS GRANTED. THIS PLUG-IN IS PROVIDED ON AN "AS IS" BASIS, WITHOUT
  4. // WARRANTY OF ANY KIND. NO LIABILITY IS GRANTED, INCLUDING, BUT NOT LIMITED TO,
  5. // ANY DIRECT OR INDIRECT,  SPECIAL,  INCIDENTAL OR CONSEQUENTIAL DAMAGE ARISING
  6. // OUT OF  THE  USE  OR INABILITY  TO  USE  THIS PLUG-IN,  COMPUTER FAILTURE  OF
  7. // MALFUNCTION INCLUDED.  THE USE OF THE SOURCE CODE,  EITHER  PARTIALLY  OR  IN
  8. // TOTAL, IS ONLY GRANTED,  IF USED IN THE SENSE OF THE AUTHOR'S INTENTION,  AND
  9. // USED WITH ACKNOWLEDGEMENT OF THE AUTHOR. FURTHERMORE IS THIS PLUG-IN A  THIRD
  10. // PARTY CONTRIBUTION,  EVEN IF INCLUDED IN REAPER(TM),  COCKOS INCORPORATED  OR
  11. // ITS AFFILIATES HAVE NOTHING TO DO WITH IT.  LAST BUT NOT LEAST, BY USING THIS
  12. // PLUG-IN YOU RELINQUISH YOUR CLAIM TO SUE IT'S AUTHOR, AS WELL AS THE CLAIM TO
  13. // ENTRUST SOMEBODY ELSE WITH DOING SO.
  14.  
  15.  
  16. desc:5-Band-Joiner (Combines Signal From 5-Band Splitter)
  17. slider1:0<-24,24,.1>Low (dB)
  18. slider2:0<-24,24,.1>Mid (dB)
  19. slider3:0<-24,24,.1>High (dB)
  20. slider4:0<-24,24,.1>UeberHigh (dB)
  21. slider5:0<-24,24,.1>UeberUeberHigh (dB)
  22.  
  23. @init
  24. c_ampdB = 8.65617025;
  25.  
  26. @slider
  27. band1 = exp(slider1/c_ampdB);
  28. band2 = exp(slider2/c_ampdB);
  29. band3 = exp(slider3/c_ampdB);
  30. band4 = exp(slider4/c_ampdB);
  31. band5 = exp(slider4/c_ampdB);
  32.  
  33. @sample
  34. spl0 = spl0 * band1 + spl2 * band2 + spl4 * band3 + spl6 * band4 + spl8 * band5;
  35. spl1 = spl1 * band1 + spl3 * band2 + spl5 * band3 + spl7 * band4 + spl9 * band5;
  36.  
  37.