Mercurial > hg > jslab

view examples/sound/sampled/osc.scm @ 0:bf79fb79ee13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial Mercurial check in.
author samer
date Tue, 17 Jan 2012 17:50:20 +0000
parents
children
line wrap: on
line source
; shows how to generate a signal using an oscillator, buffer it,
; and send it to the sound card
(load "audio.scm")
(load "lineout.scm")
(load "synthesis.scm")

; this uses the default linesnk, which will be a lineout returned
; by the AudioSystem. Could easily choose a different lineout or
; even a file sink. (eg see record.scm)
(lineout (linesnk (mono 44100)) (gen->vector 512 (oscillator 0.1)))
(expose)