1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
|
<CsoundSynthesizer>
<CsOptions>
; Select audio/midi flags here according to platform
-odac ;;;realtime audio out
;-iadc ;;;uncomment -iadc if RT audio input is needed too
; For Non-realtime ouput leave only the line below:
;-o ^.wav ; output to audio file
</CsOptions>
<CsInstruments>
sr = 44100
ksmps = 32
nchnls = 2
0dbfs = 1
instr 1 ; Lo-Fi sound
kpow = 10 ;exponent
kbase line 1, p3, 2.2 ;vary the base
kQuantize = kbase^kpow
kQuantize = kQuantize*0.5 ;half the number of steps for each side of a bipolar signal
printk2 kQuantize
asig diskin2 "fox.wav", 1, 0, 1 ;loop the fox
asig = round(asig * kQuantize) / kQuantize ;quantize and scale audio signal
outs asig, asig
endin
</CsInstruments>
<CsScore>
i1 0 19.2
e
</CsScore>
</CsoundSynthesizer>
|