;nyquist plug-in
;version 1
;type process
;name "4-Kanal Multi-Track Equalizer"
;info " 1 = Bässe  /  2 = Mitten  /  3 = Sprache / 4 = Höhen"
;action "Equalizer..."

;control eq-mode "" int "" 1 1 4

; this plugin was written by edgar-rft@web.de and is released 
; under terms of the GNU General Public License on August 12th 2005

;; Übergangsfrequenzen:
;; Bass-Mitten:     500 Hz  - Wert einer Standard Hifi Stereoanlage
;; Mitten-Sprache: 1768 Hz  - Der Sprache-Regler ist ein Bandpass
;; Sprache-Höhen:  3535 Hz    mit einer Mittenfrequenz von 2.5 kHz

(cond ((= eq-mode 1) (setf s (scale 0.667 (lp s 500))))
      ((= eq-mode 2) (setf s (scale 0.667 (hp (lp s 1768) 500))))
      ((= eq-mode 3) (setf s (scale 0.667 (hp (lp s 3535) 1768))))
      ((= eq-mode 4) (setf s (scale 0.667 (hp s 3535)))))