diff options
Diffstat (limited to 'examples/vexpseg.csd')
-rw-r--r-- | examples/vexpseg.csd | 59 |
1 files changed, 59 insertions, 0 deletions
diff --git a/examples/vexpseg.csd b/examples/vexpseg.csd new file mode 100644 index 0000000..40f9f82 --- /dev/null +++ b/examples/vexpseg.csd @@ -0,0 +1,59 @@ +<CsoundSynthesizer> +<CsOptions> +-odac -B441 -b441 +</CsOptions> +<CsInstruments> + + +sr=44100 +ksmps=10 +nchnls=2 + +gilen init 32 + +gitable1 ftgen 0, 0, gilen, 10, 1 +gitable2 ftgen 0, 0, gilen, 10, 1 + +gitable3 ftgen 0, 0, gilen, -7, 30, gilen, 35 +gitable4 ftgen 0, 0, gilen, -7, 400, gilen, 450 +gitable5 ftgen 0, 0, gilen, -7, 5000, gilen, 5500 + +instr 1 +vcopy gitable2, gitable1, gilen +turnoff +endin + +instr 2 +vexpseg gitable2, 16, gitable3, 2, gitable4, 2, gitable5 +endin + +instr 3 +kcount init 0 +if kcount < 16 then + kval table kcount, gitable2 + printk 0,kval + kcount = kcount +1 +else +turnoff +endif + +endin + + +</CsInstruments> +<CsScore> +i1 0 1 +s +i2 0 10 +i3 0 1 +i3 1 1 +i3 1.5 1 +i3 2 1 +i3 2.5 1 +i3 3 1 +i3 3.5 1 +i3 4 1 +i3 4.5 1 + +</CsScore> +</CsoundSynthesizer> |