Supercollider Composition 2 by brinky-1
I have slightly changed my Supercollider composition as before I didn’t really have any tempo change. After experimenting with different things I composed a tempo change which fitted well, as before I couldn’t compose anything which worked well. If I could change anything about my composition I would try and include more scales and different tempo changes as I think my piece doesn’t change into other sections as well as what I would I’ve liked it to. I have already started working on two other Supercollider compositions as I know I can create much better compositions using this software.
MIDIClient.init;
m = MIDIOut(0, MIDIClient.destinations.at(0).uid);
(
(
//Persian Santoor
(Pdef(\santoor,
Pbind( \type, \midi, \midiout, m,\chan, 0,
\scale, [0,2,3,5],
\degree, Pseq([2,10,7,8,2,10,7,8], 1),
\dur, Pseq([0.25, 2.0, 0.25, 0.50, 0.25, 0.50, 1.0, 0.50, 0.25], 9.25*1),
\db, -3)
)
);
//Persian Santoor2
(
Pdef(\santoor2,
Pbind( \type, \midi, \midiout, m,\chan, 0,
\scale, [0,2,3,5],
\degree, Pseq([2,10,7,8,2,10,7,8], 2),
\dur, Pseq([1.0, 2.0, 0.50, 0.25, 1.0, 2.0, 0.50, 0.25], 9.25*2),
\db, -3)
)
);
//Persian Santoor3
(Pdef(\santoor3,
Pbind( \type, \midi, \midiout, m,\chan,0,
\scale, [0,2,3,5,7,11],
\degree, Pseq([4,8,7,2,3,11]-1, 2),
\octave,5,
\dur, Pseq([2.0, 1.0, 1.0, 2.0, 2.0, 1.0, 0.50, 1.0], 9.25*2),
\db, -6)
)
);
//latin baby bass1
(
Pdef(\bass1,
Pbind( \type, \midi, \midiout, m,\chan, 1,
\dur, Pseq([2.0, 0.25, 0.25, 2.0, 2.0, 1.0, 1.0, 2.0], 9.25*2),
\scale, [0,2,3,5,7],
\degree, Pseq([4,6,7,10,6,7]-1, 2),
\octave, 3),
\db, -1)
)
);
//violin
(
Pdef(\violin,
Pbind( \type, \midi, \midiout, m,\chan, 2,
\scale, [0,2,3,5],
\degree, Pseq([2,10,7,8,2,10,7,8], 2),
\dur, Pseq([0.25, 0.50, 2.0, 1.0, 0.25, 0.50, 2.0, 1.0], 9.25*2),
\db, -6)
)
);
//lute
(Pdef(\lute,
Pbind( \type, \midi, \midiout, m,\chan,6,
\scale, [0,2,3,5,7,11]+1,
\degree, Pseq([4,8,7,2,3,11]-1, 2),
\octave, Prand([5,3], inf),
\dur, Pseq(([1.0,1.0,0.50,2.0,2.0,1.0,1.0,2.0,0.50,0.50]*0.50), 11.50*4),
\db, -6)
)
);
//latin baby bass2
(
Pdef(\bass2,
Pbind( \type, \midi, \midiout, m,\chan, 1,
\dur, Pseq(([1.0,0.50,1.0,1.0,2.0,0.50,0.50,1.0,1.0,2.0,0.50,0.50]*0.50), 11.50*4),
\scale, [0,2,3,5,7,11]+1,
\degree, Pseq([4,8,7,2,3,11]-1, 2),
\octave, 3),
\db, -1)
)
//pluck3
(Pdef(\pluck3,
Pbind( \type, \midi, \midiout, m,\chan,5,
\scale, [2,3,5,7,11]+1,
\degree, Pseq([4,8,7,11]-1, 4),
\octave,6,
\dur, Pseq(([0.25,0.50,1.0,1.0,0.50,0.25,0.25,2.0,1.0, 0.50,1.0,0.50,0.25,0.50,0.25,2.0]*0.50), 11.50*4),
\db, -5)
)
);
//Persian Santoor6
(
Pdef(\santoor6,
Pbind( \type, \midi, \midiout, m,\chan, 0,
\scale, [0,2,3,5],
\degree, Pseq([2,10,7,8,2,10,7,8], 2),
\dur, Pseq([0.50,0.25,0.50,0.25,0.25,0.75,0.25,0.50], 3.25*2),
\db, -3)
)
);
//Persian Santoor7
(Pdef(\santoor7,
Pbind( \type, \midi, \midiout, m,\chan,0,
\scale, [0,2,3,5,7,11],
\degree, Pseq([4,8,7,2,3,11]-1, 2),
\octave,5,
\dur, Pseq([0.25,1.0,0.25,0.50,1.0,0.25, ], 3.25*2),
\db, -6)
)
);
//latin baby bass3
(Pdef(\bass3,
Pbind( \type, \midi, \midiout, m,\chan, 1,
\dur, Pseq([1.0, 0.25, 0.25, 1.0, 0.50, 0.25], 3.25*2),
\scale, [0,2,3,5,7],
\degree, Pseq([4,6,7,10,6,7]-1, 2),
\octave, 3),
\db, -1)
)
//Ethnic pluck
(Pdef(\pluck,
Pbind( \type, \midi, \midiout, m,\chan, 5,
\scale, [0,2,3,5],
\degree, Pseq([2,5,10,8,5,6]-6, 1),
\dur, Pseq([2.0,1.0,0.25,1.0,0.50,0.25,0.25,0.25], 9.25*1),
\db, Prand([-6,-7, -8, -12, -7], inf)
))
);
//flute
(Pdef(\flute,
Pbind( \type, \midi, \midiout, m,\chan,4,
\scale, [0,2,3,5,7],
\degree, Pseq([4,8,7,11]-1, 1),
\octave,4,
\dur, Pseq([2.0, 0.50, 1.0, 1.0, 0.50, 2.0, 0.50], 7.50*1),
\db, -3)
)
);
//Persian Santoor5
(Pdef(\santoor5,
Pbind( \type, \midi, \midiout, m,\chan, 0,
\scale, [0,2,3,5,7],
\degree, Pseq([4,8,7,11], 2),
\dur, Pseq([1.0, 0.25, 2.0, 0.25, 0.50, 1.0, 0.50, 2.0, 0.50, 1.0, 2.0], 7.50*2),
\db, 4)
)
);
//Tibetan singing bowls2
(Pdef(\bowls2,
Pbind( \type, \midi, \midiout, m,\chan,3,
\scale, [0,2,3,5,7],
\degree, Pseq([4,8,7,11]-1, 4),
\octave,6,
\dur, Pseq([0.25, 0.25, 0.50, 0.25, 0.50, 0.50, 0.25, 0.25, 0.50, 0.50], 3.75*4),
\db, Prand([-6,-7, -8, -12, -7], inf)
)
);
//violin2
(Pdef(\violin2,
Pbind( \type, \midi, \midiout, m,\chan, 2,
\scale, [2,5,4,8,6],
\degree, Pseq([3,4,9,6,5,10,7,8], 2),
\dur, Pseq([2.0,1.0,0.50,1.0,0.50,1.0], 8.00*2),
\Octave, -1),
\db, Prand([-6,-7, -8, -6, -7], inf)
))
);
//lute2
(Pdef(\lute2,
Pbind( \type, \midi, \midiout, m,\chan,6,
\scale, [2,5,4,8,6],
\degree, Pseq([3,4,9,6,5,10,7,8]-1, 2),
\octave, Prand([5,6], inf),
\dur, Pseq([1.0,0.50,0.50,2.0,1.0,0.50,2.0,0.50], 8.00*4),
\db, -6)
)
);
//latin baby bass4
(Pdef(\bass4,
Pbind( \type, \midi, \midiout, m,\chan, 1,
\dur, Pseq([2.0,0.50,1.0,1.0,0.50,1.0], 7.00*2),
\scale, [2,5,4,8,6],
\degree, Pseq([3,4,9,6,5,10,7,8]-1, 2),
\octave, 3),
\db, -2)
)
);
((
Ppar([Pdef(\santoor)],1)
++
Ppar([Pdef(\santoor2),Pdef(\santoor3),Pdef(\bass1)],1)
++
Ppar([Pdef(\santoor2),Pdef(\santoor3),Pdef(\bass1),Pdef(\violin)],1)
++
Ppar([Pdef(\lute),Pdef(\bass2),Pdef(\pluck3)],2)
++
Ppar([Pdef(\santoor6),Pdef(\santoor7),Pdef(\bass3)],2)
++
Ppar([Pdef(\violin2),Pdef(\lute2),Pdef(\bass4)],1)
++
Ppar([Pdef(\pluck)],2)
++
Ppar([Pdef(\flute),Pdef(\santoor5),Pdef(\bowls2),Pdef(\pluck)],2)
).play
)
