23 lines
644 B
Text
23 lines
644 B
Text
|
#lang scribble/manual
|
||
|
@(require (for-label racket))
|
||
|
|
||
|
@title{(lfclip-noise rate freq)}
|
||
|
|
||
|
randomly generates the values -1 or +1 at a rate given by the
|
||
|
nearest integer division of the sample rate by the freq argument.
|
||
|
It is probably pretty hard on your speakers. The freq argument is
|
||
|
the approximate rate at which to generate random values.
|
||
|
|
||
|
(audition (out 0 (mul (lfclip-noise ar 1000) 0.1)))
|
||
|
|
||
|
Modulate frequency
|
||
|
|
||
|
(let ((f (x-line kr 1000 10000 10 remove-synth)))
|
||
|
(audition (out 0 (mul (lfclip-noise ar f) 0.1))))
|
||
|
|
||
|
Use as frequency control
|
||
|
|
||
|
(let ((f (mul-add (lfclip-noise kr 4) 200 600)))
|
||
|
(audition (out 0 (mul (sin-osc ar f 0) 0.2))))
|
||
|
|