annotate examples/sound/sampled/osc.scm @ 0:bf79fb79ee13
Initial Mercurial check in.
| author |
samer |
| date |
Tue, 17 Jan 2012 17:50:20 +0000 |
| parents |
|
| children |
|
| rev |
line source |
|
samer@0
|
1 ; shows how to generate a signal using an oscillator, buffer it,
|
|
samer@0
|
2 ; and send it to the sound card
|
|
samer@0
|
3 (load "audio.scm")
|
|
samer@0
|
4 (load "lineout.scm")
|
|
samer@0
|
5 (load "synthesis.scm")
|
|
samer@0
|
6
|
|
samer@0
|
7 ; this uses the default linesnk, which will be a lineout returned
|
|
samer@0
|
8 ; by the AudioSystem. Could easily choose a different lineout or
|
|
samer@0
|
9 ; even a file sink. (eg see record.scm)
|
|
samer@0
|
10 (lineout (linesnk (mono 44100)) (gen->vector 512 (oscillator 0.1)))
|
|
samer@0
|
11 (expose)
|
