rsc3/doc-schelp/HelpSource/Classes/Prorate.scrbl

85 lines
1.4 KiB
Text
Raw Normal View History

2022-08-24 13:53:18 +00:00
#lang scribble/manual
@(require (for-label racket))
@title{Prorate}
divide stream proportionally@section{related}
Classes/Pattern
@section{categories}
Streams-Patterns-Events>Patterns>Math
@section{ClassMethods}
@section{method}
new
@section{argument}
proportion
a pattern that returns either numbers (divides the pattern into pairs) or arrays of size n which are used to split up the input into n parts.
@section{argument}
pattern
a numerical pattern.
@section{Examples}
@racketblock[
// divide 1 into various proportions
(
a = Prorate(Pseq([0.35, 0.5, 0.8]), 1);
x = a.asStream;
x.nextN(8)
)
// divide a pattern into various proportions
(
a = Prorate(Pseq([0.35, 0.5, 0.8]), Prand([20, 1], inf));
x = a.asStream;
x.nextN(8)
)
// divide 1 into several parts
(
a = Prorate(Pseq([[1, 2], [5, 7], [4, 8, 9]]).collect(_.normalizeSum), 1);
x = a.asStream;
x.nextN(8)
)
// sound example
(
SynthDef(\help_sinegrain,
{ arg out=0, freq=440, sustain=0.05;
var env;
env = EnvGen.kr(Env.perc(0.01, sustain, 0.2), doneAction: Done.freeSelf);
Out.ar(out, SinOsc.ar(freq, 0, env))
}).add;
)
(
var a, x;
a = Prorate(
Prand([2/3, 1/3, [0.3, 0.3, 0.4], [0.6, 0.4]], inf),
Pseq([1, 2, 1, 3, 12], inf)
);
3.do {
{
var x = a.asStream;
var freq = rrand(72, 84).midicps;
loop {
Synth(\help_sinegrain, [\freq, freq]);
(0.25 * x.next).wait;
}
}.fork;
};
)
::
]