amplr.ny

;nyquist plug-in
;version 1
;type process
;name "Amplify left or right channel..."
;action "Amplifying one channel..."
;info "Amplify left or right channel by David R. Sky"

;control channel "Channel" int "0=left 1=right" 0 0 1
;control amp "Amplification" real "db" 0.0 -24.0 24.0

;; Amplify lef or right channel by David R. Sky, October 18, 2004
;; This plug-in was written specifically to help people who use
;; a screen reader, and people who prefer to use the keyboard
;; over a mouse.
;; 
;; Select audio in Audacity, select left or right channel and
;; amout to amplify that track (in decibels).

(if (= channel 0)

(vector 
(mult (aref s 0) (db-to-linear amp))
(aref s 1))

(vector 
(aref s 0) 
(mult (aref s 1) (db-to-linear amp))))