;  #############################################################
;  soundfile ex5-4 : Reson iscl = 1      Eastman Csound Tutorial
;  #############################################################
; p4 = center frequency  ; p5 = bandwidth

instr 1
   k1 expseg 1,p6,8000,p3-(p6+p7),5000,p7,1
   a1 rand k1
   a1 reson a1,p4,p5,1    ; amp. scalar  = 1
   out a1
endin
