Update of /cvsroot/audacity/audacity-src/plug-ins
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv24094

Modified Files:
        highpass.ny lowpass.ny 
Log Message:
fix stated rolloff values only half the slope actually applied

Index: lowpass.ny
===================================================================
RCS file: /cvsroot/audacity/audacity-src/plug-ins/lowpass.ny,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- lowpass.ny  4 Jun 2008 19:10:41 -0000       1.6
+++ lowpass.ny  6 Nov 2008 08:45:10 -0000       1.7
@@ -4,10 +4,10 @@
 ;categories "http://lv2plug.in/ns/lv2core#LowpassPlugin";
 ;name "Low Pass Filter..."
 ;action "Performing Low Pass Filter..."
-;info "by Dominic Mazzoni, modified by David R. Sky\nReleased under terms of 
the GNU General Public License Version 2\nAttenuates high frequencies above 
your specified cutoff frequency.\nHigher rolloff values give a sharper 
attenuation of frequencies above\nthe cutoff frequency. If using a rolloff of 6 
dB, a [q] value greater than\ndefault 0.7 increases resonance ['ringing'] of 
the cutoff frequency and\ncould result in clipping.""
+;info "by Dominic Mazzoni, modified by David R. Sky\nReleased under terms of 
the GNU General Public License Version 2\nAttenuates high frequencies above 
your specified cutoff frequency.\nHigher rolloff values give a sharper 
attenuation of frequencies above\nthe cutoff frequency. If using a rolloff of 
12 dB, a [q] value greater than\ndefault 0.7 increases resonance ['ringing'] of 
the cutoff frequency and\ncould result in clipping.""
 
-;control rolloff-choice "     Rolloff [dB per octave]" choice " 3 dB, 6 dB,12 
dB,18 dB,24 dB" 0
-;control q "     Filter quality [q] for 6 dB rolloff" real "" 0.7071 .1 20
+;control rolloff-choice "     Rolloff [dB per octave]" choice "  6 dB,12 dB,24 
dB,36 dB,48 dB" 0
+;control q "     Filter quality [q] for 12 dB rolloff" real "" 0.7071 .1 20
 ;control f "     Cutoff frequency [Hz]" real "" 1000 1 20000
 
 ; note that all Nyquist lowpass functions 
@@ -17,32 +17,32 @@
 ; to deal with stereo selection,
 ; and dummy q arg for all but lowpass2 
 
-; 3dB/octave
+; 6dB/octave
 (defun lp-s (s f q) ; dummy q arg
 (lp s f))
 
-; 6dB/octave
+; 12dB/octave
 (defun lowpass2-s (s f q)
 (if (arrayp s)
 (vector (lowpass2 (aref s 0) f q)
 (lowpass2 (aref s 1) f q))
 (lowpass2 s f q)))
 
-; 12dB/octave
+; 24dB/octave
 (defun lowpass4-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (lowpass4 (aref s 0) f)
 (lowpass4 (aref s 1) f))
 (lowpass4 s f)))
 
-; 18dB/octave
+; 36dB/octave
 (defun lowpass6-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (lowpass6 (aref s 0) f)
 (lowpass6 (aref s 1) f))
 (lowpass6 s f)))
 
-; 24dB/octave
+; 48dB/octave
 (defun lowpass8-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (lowpass8 (aref s 0) f)
@@ -64,7 +64,7 @@
 (= (check q 0.1 20) 1))
 (strcat error-msg (format nil
 "q value ~a lies outside valid range 0.1 to 20     
-for your chosen rolloff of 6 dB per octave.
+for your chosen rolloff of 12 dB per octave.
 " q))
 error-msg))
 

Index: highpass.ny
===================================================================
RCS file: /cvsroot/audacity/audacity-src/plug-ins/highpass.ny,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- highpass.ny 4 Jun 2008 19:10:41 -0000       1.6
+++ highpass.ny 6 Nov 2008 08:45:10 -0000       1.7
@@ -4,10 +4,10 @@
 ;categories "http://lv2plug.in/ns/lv2core#HighpassPlugin";
 ;name "High Pass Filter..."
 ;action "Performing High Pass Filter..."
-;info "by Dominic Mazzoni, modified by David R. Sky\nReleased under terms of 
the GNU General Public License Version 2\nAttenuates frequencies below your 
specified cutoff frequency.\nHigher rolloff values give a sharper attenuation 
of frequencies below\nthe cutoff frequency. If using a rolloff of 6 dB, a [q] 
value greater than\ndefault 0.7 increases resonance ['ringing'] of the cutoff 
frequency and\ncould result in clipping."
+;info "by Dominic Mazzoni, modified by David R. Sky\nReleased under terms of 
the GNU General Public License Version 2\nAttenuates frequencies below your 
specified cutoff frequency.\nHigher rolloff values give a sharper attenuation 
of frequencies below\nthe cutoff frequency. If using a rolloff of 12 dB, a [q] 
value greater than\ndefault 0.7 increases resonance ['ringing'] of the cutoff 
frequency and\ncould result in clipping."
 
-;control rolloff-choice "     Rolloff [dB per octave]" choice " 3 dB, 6 dB,12 
dB,18 dB,24 dB" 0
-;control q "     Filter quality [q] for 6 dB rolloff" real "" 0.7071 .1 20
+;control rolloff-choice "     Rolloff [dB per octave]" choice "  6 dB,12 dB,24 
dB,36 dB,48 dB" 0
+;control q "     Filter quality [q] for 12 dB rolloff" real "" 0.7071 .1 20
 ;control f "     Cutoff frequency [Hz]" real "" 1000 1 20000
 
 ; note that all Nyquist highpass functions 
@@ -17,32 +17,32 @@
 ; to deal with stereo selection,
 ; and dummy q arg for all but highpass2 
 
-; 3dB/octave
+; 6dB/octave
 (defun hp-s (s f q) ; dummy q arg
 (hp s f))
 
-; 6dB/octave
+; 12dB/octave
 (defun highpass2-s (s f q)
 (if (arrayp s)
 (vector (highpass2 (aref s 0) f q)
 (highpass2 (aref s 1) f q))
 (highpass2 s f q)))
 
-; 12dB/octave
+; 24dB/octave
 (defun highpass4-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (highpass4 (aref s 0) f)
 (highpass4 (aref s 1) f))
 (highpass4 s f)))
 
-; 18dB/octave
+; 36dB/octave
 (defun highpass6-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (highpass6 (aref s 0) f)
 (highpass6 (aref s 1) f))
 (highpass6 s f)))
 
-; 24dB/octave
+; 48dB/octave
 (defun highpass8-s (s f q) ; dummy q arg
 (if (arrayp s)
 (vector (highpass8 (aref s 0) f)
@@ -64,7 +64,7 @@
 (= (check q 0.1 20) 1))
 (strcat error-msg (format nil
 "q value ~a lies outside valid range 0.1 to 20     
-for your chosen rolloff of 6 dB per octave.
+for your chosen rolloff of 12 dB per octave.
 " q))
 error-msg))
 


-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
Audacity-cvs mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/audacity-cvs

Reply via email to