Imported Upstream version 6.02~dfsg

1 files changed, 56 insertions, 0 deletions

diff --git a/examples/cosseg.csd b/examples/cosseg.csd
new file mode 100644
index 0000000..cfa60c6
--- /dev/null
+++ b/examples/cosseg.csd
@@ -0,0 +1,56 @@
+<CsoundSynthesizer>
+<CsOptions>
+; Select audio/midi flags here according to platform
+-odac      ;;;realtime audio out
+;-iadc    ;;;uncomment -iadc if realtime audio input is needed too
+; For Non-realtime ouput leave only the line below:
+;-o linseg.wav -W ;;; for file output any platform
+</CsOptions>
+<CsInstruments>
+
+sr = 44100
+ksmps = 32
+nchnls = 2
+0dbfs  = 1
+
+giSine ftgen 0, 0, 2^10, 10, 1
+
+instr 1
+
+kcps = cpspch(p4)
+kenv cosseg 0, 0.25, 1, 0.75, 0	; together = 1 sec
+asig poscil kenv, kcps, giSine
+     outs asig, asig
+
+endin
+
+instr 2	; scaling to duration
+
+kcps = cpspch(p4)
+kenv cosseg 0, p3*0.25, 1, p3*0.75, 0
+asig poscil kenv, kcps, giSine
+     outs asig, asig
+
+endin
+
+instr 3	; with negative value
+
+kcps = cpspch(p4)
+aenv cosseg 0, 0.1, 1, 0.5, -0.9, 0.4, 0
+asig poscil aenv, kcps, giSine
+     outs asig, asig
+
+endin
+</CsInstruments>
+<CsScore>
+
+i 1 0 1   7.00	; = 1 sec, p3 fits exactly
+i 1 2 2   7.00	; = 2 sec, p3 truncated at 1 sec
+
+i 2 4 1   7.00	; scales to duration
+i 2 6 2   7.00	; of p3
+
+i 3 9 2   7.00
+e
+</CsScore>
+</CsoundSynthesizer>