; ---  global mono reverberation instrument: ------------------
instr 16

    gkcs1     port  gkcs1, .03   ; smooth out abrupt changes in this controller
    gkcs2     port  gkcs2, .03   ; smooth out abrupt changes in this controller
    gkmod     port  gkmod, .02   ; smooth out abrupt changes
a1     nreverb  gaudio , gkcs2 , .2 + (.8 * (1. - gkmod))
out .5 * a1  ; note 50 % attentuation of reverb signal
       gaudio = 0
        ; do not zero out kmod, gkcs1 or gkcs2
       gktest = 0
       endin

