<info>
i is ex4-7
ECMC Csound Tutorial example ex4-7
</info>
<tk_interface>
</tk_interface>
<mono>
;  #############################################################
;  soundfile ex4-7 : randh substituted for randi
;  #############################################################
instr 2
  i1 = (p4<15? cpspch(p4) : p4)   ; p4 can be in cps or pch
  a1 envlpx p5,p6,p3,p7,60,p8,.01
  i2 = (p9<15? p9*i1 : p9)  
  i3 = (p10=0 ? KR-1 : p10)     ; for maximum random rate, use 0 in p10
  knoise randh i2,i3            ; for p10 any value up to KR-1 is OK
  a1 oscili a1, i1+knoise, 100
  out a1
endin
</mono>
<stereo>
</stereo>
<score>

                  SCORE-11, Version 1.4
Copyright (C) 1982, 1990, 1992, 1995 by Alexander R. Brinkman
     Eastman School of Music, University of Rochester

f60 0 65 5 .01 64 1.
f100 0 256 10 1.
  i2 0.000 1.980 8.09 15000 0.200 0.300 0.500 1.500 0
  i2 2.000 1.980 8.09 15000 0.200 0.300 0.500 80 800
  i2 4.000 1.980 8.09 15000 0.200 0.300 0.500 0.040 13
e
</score>
