Skip to content

Instantly share code, notes, and snippets.

@theseanco
Created February 9, 2017 01:03
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save theseanco/19321812dceb4c40712893d06006287e to your computer and use it in GitHub Desktop.
Save theseanco/19321812dceb4c40712893d06006287e to your computer and use it in GitHub Desktop.
Transmediale Algorave set

/*

hallo alles

hello world, my name is co¥ᄀpt

2 seconds. i just smashed my beer back here.

*/

// s1 ( s = Scale.chromatic(\et53); ~r = {0}; ~r2 = {100}; )

( l = Pbjorklund2(Pseq([3,6,7,1,4,10,12,8,9,3,6,7],inf),16)/4; ~ring1 = Pbind(\instrument,\ring1,\f,Pkey(\freq),\scale,s,\root,Pkr(~r),\degree,Pwhite(-4,4),\octave,Pwrand([4,5],[10,1].normalizeSum,inf),\dur,l,\d,0.3,\a,Pwhite(1,5),\pan,-1,\amp,0.5); //enjoy ~ring2 = Pbind(\instrument,\ring1,\f,Pkey(\freq),\scale,s,\root,Pkr(~r),\degree,Pwhite(-4,4),\octave,Pwrand([5,6],[10,1].normalizeSum,inf),\dur,l,\d,0.3,\a,Pwhite(1,5),\pan,1,\amp,0.5); ~ring4 = Pbind(\instrument,\ring1,\f,Pkey(\freq),\scale,s,\root,Pkr(~r),\degree,Pwhite(-4,4),\octave,Pwrand([6,7],[10,1].normalizeSum,inf),\dur,l,\d,0.1,\a,Pwhite(1,5),\pan,1,\amp,0.5); ~ring3 = Pbind(\instrument,\ring1,\f,Pkey(\freq),\scale,s,\root,Pkr(~r),\degree,Pwhite(-2,12),\octave,Pwrand([2,3],[2,1].normalizeSum,inf),\dur,l,\d,Pexprand(0.1,0.3),\a,Pwhite(1,700),\pan,0,\amp,0.8); ~c = Pbind(\instrument,\bplay,\buf,d["c"][0],\dur,l,\amp,1); ~sn = Pbind(\instrument,\bplay,\buf,d["s"][0],\dur,l,\amp,1); ~ring0 = Pbind(\instrument,\ring1,\f,Pkey(\freq),\scale,s,\root,Pkr(~r),\degree,Pseq((0..120),inf),\octave,7,\dur,0.125,\d,0.1,\a,Pwhite(1,10),\pan,0,\amp,0.3) ) ~k2.stop

~shout.stop

~ring0.stop

~k.play

~ring0.play ~k.stop ~ring3.play p.clock.tempo = 2.5

~k = Pbind(\instrument,\bplay,\buf,d["k"][0],\dur,1,\amp,20)

~k.play ~sines.play

~sines = Pbind(\instrument,\sinfb,\freq,Pseq((1..10),inf)*Pkr(~r2),\dur,0.25,\amp,0.3,\fb,0.1,\rel,0.1) ~sines2 = Pbind(\instrument,\sinfb,\freq,Pseq((1..10).reverse,inf)*Pkr(~r2),\dur,0.25,\amp,0.3,\fb,0.1,\rel,0.1) ~sines3 = Pbind(\instrument,\sinfb,\freq,Pseq((1..10).scramble,inf)*Pkr(~r2)*2,\dur,Pwhite(0.25,0.5).round(0.5),\amp,0.3,\fb,0.1,\rel,0.1) ~sines4 = Pbind(\instrument,\sinfb,\freq,Pseq((1..10).scramble,inf)*Pkr(~r2)*4,\dur,Pwhite(0.25,0.5).round(0.5),\amp,0.07,\fb,0.1,\rel,2)

p.clock.tempo

~sines4.play

~ring3.play

~k.play

~k = Pbind(\instrument,\bplay,\buf,d["k"][1],\dur,1,\amp,5)

~sn = Pbind(\instrument,\bplay,\buf,d["s"][0],\dur,Pbjorklund2(Pseq([3,3,3,4],inf),8)/4,\amp,4)

p.clock.tempo = 2.57

~r2 = {XLine.kr(80000,100,20)} ~k.stop

//sorry if this is really high for a bit

~k.play

~k = Pbind(\instrument,\bplay,\buf,d["k"][0],\dur,1,\amp,8)

p.clock.tempo = 3099

//thx

//its really laggy now

// <37

~k.stop

~shout.play

//i

~sn.stop

~c = Pbind(\instrument,\bplay,\buf,d["c"][0],\dur,0.75,\amp,4)

~c.play ~k2.play

~sn.play

~ring3 = Pbind(\instrument,\ring1,\f,Prand([0.5,1],inf)*Pkr(~r2),\scale,s,\root,Pkr(~r),\degree,Pwhite(-2,12),\octave,Pwrand([2,3],[2,1].normalizeSum,inf),\dur,l,\d,Pexprand(0.05,0.2),\a,Pwhite(1,7000),\pan,0,\amp,0.5);

~sin1 = {SinOsc.kr(0.1).range(0.1,1.5)}

~sin2 = {SinOsc.kr(0.11).range(0.1,1.5)}

~sin3 = {SinOsc.kr(0.12).range(0.1,1.5)}

~h.stop

~dfm2.stop(120)

~sines3.set(\fb,~sin3)

~sines3.play

~r2 = {SinOsc.kr(0.1).range(100,104)}

~k.play

~sines2.play

~ring3.stop

p.clock.tempo = 2.2

~k.stop

~sines.play

~dfm1.play

~c.stop

2.4*60

~dfm1.stop(120)

~h.stop

~k2 = Pbind(\instrument,\bplay,\buf,d["k"][0],\dur,Pbjorklund2(3,8)/4,\amp,1,\rate,Pseq([1.2,1.5],inf)) ~k = Pbind(\instrument,\bplay,\buf,d["k"][0],\dur,1,\amp,2) ~k2.play

( ~ring1.stop; ~ring2.stop; ~ring3.stop; )

~shout.play

~shout = Pbind(\instrument,\bplay,\buf,d["shout"][1],\dur,2,\amp,0.3) ~c.stop ~c.play

//here goes.

//well done to everyone who performed and big thanks to Jonathan & Alexandra for havinng me

//let's go

( ~ring3.play; ~sn.play; ~k.play; )

//am i going to see some dancing??

~dfm1 = {DFM1.ar(SinOsc.ar([~r2+1,~r2],0,0.1),~r2*2,SinOsc.kr(0.05).range(0.9,1.1),1,0,0.0003,0.5)}

~sn.stop

~h = Pbind(\instrument,\bplaym,\buf,d["ch"][0],\dur,0.25,\amp,Pexprand(0.1,1))

~h.play

~dfm2.play

~dfm2 = {DFM1.ar(SinOsc.ar([~r2+12,~r22],0,0.1),~r2*4,SinOsc.kr(0.05).range(0.9,1.6),1,0,0.0003,0.14)}

~dfm1.play

~c = Pbind(\instrument,\bplay,\buf,d["c"][0],\dur,0.75,\amp,1)

~c.play

p.clock.tempo = 1

~k = Pbind(\instrument,\bplay,\buf,d["k"][0],\dur,1,\amp,1)

~sn = Pbind(\instrument,\bplay,\buf,d["s"][0],\dur,2,\amp,1)

~sn.play //this will get faster. I promise.

~ring3.play

~h = Pbind(\instrument,\bplaym,\buf,d["ch"][0],\dur,0.5,\amp,Pwhite(0.2,1))

~h.play ~ring2.play

~ring1.play

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment