Merge branch 'master' of sleepmap.de:config/dotfiles

* 'master' of sleepmap.de:config/dotfiles:
  .config/SuperCollider/synthdefs.scd: Adding first set of useful, minimal SynthDefs.
  .config/SuperCollider/startup.scd: Always evaluating the internal audio card last.

2 files changed, 48 insertions, 15 deletions

diff --git a/.config/SuperCollider/startup.scd b/.config/SuperCollider/startup.scd
index 98d571e..4bf8669 100644
--- a/.config/SuperCollider/startup.scd
+++ b/.config/SuperCollider/startup.scd
@@ -31,15 +31,6 @@ if(PathName("/dev/fw1").isFile, {
     // holding Symbols for accessing groups of inputs and outputs by name
     ~audioInterfaceOptions = case
       {
-        ~alsaDevices.contains("PCH")
-      }{
-        Dictionary.with(*[
-          \name->'Internal',
-          \numInputs->2,
-          \numOutputs->2
-        ])
-      }
-      {
         ~alsaDevices.contains("Babyface")
       }{
         Dictionary.with(*[
@@ -47,8 +38,7 @@ if(PathName("/dev/fw1").isFile, {
           \numInputs->10,
           \numOutputs->12
         ])
-      }
-      {
+      }{
         ~alsaDevices.contains("XUSB")
       }{
         Dictionary.with(*[
@@ -56,8 +46,7 @@ if(PathName("/dev/fw1").isFile, {
           \numInputs->32,
           \numOutputs->32
         ])
-      }
-      {
+      }{
         ~alsaDevices.contains("Scarlett 18i20")
       }{
         Dictionary.with(*[
@@ -65,8 +54,7 @@ if(PathName("/dev/fw1").isFile, {
           \numInputs->18,
           \numOutputs->20
         ])
-      }
-      {
+      }{
         ~alsaDevices.contains("Fireface UFX ")
       }{
         Dictionary.with(*[
@@ -88,6 +76,14 @@ if(PathName("/dev/fw1").isFile, {
             \spdif->Array.series(2, 12, 1)
           ])
         ])
+      }{
+        ~alsaDevices.contains("PCH")
+      }{
+        Dictionary.with(*[
+          \name->'Internal',
+          \numInputs->2,
+          \numOutputs->2
+        ])
       };
   });
 });
diff --git a/.config/SuperCollider/synthdefs.scd b/.config/SuperCollider/synthdefs.scd
new file mode 100644
index 0000000..4a75b4c
--- /dev/null
+++ b/.config/SuperCollider/synthdefs.scd
@@ -0,0 +1,37 @@
+postln("Adding custom SynthDefs");
+
+// route 8 Ins to Out
+SynthDef(\route8BussesToOut, {
+  arg in=0,
+  volume=#[0,0,0,0,0,0,0,0],
+  out=0;
+  Out.ar(
+    out,
+    In.ar(in, 8) * volume
+  );
+}).add;
+
+// filter low frequency rumble on SoundIns
+SynthDef(\filter8Rumble, {
+  arg in=#[0,1,2,3,4,5,6,7],
+      freq=20,
+      out=0;
+  Out.ar(
+    out,
+    HPF.ar(
+      SoundIn.ar(in),
+      freq
+    )
+  );
+}).add;
+
+// Mix down SoundIns to one
+SynthDef(\mix4BussesToOut, {
+  arg in=#[0,1,2,3],
+      volume=#[0,0,0,0],
+      out=0;
+  Out.ar(
+    out,
+    Mix.new(SoundIn.ar(in, volume))
+  );
+}).add;