         [overtone.sc.machinery.ugen.fn-gen]
         [overtone.studio rig]))
 
-
-(definst tick [freq 880]
+(definst ticker [freq 880]
   (* (env-gen (perc 0.001 0.01) :action FREE)
      (sin-osc freq)))
 

        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)
        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
   osc1-level 0.5 osc2-level 0.5
   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
