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.
60 lines
1.4 KiB
Plaintext
60 lines
1.4 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;
|
||
|
|
||
|
~dUnit = 8.reciprocal;
|
||
|
~musicData = ~genMusicData.value(~dUnit);
|
||
|
~scoreData = ~genScoreData.value(~musicData[0]);
|
||
|
~sectionData = ~musicData[2];
|
||
|
~sectionData.postln;
|
||
|
~patterns = ~genPatterns.value(~musicData[0], ~musicData[1], ~dUnit);
|
||
|
//~patterns.play;
|
||
|
~tempoClock = TempoClock.new(60);
|
||
|
~dir = thisProcess.nowExecutingPath.dirname;
|
||
|
"loading app".postln;
|
||
|
~play = Synth.new(\masterPlayerControl_ ++ ~hash);
|
||
|
~generateGUI.value;
|
||
|
"ready".postln;
|
||
|
|
||
|
// generate all the data
|
||
|
/*
|
||
|
~genAll = {arg seed;
|
||
|
~allMusicData = ~genMusicData.value(seed);
|
||
|
~patterns = ~allMusicData[0];
|
||
|
~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;
|
||
|
*/
|
||
|
});
|
||
|
appEnvironment.pop;
|
||
|
)
|