From: Eugene Petkevich <nasedil.genio.code@gmail.com>
Date: Sun, 22 May 2022 15:42:43 +0000 (+0300)
Subject: Add improvisation
X-Git-Url: https://git.zuelum.org/?a=commitdiff_plain;h=cebc9a33494dd282ad4c5d3f7c3abb1b8cdaa487;p=scprojects.git

Add improvisation
---

diff --git "a/\320\245\321\215\320\267\320\270\321\204\321\203/etude-33.7.4.2.scd" "b/\320\245\321\215\320\267\320\270\321\204\321\203/etude-33.7.4.2.scd"
new file mode 100644
index 0000000..021fafa
--- /dev/null
+++ "b/\320\245\321\215\320\267\320\270\321\204\321\203/etude-33.7.4.2.scd"
@@ -0,0 +1,43 @@
+
+
+~sekick = Sampler(\kik);
+
+~sekick.startRec;
+~sekick.stopRec;
+
+~sekick.playSample;
+~sekick.shiftPos(0.05);
+
+~procBus = Bus.audio(s, 2);
+
+(
+Pdef(\kik, ~sekick.makeSynthBind <> Pbind(*[
+  dur: 1,
+  octave: 4,
+  db: -15,
+  legato: 5,
+  sendGate: false,
+  out: ~procBus,
+])).quant_(4).stop;
+)
+
+(
+SynthDef(\sexi, {| in, out=0 |
+  var sig;
+  sig = In.ar(in, 2);
+  //sig = sig + CombC.ar(sig, 5.0, 1/6, 2.1);
+  //sig = sig * 0.7;
+  //sig = sig * Pulse.ar(Pulse.ar(Pulse.ar(171).range(2, 401)).range(0, 6703));
+  //sig = sig + DelayC.ar(CombC.ar(sig, 5.0, 1/13, 1.0), 0.1, LFNoise2.ar(151).range(0, 0.09));
+  //sig = sig*0.5 + Pulse.ar(LFNoise2.ar(32).range(400, 800), mul: LFNoise2.ar(16).range(0.01, 0.02));
+  sig = LPF.ar(sig, LFNoise2.ar(16).range(2000, 16000));
+  Out.ar(out, sig);
+}).add;
+
+{
+  ~procSynth.free;
+  ~procSynth = Synth(\sexi, [
+    in: ~procBus,
+  ], s, \addToTail);
+}.defer(0.1);
+)
\ No newline at end of file