From: Eugene Petkevich <nasedil.genio.code@gmail.com>
Date: Sat, 30 Dec 2023 13:48:41 +0000 (+0100)
Subject: Add drums
X-Git-Url: https://git.zuelum.org/?a=commitdiff_plain;h=2e012ce8b13e402a1ada036671b840624db80200;p=scprojects.git

Add drums
---

diff --git a/startup.scd b/startup.scd
index 5b7442f..ada1443 100644
--- a/startup.scd
+++ b/startup.scd
@@ -73,6 +73,10 @@ b = (
   bell: 53,
 );
 
+c = (
+  media: "~/gart/media"
+);
+
 // ==== Midi setup
 ~midiup = {
   MIDIClient.init;
diff --git "a/\320\232\320\260/\320\232\320\260\320\274\321\213\321\200-\320\245\321\213\320\277\321\221\320\264\321\221/\320\245\321\213\320\277\321\221\320\264\321\221-\320\277\320\265\321\201\320\275\321\217.scd" "b/\320\232\320\260/\320\232\320\260\320\274\321\213\321\200-\320\245\321\213\320\277\321\221\320\264\321\221/\320\245\321\213\320\277\321\221\320\264\321\221-\320\277\320\265\321\201\320\275\321\217.scd"
new file mode 100644
index 0000000..9d95b9a
--- /dev/null
+++ "b/\320\232\320\260/\320\232\320\260\320\274\321\213\321\200-\320\245\321\213\320\277\321\221\320\264\321\221/\320\245\321\213\320\277\321\221\320\264\321\221-\320\277\320\265\321\201\320\275\321\217.scd"
@@ -0,0 +1,128 @@
+// Хыпёдё
+
+// instrument
+
+(
+~hahomoSamples = Array();
+~hahomoPath = PathName(c.media).pathOnly +/+ "Хахомо";
+~hahomoPath.entries.do({
+  arg path;
+  ~hahomoSamples = ~hahomoSamples.add(Buffer.read(s, path.fullPath));
+});
+)
+
+SynthDef(\bu, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[0];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\me, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[1];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 10;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\mo, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[2];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 6;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\gy, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[3];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 5;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\da, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[4];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 4;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\do, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[5];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 3;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\tu, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[6];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 12;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\by, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[7];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 2;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\bo, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[8];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 2;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\be, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[9];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 2;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\ma, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[10];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 1;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+SynthDef(\nu, {|out=0, rate=1, amp=1, pan=0|
+  var sig;
+  var buf = ~samples[11];
+  sig = PlayBuf.ar(2, buf, BufRateScale.kr(buf), doneAction: 2);
+  sig = sig * amp * 1;
+  sig = Balance2.ar(sig[0], sig[1], pan);
+  Out.ar(out, sig);
+}).add;
+
+// test
+
+(
+Pdef(\test, Pbind(*[
+  instrument:
+])).quant_(4).play;
+)
\ No newline at end of file