diff --git a/ALGOFORTE03a.scd b/ALGOFORTE03a.scd index fb0be3e..4fcc94d 100644 --- a/ALGOFORTE03a.scd +++ b/ALGOFORTE03a.scd @@ -30,66 +30,30 @@ s.meter; s.plotTree; s.scope; MIDIClient.init(1,1); m = MIDIOut(0); -( +// connect sc midi to midi input of whatever +// (virtual) piano you are using +// connect a copy of a signal your virtual piano +// back to SuperCollider inputs. keep main out from +// virtual piano +// +// this project used Salamander Grand SFZ sound font +// loaded into a Renoise. + +( // evaluate this first to initialize busses etc.. ~locPath = PathName.new(thisProcess.nowExecutingPath).pathOnly; // init loads samples, libs, fx. this.executeFile(~locPath ++ "00_init.scd") -) +) // re-eval whenever you press ctrl-. (stopping sound) -/* - piano connections: - $ a2jmidid - $ cd /usr/lib/lv2/sfizz.lv2/Contents/Resources - # mv DefaultInstrument.sfz DefaultInstrument.sfz.bak - # ln -s /home/random/SAMPLES/SFZ/SalamanderGrandPianoV3_44.1khz16bit/SalamanderGrandPianoV3Retuned.sfz DefaultInstrument.sfz - # exit - $ jalv http://sfztools.github.io/sfizz - $ jack_connect "sfizz:control" "a2j:SuperCollider [128] (capture): out0" - $ jack_connect "sfizz:out_left" "system:playback_1" - $ jack_connect "sfizz:out_right" "system:playback_2" -*/ - -PathName.new(~locPath).files.do({|i| i.fileName.postln}) +// eval each of these lines for the complete track: +// 1. this.executeFile(~locPath ++ "BLACK_HOLE_BLACK_STAR.scd") +// 2. +this.executeFile(~locPath ++ "MELLOW_PULSES.scd") + +// 3. this.executeFile(~locPath ++ "SINODA_LULLABY.scd") -this.executeFile(~locPath ++ "FLATTEN_TO_ARP.scd") -this.executeFile(~locPath ++ "MELLOW_PULSES.scd") -this.executeFile(~locPath ++ "OCTAVE_FOLDS_PLUS.scd") -this.executeFile(~locPath ++ "THE_FATHERS.scd") - -~locPath.postln - -// play tracks -this.executeFile(~locPath ++ "OCTAVE_FOLDS_PLUS.scd") - -this.executeFile(~locPath ++ "01_OCTAVE_FOLDS_PLUS.scd") - - -// ---------------------------------------------------------------------------- -// ---------------------------------------------------------------------------- -// control effects - -~fxFeedDelay1.set(\feedback, 0.9) -~fxFeedDelay1.set(\time, 0.8) - -~fxDelayWarp1.set(\wet, 0.1) - -// sustain pedal -m.control(1, ctlNum: 64, val: 0) -m.control(1, ctlNum: 64, val: 127) - -( -// TEST -Pbindef(\test, *[ - type: \midi, midicmd: \noteOn, midiout: m, chan: 1, - dur: 1/2, - amp: 0.7 -]).play -) - -x = {PinkNoise.ar!2 * 0.1}.play -x.free diff --git a/MELLOW_PULSES.scd b/MELLOW_PULSES.scd index 6a7027b..3833564 100644 --- a/MELLOW_PULSES.scd +++ b/MELLOW_PULSES.scd @@ -82,46 +82,4 @@ fork { "end. ".postln; } - -) - - - - - - - - - - - - - - - - - - - - - - -( - Pbind(*[ instrument: \pulseTriSaw, - amp: Pseg([0.6, 0.9, 0.6], 60, \lin, inf) * 1, - legato: 0.1, - scale: Scale.minor(\pythagorean), - dur:1.5, - degree: 0, - octave: 6, - sawamp: Pseg([0,1,0],50,\lin,inf), - atk:0, - dec:0.2, - sus:0.3 * Pseg([0,1,0], 40, \sqr, inf), - rls:5, - lpf: Pseg([3,20,3],40,\sqr, inf), //Pwhite(3,20), - pan:Pwhite(-1,1), - out: ~fxJPverbBus1, - // ctranspose: Pget(\ctrans, default:0, repeats: 8 * 6 * 1 * (5/1.5)) - ]).stop -) +) \ No newline at end of file diff --git a/README.md b/README.md index f8102c3..1f310dc 100644 --- a/README.md +++ b/README.md @@ -1,2 +1,6 @@ # algoforte03a +Currently the code is a bit of a mess. Working on it. + +Start in ALGOFORTE03a.scd file. Open it in SuperCollider and follow instructions. +