Practice: Divinites

live/ambient/batavia_la_tortue.tidal

+once "dr"
 -- Batavia...
 
 do
@@ -11,9 +12,9 @@ d1 $ gF $ gM
   $ midiOn "^14" (fast 2)
   $ midiOn "^42" (superimpose (# "808bd:2") . struct "t t t <t <[~ t] t*2>>")
   -- $ midiOff "^42"  (<| "<t ~> . ~ ~ <~ t> <~!3 t>")
-  $ midiOff "^42" (<| "t")
-  $ "[jazz,cpu:8]"
-  # midiG' "^78" 0 1.2
+  $ midiOff "^42" (<| "[t ~ t t]*4")
+  $ "[jazz ~ jazz:1 jazz:1]*4"
+  # midiG' "^78" 0 1.3
 d2 $ gF2 $ gMask -- Coupe de feu
   $ midiOn  "^43" (struct "~ t ~ t ~ t ~ [<t  ~ ~ t> <~ t>]")
   $ midiOff "^43" (slow 2)
@@ -48,6 +49,7 @@ d5 $ gF2 $ gMask
   # "bassWarsaw"
   # crushbus 51 (range 16 2.5 "^53")
   # room 0.2
+  # pan 0.3
   # midiG' "^81" 0 1.3
 d6 $ gF $ gM -- Break rayon laser =------------>
   $ midiOn "^91" (ply 8)

live/bdmania.tidal

 
- once $ s "bd" # speed 3
+ once $ s "bd"
+  # speed 6
 
 d1 -- kick
 -- $ euclid "<4 6>" 4
 $ euclid "<<0 1 5 7> 3>" 8
 $ sound "bd"
+# room 0.2 # dry 1
 
 d2 -- tic toc
 $ someCycles (degrade . fast 2)
@@ -13,6 +15,7 @@ $ every' 16 7 degrade
 $ every 16 (# gain 0)
 $ s "bd(5,8)"
 # note "<50 <55 <60 65>>>"
+# pan 0.8
 
 d3 -- vibration montante!
 $ sometimesBy 0.01 (# crush 4)
@@ -20,10 +23,10 @@ $ every 4 (rev)
 $ sound "bd"
 # note "<<28 21 14 7 0> <7 14 21 28 35 42 49 56 63 70>>"
 >| speed (
-  segment 100
-  $ range 1 3 cosine
+  segment 200
+  $ range 2 4 cosine
   )
-# gain 0.65
+# gain 0.8
 
 d8 -- helico
 $ every' 4 3 (off 0.125 id)
@@ -31,6 +34,7 @@ $ every 8 (# gain 0)
 $ every' 8 7 (# gain 1.2)
 $ rev $ iter 4 $ loopAt 4 $ chop 16 $ "bd"
 # gain 2.5
+# pan 0.3
 
 d5 -- cordes guitare pincée
 $ someCycles (fast 2 . degrade)

live/boeuf/algorythm/toxic.tidal → live/boeuf/algorythm/fdlm2022/toxic.tidal

@@ -12,7 +12,7 @@ d1 $ g
   -- $ mask "<t!12 f!4>"
   $ fix ((|* gain 0.9) . (# lpf 5000)) "kick"
   $ "k ~ ~ k . ~ ~" # "[ifdrums,kick]"
-  # midiG' "^78" 0 1
+  # midiG' "^78" 0 1.3
   # pan 0.4
 d2 $ g
   $ superimpose (const $ g

live/boeuf/algorythm/fix_you.tidal

+do
+setcps (135/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
+  $ midiOn "^74" (<| "k*4")
+  $ midiOn "^42" (<| "k k")
+  $ midiOff "^42" (<| "k")
+  -- $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
+  $ "[jazz,cpu]"
+  # midiG' "^78" 0 1.7
+d2 $ gF $ "~ . <s!3 s> " # "[snare:21,snare:29]"
+  # midiG' "^79" 0 1
+d3 $ gF
+  -- $ midiOn ("^44" - "^76") (off "0.33" id)
+  $ midiOn ("^76" - "^44") (ply 2)
+  $ midiOn "^44" (<| "~ h*2 [~ <~ h>] <~!3 h> h*2 [~ <~ h>]")
+  $ midiOff "^44" (<| "h*4")
+  $ drumFrom "rolandtr808" "[hh:1]"
+  # midiG' "^80" 0 1.2
+-- d4
+
+once $ "supergong" # note "e6"
+  # room 1.2
+  # orbit 1
+  # gain 0.8

live/boeuf/algorythm/fly_me_to_the_moon.tidal

+do
+setcps (130/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
+  $ midiOn "^74" (<| "k*4")
+  $ midiOn "^42" (<| "k k")
+  $ midiOff "^42" (<| "k")
+  -- $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
+  $ "[jazz,cpu]"
+  # midiG' "^78" 0 1.7
+d2 $ gF $ "~ . <s!3 s> " # "[snare:21,snare:29]"
+  # midiG' "^79" 0 1
+d3 $ gF
+  -- $ midiOn ("^44" - "^76") (off "0.33" id)
+  $ midiOn ("^76" - "^44") (ply 2)
+  $ midiOn "^44" (<| "~ h*2 [~ <~ h>] <~!3 h> h*2 [~ <~ h>]")
+  $ midiOff "^44" (<| "h*4")
+  $ drumFrom "rolandtr808" "[hh:1]"
+  # midiG' "^80" 0 1.2

live/boeuf/algorythm/love23/cant_help_falling_in_love.tidal

+-- Inspiration https://www.youtube.com/watch?v=vGJTaP6anOU
+
+-- FIXME: DO NOT MERGE - This one is unplugged :)
+do
+-- resetCycles
+setcps (120/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+d1 $ gF1
+  $ "808bd:2/2"
+  # midiG' "^78" 0 1.1
+d2 $ gF2 $ "<~ snare:30>"
+  # midiG' "^79" 0 1.1
+  # hpf 3000
+d3 $ gF2
+  $ midiOn "^76" (fast 2)
+  $ midiOn "^44" (fast 2)
+  $ "drum:2*3"
+  # midiG' "^80" 0 1.1

live/boeuf/algorythm/love23/killing_me_softly.tidal

+-- TODO: Scratch intro? :lol:
+once $ splice 2 "0" $ "scratch_short:12" # cut 1 # gain 0.8
+
+
+do
+setcps (92/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+d1 $ gF1 $ gM -- Kick
+  $ midiOn "^42" (struct "t . ~ t ~ ~")
+  -- $ struct ("t <t!3 [~ t]> t <t!6 ~!2>") -- RUN!
+  $ fix (|* gain 0.7) "jazz"
+  $ fix ((|* gain 0.7) . (# "jazz") . (# n "<4 4 <3 3 4 4> 3>")) "sub"
+  $ "[808bd,<808bd:4!2 808bd:3!2>,jazz]"
+  # midiG' "^78" 0 1.2
+  # pan 0.8
+d2 $ gF1 $ gMask -- Snare
+  $ midiOff "^43" (struct "~ ~ ~ t")
+  $ midiOn  "^43" (struct "~ t ~ t")
+  $ "808sd:6"-- "snare:5"
+  # release 0.4
+  # att 0.02
+  # midiG' "^79" 0 1.5
+d3 $ gF1 $ gMute -- Hats complément
+  $ midiOn "^76" (ply "<2 4>")
+  $ "~ h ~ <h!3 ~> ~ <~!8 h!8> ~ h"
+  # "snare:51"
+  # att 0.0125 # rel 2 # hpf 3000
+  # pan 0.7
+  # midiG' "^80" 0 1
+d4 $ gF2 $ gMute -- Hats pirouette
+  $ mask "<[t f] t>"
+  $ "~ . [s [~ s] s ~ . ~]"
+  # note "0 . [[0 [2 0] 0] . 0]"
+  # "snare:51"
+  # midiG' "^80" 0 0.8
+  # pan 0.65
+d5 $ gM $ gF2  -- BASSLINE!
+  $ midiOn "^58" (|- note 12)
+  $ mask "<t!3 t(<1 8>,8)>"
+  $ midiOn "^90" ( -- FIRELINE
+    off 0.5 (
+      -- (# crush 6) .
+  (|- note 12)
+  . (# cut 51)
+  . (# pan 0.8)
+  . (# room 0)
+  . (|* gain 0.9)
+  ))
+  $ note ("<e a4 d <g4 [c ~]>>"
+    + "0 . [-2 0@3]" -- Algoritmic addition
+    - 0) -- Scholar :nerd:
+  -- $ note ("<e e e c>@6 d@2" - 24) -- Nice but is that it?
+  # "FMRhodes1"
+  # cut 5
+  # legato 2
+  # room 0.64 # sz 0.5 # dry 1
+  # pan 0.2
+  # midiG' "^82" 0  0 -- FIXME: DISABLED FOR CONCERT ;) 1.6
+  # modIndex (range 0 2 "^54")
+d6 $ gM $ gF1
+  $ fix (|* gain 0.7) "cpu"
+  -- $ sometimesBy "0 0.25" (mask "t . t(<3 5 8 1>,8)")
+  $ "[hh,cpu:1]*8"
+    # rel 0.5
+    # att 0.5
+    # lpf 6000
+    # room 0 # dry 0
+    # midiG' "^83" 0 1.6
+
+
+
+d7
+  $ midiOff "^91" (mask "f")
+  $ note ("c" -7)
+  # release 2
+  # att 1
+  # "pad:2"
+  # midiG' "^83" 0 1
+  # cut 7
+
+once $ "organDonor" # cut 7 # gain 1.4
+
+once $ "ikedaBass" # gain 2
+
+d8 $ gM $ gF1
+  $ midiOn "^92" (ply "<2!3 [<4 1> 1]>")
+  $ chop 8
+  $ loopAt 1
+  $ "break:4/2"
+  # cut 8
+  # midiG' "^84" 0 1
+
+
+
+-- Graveyard: other break
+d8 $ struct "t([5 <<5 5 3 5> <10 5 10 16>>], 16)" $ chop 16 $ "break:1" # cut 2
+  # pan 0.28
+  # gain 0.3
+
+-- t d t d t db t d

live/boeuf/algorythm/love23/something_about_us.tidal

+do
+setcps (92/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+let gF = gF1 . gF2
+d1 $ gF1 -- Kick
+  $ midiOn  "^42" (<| "k k k <k <k*2 [~ k]>>")
+  $ midiOff "^42" (<| "k ~ ~ <~ k> . <k ~>")
+  $ "jazz"
+  # midiG' "^78" 0 1.3
+  # pan 0.8
+d2 $ gF1
+  $ midiOn  "^43" (<| "~ s ~ s*<1!4 2!3 1>")
+  $ midiOff "^43" (<| "~ ~ ~ k")
+  $ "[drumtraks:9]"
+  # midiG' "^79" 0 1.45
+d3 $ gF1
+  $ midiOn "^44" (ply 2)
+  $ midiOn "^76" (ply 2)
+  $ "d d d <d [<d ~> d]>" # "drum:2"
+  # midiG' "^80" 0 1
+  # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
+d4 $ gF2 -- V2
+  $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0)))
+  $ note (cat [
+    "[bf3, d4, f4, a4]", -- Bbmaj7
+    "[a3, c4, e4, g4]", -- Am7
+    "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
+    "[g3, b4, d5, <f5 ~>]" -- <G7 G>
+    -- "[cs4, b4, d5, <f5 ~>]" -- <G7 G>
+  ])
+  # "FMRhodes2"
+  -- |- note 12
+  |+ note 2 -- Adjust to C
+  # modIndex (range 0 2 "^53")
+  # midiG' "^81" 0 1.6

live/boeuf/algorythm/love23/u_remind_me.tidal

+-- Inspiration: https://www.youtube.com/watch?v=4jXfnbJvmIQ
+
+do
+setcps (93/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = midiOn "^73" (mask "f f f t")
+d1 $ gF1
+  $ gMask
+  $ fix (|* gain 0.9) "jazz"
+  $ "k*<1!3 2> ~ . <k <~!3 k>>"
+  -- # "[808bd,808bd:3,bd:2]"
+  # "[jazz,kick:8,bd:2,808bd:3,808bd:4]"
+  # room 0.2 # dry 1.1 # sz 0.8
+  # legato 2
+  # midiG' "^78" 0 1.4
+d2 $ gF1 $ gMask -- snare cassant
+  $ fix (|* gain 0.85) "snare:16"
+  $ "~ <sn!3 <~ sn>> ~ <sn!6 ~ sn>"
+  # "[snare:2,snare:16,tek_hh:1]"
+  # lpf 7000
+  # midiG' "^79" 0 1.4
+  # pan 0.7
+d3 $ gF1 $ gMask
+  $ midiOn "^76" (ply 2)
+  $ midiOn "^44" (ply 2)
+  $ "[~ drum:2]*4"
+  # pan 0.4
+  # midiG' "^80" 0 1.4
+d4 $ gMask $ gF1
+  -- $ mask "<f!3 t>"
+  $ "<h [~ h]> . h*<2 [4 4 4 1]> ~"
+  # "snare:5" # hpf 5000
+  # legato "1 . [1 0.5] ~"
+  # gain 0.8
+  # midiG' "^81" 0 1.2
+  # cut 4
+  # pan 0.2
+d8 $ gMask $ gF1
+  $ midiOn "^92" (ply "<2!3 [<4 1> 1]>")
+  $ chop 8
+  $ loopAt 2
+  $ "break/2"
+  # cut 8
+  # midiG' "^84" 0 1
+d9
+  $ (0.25 ~>) -- Calage
+  -- Simple one
+  $ note "<[~ cs7*2 cs7 as6 gs6 fs6 ds6@2] ~>"
+  -- Complete one
+  -- $ note "<[~ cs7*2 cs7 as6 gs6 fs6 ds6@2] [[~ as6] [gs6 ~] [~ <gs6 cs7>] [<fs6 as6> ~]]>"
+  # "superpiano" # velocity 0.5
+  # midiG' "^82" 0 1.5
+  -- # room "<0.2!3 0.8>"
+  # dry 1.8
+
+
+once $ arpeggiate $ note "a'maj'4" # "superpiano"
+  # gain 1

live/boeuf/algorythm/love23/until_i_found_you.tidal

+-- Inspiration rythms https://www.youtube.com/watch?v=kPlSyYtE63M
+-- Inspiration key https://www.youtube.com/watch?v=osSXQMaieHU
+
+-- Intro: Kick, click 3, puis keys, puis snare
+-- Outro: ALWAYS GO DOWN SHE SAID
+
+do
+setcps (125/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+-- let gMask = whenmod 8 6 (mask "<t <[t f] f>> . f f f t")
+d1 $ gF1
+  $ fix (# hpf 2000) "909"
+  $ fix (# lpf 120) "[808bd,bd]"
+  $ midiOn "^42" ((|* gain "1 1 0.95") . struct "t ~ [~ t]")
+  $ midiOff "^42" (struct "t")
+  -- $ "[808bd,cpu]"
+  $ "[808bd:3,bd:1,909]"
+  # room 0.2 # dry 1 # sz 0.8
+  # note (-1)
+  # release 10
+  # midiG' "^78" 0 1.4
+d2 $ gF1
+  $ midiOn "^43" (mask "t!7 f")
+  $ "~ ~ ~ s ~ <~!3 s>"
+  # "snare:8"
+  # hpf 2000 # gain "1.1"
+  # midiG' "^79" 0 1.5
+d3 $ gF2
+  $ fix (|* gain (slow 2 $ range 0.5 0.81 sine)) "drum"
+  $ fix ((# n "0!3 <0 1>") . (|* gain (range 0.7 0.5 sine))) "808oh"
+  $ midiOn "^76" (fast 2)
+  $ midiOn "^44" (fast 2)
+  $ (|* gain "1 0.9 0.85")
+  $ "d d d"
+  # "[drum:2,808oh]"
+  # midiG' "^80" 0 1.6
+
+
+
+d5 $ gF2 -- filler
+  -- FIXME On different chorus
+  -- f fs gs as c cs ds
+  $ midiOn "^89" ((# note "fs5'maj'3")) -- Pre-verse
+  $ midiOn  "^90" (# note ("gs4'maj'3")) -- Chorus
+  $ midiOn  "^91" (# note ("ds5'maj'3")) -- Chorus
+  $ "bassWarsaw"
+  # velocity 1
+  # note ("<cs5'maj'3>") -- Verse
+  # att 1
+  # rel 2
+  # midiG' "^81" 0 1
+
+-- TODO FIND A MORE ANALOGIC KICK :)
+once
+  $ "[808bd:3,bd:1,909]"
+
+once $ "[808bd,cpu]"
+
+once $ "kick:11" # gain 0.8
+
+-- GRAVEYARD/WORKSHOP: FIND ME THE PROPER CHORDS
+do
+d1 $ "jazz/4"
+d2
+  $ whenmod 4 3 (off "0.25" (|* gain 0.9))
+  $ "~ snare:54"
+d3 $ "hh*6" # gain 0.8
+d6
+  $ note "<cs4 f4 <fs4 as4 fs> <gs4!3 ef4>>"
+  # "superpiano" # gain 1 # velocity 0.7

live/boeuf/algorythm/something_bossa_nova.tidal

+do
+setcps (92/60/4)
+let gF1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+let gF = gF1 . gF2
+d1 $ gF1 $ gM -- Kick
+  $ midiOn  "^42" (<| "k k k <k <k*2 [~ k]>>")
+  $ midiOff "^42" (<| "k ~ ~ <~ k> . <k ~>")
+  $ "jazz"
+  # midiG' "^78" 0 1.3
+  # pan 0.8
+d2 $ gF1
+  $ midiOn  "^43" (<| "~ s ~ s*<1!4 2!3 1>")
+  $ midiOff "^43" (<| "~ ~ ~ k")
+  $ "[drumtraks:9]"
+  # midiG' "^79" 0 1.45
+d3 $ gF1 $ gM
+  $ midiOn "^44" (ply 2)
+  $ midiOn "^76" (ply 2)
+  $ "d d d <d [<d ~> d]>" # "drum:2"
+  # midiG' "^80" 0 1
+  # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
+d4 $ gF2 -- V2
+  $ midiOn "^57" (|+ note 12)
+  $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0)))
+  $ note (cat [
+    "[bf3, d4, f4, a4]", -- Bbmaj7
+    "[a3, c4, e4, g4]", -- Am7
+    "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
+    "[g3, b4, d5, <f5 ~>]" -- <G7 G>
+    -- "[cs4, b4, d5, <f5 ~>]" -- <G7 G>
+  ])
+  # "FMRhodes2"
+  -- |- note 12
+  |+ note 2 -- Adjust to C
+  # modIndex (range 0 2 "^53")
+  # midiG' "^81" 0 1.6
+d8 $ gF $ gM
+  $ midiOn "^92" (ply "2 <2!3 4>")
+  $ loopAt 2
+  $ chop 8
+  $ "break:31"
+  # midiG' "^84" 0 1

live/chip/ataright.tidal

@@ -26,6 +26,7 @@
 |________|/                        |________|/
 -- Thanks dew & PORTFO for the ASCII art <3
 
+
 do
 let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
 let g2 = (# djfbus 2 "^50")
@@ -34,12 +35,14 @@ let gMute = (midiOn "^73" (mask "f*16"))
 let gM = gMask . gMute
 let modIndex = pF "modIndex"
 setcps (120/60/4)
-d1 $ g1 $ gM -- THE ROAD
+d1 $ g1 $ gMute -- THE ROAD
+  $ midiOn "^74" (fast 2)
   $ midiOn "^42" (struct "t t t <t t*2 t [~ t]>")
   $ midiOff "^42" (struct "t*2")
   $ "[jazz,808bd:6]"
   # midiG' "^78" 0 1.4
-d2 $ g1 $ gMute -- THE FUEL
+  # orbit 0
+d2 $ g1 $ gM -- THE FUEL
   $ midiOn "^43" (mask "t f . f <t!4 f!4> t <t!4 f!3 t>")
   $ midiOn "^75" (ply 2)
   $ loopAt 4
@@ -48,6 +51,7 @@ d2 $ g1 $ gMute -- THE FUEL
   # midiG' "^79" 0 1.2
   # lpf 2800
   # cut 2
+  # orbit 1
 d3 $ gM $ g1 -- THE GUIDELINES
   $ midiOn ("^44" - "^76")
     (sometimesBy (slow 8 $ range 0.3 0.95 saw)
@@ -57,6 +61,7 @@ d3 $ gM $ g1 -- THE GUIDELINES
   $ "h2ogmhh"
   # midiG' "^80" 0 1.2
   # n "<0!4 1 2 3>"
+  # orbit 2
 d4 $ gMask -- THE THUNDER
   $ g2
   $ midiOn "^57" (off "0.75" id)
@@ -72,6 +77,7 @@ d4 $ gMask -- THE THUNDER
   # pan "<0.8!3 0.5>"
   # midiG' "^81" 0 1.8
   # room 0.4
+  # orbit 3
 d5 $ g2 $ gMask -- THE RAIN
   $ midiOn "^58" ((whenmod 8 7 (off "s" id)) .(off "e" id))
   $ midiOn "^90" (striate "<2!3 4>" . ply 2)
@@ -85,13 +91,15 @@ d5 $ g2 $ gMask -- THE RAIN
   # roombus 42  (range 0 0.2 "^34")
   # sz 0.5
   # pan 0.8
+  # orbit 4
   # midiG' "^82" 0 1.9
 d8 $ g1 $ gM -- THE UNAVOIDABLE BREAKS
   $ mask "t(16,64)"
-  $ midiOn "^60" (ply 2) --
-  $ midiOn "^92" (fast 2) -- FIXME
+  $ midiOn "^60" (ply 2)
+  $ midiOn "^92" (fast 2)
   $ slice 8 ("<0!3 ~> <1!3 3> <2 2 [2 6][ 2 6 6 6]> <3!3 7>*<1 2>")
   $ loopAt 2
   $ "fbreak120:3"
   # cut 8
   # midiG' "^84" 0 1.3
+  # orbit 5

live/chip/step_silence.tidal

 once $ "808bd:9"
 
+-- STEP INTO SILENCE
 do
 setcps (120/60/4)
 let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
@@ -34,12 +35,12 @@ d4 $ g1
   # pan 0.3
   # midiG' "^80" 0 1.1
 d5 $ g2 -- THE BASS REMNANTS
-  $ midiOn ("^89" + "^58") (slice 4 "0 1 2 <3 1 3 3*8>")
+  $ midiOn ("^89" + "^57") (slice 4 "0 1 2 <3 1 3 3*8>")
   $ midiOn "^57" ((# legato 4) . (slow 4)) -- Hack longer sample
   $ "90s_matrix:0"
   # crushbus 51 (range 16 1.8 "^53")
   # legato 2 # cut 5
-  # midiG' "^81" 0 1
+  # midiG' "^81" 0 1.8
 d6 -- TODO BASSLINE <3
   $ note (-24) # "bassWarsaw"
   # midiG' "^82" 0 1.3

live/collab/kevin/synchro.tidal

+do
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+setcps (120/60/4)
+d1 $ gF $ "jazz*4"
+d2 $ gF $ "~ cp"
+  # lpf 3000
+  # gain 0.9
+d3 $ gF $ "dr*[8 16]"
+d4 $ gF2 $ note (scale "aeolian" "<0 0 1 2 0 2 -1 0>")
+  # "giorgio_syn:1"
+  # cut 4
+  # gain 0.7
+d5 $ gF $ loopAt 2 $ "break" # gain 1.1
+  # cut 5

live/collab/raph/hard_monday.tidal

+do
+setcps (180/60/4)
+let gF =  (# 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 = id
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+d1 $ gF $ gMute2 -- Kick variable
+  $ midiOn "^41" (
+    # "hardkick:2" -- Kick GABBER
+   )
+  $ midiOn "^75" (fast 2)
+  $ midiOn  "^42" (struct "t t <t!3 [t t*2]> <t [t t] t [t t*2]>") -- FIXME GABBER DOUBLE
+  -- $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
+  $ midiOff "^42" (struct "t ~")
+  -- $ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
+  $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
+  # "[techno:0,jazz]" -- Kick dnb
+  # midiG' "^78" 0 1
+d2 $ gF $ gMute -- Clap timer
+  $ midiOn "^43" (<| "c c c*<1!6 2 2> c*<1 2>")
+  $ midiOff "^43" (<| "~ c")
+  $ drumFrom "[linnlm1]" "cp"
+  # lpf 1200
+  # distortbus 21 (range 0 2 "^31")
+  # midiG' "^79" 0 1
+d3 $ gF $ gMute -- Chapeau!
+  $ "~ h ~ h*<1!3 2> ~ h*<1!7 2> ~ h*<1 <2 4>>"
+  # "[808oh, hh, dr]"
+  # pan 0.6
+  # midiG' "^80" 0 0.7
+d4 $ gF3
+  $ slow 2
+  $ note (
+    "c [c d ef] c [c d ef] c [c d ef] c [c <ef f g gs> <f g gs as>]"
+    - 24)
+  # "bassWarsaw"
+  # crushbus 41 (range 16 3.93 "^53")
+  # cut 4
+  # pan 0.3
+  # legato 0.75
+  # midiG' "^81" 0 0.7
+d6 $ gF3
+  -- $ slow 2
+  $ note "c [c d ef] c [c d ef] c [c d ef] c [c <ef f g gs> <f g gs as>]"
+  # "harpsichord1"
+  # crushbus 61 (range 16 3.93 "^54")
+  # cut 6
+# pan 0.3
+  # legato 0.5
+  # midiG' "^82" 0 0.7
+d7 $ gF2
+  --
+  --  9   │     //Standard Values
+  -- 10   │     out = 0, pan = 0, freq = 440, amp = 0.5, gate = 1,
+  -- 11   │     att = 1, dec = 3, sus = 0, rel = 1.5, crv = -4,
+  -- 12   │     //Other controls
+  -- 13   │     rq = 0.5, rate = 1, minfreq = 100, maxfreq = 16000,
+  -- 14   │     drylevel = 1.5, fmdepth = 1.5, fmfreq = 432;
+  $ slow 2
+  $ midiOn "^59" (arp "up")
+  $ note ("<[c4 <f4 gs4> <gs4 <c5 b4>>@6]>")
+  # "phazer"
+  # crushbus 61 (range 16 3.93 "^54")
+  -- # cut 7
+  # pan 0.3
+  # legato 0.5
+  # midiG' "^83" 0 0.7
+d8 $ gM $ gF -- Runner's breaks
+  $ midiOn "^92" (off "e" id)
+  $ midiOn "^60" (mask "[f t]")
+  $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
+  $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3"))
+  $ loopAt 2
+  $ chop 8
+  $ "jungle_breaks:1"
+  # cut 8
+  # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4"
+  # midiG' "^84" 0 1
+d9 $ "<~ risers:3 ~ ~>"
+  # cut 9
+  # speed 1.5
+  # midiG' "^20" 0 0.8
+
+once $ "c c " "phazer"
+  # gain 0.8
+  # cut 3
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+d6 $ gM2 $ gF3
+  $ chop 4
+  -- $ slice 4 "<0 1 2 3>"
+  $ loopAt 4
+  $ "bass_gameboy:7"
+  # room 0.8 # dry 1
+  # sz 0.64
+  # midiG' "^82" 0 1
+  # crushbus 61 (range 16 3.93 "^54")
+  # legato 2
+  # cut 6
+
+-- once $ "risers:3" # speed 2 # cut 7
+
+-- Regular Kick
+once
+  $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
+    # lpf 5000
+    # gain 0.8
+
+-- HARDKICK
+once
+  -- $ "[gabba:0]"
+  $ "[hardkick:3]"
+    # lpf 5000
+    # gain 0.8
+    # cut 1
+
+-- CRUSHED SNARE
+
+-- SYNTH
+-- nes 1 8

live/collab/raph/ragga_la_hierarchie.tidal

+
+once $ "scratch_long:50" # cut 1 # gain 0.8
+
+once $ "voices_reggae" # cut 2
+  # n 12 # gain 0.8
+
+do
+-- setcps (180/60/4)
+let gF =  (# 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 gCPS = (# cpsbus 4 ((range 60 180 "^13")/60/4))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gCPS $ gF $ gMute
+  $ midiOn "^74" (fast 2)
+  $ midiOn "^42"  (<| "k k k <k [<k ~> k]>")
+  $ midiOff "^42" (<| "k k")
+  $ "[wobble,kick:5]"
+  # midiG' "^78" 0 1.2
+d2 $ gF $ gMute
+  $ fix ((|- note 4) . (|* gain 0.95)) "cp"
+  $ midiOn  "^43" (<| "~ s ~ s*<1 <2 [4 2]>>")
+  $ midiOff "^43" (<| "~ s")
+  $ "[snare:20,cp]"
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gM -- course de chapeaux
+  $ midiOff "^44" (mask "<t t(1,8)>")
+  $ "~ o ~ o ~ o*<1 2> ~ o*<1!3 2>" # drumFrom "rolandd110" "oh"
+  # midiG' "^80" 0 1.2
+  # pan 0.7
+d4 $ gF2 -- Meth == Crash
+  $ midiOff "^59" ((# legato 1) . mask "<t f>")
+  $ midiOn  "^91" (ply 8)
+  -- $ loopAt 8
+  $ chop 8
+  $ "meth_1902:0"
+  # pan 0.7
+  # crushbus 41 (range 16 1.5 "^55")
+  # cut 4
+  # room 0.2 # sz 0.3 # dry 1.1
+  # midiG' "^83" 0 1.2
+d5 $ gF2 -- Prendre l'acid bus pour trouver du boulot
+  $ midiOn "^57" (id)
+  $ midiOff "^57" (slice 8 "0 0 <~!8 0!8> 0*<1!8 2!8>" )
+  $ loopAt 16
+  $ chop 8
+  $ "synth_commodore"
+  # crushbus 51 (range 16 1.5 "^53")
+  # pan 0.4
+  # room 0.2 # sz 0.2 # dry 2
+  # midiG' "^81" 0 1.3
+  # cut 5
+d8 $ gF $ gM
+  $ midiOn "^20" (# n "48")
+  $ midiOn "^36" (# n 50)
+  $ midiOn "^60" (slow 2)
+  $ midiOn ("^92") ((# legato "1 h") . (ply "2 <4 [4 8]>"))
+  $ loopAt 2 $ chop 16
+  $ "jungle_breaks:8"
+  # rel 10
+  # midiG' "^84" 0 1.4

live/collab/val/edgy.tidal

+do
+setcps (100/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "<t f> . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gF2
+  $ midiOn  "^42" (<| "k*4")
+  -- $ midiOff "^42" (<| "k . k(<3!3 5>,8,<0!3 1>)")
+  -- $ midiOff "^42" ((off "") . ("k k k k"))
+  $ "[kick:5,kick:8]"
+  # delaybus 11 (range 0 0.4 "^30")
+  # delay "e"
+  # delayfb 0
+  # midiG' "^78" 0 1.3
+d2 $ gF2 $ "~ [snare:10,cp]" # hpf 500
+  # midiG' "^79" 0 1.3
+d3 $ gF2 $ gMute
+  $ note (stack [
+    "g2(<5 7>,16)", "d3(5, 12)"
+    ])
+  # "bassWarsaw"
+  # attack ( slow 2.5 $ range 0.005 0.2 saw)
+  # rel (slow (2/3) $ range 0.2 0.8 sine)
+  # midiG' "^81" 0 1.5
+  # cut 3
+  # octer 1
+d5 $ gF2
+  $ note (fast (4/3) $ "g4(<4 [4 8]>,8, 1)" + "<0 [0 0 7] 0 [0 12]>")
+  # "cpluck:2"
+  # legato 2
+  # crushbus 51 (range 16 2.5 "^54")
+  # cut 5
+  # room 0.9
+  # dry 1
+  # midiG' "^82" 0 1.5
+-- d6 $ n "" # "amencutup" #
+-- # midiG' "^82" 0 1.5
+
+d6 $ gF $ gM -- Break rayon laser =------------>
+  $ midiOn "^91" (ply 8)
+  $ midiOn "^59" (ply "1 <1!3 2>")
+  $ midiOff "^59" (slow 4)
+  $ slice 8 (run "<8!7 16>")
+  $ "[~ break:4]"
+  # cut 6
+  # speed (range 0 2 "^55")
+  # midiG' "^83" 0 1.5
+
+once $ ""

live/collab/val/template.tidal

+once
+  $ off 3 id
+  $ off 2 id
+  $ "90s_weird:0"
+  # speed 0.35 -- TODO Slowly move to 0.5
+  # gain 0.9 # cut 13 -- Spooky intro!
+  -- # gain 0
+
+  -- (.ParVagues ----- L1VE.)
+   -- T""""""""""""""""""""T
+   -- |.;....,..........;..|
+  --  |;;:: .  .    .      |
+  --  l;;;:. :   .     ..  ;
+  --  `;;:::.: .    .     .'
+  --   l;;:. ..  .     .: ;
+  --   `;;::.. .    .  ; .'
+  --    l;;:: .  .    /  ;
+  --     \;;:. .   .,'  /
+  --      `\;:.. ..'  .'
+  --        `\;:.. ..'
+  --          \;:. /
+  --           l; f
+  --           `;f'
+  --            ||
+  --            ;l.
+  --           ;: l
+  --          / ;  \
+  --        ,/  :   `.
+  --      ./' . :     `.
+  --     /' ,'  :       \
+  --    f  /  . :        i
+  --   ,' ;  .  :        `.
+  --   f ;  .   :      .  i
+  --  .'    :   :       . `.
+  --  f ,  .    ;       :  i
+  --  |    :  ,/`.       : |
+  --  |    ;,/;:. `.     . |
+  --  |___,/;;:. . .`._____|
+  -- (For 0rbit.l0ve     <3)
+  --  """"""""""""""""""""""
+
+do
+setcps (110/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gF
+  $ midiOn "^42" (<| "k k k k*2")
+  $ (<| "k")
+  $ "jazz"
+  # midiG' "^78" 0 1.2
+d2 $ gF $ gM $ "~ cp"
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gM $ loopAt 2 $ "break:2"
+  # midiG' "^80" 0 1.2
+d4 $ gF2
+  $ whenmod 4 3 (ply "4 2 . 8")
+  $ "fbass:48"
+  # cut 4
+  # midiG' "^81" 0 1.2
+d8 $ gF $ gM
+  $ midiOn "^60" (mask "[t <t!3 f>]" . rev . chop "<4!3 [2 1]>")
+  $ loopAt 2
+  $ "break:20"
+  # midiG' "^84" 0 1.2

live/collab/val/un_an.tidal

+-- Un an de voisinage
+do
+setcps (120/60/4)
+let gF =  (# 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 gMute1 = (midiOn "^73" (mask "f*16"))
+let gMute = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
+let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
+d1 $ gF $ gMute1
+  -- $ fast 2
+  $ midiOn  "^42" (struct "t t t t")
+  -- $ midiOff "^42" (struct "t . ~ t ~ ~")
+  -- $ "[techno:0,808bd:2,909,kick:4]"
+  $ "[rampleS2:0,techno:0,jazz]"
+  # midiG' "^78" 0 1.3
+d2 $ gF2 $ gMute
+  $ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
+  $ midiOff "^43" (<| "~ ~ ~ <~ c>")
+  $ drumFrom "[sakatadpm48,rolandr8]" "cp"
+  # lpf 2000
+  # pan 0.7
+  # room 0.2 # sz 0.2 # dry 1
+  # midiG' "^79" 0 1.3
+d3 $ gF2 $ gMute
+  -- $ midiOn "^76" (ply "2 <2!3 4>")
+  -- $ "d*[4 <8!3 <16 32>>]" # "dr"
+  $ "~ h ~ h ~ h ~ h*<1 2>" # "hh"
+  -- # lpf 2000
+  # pan "0.2"
+  # midiG' "^80" 0 1.3
+d8 $ gF3 $ gMute -- MARINE BREAKS
+  $ midiOn "^92" (off "e" id)
+  $ midiOn "^60" (iter 4)
+  $ someCyclesBy "^20" (loopAt 2)
+  $ someCyclesBy "^20" ((# n 0))
+  -- $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
+  $ someCyclesBy "^56" ((# "fbreak120:3"))
+  $ someCyclesBy "^56" (loopAt 1)
+  $ loopAt 2
+  $ "jungle_breaks:1"
+  # cut 8
+  # midiG' "^84" 0 1.3
+d8 $ gF3 $ gMute1 -- MARINE BREAKS
+  $ midiOn "^73" (mask "f*16") -- FIXME DUPLICATE
+  $ midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")
+  $ midiOn "^92" (off "e" id)
+  $ midiOff "^60" (mask "t([4!3 8],8,1)")
+  -- $ chop 16
+  $ someCyclesBy "^20" (loopAt 2)
+  $ someCyclesBy "^20" ((# n 0))
+  $ someCyclesBy "^36" (loopAt 1)
+  $ someCyclesBy "^36" (mask "[f t]*4")
+  $ someCyclesBy "^36" (chop 16)
+  $ someCyclesBy "^36" ((# "jungle_breaks:79"))
+  $ someCyclesBy "^56" ((# "fbreak120:3"))
+  $ someCyclesBy "^56" (loopAt 1)
+  $ loopAt 2
+  $ "jungle_breaks:1"
+  # cut 8
+  # midiG' "^84" 0 1.3
+d4 $ gF2 $ gMask $ gMute
+  $ sometimesBy (range 0 0.8 "^53") (# crush 5)
+  $ midiOn "^57" (iter "1 4")
+  $ midiOn "^89" (ply 2)
+  $ loopAt 1
+  $ chop 8
+  $ "breaks165"
+  # panbus 4 (slow 16 $ range 0.2 0.6 sine)
+  # midiG' "^81" 0 1.3
+d7 $ gF3 $ gMute $ gMask
+  $ midiOn "^91" (ply "2 <2 4>")
+  $ loopAt 4 $ chop 8
+  $ midiOn "^59" (# n 4)
+  $ "drums_commodore:2" # cut 7
+  # midiG' "^83" 0 1.4
+  # crushbus 72 (range 16 1.5 "^55")
+  # panbus 7 (slow 16 $ range 0.8 0.2 sine)

live/collab/youssef/eole.tidal

+do
+  let modIndex = pF "modIndex"
+  let g =  (# djfbus 1 (range 0.1  0.9 "^49"))
+  let g2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+  let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+  let gMute = (midiOn "^73" (mask "f*16"))
+  let gM = gMask . gMute
+  let prog = "<a3'min'4 c3'maj'4 f3'maj'4 [d3'min'4 e3'min'4]>"
+  setcps (120/60/4)
+  d1 $ g $ gMute -- BOUNCE THAT KICK
+    $ midiOn "^41" (<| "k")
+    $ midiOn "^42" (<| "k*4" )
+    $ midiOff "^42" (<| "k . k(<3!3 [3 5]>,8)")
+    $ fix (# lpf 200) "kick:4"
+    $ "[808bd:1,808bd:0,jazz]"
+    # midiG' "^78" 0 1.5
+  d2 $ g $ "~ cp ~ cp*<1!3 2>" # "snare:20"
+    # lpf 2000
+    # midiG' "^79" 0 1.2
+  d3 $ g
+    $ midiOff "^44" (mask "f(<4 2>,8)")
+    $ midiOn "^76" (ply "2 <2 2 4 8>")
+    $ chop 16
+    $ loopAt 2
+    $ "break:0" # cut 3
+    # midiG' "^80" 0 1.2
+  d4 $ g2 -- BASSLINE
+    $ note (
+      prog
+      + "0@3 0"
+      - 12
+      )
+    # "giorgio_syn:0"
+    # legato 0.4
+    # lpf 3000
+    # pan 0.3
+    # midiG' "^81" 0 0.9
+  d5 $ g2
+    $ note (
+      prog
+      + "0@3 0"
+      )
+    # "superpiano"
+    # velocity 0.5
+    # pan 0.3
+    # midiG' "^82" 0 1.5
+  d6 $ g2
+    -- $ sometimesBy (1 - "^55") (mask "t f(3,8)")
+    $ note (
+      -- + "0 0(<3 <3 5> 3 5>,8)"
+      "g . [g b5] <c6 c6 d6 e6>"
+      -- + "0*4@3 [0 12 0]"
+      + 12
+      )
+    # "superpiano"
+    # velocity 0.5
+    # pan 0.7
+    # midiG' "^83" 0 1.5
+  d8
+    $ whenmod 4 3 (mask "t(4,12)")
+    $ note (fast 2 $
+    "<c a g e>"
+    + "0 . 0*2"
+    )
+    # legato 1.2
+    # "cbow:2"
+    # cut 8
+    # sustain 0.5
+    # pan 0.8
+    # midiG' "^84" 0 0.7
+
+once $ "cbow:7"
+  # gain 0.8 # cut 5
+
+
+once $ "giorgio_syn:1" # cut 4
+
+-- GARAGE
+
+d8 $ note (fast 2 $
+"<c7 a6 g6 e6>"
++ "0 . 0*<3 [3 6]>"
+- 12
+)
+# legato 1.5
+# "supergong"
+# sustain 0.3
+# accelerate 8
+# pan 0.8
+# midiG' "^84" 0 1.6

live/hip/darkside/clameur.tidal

+-- Clameur pour clément
+
+once $ "dr"
+
+do
+let gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let f2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let f1 =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let f1l = (# djfbus 3 (range 0.45 0.55 "^49"))
+setcps (93/60/4)
+d1 $ f1 $ gMute
+  $ midiOn "^42" (<| "<k k k*2 k> ~ . ~ ~ <~!2 k <~ k*2>> <~ k>")
+  $ midiOff "^42" (<| "<k ~> . ~ ~ ~ <k k ~ k>")
+  $ "jazz"
+  # midiG' "^78" 0 1.3
+d2 $ gMute
+  $ juxBy 0.85 (whenmod 8 7 rev)
+  $ f1
+  $ midiOn "^43" (
+    someCyclesBy "<0 1>" (off "<-e!3 -s>" (|* gain 0.8)) -- Bonus prehit
+  )
+  $ midiOff "^43" (mask "<f t>")
+  $ fix (# note (-4)) "cp"
+  $ "~ snare"
+  # "[cp,snare:20,snare:50]"
+  # lpf 4000
+  # room 0.3
+  # dry 1.06
+  # sz 0.4
+  # gain 0.8
+  # midiG' "^79" 0 1.2
+d3 $ f1l $ gMute2
+  $ midiOn "^44" (ply 2)
+  $ midiOn "^76" (ply "<[2 2 4 2]!3 [2!3 4]>" . (# room 0.2))
+  $ ply "1 . <1!6 2 2> <2!3 [2 4]>"
+  $ "dr*4"
+  # room (slow 32 $ range 0 (range 0 0.8 "^52") saw)
+  # sz (slow 64 $ range 0.1 0.92 saw)
+  # dry 1.5
+  # midiG' "^80" 0 1
+d4  -- BASSES
+  $ f2
+  $ fix (
+    (# "90s_matrix:0") . gMute
+    . (# note (scale "aeolian" (slow 2 "<0 0 2 3>")))
+    . (# cut 4)
+    . (# room 0.3)
+    . (# dry 0.9)
+    . (# sz 0.7)
+    . (# pan 0.8)
+    . (# crushbus 41 (range 16 4 "^53"))
+    . (|* gain (range 0 1 "^17"))
+    ) "matrix"
+  $ fix (
+    (<| note (scale "aeolian" "<0 [<0 2> . <2!3 3> <3!3 5>]>"))
+  . (# "bass1")
+  . (|* gain (range 0 1.5 "^33"))
+  . (# cut 41) -- TODO Confirm better with headset avoiding overlapping subs
+  ) "infra"
+  $ "[matrix,infra]"
+  # cut 4
+  # midiG' "^81" 0 1.2
+d6 $ f2 -- VOICES
+  $ fix ( -- Morohai Morshiyum Morohai Naroz
+    (# "voices_celtic:32")
+    . ply ("<1!3 4>")
+    . slice 4 (slow 2 "<0 1 <2 0> 3>")
+    . (# cut 61)
+    . (# pan 0.2)
+    . (# hpf 2500)
+    . (# room "<0.5 0.8 0.8 <0.8 0.1>>")
+    . (# squizbus 61 (range 0 4 "^55"))
+    . (|* gain 1.1)
+    ) "morohai"
+  $ fix (
+    (# "voices_persian:10")
+    . (# note (scale "aeolian" ("<0!3 3>") - 12))
+    . (|* gain 0.81)
+    . (# pan 0.9)
+    . (# room 0.4)
+    ) "wooh"
+  $ stack ["~ <~!3 wooh>", "<morohai ~>"]
+  # midiG' "^83" 0 1.5
+d7 $ f2 -- LEADS
+   -- Pad-like choir
+  -- $ whenmod 4 3 (off "0.25" (|+ note 12))
+  $ fix (
+    (# "moogBass") . gMute
+    . (superimpose (|+ note 7))
+    . (# note (scale "aeolian" (slow 2 "<0 0 2 [3 [5 4]]>")))
+    . (# room 0.4)
+    . (# sz 0.3)
+    . (# pan 0.3)
+    . (|* gain (range 0 0.8 "^18"))
+  ) "pad"
+  $ fix (
+    (# "superpiano") . gMute2
+    . whenmod 64 16 (
+      whenmod 4 3 (arp "up" . ply "1!3 2") -- Second hit et montée
+      )
+    . (superimpose (|+| note "0 . <7 12>"))
+    . (>| note (scale "aeolian" (
+      "<[~ 0] [<0 2> . <2!3 3> <3!3 5>]>"
+      ) - 12))
+    . (|* gain "^34")
+    . (# velocity "0.85 0.9!7")
+    . (# pan 0.9)
+    ) "piano"
+  $ "[pad,piano]"
+  # midiG' "^82" 0 0.9
+d8 $ f1 $ gMute2
+  $ chop 8
+  $ midiOn  ("^60"+"^92") (slice 8 "0 <1 [1 1]!2 1> [0 ~] <3 3*<2 4>>") -- DARK
+  $ midiOff ("^60"+"^92") (slice 8 "0 1 <2 ~> <3!3 ~>") -- Light side
+  $ loopAt 2
+  $ "break:1"
+  # room 0.4 # sz 0.4 # dry 0.9
+  # midiG' "^84" 0 1.5

live/midi/nova/ambient/contre_visite.tidal

@@ -16,15 +16,15 @@ d1 $ f1
   $ midiOn "^42" (struct "t t t <t!2 [<~ t> <t t?>]>")
   $ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>")
   -- $ mask "<f!32 f!8 t!16 t f!6 [t f] t!64>"
-  $ "[808bd:6,kick:8]"
-  -- $ "[jazz,kick:5]"
+  -- $ "[808bd:6,kick:8]"
+  $ "[jazz,kick:5]"
   # room 0
   # midiG' "^78" 0 1.3
 d2 $ f1
   $ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
   $ midiOff "^75" maskLoops
-  $ midiOn "^43" (slice 4 (run 8))
   $ midiOn "^75" (ply "2 <2!3 4>")
+  $ midiOn "^43" (slice 4 (run 8))
   $ mask "<t [t!6 f t] t t t!4>" -- Degrade mid-loop!
   $ iter "1 <1!4 4 4 4 2>"
   $ loopAt 2
@@ -66,7 +66,7 @@ d5 $ f2 -- Synth: ELECTRONIC ANSWERS
   # dry 1
   # panbus   51 (range 0.8 0.65 saw)
   # crushbus 52 (range 16 2.85 "^54")
-  # midiG' "^82" 0 1.8
+  # midiG' "^82" 0 2
 d6 $ f1 -- High lead: Winds of truth
   $ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3
   $ whenmod 8 6 (swing "<4 2>")
@@ -87,6 +87,12 @@ d6 $ f1 -- High lead: Winds of truth
   # dry 0.1
   # pan "^19"
   # cut 6
+d7 $ f1 -- Snare <3 chak reverb phantome
+  $ struct "[~ t]*2"
+  $ "[snare:34,cp]"
+  # lpf 2000
+  # midiG' "^14" 0 1.8
+
 d10 $ f1 -- RANDOM FOREST NOISES
   $ fix (
     -- kCrush .
@@ -112,7 +118,7 @@ d10 $ f1 -- RANDOM FOREST NOISES
     (# "gretsch:10")
     . (struct "t*3 ~ . t*<1!3 2> t*<1 3>")
     . (# cut 104)
-    . (# pan (range 0.5 0.9 perlin))
+    -- . (# pan (range 0.5 0.9 perlin))
     . (# midiG' "^16" 0 1.65)
   ) "n4" -- FX1
   $ fix (
@@ -123,5 +129,10 @@ d10 $ f1 -- RANDOM FOREST NOISES
     . (# pan (range 0.02 0.25 perlin))
     . (# midiG' "^17" 0 1.4)
   ) "n5" -- Drumroll
-  $ "[n1,n2,n3,n4,n5]" -- n4
+  $ "[n1,n2]" -- n4
   # gain 1
+
+once $ "fx_gameboy:3" # gain 0.8 # cut 10
+
+
+  once $ "bassWarsaw" # freq 82 # gain 1.2 # cut 3

live/midi/nova/ambient/empreinte_du_numerique.tidal

@@ -17,12 +17,12 @@ let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
 let gMute = (midiOn "^73" (mask "f*16"))
 let gM = gMask . gMute
 setcps (110/60/4)
-d1 $ g $ gMute
+d1 $ g $ gMute  -- Kick
   $ midiOn "^42"  (<| "k k k <k k*2>")
   $ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~")
   $ "[jazz,808bd:6]"
   # midiG' "^78" 0 1.5
-d2 $ g $ gM
+d2 $ g $ gM --
   $ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>")
   $ "~ s" # "[sn:40,snare:20]"
   # note "<-2!3 -4>"
@@ -34,8 +34,8 @@ d3 $ g $ gMute
   # room 0.3
   # dry 0.95
   # midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>")
-d4 -- Break bonus banane
-  $ g $ gM
+d6 -- Break bonus banane
+  $ g
   $ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
   $ midiOn "^60" ( -- Aerial mask
     mask "t <f t> <f f t f> <t t f t> f <f t> <f!3 t> t"
@@ -44,15 +44,15 @@ d4 -- Break bonus banane
   $ chop 16
   $ loopAt 2
   $ "break:3"
-  # cut 4
-  # midiG' "^84" 0 1.3
-d5 $ g $ gPont2 -- BASSLINE BoomRang!
+  # cut 6
+  # midiG' "^84" 0 1.6
+d4 $ g $ gPont2 -- BASSLINE BoomRang!
   $ midiOn "^57" (# n "50")
   $ midiOn "^89" (ply "2 4" . chop "2 <2 4>")
   -- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw)))
   $ slice 2 "<0!3 1>"
   $ "fbass:51"
-  # cut 5
+  # cut 4
   # room 0.4
   # sz 0.9
   # lrate 0.93
@@ -74,8 +74,9 @@ d7 $ g -- Back solar mandoline
 d6 -- RHODES FOLIE <33
   $ g
   $ midiOn "^58" (off "e" id)
+  $ midiOn "^90" (jux rev)
   $ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)"
-  $ swing (1 + ("0 2" * "^58") + (2 * "^90"))
+  -- $ swing (1 + ("0 2" * "^58") + (2 * "^90"))
   $ note ("d4/2" + scale "<augmented!6 diminished2!2>" (run 16))
   # "FMRhodes1"
   # room 0.5

live/midi/nova/ambient/mono_over.tidal

+once $
+
+do
+setcps (110/60/4)
+let d = drumFrom "rolandtr808"
+let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.01 0.99 "^29"))
+let gF3 = (# djfbus 3 (range 0.05 0.95 "^13"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gF1 $ gM
+  $ superimpose ((# "jazz:0") . (|* gain 0.9))
+  $ midiOff "^42" (<| "k . <~ <[~ k] k(<3 [<1 <3 5>> 5]>,8)>>")
+  $ midiOn  "^42" (<| "k k k <k [<k ~> k]>")
+  $ d "bd:1"
+  # midiG' "^78" 0 1.3
+d2 $ gF1 $ superimpose ((# "snare:13") . (|*gain 0.8)) $ d "~ [sd:5]"
+  # midiG' "^79" 0 1.5
+d3 $ gF1 $ d "~ sh ~ sh*<1!3 <2 [4 2]>>"
+  # n "<1!3 <2 [2 1]>>"
+  # midiG' "^80" 0 1.3
+d4 $ gF2 $ slow 2 -- Intro dark bass rample
+  $ "rampleO7"
+  # n "<0 1 2 3>"
+  # cut 4
+  # crushbus 41 (range 16 2 "^53")
+  # roombus  42 (range 0 0.52 "^33")
+  # midiG' "^81" 0 1.3
+d5 $ silence -- TODO SECONDE BASS GROOVY
+d6
+  $ slice 4 "<0 0 0 1 [0 1] [0 1] [1 1] <[1 2] 2>>"
+  $ "fmono:37"
+  # room 0.3
+  # sz 0.5
+  # pan 0.2
+  # midiG' "^83" 0 0.6
+  # cut 9
+d7
+  $ whenmod 64 32 (superimpose ((
+    (whenmod 16 8 (|+ note "12"))
+    . (# cut 71) . chop 2)
+    ))
+  $ mask "<t!7 f>"
+  $ "fmono:39"
+  # pan 0.8
+  # cut 7
+  # midiG' "^84" 0 0.6
+
+
+
+
+d6 $ gF3
+  $ arp "up"
+  $ d "cb:1"
+  # note ("c'maj'4")
+  # note ("0"
+  -24)
+  # midiG' "^82" 0 1.3
+  # pan 0.9

live/midi/nova/breaks/acid_rain.tidal

+do
+setcps (100/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
+  $ midiOn "^42" (<| "k k k <k!3 k*2 k k ~ [~ k]>")
+  $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
+  $ "[kick:5,808bd:4,kick:4]"
+  # midiG' "^78" 0 1.7
+d2
+  $ gF
+  $ midiOn  "^43" (<| "~ c ~ c*[1 <1 <4 <1 4>>>]" )
+  $ midiOff "^43" (<| "~ <c!7 ~>" )
+  $ "<clap!3 clap:2>"
+  # lpf 2000
+  # note "-2"
+  # room (slow 8 $ range 0.2 0.6 saw)
+  # midiG' "^79" 0 1.7
+d3  $ gF $ gMute
+  $ midiOn "^76" (ply "4 8")
+  $ midiOn "^44" (off (0.5- 0.125) id)
+  $ "~ h ~ h ~ h*<1 <1!4 2!4> 1 2> ~ h*<1!6 2 <2 4>>"
+  # "hh"
+  # panbus 31 ((range 0.3 0.7 (whenmod 8 6 rev $ saw)))
+  # midiG' "^80" 0 1.4
+  # room 0.3
+  # dry 1.1
+d5 $ gF2 -- Nice organs you got there
+  $ slice 8 "[5(3,8) <6 6 3 <2 7>>]"
+  $ loopAt 2
+  $ "forgan:28"
+  # cut 5
+  # hpfbus 51 (slow 32 $ range 5000 0 saw)
+  # midiG' "^82" 0 1.8
+  # pan (slow 16 $ range 0.5 0.2 saw)
+d6 $ gF2 -- Jump aboard the BASIC BUS
+    $ sometimesBy (1 - "^19") ((# room 0.5) . (# sz 0.8) . mask "t(1, 8)")
+    $ midiOn "^91" (chop "<8!3 16>")
+    $ midiOn "^59" (jux rev)
+    $ midiOff "^41" (
+      whenmod 32 8 (superimpose (("q" ~>) . (|* gain 0.93)))
+    )
+    $ chop 32
+    -- $ midiOff "^59" (loopAt 16)
+    -- $ midiOn "^59" (loopAt 8)
+    $ loopAt 8
+    $ "synth_commodore/2" # n "0"
+    # crushbus 61 (range 16 2.25 "^55")
+    # roombus  63 (range 0 0.5  "^19")
+    # room 0.3
+    # midiG' "^83" 0 1.2
+    -- # panbus 64 (range "<0.13!16 0.87!16>" "<0.87!16 0.13!16>" (slow 16 saw))
+    # pan 0.8
+d4 $ gF2 -- Piano solo lover sunset
+  $ midiOn "^57" (-- Sunset echoes
+    off 0.5 ((sometimes (juxBy 0.8 (off "[0.125,0.25]" (|+ note 12) . (|* gain 0.6))))
+  . mask "<t [f t]> t(3,8)"
+  )
+  . (|+ note 12) . (|+ pan 0.1) . (|* gain 0.8))
+  $ midiOff ("^57" + "^89") (mask "t f")
+  $ note (arp "up" ("<g <g6 df6>>" + "{0,[0 7]([3 5],8)}")
+    + "[0,12]"
+    - 36)
+  # "FMRhodes1"
+  # crushbus 41 (range 16 2.25 "^53")
+  # modIndex ((range 0 16 "^33"))
+  # room 0.4
+  # midiG' "^81" 0 1.8
+  -- # cut 8
+d8 $ gF $ gM
+  $ midiOn "^60" (loopAt 4 . (# "drums_nes:7"))
+  $ midiOn "^92" (ply 2)
+  $ slice 4 "0 1 2 3 0*<1 1 2 1> 1 2 3*<1!4 2 2 2 [4 1]>"
+  $ striate "1 <1 <2 [0 1]>>"
+  $ loopAt 1
+  $ chop 8
+  $ "breaks165"
+  # midiG' "^84" 0 1.8
+  # pan 0.3
+
+
+d9 $ never (# silence)
+  $ slow 4 $ n "~ <8 10 14 8>"
+  # "fx_commodore"
+  # gain (slow 64 $ range 0.4 (0.8 * "^20") sine)
+  # room (slow 32 $ range 0.3 0.8 saw)
+  # dry (range 0.5 1.5 rand)
+  # pan 0.9
+  # sz 0.3
+
+d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™"
+  $ midiOn "^44" (fast "1 2")
+  $ midiOn "^76" -- L'Esprit de Nassim
+  (
+    whenmod 8 7 (ply "1 . 2") .
+    slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
+   (loopAt "q") .
+   (# "breaks165") . (# cut 2)
+  . (|* gain 1.1)
+  )
+  $ chop 8
+  $ loopAt 4
+  $ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]"
+  # cut 2
+  # midiG' "^80" 0 0.9
+  # pan 0.4
+d3 $ gF -- Un peu d'encouragement?
+  $ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000))
+  $ "~ clap"
+  # midiG' "^79" 0 2
+  -- # gain 0.8
+d4 $ gF2 -- BURN THE BASS WITCH
+  $ midiOn "^57" (superimpose ( -- chain of wicked thoughts
+    (|+ note ("<0 7 <9 5> <10 10 <10 7> 12>>"))
+    . (|* gain "<1 1 1.05 1.1>")
+    . (chop "8 . <8!3 16>") . (# cut 41)))
+  $ midiOn "^89" (chop (slow 4 $ "[16 32 64 128]"))
+  $ "synth/4"
+  # "90s_synatm:9"
+  # crushbus 41 (range 10 2.5 "^53")
+  # room 0.3
+  # sz "<0.4!7 0.8>"
+  # dry 1
+  # cut 4
+  # midiG' "^81" 0 1.6
+d5 $ gM $ gF2 -- Ghosts from an easier time
+  $ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge")
+  $ note ("c'maj'4" + "<c!3 g g g [g, [~ c]] c>" - 12)
+  # "90s_synatm:8/4" # cut 5
+  # crushbus 51 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.1
+d10 -- Ready playerm two
+  $ mask "<f!3 t f!3 t f!3 t t!4>"
+  $ slice 8 "0 <0!3 1>"
+  $ loopAt 4
+  $ "fx_gameboy:5"
+  # crushbus 101 (slow 32 $ range 1.8 0.61 saw)
+  # midiG' "^20" 0 0.85

live/midi/nova/breaks/break_90s.tidal

@@ -18,7 +18,7 @@ setcps (80/60/4)
 d1
   $ g1
   $ midiOn "^41" (superimpose ((# "kick:5")
-  . (|* gain 0.7))
+  . (|* gain 0.7)).
   . (<| "k k k k k k k [<k ~> <k k ~ k>]")
   . (# room 0)
   )

live/midi/nova/breaks/break_dynasty.tidal

+do
+setcps (165/60/4)
+let gF  =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.01 0.99 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let progAlt = "<[c,e,g,b] [c,e,gf,a4] [c,ef,g,bf5] [c,e,g,d5]>"
+let prog = "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>"
+d1
+  $ gF $ gMute
+  $ midiOn "^74" (fast 2)
+  $ midiOn "^42" (-- Run & stumble
+    slow 2 . (<| "k <k!4 ~ k!3> k <k [~ k] k [<k!4 ~!3 k> k]>"))
+  $ midiOff "^42" (<| "k . ~ k ~ ~") -- L'attente
+  $ "[meth_1902:2,kick:8]" # note "-2"
+  # midiG' "^78" 0 1.5
+d2 $ gF $ gM -- Snare glitch high
+  $ midiOn "^75" (ply "<2 [2 <4 <2 4>>]>")
+  $ fix ((|* gain 0.9)) ("snare:40")
+  $ "~ s ~ <s!3 <s*2 <s s*2>>>" # "[snare:31,snare:40]"
+  # note (range "-12" 12 "^51")
+  # pan 0.46
+  # room 0.74 # sz 0.2 # dry 1
+  # midiG' "^79" 0 1.2
+-- d3 $ gF $ gM
+  -- $ midiOff "^44" (slow 2)
+  -- $ midiOn "^76" (ply 2)
+  -- $ drumFrom "yamaharm50" "hh*<8!3 [8 . 16 <8 16 [24 8] 32>]>"
+  -- # n "<0 1 2 3>"
+  -- # midiG' "^80" 0 1.2
+d3 $ gF $ gM $ loopAt 2
+  $ midiOff "^44" (slow 2)
+  $ midiOn "^76" (ply 2)
+  $ chop 16
+  $ "jungle_breaks:6"
+  # midiG' "^80" 0 1.2
+d5 $ gF2
+  $ midiOn "^89" (chop 8)
+  $ note (
+    -- "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>"
+    -- "<[c,c(3,8)] [g,[~ f6],g*4] [bf,bf(3,8)] c4>" + "0"
+    "<<b4 [b4@3 cs5]> gs4@2 ~ gs4 >"
+     - 24)
+  # "bassWarsaw"
+  # legato 2
+  # cut 5
+  # crushbus 51 (range 16 2 "^53")
+  # midiG' "^81" 0 2.5
+  # room 0.2 # sz 0.2
+d4 $ gF3
+  $ midiOn "^58" (
+    -- (often (off 0.5 (slow "1 " . mask "f t" . (|+ note 12) . (|* gain 0.9))))
+    -- . (off ("h" + "s") id . arp "up")
+    -- .
+    (|+| note "0(<<3 [3 5]> <5 [5 [8 4]]>>,8)")
+  )
+  $ whenmod 64 32 (# note (progAlt - 12))
+  $ note (prog - 12)
+  # "FMRhodes2"
+  # modIndex (range 0 16 "^54")
+  # pan 0.8
+  # midiG' "^82" 0 1.3
+d7 $ gF3
+  $ midiOn "^59" (off "h" (# cut 71))
+  $ slow 2 $ slice 16 "~ <0 1 1 0 0 2 0 2 2 1 2 3 2 3 4 5>"
+  $ "shiloh:2"
+  # pan 0.2
+  # cut 7
+  # midiG' ("^83" * (1 - 0.5 * "^19")) 0 1.5
+  # delaybus 61 (range 0 1 "^55")
+  # delayfb 0.5
+  # delaytime 0.375
+  # room 0.4 # sz 0.59
+  -- # freeze 2
+  # dry 2
+d10 $ gF3 $ slow 2
+    -- $ n "~ <8 10 6 <[10 8] ~>>"
+    $ n "~ <30 31 6 <[12 8] ~>>"
+    # "jungle_vocals"
+    # cut 10
+    # pan 0.8
+    # midiG' "^19" 0 0.9
+d8 $ gF $ gM
+  $ midiOff "^60" (mask "t f . [f <f!3 t>] [<t!3 <f t>> t]")
+  $ midiOn "^92" (ply "2 <2 4>")
+  $ loopAt 1
+  $ chop 8
+  $ someCyclesBy "^20" ((# n 20))
+  $ someCyclesBy "^36" (loopAt 2 . (# n 81))
+  $ sometimesBy  "^56" ((iter "1 4"))
+  $ "jungle_breaks:13"
+  # room 0.2 # dry 1.05 # sz 0.4
+  # cut 8
+  # pan (slow 8 $ range "<0.2!8 0.8!8>" 0.5 cosine)
+  # midiG' "^84" 0 1.3
+once $ "dr"

live/midi/nova/breaks/green_land.tidal

+do
+setcps (80/60/4)
+let gF =  (# 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 gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
+let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
+d1 $ gLPF $ gF $ gMute
+  $ fix (|* gain 0.8) "kick"
+  $ fix (|* gain 0.8) "bskick"
+  $ midiOn "^41" (<| "k k k k k k k*<1!7 2> [<k <~ k>> k]")
+  $ midiOn "^42" (<| "k k k <[k k*2] <[k*2 k] [k*4]>>")
+  $ midiOff "^42" (<| "bd*[4 <6!3 [6 12]>]")
+  $ "[808bd:11,bskick:0,jazz]" -- 11
+  # midiG' "^78" 0 1.3
+  # room 0.2 # sz 0.2
+  # dry 0.99
+d2 $ gLPF $ gF $ mask "<f!8 t!24>"
+  $ midiOn "^75" (struct "[~ t]*8")
+  $ midiOn  ("^43" - "^75") (whenmod 8 7 (fast "2 4") . (struct "~ t ~ t"))
+  $ midiOff ("^43" - "^75") (struct "~ t")
+  $ "[bssnare:0,bssnare:3]"
+  # midiG' "^79" 0 1.2
+d3 $ gLPF $ gF $ gM2
+  $ midiOn "^76" (ply "<2!3 4>")
+  $ midiOn "^44" (chop 4 . loopAt 2 . (>| "jungle_breaks:44"))
+  $ whenmod 8 4 (ply "1 2")
+  $ "h(<8!4 16>, 16)"
+  #
+    -- drumFrom "rolandr8"
+    "hh"
+  # pan 0.6
+  # midiG' "^80" 0 1.2
+  # lpf 4000
+d4 $ gLPFSoft $ gF2 -- Guitar sample turned bassline
+  $ midiOn "^57" ( -- ELECTRIC
+    whenmod 4 3 ((# crushbus 41 (range 5 3.5 saw)))
+    )
+  $ ply "1 <1 2>"
+  $ slice 4 0
+  $ chop 8
+  $ loopAt 4
+  $ "celtic_guitar80"
+  # n "4"
+  # cut 4
+  # room 0.3
+  # dry 1.2
+  # sz 0.9
+  # pan "0.7 0.3"
+  # midiG' "^81" 0 1
+  # crushbus 42 (range 16 2 "^53")
+d5 $ gF2 $ gM2 -- BASS BONES
+  $ midiOn "^92" (ply "<8 16>")
+  $ note "<ef ef {b, [~!7 fs]} fs>"
+  # "moog"
+  # cut 5
+  # pan 0.2
+  # crushbus 51 (range 16 2 "^56")
+  # octerbus 52 (range 0 0.63  "^36")
+  # octersubbus 53 (range 0 0.58 "^36")
+  # midiG' "^84" 0 1
+d6 $ gF3 $ gM2 -- High pitched guitar
+  $ whenmod 4 3 (someCyclesBy (slow 32 $ range 0.5 0.95 saw)
+  $ ply "<2 [2 4] 4 8>")
+  $ slice 32 "1 1 1 <2 <[1 1] [1 <2 3>]>>"
+  $ chop 32
+  $ loopAt 1
+  $ "celtic_guitar80:4"
+  # pan 0.2
+  # midiG' "^82" 0 0.8
+d7 $ gF3
+  $ midiOn "^91" (ply "2 <4 <2 8>>")
+  $ chop 4
+  $ "voices_celtic"
+  # n "4 <4 4 5 <4 3>> 5 <6 5 5 4>"
+  # cut 7
+  # pan 0.8
+  # crushbus 71 (range 16 3 "^55")
+  # midiG' "^83" 0 0.8
+d8 $ gF3
+  $ (|* gain (slow 32 $ range 0.3 0.8 saw))
+  $ "~ 808cy:5*<1!7 2>"
+  # room (slow 32 $ range 0 0.5 saw)
+  # sz 0.2 # dry 1.13
+  # midiG' "^80" 0 1

live/midi/nova/breaks/its_about_time.tidal

@@ -2,7 +2,7 @@ once
   $ off 3 id
   $ off 2 id
   $ "90s_weird:0"
-  # speed 0.35 -- TODO Slowly move to 0.5
+  # speed 0.3 -- TODO Slowly move to 0.5
   # gain 0.9 # cut 13 -- Spooky intro!
   -- # gain 0
 
@@ -38,7 +38,6 @@ once
   --  |___,/;;:. . .`._____|
   -- (For 0rbit.l0ve     <3)
   --  """"""""""""""""""""""
-
 do
 setcps (110/60/4)
 let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
@@ -54,10 +53,10 @@ d10 -- Ready playerm two
   # crushbus 101 (slow 32 $ range 1.8 0.61 saw)
   # midiG' "^20" 0 0.85
 d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r...
-  $ midiOn "^42" (<| "k k k <k k*2 k <~ [<~ k> k]>>")
+  $ midiOn "^42" (<| "k k k <k k*2 k <k [<~ k> k]>>")
   $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
-  $ "[kick:5,808bd:4]"
-  # midiG' "^78" 0 1.3
+  $ "[kick:5,808bd:4,kick:4]"
+  # midiG' "^78" 0 1.7
 d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™"
   $ midiOn "^44" (fast "1 2")
   $ midiOn "^76" -- L'Esprit de Nassim
@@ -72,12 +71,12 @@ d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™"
   $ loopAt 4
   $ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]"
   # cut 2
-  # midiG' "^80" 0 1.2
+  # midiG' "^80" 0 0.9
   # pan 0.4
 d3 $ gF -- Un peu d'encouragement?
   $ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000))
   $ "~ clap"
-  # midiG' "^79" 0 1.4
+  # midiG' "^79" 0 2
   -- # gain 0.8
 d4 $ gF2 -- BURN THE BASS WITCH
   $ midiOn "^57" (superimpose ( -- chain of wicked thoughts
@@ -92,7 +91,7 @@ d4 $ gF2 -- BURN THE BASS WITCH
   # sz "<0.4!7 0.8>"
   # dry 1
   # cut 4
-  # midiG' "^81" 0 1.1
+  # midiG' "^81" 0 1.6
 d5 $ gM $ gF2 -- Ghosts from an easier time
   $ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge")
   $ note ("c'maj'4" + "<c!3 g g g [g, [~ c]] c>" - 12)
@@ -100,9 +99,10 @@ d5 $ gM $ gF2 -- Ghosts from an easier time
   # crushbus 51 (range 16 2.5 "^54")
   # midiG' "^82" 0 1.1
 d6 $ gF2 -- Jump aboard the BASIC BUS
-  $ midiOn "^59" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)")
-  $ loopAt 8
-  $ chop 16
+  $ midiOn "^91" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)")
+  $ midiOff "^59" (loopAt 16)
+  $ midiOn "^59" (loopAt 8)
+  $ chop 8
   $ "synth_commodore" # n "1"
   # crushbus 61 (range 20 2.25 "^55")
   # squizbus 62 (range 0 1.5  "^35")
@@ -110,15 +110,31 @@ d6 $ gF2 -- Jump aboard the BASIC BUS
   # midiG' "^83" 0 1.45
   # panbus 64 (range 0.13 0.87 (slow 16 saw))
   # cut 6
+
 d7 $ gM -- Break from the past
-  $ (# speed (range 0 (1) "^56"))
+  $ (# speed (range (-0.25) 0.625 "^56"))
   $ midiOn "^60" (often (ply 2))
   $ midiOn "^92" (slice 8 "0 ~ ~ 3 . 4 <~ 5> 6 <~ 7*<1 2>>" . loopAt 2)
-  $ loopAt 1
-  -- $ midiOff "^92" (splice 8 "0 <0 1 2*<1 2> 3*<1 2>>")
+  $ chop 16
+  $ loopAt 4
   $ "fbreak100" # n "<0!3 [0 4]>"
   # cut 7
   # pan 0.8
   # room 0.3
   # dry 1
   # midiG' "^84" 0 1.8
+
+
+  d6 $ gF2 -- BASIC BUS: Terminus
+  $ midiOn "^59" (striate 2)
+  $ midiOn "^91" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)")
+  $ chop 8
+  $ loopAt 16
+  $ "synth_commodore" # n "1"
+  # lpf 5000
+  # crushbus 61 (range 20 2.25 "^55")
+  # squizbus 62 (range 0 1.5  "^35")
+  # roombus  63 (range 0 0.5  "^19")
+  # midiG' "^83" 0 1.45
+  # panbus 64 (range 0.13 0.87 (slow 16 saw))
+  # cut 6

live/midi/nova/breaks/la_canopee.tidal

+do
+setcps (80/60/4)
+let gF =  (# 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 gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
+let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
+d1 $ gF $ gMute
+  $ fast 2
+  $ midiOn  "^42" (struct "t t t t*<1!3 [2 <2 4>]>")
+  $ midiOff "^42" (struct "t . ~ t ~ ~")
+  $ "[808bd:13,jazz]" -- 11
+  # midiG' "^78" 0 1.3
+  # room 0.2 # sz 0.2
+  # dry 0.99
+d2 $ gF $ gM
+  -- $ mask "<f!8 t!24>"
+  $ midiOn "^75" (struct "[~ t]*8")
+  -- $ midiOn  ("^43" - "^75") (whenmod 8 7 (fast "2 4") . (struct "~ t ~ t"))
+  -- $ midiOff ("^43" - "^75") (struct "~ t")
+  $ whenmod 64 32 (whenmod 8 6 (mask "t . <t f> <f [f t]>"))
+  $ midiOn "^43"  (struct "~ t ~ <t!3 ~> ~ t ~ <t [<t ~> t]>")
+  $ midiOff "^43" (struct "~ t ~ [t*<1!7 2> ~]")
+  -- $ "[bssnare:0,bssnare:3]"
+  $ "[snare:24,<meth_snare:1!32 meth_snare:2!32>]"
+  # lpf 5000
+  # pan 0.4
+  # room 0.2 # dry 0.9 # sz 0.4
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gM -- Broken Jungle Snake
+  $ sometimesBy (1 - "^32") (mask "t(<1!3 [1 4]>,4) . t(<3 5>,8,<0!3 3>)")
+  $ (|* speed (range 0.5 1.5 "^52"))
+  $ gF $ loopAt 1 $ chop 8
+  $ midiOn "^44" (# n "14")
+  $ midiOn "^76" (ply 2)
+  $ "jungle_breaks" -- Progressive jungle :D
+  # n "<13!3 [13 14 13] 13!3 [13 14] 13!4 14!3 [13 <13 [14 13 14]>]>"
+  # cut 3
+  # pan 0.6
+  # gain 0.9
+  # midiG' "^80" 0 1.2
+d4 $ gF2 $ gM -- GENIE OF INFRABASS
+  $ midiOn "^89" (juxBy 0.8 (rev . (# cut 41)))
+  $ chop (4 + (4 * "^57"))
+  $ "m . m*<1 <2 4>>" # "meth_genie:0"
+  # cut 4
+  # octersubbus 41 (range 0 0.81 "^53")
+  # octersubsubbus 42 (range 0 0.6 "^53")
+  # midiG' "^81" 0 1.2
+d7 $ gF3
+  $ midiOff "^58" (mask "<f!32 t!32>")
+  $ whenmod 16 12 (juxBy 0.7 (rev . (# cut 71)))
+  $ slice 4 "0 <1!3 2*2>"
+  $ loopAt 2
+  $ "fepiano:24"
+  # midiG' "^82" 0 1
+  # cut 7
+d6 $ gF3 -- HIGH HOPES
+  $ midiOn "^59" (
+    |+| note (arpeggiate "[0 12 <0!8 7!8>]([4 5 <1 4 1 <5 8>>],8)")
+  )
+  $ note ("<af5 <f5!4 c5!3 cs5>>"
+    - 12
+    )
+  # "bassWarsaw"
+  # pan 0.8
+  # room 0.2 # sz 0.4 # dry 1.1
+  # legato 2
+  # crushbus 61 (range 16 3.5 "^55")
+  # midiG' "^83" 0 1
+d9 $ gF3 -- Pluie bienfaisante
+  $ whenmod 64 32 (superimpose (
+    chop 4 . (# n "2") . (# cut 91)
+    . (|* gain 1.185)
+    . (|+ note (3 - 12 + "<0!16 7!16>"))
+    . (# crush 16)
+  ))
+  $ "90s_synatm/4"
+  # cut 9
+  # hpfbus 92 (range 0 5000 "^36")
+  # squizbus 93 (range 0 1.5 "^56")
+  # room 0.2
+  # midiG' "^84" 0 1.2
+
+once $ ""
+
+d1 $ "jazz" # gain 0.9

live/midi/nova/breaks/lourd.tidal

+do
+setcps (110/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gMute $ gF -- 4 SOLID wheels
+  $ fix ((# rel 0.15) . (# room 0.42) . (# sz 0.3)) "kick:5"
+  $ midiOn "^42" (whenmod 32 29 (# silence) . (<| "k k k <k <k*2 [~ k]>>"))
+  $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
+  $ "[jazz,kick:5]"
+  -- # lpf 2000
+  # midiG' "^78" 0 1.4
+d2 $ gF $ gMute
+  $ midiOn "^43" ((
+    (+| note "~ 0 ~ 1")
+    . fix (# rel 0.15) "clap"
+    . fix ((# n 1) . (# rel 0.5)) "fx_commodore"
+  ))
+  $ fix (|* gain 0.68) "fx_commodore"
+  $ midiOff "^43" (struct "~ t")
+  $ "[fx_commodore:2,clap:2]"
+  # note 2
+  # midiG' "^79" 0 1.3
+d3 $ gF $ gMask $ whenmod 4 2 (gMute) -- DRUUUUMS
+  $ midiOn "^44"  --BOUTON NASSIM
+    (
+      whenmod 8 7 (ply "1 . <2!3 4>") .
+      slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
+     (# "breaks165")
+     . (# cut 3)
+    . (|* gain 1.1)
+    )
+  $ midiOff ("^76"+"^44") (struct "t([12 <12 [12 16]>],16)" . slice 8 (run 16))
+  $ midiOff ("^76"+"^44") (slice 8 "0 3 . ~ 0 3 <~!3 3>")
+  $ loopAt 1
+  $ "break:13"
+  # cut 3
+  # midiG' "^80" 0 1.4
+d4 $ gF2 -- BURNING BASS
+  $ chop 8
+  $ loopAt 4
+  $ "bass_commodore:3"
+  # midiG' "^81" 0 0.9
+  # crushbus 41 (range 16 0 "^53")
+  # lpfbus 42 (range 0 20000 "^33")
+  # cut 4
+  # pan 0.4
+  # room 0.4 # sz 0.8
+d5 $ gF2 -- BASS Melody
+  $ midiOff ("^17") (mask "<t f>")
+  $ sometimesBy (1 - "^17") (mask "t(1,4)")
+  $ mask "t(<1!8 [2!3 <4 8>]!8 [16!7 <8 16>]!16>,16)"
+  $ note ("<5 12 8 <7 13>>" + 0
+  + (arp "updown" "<c'min'4!3 c'min'2>")
+  )
+  # "90s_synatm:3"
+  # octave 4
+  # crushbus 51 (range 16 4 "^53")
+  # room 0.3 # dry 0.9
+  # cut 5
+  # pan 0.2
+# midiG' "^81" 0 1.2
+d6 -- Choeurs
+  $ gF
+  -- $ mask "<[f!7 t]!32 t!32>"
+  $ juxBy 0.75 ( -- Jumeaux maléfiques
+    rev
+    . (# crush 8.4)
+    . (|* gain 0.8)
+    . (# room 0.5)
+  )
+  $ note ("<5 12 8 <7 13>>"
+  + (arp "pinkyup" "<c'min'4!3 c'min'2>"
+    - 12)
+  )
+  # "choir:1"
+  # gain 0.8
+  # room 0.2
+  # pan "[0.05 0.95]*2"
+  # midiG' "^82" 0 1.2
+d7 $ gF2 -- Higher spirit
+  $ superimpose ((|* gain 0.79)
+    . (|* speed 0.5)
+    . chop 16
+    . (0.125 ~>)
+    . (|+ pan 0.2)
+    . (# cut 71))
+  $ slice 4 "<0 1 2 3>"
+  $ loopAt 2
+  $ "synth_commodore:28"
+  # cut 7
+  # pan 0.9
+  # midiG' "^83" 0 1
+d8 -- Lointains vaisseaux
+  $ stut "<2!3 4>" "<0.5!3 0.125>" 0.9
+  $ "fx_commodore:0/4"
+  # pan "[0.1|0.2|0.8|0.9]"
+  # room (slow 16 sine)
+  # sz (slow 8 sine)
+  # speed ("[0.25,0.5,0.75,1,1.25]")
+  # midiG' "^20" 0 0.8
+
+
+
+
+
+
+d10 -- Ready playerm two
+  $ mask "<f!3 t f!3 t f!3 t t!4>"
+  $ slice 8 "0 <0!3 1>"
+  $ loopAt 4
+  $ "fx_gameboy:5"
+  # crushbus 101 (slow 32 $ range 1.8 0.61 saw)
+  # midiG' "^20" 0 0.85
+d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™"
+  $ midiOn "^44" (fast "1 2")
+  $ midiOn "^76" -- L'Esprit de Nassim
+  (
+    whenmod 8 7 (ply "1 . 2") .
+    slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
+   (loopAt "q") .
+   (# "breaks165") . (# cut 2)
+  . (|* gain 1.1)
+  )
+  $ chop 8
+  $ loopAt 4
+  $ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]"
+  # cut 2
+  # midiG' "^80" 0 0.9
+  # pan 0.4
+d3 $ gF -- Un peu d'encouragement?
+  $ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000))
+  $ "~ clap"
+  # midiG' "^79" 0 2
+  -- # gain 0.8
+d4 $ gF2 -- BURN THE BASS WITCH
+  $ midiOn "^57" (superimpose ( -- chain of wicked thoughts
+    (|+ note ("<0 7 <9 5> <10 10 <10 7> 12>>"))
+    . (|* gain "<1 1 1.05 1.1>")
+    . (chop "8 . <8!3 16>") . (# cut 41)))
+  $ midiOn "^89" (chop (slow 4 $ "[16 32 64 128]"))
+  $ "synth/4"
+  # "90s_synatm:9"
+  # crushbus 41 (range 10 2.5 "^53")
+  # room 0.3
+  # sz "<0.4!7 0.8>"
+  # dry 1
+  # cut 4
+  # midiG' "^81" 0 1.6
+d5 $ gM $ gF2 -- Ghosts from an easier time
+  $ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge")
+  $ note ("c'maj'4" + "<c!3 g g g [g, [~ c]] c>" - 12)
+  # "90s_synatm:8/4" # cut 5
+  # crushbus 51 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.1
+d7 $ gM -- Break from the past
+  $ (# speed (range (-0.25) 0.625 "^56"))
+  $ midiOn "^60" (often (ply 2))
+  $ midiOn "^92" (slice 8 "0 ~ ~ 3 . 4 <~ 5> 6 <~ 7*<1 2>>" . loopAt 2)
+  $ chop 16
+  $ loopAt 4
+  $ "fbreak100" # n "<0!3 [0 4]>"
+  # cut 7
+  # pan 0.8
+  # room 0.3
+  # dry 1
+  # midiG' "^84" 0 1.8

live/midi/nova/breaks/nova_bossa.tidal

@@ -16,8 +16,9 @@ setcps (60/60/4)
 d1 $ g1 $ m
   -- $ "k(<3!3 5>,8)"
   $ midiOn "^42" (fast 2) -- Cooldown :')
-  $ "k . <~ [k . <k k(<3 [5 3]>,8)>]>" # "[808bd:3,cpu2]" -- Bumpy kick
-  -- $ fast 2 $ "k k k <k [<~ k> k]>" # "[jazz,kick:5]" -- TECHNOOOO
+  $ fast 2 $ "k k k <k [<~ k> k]>" -- TECHNOOOO
+  -- $ "k . <~ [k . <k k(<3 [5 3]>,8)>]>"
+  # "[808bd:3,cpu2]" -- Bumpy kick
   # midiG' "^78" 0 1.4
 d2 $ g1 $ m
   $ fast 2

live/midi/nova/breaks/solar.tidal

 -- Solar - breakbeat nostalgic playground
-d1 $ "jazz*4"
 
 
 do
@@ -20,7 +19,7 @@ d1 $ g1 $ m --
   $ "[jazz,808bd:1,hh:5]"
   # midiG' "^78" 0 1.7
 d3 $ g1 $ m -- Snare
-    $ mask "<f!3 [f t] t!8 [t f]!4>"
+   -- $ mask "<f!3 [f t] t!8 [t f]!4>"
    -- $ fast "<1!4 2!10 4 [4 8]>"
    $ s "~ s ~ s"
    # "sn"
@@ -70,7 +69,6 @@ d5 $ g2
   $ arpeggiate
   $ note "e3'maj"
   # "FMRhodes1"
-  # modIndex 0
   -- # room "<0.4!3 0.7>"
   # pan 0.8
   # modIndex (range 0 128 "^34")
@@ -86,6 +84,7 @@ d9 $ g1 $ m
 
 
 
+
 -- REGION BACKYARD
 
 d8 $ g2 -- FIXME REMOVE OR SAVE

live/midi/nova/dnb/alerte_verte.tidal

 import Sound.Tidal.ParVagues.Control
 
+resetCycles
+
 -- Alerte Verte
 do
 setcps (160/60/4)
@@ -132,3 +134,5 @@ d6 $ "seawolf:0/4"
   # gain 0.75
 
 once $ "dr" # gain 1
+
+once $ "macron"

live/midi/nova/dnb/break_the_loop.tidal

@@ -9,6 +9,7 @@ let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
 let gM = (midiOn "^42" (mask "t <t!3 <[f t]!2 f [f t!3]>>"))
 d1
   $ gF
+  $ midiOn "^74" (fast 2)
   $ midiOn ("^42" - "^41") (mask "t(1,4)")
   -- $ mask "<f!4 t(1,2)!3 t!9>"
   $ fix ((|* gain 0.8) . (# att 0.05) . (# rel 1)) ("kick")
@@ -21,7 +22,6 @@ d1
   # midiG' "^78" 0 1.5
 d2 $ gF $ gM -- Snare glitch high
   $ midiOn "^75" (ply "<2 [2 <4 <2 4>>]>")
-  -- $ midiOn "^43" (superimpose (<| )) FIXME LATER SNARE MOD
   $ fix ((|* gain 0.9)) ("snare:40")
   $ "~ s ~ <s!3 <s*2 <s s*2>>>" # "[snare:31,snare:40]"
   # note (range "-12" 12 "^51")
@@ -41,7 +41,7 @@ d3 $ gF $ gM -- Breaks du Marathon
 d4 -- BASSLINE BRULANTE
   $ gF
   $ midiOn "^53" (-- Trigger: DATA BURN
-    superimpose (
+     (
       (# cut 42) . (|* gain 0.85) .
       (# squizbus 41 (range 200 0 "^53"))
       )
@@ -61,9 +61,9 @@ d4 -- BASSLINE BRULANTE
   )
   # "90s_synatm:9"
   # pan 0.15
-  # room 0.5 # dry 0.2 # sz 0.8
+-- # room 0.5 # dry 0.2 # sz 0.8
   # lratebus 43 (range 0.6 6.7 "^33")
-  # lesliebus 42 (range "-1" 1 "^17")
+  # lesliebus 42 (range 0 1 "^17")
   # lsize (slow 8 $ range 2 6 saw)
   # midiG' "^81" 0 (1.5 - 0.3 * "^17" - 0.25 * "^53")
   # crushbus 41 (range 10 4.5 "^53")
@@ -100,6 +100,6 @@ d8 -- Ominous drumroll
   $ midiOn "^60" (slow 2)
   $ midiOn "^92" (ply "[2 1]*8")
   $ "d*<4!3 2 4!3 8 <16!3 8>!16>" # "[dr,drum:2]"
-  # midiG' "^84" 0 1
+  # midiG' "^84" 0 1.2
   # room 0.8 # dry 1
   |- note 4

live/midi/nova/dnb/come_together.tidal

+do
+setcps (85/60/4)
+let gF =  (# 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 gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+d1 $ gF $ gMute2 -- Kick variable
+  $ midiOn "^75" (fast 2)
+  $ midiOn  "^42" (struct "t t t <t!3 t*2 t [~ t] t t*2>") -- COME FOR THE KICK
+  -- $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
+  $ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~")
+  $ fix (|* gain 0.8) "kick:4"
+  $ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
+  -- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
+  -- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
+  # midiG' "^78" 0 1
+d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti
+  $ midiOn "^42" ( -- STAY FOR THE SNARE
+  (<| "~ cp ~ cp*<1!3 2 1 2 1 2 1 2 2 2 1 2 1 2 2 2 1 2>")
+  . (# "[snare:57,909:2]")
+  )
+  $ midiOn "^43" (<| "~ c ~ c*<1!3 2>")
+  $ midiOff ("^43"+"^42") (<| "~ <~!4 c ~!3> ~ c*<1!7 2>")
+  $ fix (|* gain 0.8) "snare"
+  $ "[snare:40,bssnare:3]"
+  # pan 0.6
+  # room 0
+  # note "-2"
+  # legato 0.5
+  # midiG' "^79" 0 0.7
+d3 $ gF $ gMute2
+  $ midiOn "^44" (ply "1 2")
+  $ midiOn "^76" (ply "<2 [2 4]>")
+  $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
+  $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
+  # n "0!3 <0!3 1>"
+  # pan 0.35
+  # midiG' "^80" 0 1
+d4 $ gF2 -- COME WITH THE BASS
+  $ midiOn "^33" (superimpose (const $ gF2
+    $ "meth_bass" # n "<8 8 <8 9> <9 [9 9]>>"
+    # cut 41
+    # midiG' "^17" 0 0.8
+    # room 0.2
+    # lpf 5000
+    ))
+  $ slow 2
+  $ midiOn "^89" (ply "1 <4 2>")
+  $ midiOn "^57" (ply 2 . chop "8 . <8!3 16> <8 16>")
+  $ n ("<[0 0]!6 [1 1] <2 [2 2]>>")
+  # "come_bass"
+  # cut 4
+  # crushbus 43 (range 16 3.5 "^53")
+  # room 0
+  # dry (slow 64 $ range 0.2 2.8 cosine)
+  # sz 0.035
+  # midiG' "^81" 0 1
+d5 $ gM2 $ gF3 -- Sky's guitar
+  $ midiOn "^90" (ply "2 <2 <4 8>>")
+  $ midiOn "^58" (>| n "<3 ~ 3 ~>")
+  $ n ("<0!3 [0 1] 0!3 [0 1] 0!3 [0 1] 2!4>")
+  # "come_eguitar"
+  # cut 5
+  # pan 0.8
+  -- # speed 1.25
+  # room 0.2 # sz 0.3 # dry 1.2
+  # crushbus 51 (range 16 5.5 "^54")
+  # midiG' "^82" 0 1.3
+d6 $ gM2 $ gF3 -- Sky's companion
+  $ midiOn "^58" (mask "f")
+  -- $ mask "<f!8 t!24>"
+  $ slice 8 ("0 1*<1!3 8> 2*<1 2> 3*<1 1 4 16>" + "<0 4>")
+  $ "come_guitar"
+  # n "3"
+  # cut 6
+  # pan 0.9
+  # midiG' ("^82" * "^34") 0 0.8
+d7 $ gF3 -- Come together yeah!
+  $ midiOn "^91" (>| n "~ ~ ~ 11")
+  $ someCyclesBy ("^35" - "^59") (>| n "<0 1 2 3 4 5 6 7>/2")
+  $ midiOn  ("^59" - "^91") (>| n "<[8 ~ ~ 9] [~ ~ ~ 10]>") -- COME
+  $ midiOff ("^59" + "^91" + "^35")-- YEAH
+    (>| n "~ ~ ~ <~!3 <13 <14 17> <15 18> <16 19>>>")
+  $ "come_voice"
+  # crushbus 71 (range 16 "<5 10>" "^55")
+  # hpfbus   72 (range 0 3500 "^55")
+  # cut 7
+  # midiG' "^83" 0 0.8
+d8 $ gM $ gF -- Angel Breaks
+  $ midiOn "^92" (ply "<2 2 4 8>")
+  $ midiOn "^60" (mask "f <t t f t>")
+  $ chop 8
+  $ someCyclesBy "^20" ((loopAt 1) . (# n 7))
+  $ someCyclesBy "^36" (# n 70)
+  $ someCyclesBy "^56" (slice 8 "0 1 2 3 4 5 6 7" . (loopAt 0.5) . (# n 4))
+  -- $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3"))
+  $ loopAt 2
+  $ "jungle_breaks:1"
+  # cut 8
+  # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4"
+  # midiG' "^84" 0 1
+d10 $ loopAt 2 $ fast 2 $ "<~!6 risers ~>"
+  # cut 10
+  # midiG' "^13" 0 0.7
+  # lpf 5000

live/midi/nova/dnb/jet_de_resistance.tidal

+do
+setcps (83/60/4)
+let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gMute $ gF -- 4 SOLID wheels
+  $ "jazz*4"
+  # midiG' "^78" 0 1.4
+d2 $ gF $ gMask $ "~ cp"
+  # midiG' "^79" 0 1.4
+d3 $ gF $ gMask $ "h*[8 <8 16 [8 16] [16 <8 32>]>]" # "hh"
+  # midiG' "^80" 0 1.4
+d4
+  $ "90s_matrix:0"
+  # note "<0 0 [2@3 4] 3 [2@3 0] 3 -1 0>"
+  # pan 0.2
+  # cut 4
+  # midiG' "^81" 0 1.4
+d6
+  $ "90s_weird:1"
+  # room 0.4
+  # note "<0 0 2 3 2 3 -1 0>"
+  # legato 4
+  # cut 6
+  # pan 0.8
+  # midiG' "^82" 0 1.4
+
+once $ "wobble" -- wobble?

live/midi/nova/dnb/nouveau_soleil.tidal

+do
+setcps (110/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gF $ gMute
+  $ midiOn "^42" (<| "k k k <k [<~ k?> k]>")
+  $ midiOff "^42" (<| "k . ~ k ~ <~!7 k>")
+  $ "[jazz,kick:4]"
+  # midiG' "^78" 0 1.2
+d2 $ gF $ gM -- Snare FOU
+  $ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>")
+  $ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>")
+  $ midiOff ("^43"- "^75") (<| "~ s")
+  $ "[sn:25,gretsch:4]"
+  # note (range "-4" 4 "^51")
+  # lpf 5300
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gM
+  $ midiOn "^44" (ply "1 2 1 <2 <1 4>>")
+  $ midiOn "^76" (ply 2)
+  $ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>"
+  $ "dr:2*8"
+  # midiG' "^80" 0 1.2
+  # pan (0.3 - 0.2 * perlin)
+d4 $ gF2 $ gMask
+  $ midiOn "^89" (ply "<4!3 [4 8]>")
+  $ chop 16
+  $ loopAt 4
+  $ midiOn "^57" (# "bass_gameboy:5")
+  $ "bass_gameboy"
+  # room (slow 8 $ range 0.2 0.8 sine)
+  # sz 0.8
+  # drybus 41 (range (-2) 2 "^33")
+  # cut 4
+  # midiG' "^81" 0 1
+d5 $ gF2 $ gMask
+  $ whenmod 64 32 (off "q" ((|+ note 12) . (# pan 0.8)))
+  $ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1)))
+  $ whenmod 16 8  (off "h" ((|+ note 12) . (# pan 0.8)))
+  $ chop 8
+  $ loopAt 4
+  $ "synth_gameboy:5"
+  # pan 0.2
+  # hpfbus 51   (range 0 8000 "^34")
+  # crushbus 52 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.2
+d6 $ gF2 $ gMask
+  -- $ juxBy 0.8 (rev . (# cut 61))
+  $ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>")
+  $ loopAt 2
+  $ "synth_atari:5"
+  # cut 6
+  # gain 0.8
+  # midiG' "^83" 0 0.9
+d8 $ gF2 $ gMask
+  $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
+  $ sometimesBy "^56" (iter 4)
+  $ midiOn "^92" (ply "<2 [4 <4 8>]>")
+  $ midiOn "^60" (ply 2)
+  $ chop 8
+  $ loopAt 1
+  $ "breaks165"
+  # cut 4
+  # pan 0.7
+  # midiG' "^84" 0 1.4

live/midi/nova/lofi/hello_shiloh.tidal

+do
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+setcps (62/60/4)
+d1 $ gF $ gMute
+  $ midiOn "^42" (struct "t t t [<t ~> t t ~]")
+  $ midiOff "^42" (struct "t . t(3,8)")
+  $ "[808bd:2,jazz]"
+  # midiG' "^78" 0 1.2
+d2 $ gF $ gM
+  $ "~ snare:40" # hpf 5000
+  # midiG' "^79" 0 1.1
+d3 $ gF $ gM
+  $ midiOn "^76"  (ply 2)
+  $ midiOn "^44"  (struct "t*[8 16]")
+  $ midiOff "^44" (struct "[~ t]*4")
+  $ "dr"
+  # pan 0.8
+  # midiG' "^80" 0 0.85
+d4 $ gF2
+  $ ("s" <~) -- Calage debut
+  $ "shiloh:7" # cut 4
+  # begin 0 # end "<0.05!3 0.125>"
+  -- # legato "<0.9!3 2>"
+  # legato 2
+  # room 0.2
+  # pan (slow 16 $ range 0.5 0.8 saw)
+  # midiG' "^82" 0 0.85
+  # roombus 41 (range 0.2 0.9 "^34")
+  # drybus  42 (range "-2" 2 "^54")
+  # size 0.8
+d5
+  $ never (superimpose (
+    mask "f . t(<3 <5 8>>,8)" .
+    arp "pinkyup"
+    -- . ply 2
+    . (|+ note 12)
+    . (# pan 0.7)
+    . (# "FMRhodes1")
+  ))
+  $ note (
+    -- "<<f'maj7'4 g'maj7'4> f'major'4>" -- HANDCOOK BUGGY
+    "<f'maj7'4 g'maj'7'4>"
+    - 24)
+  -- Abmaj7 / Cm9 / Gm7
+  # "bassWarsaw"
+  # pan 0.2
+  # room 0.8
+  # midiG' "^81" 0 0.85
+d6 $ gF
+  $ gM
+  $ loopAt 1
+  $ midiOn "^92" (chop 8 . ply 2)
+  $ "breaks125"
+  # cut 6
+  # midiG' "^84" 0 0.85
+
+
+
+once $ "shiloh:5"

live/midi/nova/lofi/premier_mai.tidal

+do
+setcps (120/60/4)
+let gF =  (# 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 gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+d1 $ gF $ gMute
+  $ midiOn "^42" (struct "t t t <t!3 [~ t]>")
+  $ midiOff "^42" (struct "t")
+  $ "jazz"
+  # midiG' "^78" 0 1.2
+d2 $ gF
+  $ midiOn "^43" (<| "~ c ~ c*<1 <2 [4 <2 4>]>>")
+  $ midiOff "^43" (<| "~ c")
+  $ "cp" # lpf 2000 # gain 0.8
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gMute
+  $ midiOn "^76" (ply 4)
+  $ midiOn "^44" (struct "t*[8 8 <8 16> <8!3 16>]")
+  $ midiOff "^44" (<| "h . h([2 <4!3 5>],8)")
+  $ drumFrom "yamaharm50" "hh"
+  # midiG' "^80" 0 1.2
+d4 $ gF2
+  $ note (stack ["[bf3 ~] bf3@7",
+  "[~!3 <~!4 bf3!4> . bf3 ~ cs4 <ds4!3 f4>]"
+  ])
+  # "bassWarsaw"
+  # crushbus 51 (range 16 3.8 "^53") -- BURN ME I'M FAMOUS
+  # roombus  52 (range 0 0.8 "^53") -- BURN ME I'M FAMOUS
+  # midiG' "^81" 0 1.2
+d6 $ gF2
+  $ note (
+    "<bf5 c6 cs6 <ef6 f6>>"
+    -- |+| "0 ~ [0 0] ~ ~ 0*2  ~ >"
+    |+| "[<0 <0 ~> ~ 0> 0] ~ ~ ~ 0 ~ ~ ~ <[0 12] <0 [0 12]>*2>"
+    )
+  # "cpluck:2"
+  # cut 6
+  # midiG' "^82" 0 1.2
+d7 $ gF3 -- SHILOOOOOH
+  $ midiOff "^59" ((# room 0.2) . (# legato 0.5))
+  -- $ (# hpfbus  71 (range 200 8800 ("^19")))
+  -- $ (# lpfbus  71 (range 8800 200 ("^35")))
+  $ (# lratebus  73 (range 1 10 ("^35")))
+  $ (# lesliebus 72 (range 0 1 ("^55")))
+  $ slice 4 ("<[<0!3 1>]!4 [<2 [2*2]>]!4>")
+  $ loopAt 16
+  $ "shiloh:4/2"
+  # pan 0.2
+  # room 0.53
+  # sz "<0.5!3 <0.8 0.9>>"
+  # lsize 4
+  # legato 2
+  # cut 7
+  # midiG' "^83" 0 1.2
+d8  $ gF $ gM
+  $ midiOn "^20" (# n "20")
+  $ midiOn "^36" (# n "10")
+  $ midiOn "^60" (slow "2 <4 8>")
+  $ midiOn "^92" (ply "2 <4 8>")
+  $ loopAt 4
+  $ chop 16
+  $ "jungle_breaks:1"
+  # cut 7
+  # pan 0.8
+  # midiG' "^84" 0 1.2

live/midi/nova/lofi/premiere_grillade.tidal

+do
+setcps (80/60/4)
+let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gF3 = (# djfbus 3 (range 0.01 0.99 "^51"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let progAlt = "<[c,e,g,b] [c,e,gf,a4] [c,ef,g,bf5] [c,e,g,d5]>"
+let prog = "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>"
+d1 $ gF $ gMute
+  $ midiOn  "^42" (struct "t t t <t!3 <t*2 t*[4 2]>>")
+  $ midiOff "^42" (struct "t*[<1!4 [8 <8 4>]!4> . 2] . ~ ~ ~ <~!3 t>")
+  $ "[808bd:13,jazz]" -- 11
+  # midiG' "^78" 0 2
+  -- # room 0.2 # sz 0.2
+--   # dry 0.99
+d2 $ gF $ gM -- Snare clockwork
+  $ fix (|* gain 0.9) "clap"
+  $ midiOn "^75" (struct "~ t ~ t ~ t ~ t*2")
+  $ midiOff "^75" (
+    midiOn  "^43" (struct "~ t(<3 [3 <1 5>]>,8)")
+  . midiOff "^43" (struct "<[~ t]!32 [~ t ~ t]!32>")
+  )
+  $ "[snare:20,clap]"
+  # midiG' "^79" 0 1.2
+d3 $ gF $ gM
+  $ midiOff "^44" (slow 2)
+  $ midiOn "^76" (ply 2)
+  $ drumFrom "yamaharm50" "hh*<8!3 [8 . 16 <8 16 [24 8] 32>]>"
+  # n "<0 1 2 3>"
+  # midiG' "^80" 0 1.2
+d8 $ gF $ gM
+  -- $ midiOn "^60" (off "q" (# cut 31))
+  $ midiOn "^60" (mask "t f . [f <f!3 t>] [<t!3 <f t>> t]")
+  $ midiOn "^92" (ply "2 <2 4>")
+  $ loopAt 1
+  $ chop 8
+  $ someCyclesBy "^20" ((# n 20))
+  $ someCyclesBy "^36" (loopAt 2 . (# n 81))
+  $ sometimesBy  "^56" ((iter "1 4"))
+  $ "jungle_breaks:13"
+  # room 0.2 # dry 1.1 # sz 0.4
+  # cut 3
+  # pan (slow 8 $ range "<0.2!8 0.8!8>" 0.5 cosine)
+  # midiG' "^84" 0 1.3
+d4 $ gF3
+  $ midiOn "^58" (
+    -- (often (off 0.5 (slow "1 " . mask "f t" . (|+ note 12) . (|* gain 0.9))))
+    -- . (off ("h" + "s") id . arp "up")
+    -- .
+    (|+| note "0(<<3 [3 5]> <5 [5 [8 4]]>>,8)")
+  )
+  $ whenmod 64 32 (# note (progAlt - 12))
+  $ note (prog - 12)
+  # "FMRhodes2"
+  # modIndex (range 0 16 "^54")
+  # pan 0.8
+  # midiG' "^82" 0 1.3
+d5 $ gF2
+  $ midiOn "^89" (chop 8)
+  $ note (
+    -- "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>"
+    "<[c,c(3,8)] [g,[~ f6],g*4] [bf,bf(3,8)] c4>" + "0"
+     - 24)
+  # "bassWarsaw"
+  # crushbus 51 (range 16 2 "^53")
+  # midiG' "^81" 0 2
+  # room 0.2 # sz 0.2
+d7 $ gF3
+  $ midiOff "^59" (mask "<f!64 t!64>")
+  $ slice 4 "~ <~ [0 1]>"
+  $ chop 4
+  $ loopAt 4
+  $ "shiloh:1"
+  # lpf 5000
+  # pan 0.2
+  # cut 7
+  # midiG' "^83" 0 1.1
+  # room 0.4 # sz 0.59
+  -- # freeze 2
+  # dry 2
+
+once $ ""
+
+d1 $ "jazz" # gain 0.9

live/midi/nova/lounge/invoque_ete.tidal

-import Sound.Tidal.ParVagues.Control
-
 resetCycles
 
 
+
 -- Invoque l'été
 -- Il ne viendra pas tout seul ;)
 do
 setcps (115/60/4)
 let gF = 1.5
 let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
+let mMute = (midiOn "^73" (mask "f*16"))
 let m = mBreak
 let f1 = (# djfbus 1 (range 0.1 0.9 "^49"))
 let f2 = (# djfbus 2 (range 0.1 0.9 "^50"))
-d1 $ f1 $ m
+d1 $ f1 $ m $ mMute
   $ midiOn  "^41" (slow 4)
   $ midiOn  "^42" (<| "k k k <k k k*2 [~ k]>")
   $ midiOff "^42" (<| "k*2")
   $ "[jazz,kick:5]"
   # midiG' "^78" 0 1.2
-d2 $ f1 $ m -- Clave de l'été
+d2 $ f1 $ m $ mMute -- Clave de l'été
   $ midiOn "^43" (fast 2)
   $ midiOn ("^75"-"^43") (fast 2)
   $ (|* gain ("0.75 1 1 1 0.75 1 1 1" * 1.7))
   $ "d ~ ~ d d ~ d <~!3 d>"
+  -- $ "d"
   # "[snare:22,sn:4]"
   # midiG' "^79" 0 1
   # speed (range 0 2 "^51")
-d4 $ f1 $ m -- Mecano Course
+d8 $ f1 $ m -- Mecano Course
   -- $ fast "<<4 2> 4!7 2!4 2 2 4 8>"
   $ sometimesBy "0 ^32!7" (ply 4)
   $ someCyclesBy "^52" (iter 4)
@@ -39,8 +40,22 @@ d4 $ f1 $ m -- Mecano Course
   $ "breaks125:3"
   # midiG' "^80" 0 1.3
   -- # speed (range 0 2 "^16")
-  # cut 4
-d5 $ f1 $ m -- Bassline variable double piste
+  # cut 8
+d8 $ f1
+  $ midiOn "^76"  --BOUTON NASSIM
+    (
+      -- whenmod 8 7 (ply "1 . 2") .
+      -- slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
+     (loopAt 1) .
+     (# "breaks165") . (# cut 2)
+    . (|* gain 1.1)
+    )
+  $ midiOn ("^44") (ply 2)
+  $ m
+  $ "h(3,8) . h(5,8)"
+  # "hh" -- TODO CHOOSE OR REMOVE
+  # midiG' "^80" 0 1.4
+d4 $ f1 $ m -- Bassline variable double piste
   $ loopAt 2
   $ slice 8 (run "<4!4 8 8 [4 8 4] [8 4 8]>")
   $ midiOn ("^57" + "^89") (# n 14)
@@ -87,6 +102,8 @@ d12 $ f2 $ m -- Angels of moogland
   # pan 0.4
   # crushbus 81 (range 16 1.4 "^56") -- Even an angel can fall in love
   # midiG' "^84" 0 1.3
+-- d12 $ "808mc(5,8)" # note "g3"
+  -- # gain 1.2
 
 
 -- Sandbox

live/midi/nova/party/sidekick.tidal

+do
+setcps (110/60/4)
+let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
+let g2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute = (midiOn "^73" (mask "f*16"))
+let gM = gMask . gMute
+let modIndex = pF "modIndex"
+d1 $ g1 $ gM
+  $ midiOn "^42" (<| "k k k <k k*2 k [~ k]>")
+  $ midiOff "^42" (<| "k ~ ~ <~!3 k> . <~!16 k!16> <~!8 k!8> <~ k ~ k> <~ k>")
+  $ "[jazz,tech]"
+  # pan 0.4
+  # midiG' "^78" 0 1.9
+d2 $ g1 $ gM
+  $ midiOn "^43"  (id
+    . (midiOn "^75" (ply 4 . chop 4 . (# cut 21)))
+    . loopAt 2
+    . (# "breaks165")
+    . struct "t")
+  $ midiOff "^43" (
+    mask "t(<32 16 [32 16] 8 16 8 [8 4] [16 32]>,32)"
+    . chop 32
+    . loopAt 1
+  )
+  $ "break:4"
+  # midiG' "^79" 0 1.9
+d3 $ g1 $ gM $ "~ h ~ <h!4 h h*2 h h*2> ~ h ~ <h h*2>"
+  # "[hh,808oh]"
+  # midiG' "^80" 0 1.3
+d4 $ g2 $ gMask
+  $ superimpose ((# lpf 1500) . (# cut 41))
+  $ chop 4
+  $ loopAt 4
+  $ "bass_atari:2"
+  # crushbus 41 (range 16 2.4 "^53")
+  # lpf 2000
+  # cut 4
+  # midiG' "^81" 0 1.3
+  # pan 0.7
+d5 $ g2 -- ACID RAIN
+  -- $ midiOn "^58" (off 0.5 (# cut 51))
+  $ slice 4 (run 8)
+  $ loopAt 16
+  $ "synth_commodore:1"
+  # pan 0.2
+  # cut 5
+  # crushbus 51 (range 16 4 "^54")
+  # midiG' "^82" 0 1.5
+d6 $ g2 -- Good news
+  $ slice 8 (slow 8 $ run 8)
+  $ "synth_commodore:10"
+  # cut 6
+  # legato 2
+  # room 0.85 # dry 1
+  # sz 0.8
+  # delay 0.8 # delayfb 0.25 # delayt 0.5
+  # orbit 4
+  # midiG' "^83" 0 1.3
+d7 $ gMask $ g2 -- Everyone <3
+  $ slice 8 (slow 8 $ run 8)
+  $ "synth_commodore:11"
+  # cut 7
+  # legato 2
+  # room 0.85 # dry 1
+  # sz 0.8
+  # squizbus 71 (range 0 8 "^56")
+  # delay 0.8 # delayfb 0.25 # delayt 0.5
+  # pan 0.99
+  # orbit 5
+  # midiG' "^84" 0 1
+
+
+d2 $ slow "<2!8 1!8>" $ "~ cp" # gain 1.2 # lpf 2000

live/midi/nova/punk/killing.tidal

+once $ "dr"
+
+do
+setcps (120/60/4)
+d1 $ "k k k <j!3 k*2>" # "jazz"
+d2 $ "hh*8" # gain 0.8
+d3
+  $ loopAt 2
+  $ "breaks165"
+  # gain 0.7
+d4 $ "killing_bass"
+
+d5 $ loopAt 1
+  $ "killing_guitar" # n "<0!3 1>"
+  # cut 5
+  # pan 0.2

live/midi/nova/techno/ete_a_mauerpark.tidal

+-- L'Ete a MauerPark
+-- Exercice en progression(s)
+do
+setcps (120/60/4)
+let gF =  (# 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 gMute = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gM = gMask . gMute
+let gM2 = gMask . gMute2
+let gLPF = whenmod     64 48 (# lpfbus 4 (slow 16 $ range 20000 200  saw))
+let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw))
+let chorus = pF "chorus"
+let lagamount = pF "lagamount"
+let dec = pF "dec"
+let sus = pF "sus"
+let cutoff = pF "cutoff"
+d1 $ gF $ gMute
+  -- $ midiOn "^74" (fast 2)
+  $ midiOn  "^42" (struct "t t t t") -- Le Run
+  $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
+  -- $ midiOff "^42" (struct "t . ~ t ~ ~")
+  $ "[techno:0,808bd:2,909,kick:4]"
+  # att 0.015
+  # rel 0.125
+  # lpf 4000
+  # midiG' "^78" 0 1.3
+d2 $ gF $ gMute -- Clap timer
+  $ midiOn "^43" (<| "~ c ~ c")
+  $ midiOff "^43" (<| "~ c")
+  $ drumFrom "[sakatadpm48,rolandr8]" "cp"
+  # lpf 2000
+  # midiG' "^79" 0 1.3
+d7 $ gF3 $ gM2 -- High Dauphin
+  $ struct "t@2 t*<1 2 1 <4 1>> t*<1 2 4 8>"
+  $ note (
+    "<[g4 c ef@14] [<c g> ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>"
+    )
+  # "[cbow:3]"
+  # cut 7
+  # room 0.2
+  # pan 0.9
+  # crushbus 71 (range 16 2.5 "^55")
+  # midiG' "^83" 0 1
+d3 $ gF $ gMute2
+  $ midiOn "^44" (mask "t([8 4 <4 <8 16>>],16)")
+  $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]")
+  $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
+  $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
+  # n "0!3 <0!3 1>"
+  # midiG' "^80" 0 1.6
+d4 $ gF2 $ gM2 $ slow 2 -- Basse Baleine
+  $ midiOn "^89" (struct "t*<16 32>") -- Basse folle
+  $ (0.125 <~) -- Calage :)
+  $ someCyclesBy "^17" (
+    (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
+    ) --
+  $ fix ((midiOff "^57" (# silence)) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5))
+  "bass2"
+  $ note (
+    "<[g4 c ef@14] [<c g> ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>"
+    - 24
+    )
+  # "[bass2:1,bassWarsaw]" -- TODO: Autre basse moins venere?
+  # room 0.2
+  # pan 0.4
+  # crushbus 41 (range 16 2.5 "^53")
+  # midiG' "^81" 0 1.3
+d6 $ gF3 $ gMute2 -- Leads reponse
+  $ midiOn "^58" (|+ note 12)
+  $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
+  $ someCyclesBy "<f!3 t>" (mask "t f!15". (# legato 2))
+  -- $ midiOn "^89" (struct "t*<16 32>") -- Basse folle
+  -- $ (0.125 <~) -- Calage :)
+  -- $ someCyclesBy "^17" (
+    -- (mask "<t!2 f t f f t t> f t@14") . (|* room 1.2)
+    -- ) --
+  $ whenmod 32 24 (ply "2 <2!4 4!4>")
+  $ swing (1/3)
+  $ note (
+    "<ef4 g4 <ef g> d>"
+    + "<0!0 [0 12]!0 [0(2,8), <12!3 -12>([<1 3> 3],8,3)]!32>"
+    + "[0,<7 12 12 7>]"
+    - 12
+    )
+  # "FMRhodes1"
+  # room 0.2
+  # pan 0.8
+  # modIndex (range 0 16 "^34")
+  # crushbus 61 (range 16 2.5 "^54")
+  # midiG' "^82" 0 1.3
+d8 $ gM $ gF3 -- MARINE BREAKS
+  $ midiOn "^92" (off "e" id)
+  $ midiOn "^60" (mask "[f t]")
+  $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81))
+  $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3"))
+  $ loopAt 2
+  $ chop 8
+  $ "jungle_breaks:1"
+  # cut 8
+  # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4"
+  # midiG' "^84" 0 1.8
+d10 $ gF3 -- Pads angéliques
+  $ midiOff "^58" (mask "t([0 2],4)")
+  $ note (
+    slow 2 "<bf4 d5 <bf4 ef> [bf4 a4@3]>"
+    + "[0,[0*<1 1 2 <2 1>> .  0 12*<1 2>]]"
+    )
+  # chorus 2
+  # "moogBass"
+  # att (range 0.001 2 "^16")
+  # dec (range 0.2  10 "^17")
+  # sus "^18"
+  # rel (range 0.2  10 "^19")
+  # room 0.5 # sz 0.6 # dry 2
+  # midiG' "^20" 0 1
+  # legato 2
+  # cut 10
+
+bf g bf <bf a>

live/techno/nightly_repair.tidal

@@ -16,7 +16,7 @@ d1 $ g1 -- Le pouvoir de voler
   $ midiOff "^42" (<| "k . k(3,8)")
   $ fix (|* gain 1) "808bd"
   $ fix ((|* gain 0.8)) "909"
-  $ "[jazz,909,808bd:4,kick:5]"
+  $ "[jazz,909,808bd:4]"
   # midiG' "^78" 0 1.4
 d2 -- Every superhero needs a clap
   $ midiOn "^43" (fast 2)
@@ -50,7 +50,7 @@ d9 $ g2 -- G0dz1ll4
   # dry 2
   # sz 0.9
   # pan 0.7
-  # midiG' "^84" 0 1.4
+  # midiG' "^84" 0 1.2
 d4 $ g1 -- BASSLINE VOLTAIQUE
   $ midiOn "^57" ((|+ note 12) . (# legato 4))
   $ note ("<bf g bf g bf g bf c c!4 g bf c6@2>" - 24)
@@ -64,6 +64,7 @@ d4 $ g1 -- BASSLINE VOLTAIQUE
   # lpf 5000
   # lsizebus 42 (range 1.9 6.7 "^33")
   # crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin)))
+  # lpfbus   44 (range 12000 200 "^53")
   # room 0.2
 d5 $ g2 -- BLUES RUN
   $ someCyclesBy (range 0.95 0.05 ("^18!15 1")) (mask "t(3,8)")
@@ -76,7 +77,7 @@ d5 $ g2 -- BLUES RUN
     -- up, down, updown, downup, converge, diverge, disconverge, pinkyup,
     arp "<up pinkyup downup thumbupdown>" "[0,1,2,<3 4>,<4 <5 6>>]")
   + "0!3 <0!3 <1 3>>"
-  - 12
+  - 24
   )
   # "FMRhodes1"
   # crushbus 5 (range 16 4.2 "^54")
@@ -92,7 +93,6 @@ once
   $ note (fastcat )
   # "FMRhodes1"
 
-scaleList
 
 once $ "90s_weird" # cut 4
 

live/techno/noir/barriere_bleue.tidal

+-- Une barrière bleue
+-- couvre l'horizon ici
+-- Triste ville
+
+do
+  let modIndex = pF "modIndex"
+  let g =  (# djfbus 1 (range 0.1  0.9 "^49"))
+  let g2 = (# djfbus 2 (range 0.05 0.95 "^50"))
+  let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+  let gMute = (midiOn "^73" (mask "f*16"))
+  let gM = gMask . gMute
+  setcps (120/60/4)
+  d1 $ g $ gMute -- BOUNCE THAT KICK
+    $ whenmod 16 12 (# legato 0.125)
+    $ whenmod 4 3 (# legato 0.25)
+    $ midiOn "^42" (<| "k*4" )
+    $ midiOff "^42" (<| "k . k(<3!3 [3 5]>,8)")
+    $ fix (# lpf 200) "kick:4"
+    $ "[jazz,kick:4,kick:9]"
+    # midiG' "^78" 0 1.5
+  d2 $ g $ gM
+    $ midiOn "^43" (struct "~ t ~ <~!3 t> ~ <~ t> ~ t")
+    $ midiOff "^43" (struct "~ t")
+    $ "cp"
+    # note "<8!3 <-2!3 [-2!3 8]>>"
+    # midiG' "^79" 0 1.8
+  d3 $ g $ gMask
+    $ midiOn "^76" (ply "<2!3 [2 . 4 8]>")
+    $ midiOff "^44" (mask "t(<8!3 [8 4]>,16)")
+    $ "h h h h h*<1 2 1 <1 2>> h h*<1!7 2> [<h!3 ~> h]" # "hh"
+    # midiG' "^80" 0 1.8
+  d5 $ g2 -- DAMAGED BASS
+    $ midiOn "^89" (chop 8 . ply "<4 4 <4 4 8 4> 1>")
+    $ note (scale "aeolian" "<0 0 [0@3 -1] <5 6>>")
+    # room (slow 16 $ range 0.2 0.8 saw)
+    # legato "<1!3 2>"
+    # "90s_weird:2"
+    # pan 0.3
+    # crushbus 51 (range 16 2.5 "^53")
+    # roombus  52  (range 0 0.8 "^53")
+    # midiG' "^81" 0 1
+  d6 $ g2 -- MY OTHER BASS IS A CAR
+    $ slow 4
+    $ chop 16
+    $ "bass_atari:2"
+    # crushbus 61 (range 16 1.5 "^54")
+    # midiG' "^82" 0 1.5
+    # cut 6
+  d7 $ g2 $ gMask
+    $ midiOff "^59" (mask "t(1,4) t(1,4)")
+    $ midiOn "^91" (ply "<4 4 [4 2 4] 4> <2 1>")
+    $ whenmod 36 24 (juxBy 0.2 ((# cut 71)))
+    $ note (scale "aeolian" (
+      "<0 0 0 <5 6>>" -- Theme
+      + ("[0*3 9*3 <5 4>*3 12*3]")
+      ))
+    # "giorgio_syn:5"
+    # cut 7
+    # pan 0.8
+    # crushbus 71 (range 16 1.5 "^55")
+    # midiG' "^83" 0 0.8
+  d8 $ g2 $ gMask
+    $ note (scale "aeolian" (
+      "<0 0 0 <5 6>>" -- Theme
+      + ("[-4 -3*2 [-2 -3 -2 -1 ~]]"
+        -3)
+      )
+      + "12"
+    )
+    # "strings"
+    # cut 8
+    # pan 0.2
+    # midiG' "^84" 0 1.3
+
+once $ note (scale "aeolian" ("-2")) # "strings" # gain 0.8 # cut 9
+
+
+  -- $ note "36"
+  $ "strings" # gain 0.8
+
+
+  once  $ "moogBass"

live/techno/noir/burn_this_book.tidal

@@ -15,7 +15,6 @@
 -- \____/\____/\_/\_\\_/  \|    \_/  \_/ \|\_/\____/  \____/\____/\____/\_|\_\
 -- 🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥🔥
 --
-
 do
   let modIndex = pF "modIndex"
   let g =  (# djfbus 1 (range 0.1 0.9 "^49"))
@@ -24,19 +23,22 @@ do
   let gMute = (midiOn "^73" (mask "f*16"))
   let gM = gMask . gMute
   setcps (120/60/4)
-  d1 $ g $ gM
-    $ midiOn "^42" (<| "kick*4" )
+  d1 $ g $ gMute
+    $ midiOn "^42" (<| "k*4" )
     $ midiOff "^42" (<| "k . k(3,8)")
-    $ "jazz"
-    # midiG' "^78" 0 1.8
+    $ fix (# lpf 200) "kick"
+    $ "[jazz,kick:4]"
+    # midiG' "^78" 0 1.5
   d2 $ g $ gM
-    $ midiOn "^43" (fast 2)
+    $ midiOn "^43" (fast 2 . (# note "<8!15 -2>"))
     $ "~ cp" # note "<8!3 -2>" # lpf 4000
     # midiG' "^79" 0 1.8
-  d5 $ g $ gM $ gM -- Le comburant
-    $ midiOn "^76" (off "e" id) -- TODO Validate
-    $ midiOn "^44" (ply 2)
-    $ "~ t*<1!8 2 1!6 2> ~ t ~ <t!3 t*<2!3 1>> ~ <t!7 t*2>" # "cpu2:3"
+  d5 $ g $ gM -- Le comburant
+    $ midiOn "^76" (off "e" id)
+    $ midiOn "^44" (off (- "s") (|* gain 0.9))
+    -- $ "~ t*<1!8 2 1!6 2> ~ t ~ <t!3 t*<2!3 1>> ~ <t!7 t*2>"
+    $ "~ t ~ t ~ t ~ t*2"
+    # "cpu2:3"
     # midiG' "^80" 0 1.65
   d3 $ g $ gM -- L'étincelle
     $ someCyclesBy "^36" (slow "<2!3 [2 1]>")
@@ -44,11 +46,13 @@ do
     $ midiOn "^60" (
       (# delay 0.85)
       . (# delayfb "<0.25!3 <0.5 0.9>>")
-      . (# delayt 0.125))
+      . (# delayt 0.125)
+      . (|* gain 0.9))
     $ (|* speed (range 0.25 1.75 "^56"))
     $ chop 16
     $ loopAt 4
     $ "drums_nes:3"
+    # lpf 4000
     # midiG' "^84" 0 1.3
     # pan 0.2
   d4 $ g2 -- Le combustible
@@ -56,28 +60,41 @@ do
       (superimpose (arp "up <up up updown up>" . (|+ note "c'min'8"))) .
       (# "bassWarsaw") . (|- note 24)
     )
+    $ midiOff "^57" ( midiOn "^17"
+      ((superimpose (
+        struct "t . <t t(<1 2 <3 8>>,8)>"
+      .  arp "up"
+      . (|+ note "[0,12]"))) .
+      (# "bassWarsaw") . (|- note 24))
+    )
     $ note (scale "aeolian" (
       "<0 [0, <<7 7 8 9>!3 <8 8 8 7>>]>"
     ))
     # "cpluck:0"
     # roombus 42 (range 0 0.8 "^33") # sz 0.6
     # crushbus 41 (range 16 1.4 ("^53" - 0.12 * (fast 2 perlin)))
-    # midiG' "^81" 0 1.65
+    # midiG' "^81" 0 1.85
     # pan 0.3
   d6 $ g2 $ gMask -- La fumee
-    $ note (scale "aeolian" (arp "up" ("<0!2 3 [0 3]>" |+| "c'maj'4")))
-    # "cpluck:1"
+    $ sometimesBy (1 - "^18") (mask "t <t <t!4 f!4>> . f!3 <t f>")
+    -- $ sometimesBy (1 - "^18") ()
+    $ midiOn "^90" (ply 2)
+    $ midiOn  "^58" (>| note (scale "aeolian" (arp "down" ("<0!2 3 [0 3]> . <~ 0> <~ ~ 0 12>" |+| "c'maj'4"))))
+    $ midiOff "^58" (>| note (scale "aeolian" (arp "up" ("<0!2 3 [0 3]>" |+| "c'maj'4"))))
+    $ "cpluck:1"
     # crushbus 61 (range 16 1.4 ("^54"))
     # cut 6
-    # midiG' "^82" 0 1.65
+    # room (slow 8 $ range 0 0.4 saw)
+    # sz 0.5
     # pan 0.7
+    # midiG' "^82" 0 1.65
   d7 $ loopAt 8 -- L'auteur
     $ "90s_synatm:16"
     # cut 7
-    # midiG' "^83" 0 0.93
     # octerbus 71 (range 0 2.4 ("^55"))
-    # room 0.2 # dry 1
-  d8
+    # room 0.2 # dry 1 # orbit 4
+    # midiG' "^83" 0 0.93
+  d8 -- Dark Event
    $ mask "<f!14 t t>"
    $ "90s_megafx:268@2"
    # release 3
@@ -85,6 +102,6 @@ do
    # cut 8
    # note (-4)
    -- # n (4 + "<1 1 [2|3|4] <1 4>>")
-   # midiG' 1 0 0.8
+   # midiG' "^77" 0 1
    -- # room 0.2 # dry 1
    -- # pan "<0.3!3 <0.7 0.3>>"