Bz Buzz

Gli Artisti Acari Insorti dell'Immaginario Liberato, continuano a lavorare per l’Attuazione di un'Utopia Concreta, quella di Rovesciare un Mondo Rovesciato. Colpire al Cuore la Società dello Spettacolo, significa Liberare il Suono, la Parola e l'Immagine per trasformarli nella Lingua della Creatività Libera e della Pura Immaginazione;

(
{
    Mix.fill(37,
        {
        var freq;
        freq = exprand(100, 3000);
        Pan2.ar(
            Saw.ar(
                        freq * LFNoise1.kr(1/6, 0.4, 1),
                        mul: EnvGen.kr(Env.perc(0, (freq**(-0.7))*100), PinkNoise.kr(1/5))
                    ), 0
                )
        })*0.3
}.play

)

"Non bisogna credere che sia semplicemente un Uomo che si sia voluto divertire ad abitare Sotto la Terra. Fa delle Cose che nessun altro Uomo sarebbe capace di fare; sa delle Cose che i Non-Morti ignorano."

"Egli dissemina Botole e Passaggi Segreti in tutto il Teatro Spettacolare, rendendolo il suo Parco dei Divertimenti. Si costruisce anche una Casa nei Sotterranei dello Spettacolo dove può vivere lontano dalla Crudeltà e dalla Mediocrità dell'Uomo. Nel suo Isolamento, trascorre molti anni, mentre Compone la sua intera Opera;"

(
~root = -13;
~reverbSend = Bus.audio(s, 2);
)
(
s.waitForBoot(
    {

        SynthDef(\dissonant, {
            |
            freq=713,
            dur=5, pos=0,
            amp=0.75,
            out=0
            |
            var sig, env, saw;
            env = EnvGen.ar(Env.perc(0.1, 3, 1, -4), doneAction:2);
            saw=Saw.ar(Select.kr(Stepper.kr(Impulse.kr(7,0.1),0,0,7,1),[72,63,67,72,55,62,63,60].midicps),0.1);
            sig = saw;
            sig = LPF.ar(sig, freq*13 );
            sig = (sig * env * amp);
            sig = Mix.new([sig*0.7, Dust.ar(freq)*0.002*env, LFSaw.ar(freq, mul: 0.001)]);
            Out.ar(out, Pan2.ar(sig, pos));
        }).add;

        s.sync;

        SynthDef(\reverb, {
            arg in=0, out=0, mix=1, room=1.8;
            var sig;
            sig = In.ar(in, 2);
            sig = FreeVerb.ar(sig, mix, room);
            Out.ar(out, sig);
        }).add;

        s.sync;

        ~reverb = Synth(\rev, [\in, ~reverbSend]);



w = Pbind(\instrument,\dissonant,
    \scale, #[0, 2, 3, 5, 7, 8, 10],
    \root,  Pfunc({~root}),
    \degree, Pseries(0, Prand(#[1, 2, 3], inf), inf).fold(-11, 11),
    \dur, 0.25
).asEventStreamPlayer;

w.play;


        wait(7);
        r = Routine({
            "starting".postln;
            loop({
                ~root = [2, 7, 1, 3].choose;
                wait( 10.rrand(17) );
            });
        });
        r.play;
});
)