18 lines
395 B
Racket
18 lines
395 B
Racket
#lang scribble/manual
|
|
@(require (for-label racket))
|
|
|
|
@title{(mouse-y rate minval maxval warp lag)}
|
|
|
|
|
|
Report mouse location on root window of the machine that the
|
|
synthesis server is running on. For a linear mapping set warp to
|
|
0, for an exponential mapping set warp to 1.
|
|
|
|
|
|
@racketblock[
|
|
(audition
|
|
(out 0 (mul (sin-osc ar (mouse-x kr 20 2000 0 0.1) 0)
|
|
(mouse-y kr 0.01 0.1 0 0.1))))
|
|
]
|
|
|
|
|