         osc-bank-2 [(saw freq) (sin-osc freq) (pulse freq)]
         amp-env (env-gen (adsr attack decay sustain release) gate :action FREE)
         f-env (env-gen (adsr fattack fdecay fsustain frelease) gate :action FREE)
-        s1 (select osc1 osc-bank-1)
-        s2 (select osc2 osc-bank-2)
+        s1 (* osc1-level (select osc1 osc-bank-1))
+        s2 (* osc2-level (select osc2 osc-bank-2))
         filt (moog-ff (+ s1 s2) (* cutoff f-env) 3)]
     (* amp filt)))
 

(definst mooger
  [note 60 amp 0.8
   osc1 0 osc2 1     ; Choose 0 1 2 for saw, sin, or pulse
   cutoff 500
   attack 0.1 decay 0.1 sustain 0.7 release 0.2
   fattack 0.1 fdecay 0.1 fsustain 0.9 frelease 0.2

        [overtone.sc.machinery.ugen.fn-gen]
        [overtone.studio rig]))

(definst ticker [freq 880]
  (* (env-gen (perc 0.001 0.01) :action FREE)
     (sin-osc freq)))

