;  #############################################################
;  soundfile ex5-4-2 : Reson iscl = 2   (same score as ex5-4)
;  #############################################################
; p4 = center frequency  ; p5 = bandwidth

instr 1
  k1 expseg 1,p6,8000,p3-(p6+p7),5000,p7,1
  a1 rand k1

  a2 reson a1,p4,p5,2  ; amplitude scalar = 2
  a1 balance a2,a1
  out a1
endin
