Hi Anders,
It's attached to this plug-in, timeshif.ny. It has three
edit fields: left
channel or mono time shift, right channel time shift, and a
choice between
milliseconds or seconds. If the audio you've selected is
stereo, the
plug-in will time shift left and right channels according to
your left and
right settings, otherwise it will time shift the mono track
according to
your left channel setting.
David
On Tue, 27 Jun 2006, Anders Holmberg wrote:
> Hello!
> Where can i get this time shift plugi?
> It sometimes would be great to have one.
> /Anders.
;nyquist plug-in
;version 2
;type process
;name "Time shifter..."
;action "Time shifting one or two tracks..."
;info "by David R. Sky\nReleased under terms of GNU
Public License"
#| Time shifter by David R. Sky, March 23, 2006
Released under terms of the GNU Public License
ht
tp://www.opensource.org/licenses/gpl-license.php
How to use - Select audio. If mono track, adjust the
mono/left
channel time, if stereo adjust left and/or right channel
time.
How it works - if time shift<0ms, chop out specified
amount of
audio from start of track; otherwise insert specified amount
of
silence before track and shift track forward specified
amount of
time.
|#
;control l "Mono/left channel shift - ms" int
"" 0 -1000 1000
;control r "Right channel shift - ms" int
"" 0 -1000 1000
;control choice "0=milliseconds 1=seconds" int
"" 0 0 1
; time shift function
(defun shift (sound dur time)
(if (< time 0)
; if time<0
(extract-abs (- time) dur sound)
; otherwise...
(sim (s-rest time)
(at-abs time (cue sound))
) ; end sim
) ; end if
) ; end defun
; determine selection duration in seconds
(setf dur (/ len *sound-srate*))
; divisor - either 1000 for ms or 1 for s
(setf divisor (if (= choice 0) 1000 1))
; convert integer time to float time
; using float of integers rather than decimal numbers
; so plug-in can work for European Nyquist as well
; which uses , for decimal point
(setf l (/ (float l) (float divisor)))
(setf r (/ (float r) (float divisor)))
; applying time shift
(if (arrayp s)
; apply to stereo track
(vector (shift (aref s 0) dur l)
(shift (aref s 1) dur r)
) ; end vector
; apply to mono track
(shift s dur l)
) ; end if
Using Tomcat but need to do more? Need to support web
services, security?
Get stuff done quickly with pre-integrated technology to
make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on
Apache Geronimo
http://sel.as-us.falkag.ne
t/sel?cmd=lnk&kid=120709&bid=263057&dat=121642--
Mailing list: Audacity-users lists.sourceforge.net
To UNSUBSCRIBE, use the form at the bottom of this web page:
https://lists.sourceforge.net/lists/listinfo/audacity
-users |