You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

71 lines
1.7 KiB
Plaintext

4 years ago
(
// MAIN LAUNCH (loads necessary files and definitions)
var appEnvironment;
//push new environment
appEnvironment = Environment.make;
appEnvironment.push;
s.waitForBoot({
~hash = Date.getDate.hash.asString;
// load all files
"tkam_musical_data_generator.scd".loadRelative;
"tkam_sonifier.scd".loadRelative;
"tkam_gui.scd".loadRelative;
"tkam_transcriber.scd".loadRelative;
~genAll = {arg seed;
~dUnit = 8.reciprocal;
~musicData = ~genMusicData.value(seed);
~scoreData = ~genScoreData.value(~musicData[0]);
~sectionData = ~musicData[4];
"sdasfsdfsdaf".postln;
~patterns = ~genPatterns.value(~musicData[0], ~musicData[1], ~musicData[2], ~musicData[3], ~sectionData);
"sdasfsdfsdaf".postln;
~sectionNavDict = ~musicData[5].postln;
~isPlaying = false;
};
~patternProxy = EventPatternProxy.new;
~tempoClock = TempoClock.new(1);
4 years ago
~dir = thisProcess.nowExecutingPath.dirname;
"loading app".postln;
~genAll.value(19800725);
4 years ago
~play = Synth.new(\masterPlayerControl_ ++ ~hash);
4.collect({arg p; Synth.new(\clip_ ++ ~hash, [\bin, p + 6, \bus, ~postampBusses[5].index])});
4 years ago
~generateGUI.value;
"ready".postln;
// generate all the data
/*
~genAll = {arg seed;
~allMusicData = ~genMusicData.value(seed);
~patterns = ~allMusicData[0];
4 years ago
~scoreData = ~allMusicData[1];
~sectionOffsets = ~allMusicData[2];
~currentSection = 0;
~currentSubsection = 0;
~isPlaying = false;
};
// set the global variables
~tempoClock = TempoClock.new(60);
~dir = thisProcess.nowExecutingPath.dirname;
"loading app".postln;
~genAll.value(20200525);
~play = Synth.new(\masterPlayerControl ++ ~hash);
~sectionOrder = ~patterns.size.collect({arg sec; sec});
~generateGUI.value;
"ready".postln;
*/
4 years ago
});
appEnvironment.pop;
)