2022-08-24 13:53:18 +00:00
|
|
|
#lang scribble/manual
|
|
|
|
|
@(require (for-label racket))
|
|
|
|
|
|
|
|
|
|
@title{(pitch-shift in winSize pchRatio pchDispersion timeDispersion)}
|
|
|
|
|
|
2022-08-28 10:27:01 +00:00
|
|
|
|
2022-08-24 13:53:18 +00:00
|
|
|
A simple time domain pitch shifter.
|
|
|
|
|
|
2022-08-28 10:27:01 +00:00
|
|
|
|
|
|
|
|
@racketblock[
|
2022-08-24 13:53:18 +00:00
|
|
|
(audition
|
|
|
|
|
(out 0 (pitch-shift (sin-osc ar 440 0)
|
|
|
|
|
0.2
|
|
|
|
|
(mouse-x kr 0.5 2 0 0.1)
|
|
|
|
|
(mouse-y kr 0 0.1 0 0.1)
|
|
|
|
|
0)))
|
2022-08-28 10:27:01 +00:00
|
|
|
]
|
|
|
|
|
|
2022-08-24 13:53:18 +00:00
|
|
|
|
