115 lines
2.4 KiB
Racket
115 lines
2.4 KiB
Racket
#lang scribble/manual
|
|
@(require (for-label racket))
|
|
|
|
@title{LatoocarfianL}
|
|
Latoocarfian chaotic generator@section{categories}
|
|
UGens>Generators>Chaotic
|
|
@section{related}
|
|
Classes/LatoocarfianC, Classes/LatoocarfianN
|
|
|
|
@section{description}
|
|
|
|
A linear-interpolating sound generator based on a function given in Clifford Pickover's book Chaos In Wonderland, pg 26. The function is:
|
|
|
|
teletype::
|
|
x(n+1) = sin(b * y(n)) + c * sin(b * x(n))
|
|
y(n+1) = sin(a * x(n)) + d * sin(a * y(n))
|
|
::
|
|
|
|
According to Pickover, parameters
|
|
@racketblock[a:: and ]
|
|
|
|
@racketblock[b:: should be in the range from -3 to +3, and parameters ]
|
|
|
|
@racketblock[c:: and ]
|
|
|
|
@racketblock[d:: should be in the range from 0.5 to 1.5. The function can, depending on the parameters given, give continuous chaotic output, converge to a single value (silence) or oscillate in a cycle (tone).
|
|
|
|
sclang code translation:
|
|
|
|
]
|
|
|
|
@racketblock[
|
|
(
|
|
var a = 1, b = 3, c = 0.5, d = 0.5, xi = 0.5, yi = 0.5, size = 64;
|
|
plot(size.collect { var x = xi;
|
|
xi = sin(b * yi) + (c * sin(b * xi));
|
|
yi = sin(a * x) + (d * sin(a * yi));
|
|
xi
|
|
});
|
|
)
|
|
::
|
|
|
|
]
|
|
@section{note}
|
|
This UGen is experimental and not optimized currently, so is rather hoggish of CPU.::
|
|
|
|
@section{classmethods}
|
|
|
|
@section{method}
|
|
ar
|
|
@section{argument}
|
|
freq
|
|
Iteration frequency in Hertz
|
|
@section{argument}
|
|
a
|
|
Equation variable
|
|
@section{argument}
|
|
b
|
|
Equation variable
|
|
@section{argument}
|
|
c
|
|
Equation variable
|
|
@section{argument}
|
|
d
|
|
Equation variable
|
|
@section{argument}
|
|
xi
|
|
Initial value of x
|
|
@section{argument}
|
|
yi
|
|
Initial value of y
|
|
|
|
@section{examples}
|
|
|
|
|
|
@racketblock[
|
|
// default initial params
|
|
{ LatoocarfianL.ar(MouseX.kr(20, SampleRate.ir)) * 0.2 }.play(s);
|
|
::
|
|
|
|
]
|
|
|
|
@racketblock[
|
|
// randomly modulate all params
|
|
(
|
|
{ LatoocarfianL.ar(
|
|
SampleRate.ir/4,
|
|
LFNoise2.kr(2,1.5,1.5),
|
|
LFNoise2.kr(2,1.5,1.5),
|
|
LFNoise2.kr(2,0.5,1.5),
|
|
LFNoise2.kr(2,0.5,1.5)
|
|
) * 0.2 }.play(s);
|
|
)
|
|
::
|
|
|
|
]
|
|
|
|
@racketblock[
|
|
(
|
|
{ LatoocarfianL.ar(
|
|
SampleRate.ir/4,
|
|
[LFDNoise0,LFClipNoise,LFDNoise1,LFDNoise3,
|
|
LFNoise0,LFNoise1,LFNoise2].choose.kr(rrand(2,20),rrand(2,20)*0.1,rrand(2,20)*0.2),
|
|
[LFDNoise0,LFClipNoise,LFDNoise1,LFDNoise3,
|
|
LFNoise0,LFNoise1,LFNoise2].choose.kr(rrand(2,20),rrand(2,20)*0.1,rrand(2,20)*0.2),
|
|
[LFDNoise0,LFClipNoise,LFDNoise1,LFDNoise3,
|
|
LFNoise0,LFNoise1,LFNoise2].choose.kr(rrand(2,20),rrand(2,20)*0.1,rrand(2,20)*0.2),
|
|
[LFDNoise0,LFClipNoise,LFDNoise1,LFDNoise3,
|
|
LFNoise0,LFNoise1,LFNoise2].choose.kr(rrand(2,20),rrand(2,20)*0.1,rrand(2,20)*0.2)
|
|
) * 0.2 !2}.play;
|
|
)
|
|
::
|
|
]
|
|
|
|
|