repo.or.cz
/
chuck-blob.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
*** empty log message ***
[chuck-blob.git]
/
examples
/
dope.ck
blob
bc66fcbada1677b4691d37d312db33af21b1de6b
1
// waveloop with variable rate
2
// - gewang
3
WaveLoop wav => dac;
4
5
// load special:dope
6
"special:dope" => wav.path;
7
8
// other useful STK wav
9
// "special:ahh"
10
// "special:eee"
11
// "special:ooo"
12
// "special:britestk"
13
// "special:fwavblnk"
14
// "special:halfwave"
15
// "speical:impuls10"
16
// "special:impuls20"
17
// "special:impuls40"
18
// "special:mand1"
19
// "special:mandpluk"
20
// "special:marmstk1"
21
// "special:peksblnk"
22
// "special:ppksblnk"
23
// "special:slience"
24
// "speical:sineblnk"
25
// "special:sinewave"
26
// "special:snglpeak"
27
// "special:twopeaks"
28
29
0.0 => float t;
30
31
// time loop
32
while( true )
33
{
34
// 1 == normal, > 1 faster, < 0 backward
35
0.5 + 0.1 * math.sin( t ) => wav.rate;
36
t + .1 => t;
37
// advance time
38
50::ms => now;
39
}