From bf4a3a5f8491a9218745dde371e78ebd8417dde0 Mon Sep 17 00:00:00 2001
From: Paul-Louis NECH <pln@algolia.com>
Date: Wed, 22 Nov 2023 20:12:58 +0100
Subject: [PATCH] Bogdan: Trust issues

---
 live/midi/nova/grime/bogdan_arrive.tidal | 86 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++---------------------------
 1 file changed, 59 insertions(+), 27 deletions(-)

diff --git a/live/midi/nova/grime/bogdan_arrive.tidal b/live/midi/nova/grime/bogdan_arrive.tidal
index f919fa3..d589145 100644
--- a/live/midi/nova/grime/bogdan_arrive.tidal
+++ b/live/midi/nova/grime/bogdan_arrive.tidal
@@ -1,49 +1,64 @@
+resetCycles
+
 do
 let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
 let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
 let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
-let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMask =  (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
 let gMute = (midiOn "^73" (mask "f*16"))
 let gMute2 = (midiOn "^74" (mask "f*16"))
 let gMute3 = (midiOn "^75" (mask "f*16"))
 let gM1 = gMask . gMute
 let gM2 = gMask . gMute2
 let gM3 = gMask . gMute3
+let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
 setcps (140/60/4)
 d1 $ gF1 $ gM2
-  $ midiOn  "^42" (<| "k*4")
+  $ midiOn  "^42" (<| "k k k <k [~ k]>")
   $ midiOff  "^42" (<| "<<k!3 k(<3 6 12>,8)> [~ !7 <~ k>]>")
-  $ "[jazz,kick:5,808bd:5]"
-d2 $ gF1 $ gM1
+  $ "[kick:5,808bd:5]"
+d2 $ gF1 $ gM1 -- Snare complice
   $ fix (|* gain 0.8) "sn"
-  $ midiOn "^43" (<| "<~ [s*<1!3 3> ~]>")
-  $ midiOff "^43" (<| "~ s ~ s*<1!6 3 3>")
+  $ midiOn "^43" (<| "~ s ~ s*<1!6 3 3>")
+  $ midiOff "^43" (<| "<~ [s*<1!3 3> ~]>")
   $ "[snare:13,sn:2]"
-d3 $ gF1 $ gM1 -- My grimest hat
+  # pan 0.3
+d3 $ gF1 $ gM1 $ gMaskEnd16 -- My grimest hat
   $ midiOn "^76" (fast "[2]")
   $ "h(3,8) h([<3 5 5 3> <3 5>],8)"
   # drumFrom "rolandtr909" "hh"
   # cut 3
-  |* gain "[0.75 1.1]*8"
-d5 $ gF3 $ gM3
-  $ chop 8
-  $ loopAt 8
-  $ "synth_commodore:3"
-  # cut 5
-  # pan 0.7
+  # pan 0.8
   # gain 0.8
+  |* gain "[0.75 1.1]*8"
+d5 $ gF3 $ gM3 -- Burning butterflies FIXME TROP NUMERIQUE
+  -- $ midiOn "^57" (>| note ("<ef bf fs gs>"))
+  -- $ midiOff "^57" (>| note ("[ef, <~ [~!15 e] [~!15 cs] [~!7 [e*2 cs]]>]"))
+  $ superimpose (arp "down" . (|+ note 12))
+  $ note ("[0(3,8,1), [12(<1 3 1 5>,8) 12(3,8,1)]]"
+  + "<bf gs <bf!3 e> <g!3 <ef [cs ef]>>>"
+  - 24
+  )
+  -- # "giorgio_syn:20"
+  # "supersquare"
+   -- # cut 5
+  # modIndex 2
+  # crushbus 51 (range 16 5 "^54")
+  # pan 0.45
+  # gain (0.5 + (range 0 0.2 (slow 2 perlin)))
+  # room 0.2
+  # dry 0.9 # sz 0.5
 d7 $ gF2 $ gM3
   $ chop 4
   $ loopAt 4
   $ "meth_bass:17"
   -- # octer 1
-  # octersubbus 63 (range 0 1.5 "^19")
-  # squizbus    62 (range 0 1.5 "^35")
-  # crushbus    61 (range 16 2.5 "^55")
+  # octersubbus 62 (range 0 1.5 "^35")
+  # crushbus    61 (range 10 2.5 "^55")
   # octersub 0
   # octersubsub 0
   # gain 0.9
-d4 $ gM3 $ gF3
+d4 $ gM3 $ gF2 -- giorgio's massive tribal bass
   $ midiOn "^91" (ply "2 <4 8>" . chop 8)
   $ slow 2
   $ midiOn "^57" (>| note ("<ef bf fs gs>"))
@@ -55,21 +70,28 @@ d4 $ gM3 $ gF3
   # octersubbus 43 (range 0 5 "^17")
   # squizbus 42 (range 0 1.5 "^33")
   # crushbus 41 (range 16 2.5 "^53")
-d8 $ gF1 $ gM1
+  # gain 0.6
+d8 $ gF1 $ gM1 $ gMaskEnd16 -- Come on breaks!
   $ chop 8
-  $ midiOn "^36" (loopAt 2 . (# n "<60!3 61>"))
+  $ midiOn "^56" (loopAt 2 . (# n "<60!3 61>"))
   $ midiOn "^92" (ply 4)
   $ midiOff "^60" (mask "t(4,8)")
   $ loopAt 2
   $ "jungle_breaks:26"
   # cut 8
-d9 $ gF3
-  $ "<~!7 bogdan_grime>"
-  # n (slow 8 "<3!3 <2 0>>")
+  # gain 0.7
+d9
+  $ midiOn "^42" ((<| "<~ b>")
+  . (# begin "<0!8 0.4!8>")
+  . (# end "<0.4!8 1!8>")
+  )
+  $ midiOff "^42" (<| "<~!7 b>")
+  $ "bogdan_grime"
+  # end (slow 8 "<0.4!3 1>")
+  # n 2
+  # lpf (slow 8 $ "<4000!12 400 800>")
   # crushbus 91 (range 4 8 perlin * 4)
-  # lpf 4000
   # gain (0.7 + "<0.1!3 0>")
-  -- $ midiOn "^91" (ply "2 <4 8>" . chop 8)
 -- d10
 --   $ "~ ~ ~ s"
 --   # "glitch:2"
@@ -85,8 +107,18 @@ d11  $ gF3
   # "90s_megafx"
   # gain 0.8
   # lpf 5000
-d10 $ gF3 $ gM3
-  $ chop 8
+d11 -- Cut Cymbals
+  $ gM1 $ gF1
+  $ mask "<f!10 t!6>"
+  $ "h(3,8) h(<3 <5 8>>,8)"
+  # "hh:7"
+  # gain (slow 8 $ range 0.4 0.8 saw)
+  # cut 11
+  # pan 0.2
+  # legato "<0.5!6 1 1>"
+  # lpf 5000
+d10 $ gF3
+  $ chop 16
   $ loopAt 4
   $ "jungle_riffs:21"
   # cut 4
--
libgit2 0.27.0