‹ pakt18pakt20 ›

pakt19


pact19bubbles, 01:00, 1.84MB
Ndef(\bubbles).play
(
Ndef(\bubbles, {var n= 6;
    GVerb.ar(Mix({|i|
      var q= i/n*2pi;
      var t= Impulse.ar(SinOsc.ar(SinOsc.ar(0.125, q, 0.5), 0, 1.5, 2), i/n);
      Pan2.ar(
        SinOsc.ar(
          SinOsc.ar(0.01, q, SinOsc.ar(0.05, q, 50), 500),
          Decay2.ar(t, 0.02, 0.2, SinOsc.ar(0.05, q, SinOsc.ar(0.01, 0, 8pi, 8pi))),
          Decay2.ar(t, TRand.ar(0.003, 0.03, t), TRand.ar(0.05, 0.1, t), SinOsc.ar(0.08, q, 0.2, 0.05).max(0))
        ),
        (i/(n-1))*2-1
      );
    }!n), 40, 2, 0.6);
});
)
Ndef(\bubbles).stop