Entangled - SuperCollider



Rielaborazione di un tweet di Olofsson; What the Net Is Doing To Our Brain?;

(
    Routine.run {

  var s, synth, release;
 s = Server.default;
  SynthDef(\drone, {
            var snd, a;
      a=VarSaw;
            snd = Splay.ar(a.ar(Select.ar(GVerb.ar(a.ar((3/b=[1,3,7,13,17,37]+0.2)*8)),(c=a.ar(0.7/b))>0*13+b+48).midicps,0,c%3).tanh/7);
            Out.ar(0, snd);
        }).add;
  synth = Synth(\drone);
 10.wait;
 s.sync;
 s.record(path: "~/out.wav".standardizePath);
 30.wait;
        release.wait;
        s.stopRecording;
    };
)


Leave a Reply