    freq-decay {:default 0.02 :min 0.001 :max 1.0 :step 0.001}
    amp-decay  {:default 0.5 :min 0.001 :max 1.0 :step 0.001}]
   (let [fenv (* (env-gen (envelope [env-ratio 1] [freq-decay] :exp)) freq)
-        aenv (env-gen (perc 0.005 amp-decay) :done FREE)]
+        aenv (env-gen (perc 0.005 amp-decay) :action FREE)]
     (* (sin-osc fenv (* 0.5 Math/PI)) aenv)))
 
 (definst kick2 [freq      {:default 80 :min 10 :max 20000 :step 1}

   amp    {:default 0.3 :min 0.001 :max 1 :step 0.01}
   attack {:default 0.0001 :min 0.1 :max 1.0 :step 0.01}
   decay  {:default 0.1 :min 0.1 :max 1.0 :step 0.01}]
  (let [env (env-gen (perc attack decay) :done FREE)
        noiz (bpf (* amp (gray-noise)) (line freq 5 (* decay 0.5)) (+ env 0.1))
        wave (* 0.1 env (mix (sin-osc [4000 6500 5000])))
        snd (+ noiz wave)]

        osc-env (perc 0.001 1 freq -8)
        noiz (lpf (white-noise) (+ (env-gen:kr cutoff-env) 20))
        snd  (lpf (sin-osc (+ (env-gen:kr osc-env) 20)) 200)
        mixed (* (+ noiz snd) (env-gen amp-env :action FREE))]
    mixed))

(definst dry-kick
