Notes from Oldenburg

July 15, 2011

My first suspicion was that the subterranean conspiracy would take effect within the economic situation on the ground, but this naive assumption would soon be proved false; the City mobilises an economic machine against the earth, stalling the effects it might otherwise have in this sphere, making sure that developments on the ground are subject to its own decisions, or otherwise illegal. The economic situation on the ground would foreclose the possibility of any t(r)ailing allegiance with subterranean conspirators gaining any ground, or any potential progression towards an alternate situation becoming the state of things.

That the insurgency should not take direct effect within the economic organisation of the surface did not, however, fully neutralise the conspirators, as their various concoctions were already being felt by means of horizontal contagion and architectonic decay at the surface; foreclosing the possibility of economic influence would only force the conspirators to the surface by other means, where, upon arrival, various contaminants and solutions would set about realising their own desires through the medium of humanity.

 
(
 
s.boot;
 
s.doWhenBooted({ var pHArray, pHSeq;
 
pHArray= [8.5596, 8.435, 7, 7.758, 6.815, 5.8, 7.901, 7.1, 6.655, 5.142, 7.5984, 7.22, 6.016, 6.6372];
 
pHSeq = Prand(pHArray, inf).asStream;
 
SynthDef(\impulse, {
 
		|input, pHMin, pHMax, attack, volume, decay, out|
 
		var pH, rate, frequency, impulse;
		pH = In.kr(input);
		rate = LinExp.kr(pH, pHMin, pHMax, 19, 6.5);
		frequency = LinLin.kr(pH, 0, 14, 50, 150);
		impulse = Formlet.ar(LPF.ar(Impulse.ar(rate, volume), 400), frequency, attack, decay);
 
	Out.ar(out, impulse);
 
}).send(s);
 
/*
Reference frequencies for the perception of relative depth & the production of 
a more independent harmonic structure:
*/
 
{ var klank = Klank.ar(`[
	[800, 1071, 1353, 1723], [0.1,0.1,0.1,0.1], [1, 1, 1, 1]], 
		PinkNoise.ar(0.005)); 
 
		klank!2 }.play;
 
 
// Ramp Synth:
 
SynthDef(\ramp, { |end, dur, out|
	var line;
	line = Line.kr(In.kr(out), end, dur, doneAction: 2);
	Out.kr(out, line);
}).send(s);
 
0.001.wait;	// wait for the synth to get setup on the server.
 
 
// set up the control busses:
s.sendMsg(\c_set, 200, 7);
s.sendMsg(\c_set, 101, 12);
 
// Left Channel:
 
s.sendBundle(nil, [\s_new, \impulse, f = s.nextNodeID, 0,1, \pHMin, pHArray.minItem, \pHMax, pHArray.maxItem, \rate, 1, \volume, 0.8, \frequency, 62, \attack, 0.1, \decay, 0.65, \out, 0], [\n_map, f, \input, 200]);
 
// Right Channel:
 
s.sendBundle(nil, [\s_new, \impulse, p = s.nextNodeID, 0,1, \pHMin, pHArray.minItem, \pHMax, pHArray.maxItem, \rate, 1, \volume, 0.8, \frequency, 62, \attack, 0.1, \decay, 0.65, \out, 1], [\n_map, p, \input, 101]);
 
 
// Left Channel Task:
 
t = Task({ |pH|
	loop	({		
		// pH = 0.rrand(14);
		//pH = pHArray.choose;
		pH = pHSeq.next;
		s.sendMsg(\s_new, \ramp, x=s.nextNodeID,0,1, \end, pH, \dur, 0.34.rrand(6));
s.sendMsg(\n_map, x, \out, 200);
		10.rrand(13).wait;
		});	//loop.
	}).play;	//routine.
 
 
// Right Channel Task:
 
h = Task({ |pH|
	loop	({		
		// pH = 0.rrand(14);
		//pH = pHArray.choose;
		pH = pHSeq.next;
		s.sendMsg(\s_new, \ramp, l=s.nextNodeID,0,1, \end, pH, \dur, 0.02.rrand(5));
	s.sendMsg(\n_map, l, \out, 101);
		8.rrand(11).wait;
		});	//loop.
	}).play;	//routine.
 
 
});
 
)
 
/*
s.queryAllNodes;	
s.sendMsg(\n_free, 1019);
*/

willschrimshaw.net

Notes from Oldenburg

July 15, 2011

Comments (0) | Tags: Chiasmus, Gentrification, Noise, Subterranean, SuperCollider, Synthesis | More: strct

Leave a Reply Cancel reply