SuperCollider Composition.
December 16, 2009//Here is my Super Collider composition linked to Logic. I used a warped electric piano effect to give the sound more effect. I started off in the Ionion mode Phrygian mode.
s.boot
MIDIClient.init(0, 1);
m = MIDIOut(0, MIDIClient.destinations[0].uid);
//Here is my first scale which is in Dorian mode and I have set to play random notes with a few rests in between. I have added a bass sound during them all.
(
Pdef(\myscale1,
Ppar(
[
Pbind(\type, \midi, \midiout, m,
\scale, [0,2,4,5,7,9,11,12,]-1,
\degree, Pxrand([1,2,3,\rest4,5,6,7,\rest,8]-1, inf),
\dur, 1/6, \db,0),
Pbind(\type, \midi, \midiout, m,
\dur,1/6,
\octave,3,\db,0,
\degree,
Pseq ([1,2,4,1]-1, inf))
],1
)
).play
)
(
Pdef(\myscale2,
Ppar(
[
Pbind(\type, \midi, \midiout, m,
\scale, [0,2,4,5,7,9,11,12,]-1,
\degree, Pseq([1,2,\rest,2,2,1,7]-1, 4),
\dur, 1/6, \db,0),
Pbind(\type, \midi, \midiout, m,
\dur,1/6,
\octave,Pxrand([2,1,2,1,4,5],inf),
\degree,
Pseq ([2,2,8,7]-1, 2))
],1
)
).play
)
//Here I have changed the scale to Phrygian mode.
(
Pdef(\myscale3,
Ppar(
[
Pbind(\type, \midi, \midiout, m,
\scale, [0,1,3,5,7,8,10,12,]-1,
\degree, Pxrand([1,2,3,\rest,4,5,6,\rest,7,8,9]-1, inf),
\dur, 1/6, \db,0),
Pbind(\type, \midi, \midiout, m,
\dur,1/6,
\octave,3,\db,-2,
\degree,
Pseq ([1,2,8,7,\rest,1,2,8,7]-1, inf))
],1
)
).play
)
(
Pdef(\myscale4,
Ppar(
[
Pbind(\type, \midi, \midiout, m,
\scale, [0,2,4,5,7,9,11,12,]-1,
\degree, Pxrand([1,2,3,4,5,6,7,8,9]-1, inf),
\dur, 1/8, \db,0),
Pbind(\type, \midi, \midiout, m,
\dur,1/6,
\octave,3,\db,0,
\degree,
Pseq ([1,6,6,8]-1, 1))
],1
)
).play
)
(
Pdef(\myscale5,
Ppar(
[
Pbind(\type, \midi, \midiout, m,
\scale, [0,2,4,5,7,9,11,12,]-1,
\degree, Pxrand([1,2,1,2,1,6,7,8,9]-1, inf),
\dur, 1/6, \db,0),
Pbind(\type, \midi, \midiout, m,
\dur,1/6,
\octave,3,\db,0,
\degree,
Pseq ([1]-1, 1))
],1
)
).play
)
