diff options
Diffstat (limited to 'examples/comb.csd')
-rw-r--r-- | examples/comb.csd | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/examples/comb.csd b/examples/comb.csd new file mode 100644 index 0000000..14a1572 --- /dev/null +++ b/examples/comb.csd @@ -0,0 +1,68 @@ +<CsoundSynthesizer> +<CsOptions> +; Select audio/midi flags here according to platform +; Audio out Audio in No messages +-odac -iadc -d ;;;RT audio I/O +; For Non-realtime ouput leave only the line below: +; -o comb.wav -W ;;; for file output any platform +</CsOptions> +<CsInstruments> + +; Initialize the global variables. +sr = 44100 +kr = 4410 +ksmps = 10 +nchnls = 1 + +; Initialize the audio mixer. +gamix init 0 + +; Instrument #1. +instr 1 + ; Generate a source signal. + a1 oscili 30000, cpspch(p4), 1 + ; Output the direct sound. + out a1 + + ; Add the source signal to the audio mixer. + gamix = gamix + a1 +endin + +; Instrument #99 (highest instr number executed last) +instr 99 + krvt = 1.5 + ilpt = 0.1 + + ; Comb-filter the mixed signal. + a99 comb gamix, krvt, ilpt + ; Output the result. + out a99 + + ; Empty the mixer for the next pass. + gamix = 0 +endin + + +</CsInstruments> +<CsScore> + +; Table #1, a sine wave. +f 1 0 128 10 1 + +; p4 = frequency (in a pitch-class) +; Play Instrument #1 for a tenth of a second, p4=7.00 +i 1 0 0.1 7.00 +; Play Instrument #1 for a tenth of a second, p4=7.02 +i 1 1 0.1 7.02 +; Play Instrument #1 for a tenth of a second, p4=7.04 +i 1 2 0.1 7.04 +; Play Instrument #1 for a tenth of a second, p4=7.06 +i 1 3 0.1 7.06 + +; Make sure the comb-filter remains active. +i 99 0 5 +e + + +</CsScore> +</CsoundSynthesizer> |