File: envelope.ck

package info (click to toggle)
chuck 1.5.5.0-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 40,904 kB
  • sloc: cpp: 120,943; ansic: 35,893; javascript: 2,111; yacc: 609; makefile: 456; python: 174; perl: 86
file content (20 lines) | stat: -rw-r--r-- 440 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
// run white noise through envelope
Noise n => Envelope e => dac;

// infinite time-loop
while( true )
{
    // random choose rise/fall time
    Math.random2f(10,500)::ms => dur t => e.duration;
    // print
    <<< "rise/fall:", t/ms, "ms" >>>;

    // key on - start attack
    e.keyOn();
    // advance time by 800 ms
    800::ms => now;
    // key off - start release
    e.keyOff();
    // advance time by 800 ms
    800::ms => now;
}