mirror of
https://github.com/cookiengineer/audacity
synced 2025-08-02 08:59:28 +02:00
Added notch.ny by Bill and Steve as per http://wiki.audacityteam.org/wiki/Default_EQCurves#Proposed_and_under_discussion
This commit is contained in:
parent
96390e5170
commit
27a2ee3eaf
24
plug-ins/notch.ny
Normal file
24
plug-ins/notch.ny
Normal file
@ -0,0 +1,24 @@
|
||||
;nyquist plug-in
|
||||
;version 1
|
||||
;type process
|
||||
;categories "http://lv2plug.in/ns/lv2core/#FilterPlugin"
|
||||
;name "Notch Filter..."
|
||||
;action "Performing Notch Filter..."
|
||||
;info "By Steve Daulton and Bill Wharrie. Released under GPL v2."
|
||||
|
||||
;control freq "Frequency" real "Hz" 60 0 10000
|
||||
;control q "Q (higher value reduces width)" real "" 1 0.1 20
|
||||
|
||||
;; notch.ny by Steve Daulton and Bill Wharrie, September 2010.
|
||||
;; Released under terms of the GNU General Public License version 2:
|
||||
;; http://www.gnu.org/licenses/old-licenses/gpl-2.0.html .
|
||||
|
||||
;; (multichan-expand) provides legacy support for old versions of Audacity
|
||||
;; in which the (notch2) function only supports mono tracks.
|
||||
|
||||
(cond
|
||||
((> freq (/ *sound-srate* 2.0))(format nil "Error:\nFrequency too high for track sample rate."))
|
||||
((< freq 0)(format nil "Error:\nNegative frequency is invalid."))
|
||||
((< q 0.01)(format nil "Error:\nWidth must be at least 0.01."))
|
||||
((= freq 0) (format nil "Nothing to be done."))
|
||||
(T (multichan-expand #'notch2 s freq q)))
|
Loading…
x
Reference in New Issue
Block a user