;Chapter 1: Instrument 113 - Oscillator With Linen Envelope

<CsoundSynthesizer>

<CsInstruments>
sr     =        44100
kr      =       4410
ksmps  =        10
nchnls =        2

instr 99; Timer

ktime times
outvalue 1, ktime

endin


instr   113

kvol    invalue 1

idur        = p3; duration
ipitch      = p4; frequency
irise       = p5; envelope attack value
idecay      = p6; envelope release value

k1        linen     1,irise,idur,idecay
a1        oscil     kvol*100*k1, ipitch, 1

outvalue 2, kvol*100

outs     a1,a1
     
endin   

</CsInstruments>

<CsScore>
;FUNCTION 1 USES THE GEN10 SUBROUTINE TO COMPUTE A SINE WAVE
;FUNCTION 2 USES THE GEN10 SUBROUTINE TO COMPUTE THE FIRST SIXTEEN PARTIALS OF A SAWTOOTH WAVE

f1  0 4096 10   1    
f2  0 4096 10   1  .5 .333 .25 .2 .166 .142 .125 .111 .1 .09 .083 .076 .071 .066 .062

i99 0 600

</CsScore>
</CsoundSynthesizer>