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]
/
exile
/
v1
/
examples
/
demo3.ck
blob
4bb218c7d439902886e0aa428a317fa2536e2f10
1
// set global gain
2
.5 => dac.gain;
3
4
110.0 => float freq;
5
6 => int x;
6
7
while( x > 0 )
8
{
9
sinosc s => dac;
10
freq => s.freq;
11
freq * 2.0 => freq;
12
x - 1 => x;
13
14
1::second => now;
15
s =< dac;
16
}