Imported Upstream version 6.02~dfsg

1 files changed, 42 insertions, 0 deletions

diff --git a/examples/dumpk2.csd b/examples/dumpk2.csd
new file mode 100644
index 0000000..7c1d25f
--- /dev/null
+++ b/examples/dumpk2.csd
@@ -0,0 +1,42 @@
+<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 dumpk2.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 ;writes two control signals to a file
+kfreq     randh     100, 1, 2, 1, 500 ;generates one random number between 400 and 600 per second
+kdb       randh     12, 1, 2, 1, -12 ;amplitudes in dB between -24 and 0
+          dumpk2    kfreq, kdb, "dumpk2.txt", 8, 1 ;writes the control signals
+          prints    "WRITING:\n"
+          printks   "kfreq = %f, kdb = %f\n", 1, kfreq, kdb  ;prints them
+endin
+
+instr 2 ;reads the file written by instr 1
+kf,kdb    readk2    "dumpk2.txt", 8, 1
+          prints    "READING:\n"
+          printks   "kfreq = %f, kdb = %f\n", 1, kf, kdb  ;prints again
+kdb       lineto    kdb, .1 ;smoothing amp transition
+aout      poscil    ampdb(kdb), kf, giSine
+          outs      aout, aout
+endin
+
+</CsInstruments>
+<CsScore>
+i 1 0 5
+i 2 5 5
+e
+</CsScore>
+</CsoundSynthesizer>
+