<info>
i is ex4-3
ECMC Csound Tutorial example ex4-3
</info>
<tk_interface>
</tk_interface>
<mono>
;  #############################################################
;  soundfile ex4-3   :  gbuzz : variable kr  Csound Tutorial
;  #############################################################
instr 1
  a1 expseg 1,.2,8000,p3-.4,5000,.2,1
  ipitch = cpspch(p4)
  k1 expon p6,p3,p7
  iharmonics = int((.5*SR)/ipitch)  
  ; "iharmonics" returns the maximum number of harmonics below Nyquist
    print ipitch, iharmonics
  a1 gbuzz a1,ipitch,iharmonics,p5,k1,1 
  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

f1 0 2048 9 1 1 90
  i1 0.000 2.000 7.00 1 0.050 0.900
  i1 2.000 2.000 7.00 1 0.990 0.100
  i1 4.000 2.000 7.00 1 0.300 1.300
  i1 6.000 2.000 7.00 1 1.200 0.500
  i1 8.000 2.000 10.02 1 0.050 0.900
  i1 10.000 2.000 10.02 1 0.990 0.100
  i1 12.000 2.000 10.02 1 0.010 2.000
  i1 14.000 2.000 10.02 1 2.000 0.100
e
</score>
