«808-ish Cowbell» by p.dupuis
on 12 Sep'16 01:25 inWe all could use a little more.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
(
SynthDef(\cowbell, {
    | out=0, amp=0.3, gate=1, fund_freq=540, pan=0.0 |
    var sig, env;
    sig = Pulse.ar( fund_freq * [ 1, 1.5085 ], [ 0.565, 0.445 ], [ 0.4, 0.6 ] ).distort;
    env = EnvGen.ar(
            Env(
                [ 0, 0.05, 1, 0.1, 0 ], [ 0.003, 0.002, 0.05, 0.5 ], [2, -4, -4, -4]
            ),
        gate: gate,
        timeScale: [ 1.0, 1.5 ],
        doneAction: 2
        );
    sig = Mix( sig * env );
    sig = BPF.ar( sig, fund_freq * 2, 1.808 );
    Out.ar( out, Pan2.ar( sig, pan, amp ) );
}).add;
)
        
                descendants
                
            
            full graph
        
        reception
        
            
        
        
    
    
        comments