/
DroneHub.sc
119 lines (101 loc) · 5.48 KB
/
DroneHub.sc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
// the system's singleton class
DroneHub {
var <>window, <middle;
var <>speakers, <>drones, <>interpreter, <>states;
var <>randomseed;
//var <>recording;
var <>midi, <fundamental, <midinoteoffset;
var tester;
var <screenbounds, <>channelOffset;
var <pathtoscalafiles; // = "/Users/thm21/Library/Application Support/SuperCollider/scl/";
var <pathtouserscalafiles; // = "/Users/thm21/Library/Application Support/SuperCollider/scl_user/";
var <mode, <>post;
var <>scale, <key;
var <threnoscopeColor;
var <>padDown;
var <>appPath;
var <>channels;
*new { arg window, argmode, argscale, argfundamental, threnoscopeColor, key, channels, appPath;
^super.new.initDroneHub(window, argmode, argscale, argfundamental, threnoscopeColor, key, channels, appPath);
}
initDroneHub { |argwindow, argmode, argscale, argfundamental, argThrenoscopeColor, argKey, argchannels, argappPath |
window = argwindow;
mode = argmode;
midi = false;
fundamental = argfundamental;
midinoteoffset = fundamental.cpsmidi.mod(12); // the systems tonic
middle = window.bounds.height/2;
randomseed = 1000000.rand; // XXX is this used at all?
thisThread.randSeed = randomseed; // XXX is this used at all?
//recording = false;
screenbounds = Window.screenBounds;
scale = argscale;
channelOffset = 0;
threnoscopeColor = argThrenoscopeColor;
padDown = false;
key = argKey;
appPath = argappPath;
channels = argchannels;
[\appPath, appPath].postln;
// FOR STANDALONE BINARY ____________________
//pathtoscalafiles = appPath++"/scl/";
//pathtouserscalafiles = appPath++"/scl_user/";
// FOR RUNNING Threnoscope in SC as classes_______________
pathtoscalafiles = Platform.userAppSupportDir++"/downloaded-quarks/threnoscopeSC/threnoscope/scl/";
pathtouserscalafiles = Platform.userAppSupportDir++"/downloaded-quarks/threnoscopeSC/threnoscope/scl_user/";
"_______________".postln;
[\pathtoscalafiles, pathtoscalafiles].postln;
[\pathtouserscalafiles, pathtouserscalafiles].postln;
switch(mode)
{\perform} { // regular perform mode with terminal and console
post = true;
}
{\performWin} { // regular perform mode with terminal and console
post = true;
}
{\dev} { // development mode
post = true;
}
{\displayFS} { // full screen for display (for non-interactive performance)
post = false;
}
{\displayWin} { // display in a window (for app playback)
post = false;
};
}
registerSpeakers { |argspeakers|
speakers = argspeakers;
}
registerDrones { |argdrones|
drones = argdrones;
}
registerInterpreter { |arginterpreter|
interpreter = arginterpreter;
}
registerStates { |argstates|
states = argstates;
}
getChordDict {
^().put('major', [0, 4, 7]).put('minor', [0, 3, 7]).put('5', [0, 7]).put('dominant7th', [0, 4, 7, 10]).put('major7th', [0, 4, 7, 11]).put('minor7th', [0, 3, 7, 10]).put('minorMajor7th', [0, 3, 7, 11]).put('sus4', [0, 5, 7]).put('sus2', [0, 2, 7]).put('6', [0, 4, 7, 9]).put('minor6', [0, 3, 7, 9]).put('9', [0, 2, 4, 7, 10]).put('minor9', [0, 2, 3, 7, 10]).put('major9', [0, 2, 4, 7, 11]).put('minorMajor9', [0, 2, 3, 7, 11]).put('11', [0, 2, 4, 5, 7, 11]).put('minor11', [0, 2, 3, 5, 7, 10]).put('major11', [0, 2, 4, 5, 7, 11]).put('minorMajor11', [0, 2, 3, 5, 7, 11]).put('13', [0, 2, 4, 7, 9, 10]).put('minor13', [0, 2, 3, 7, 9, 10]).put('major13', [0, 2, 4, 7, 9, 11]).put('minorMajor13', [0, 2, 3, 7, 9, 11]).put('add9', [0, 2, 4, 7]).put('minorAdd9', [0, 2, 3, 7]).put('6add9', [0, 2, 4, 7, 9]).put('minor6add9', [0, 2, 3, 7, 9]).put('dominant7add11', [0, 4, 5, 7, 10]).put('major7add11', [0, 4, 5, 7, 11]).put('minor7add11', [0, 3, 5, 7, 10]).put('minorMajor7add11', [0, 3, 5, 7, 11]).put('dominant7add13', [0, 4, 7, 9, 10]).put('major7add13', [0, 4, 7, 9, 11]).put('minor7add13', [0, 3, 7, 9, 10]).put('minorMajor7thAdd13', [0, 3, 7, 9, 11]).put('7b5', [0, 4, 6, 10]).put('7s5', [0, 4, 8, 10]).put('7b9', [0, 1, 4, 7, 10]).put('7s9', [0, 3, 4, 7, 10]).put('7s5b9', [0, 1, 4, 8, 10]).put('m7b5', [0, 3, 6, 10]).put('m7s5', [0, 3, 8, 10]).put('m7b9', [0, 1, 3, 7, 10]).put('9s11', [0, 2, 4, 6, 7, 10]).put('9b13', [0, 2, 4, 7, 8, 10]).put('6sus4', [0, 5, 7, 9]).put('7sus4', [0, 5, 7, 10]).put('major7sus4', [0, 5, 7, 11]).put('9sus4', [0, 2, 5, 7, 10]).put('major9sus4', [0, 2, 5, 7, 11])
}
postDroneState {arg selectedName, selected;
var string;
Document.listener.string = ""; // clear post window
string = "~"++selectedName++"\n"++
"~"++selectedName++".type = \\"++drones.droneArray[selected].type++"\n"++
"~"++selectedName++".tonic = "++drones.droneArray[selected].tonic++"\n"++
"~"++selectedName++".freq = "++drones.droneArray[selected].freq++"\n"++
"~"++selectedName++".harmonics = "++drones.droneArray[selected].harmonics++"\n"++
"~"++selectedName++".amp = "++drones.droneArray[selected].amp++"\n"++
"~"++selectedName++".speed = "++(drones.droneArray[selected].speed*1000)++"\n"++
"~"++selectedName++".length = "++(drones.droneArray[selected].length*360/(2*pi))++"\n"++
"~"++selectedName++".angle = "++(drones.droneArray[selected].angle*360/(2*pi))++"\n"++
"~"++selectedName++".degree = "++drones.droneArray[selected].degree++"\n"++
"~"++selectedName++".ratio = "++drones.droneArray[selected].ratio++"\n"++
"~"++selectedName++".env = "++drones.droneArray[selected].env++"\n"++
"~"++selectedName++".octave = "++drones.droneArray[selected].octave++"\n"
"~"++selectedName++".note = "++drones.droneArray[selected].note++"\n";
Document.listener.string = string; // add info
if(post, { {interpreter.postview.string_(string)}.defer });
}
}