long time no git

live/ambient/citarpurh.tidal

+do
+-- setcps (134/60/4)
+-- resetCycles
+setcps (90/60/4)
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t f> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+--   $ midiOn "^42" (<| "k k k <k k*2 k <k [~ k] k*2 [~ . k*2 k*<1 2>]>>")
+--   $ midiOff "^42" (<| "k . <~!8 k!8> ~ ~ k")
+--   -- $ fix (|* gain 0.6) "jazz"
+  $ "[jazz]"
+d2 $ "~ s ~ s" 
+  # "snare:40"
+  # gain 0.9
+d3 $ "hh*[8 . 8 8 <8 16> <16!3 8>]"
+  -- # delay 0.4 # delayfb 0.2 # delayt 0.125
+d4 $ gF2 $ gM3 
+  $ slow 2 
+  $ note "d2" 
+  # "bassWarsaw"  
+  # legato 2 
+  # crushbus 41 (range 16 2.5 "^53")
+  # octersubbus 42 (range 0 2.5 "^33")
+d5 $ note (
+  scale "indian" (
+    "c e g e c" -- notes within scale
+    + "c5"      -- fundamental
+  )) 
+  # "cricri" # n "<3!3 1 2!3 1 3!3 2 1!3 2>" 
+  # legato 1.2
+  # cut 5
+  # room 0.4 
+  # octersub 0.4
+  # pan 0.3
+d12 $ slow 4 $ note (
+  scale "indian" (
+    "{c e g e, ~ ~ a ~}"
+    + "c5"
+  )
+  ) # s "cricri:3" # lpf 800
+d8 $ gF1 $ gM1 
+  $ slice 8 "0 <~!4 1!4> 2 <~!3 3>"
+  $ chop 8 
+  $ loopAt 2 
+  $ "jungle_breaks:24" 
+  # cut 8
+
+-- Raga-style phrases with slides
+d5 $ slow 3 $ note (
+  "{0 2 4 2, ~ ~ 7 ~}" -- typical raga phrase pattern
+  + scale "indian" "c5"
+  ) # "cricri:3" 
+  # legato 1.2 -- overlap for slides
+  # lpf 800 # lpq 0.2
+
+-- Tihai pattern (3x repetition landing on 1)
+d5 $ fast 3 $ note (
+  "0 2 4" + scale "indian" "c5"
+  ) # "cricri:3"
+
+
+-- once $ note "a" # "cpluck:" # cut 1

live/ambient/crutches.tidal

+do
+setcps (60/60/4)
+-- resetCycles
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gMute2 
+  $ midiOn "^30" (fast 2)
+  $ midiOn "^42"  ((<| "k k k <k k*2 k [~ k*2]>"))
+  $ midiOff "^42" (<| "k . <~!8 k(3,8)!8>")
+  $ "kick:5"
+  # cps ((range 60 120 "^29")/60/4)
+d2  $ gF1 $ gM1 
+  $ "~ s ~ s ~ s ~ s*2" 
+  # "vec1_snare:59" # gain 0.8
+  # room 0.4 # dry 0.9
+d3 $ gF1 $ gM1 $ "dr*[8 8 <8 <12 24>> 16]"
+d4 $ gF2 $ gM3
+  $ midiOn "^89" (ply 4)
+  $ superimpose (arp "up <up!3 down>" . (|+| note "c'maj9'8"))
+  $ superimpose (
+    (# lpf 5000) 
+    . (# crushbus 41 (range 16 4 "^53"))
+  )
+  -- $ midiOn "^"
+  $ note "<ef3 <fs3 bf3>>"
+  # "bassWarsaw" 
+  # room 0.8 # sz 0.5 # dry 1.1
+d9 $ gF2 $ gM3
+  $ midiOn "^89" (slice 8 "0*4") -- TODO Better button?
+  -- $ slice 4 "<0 1 2 3>"
+  -- $ chop 8 
+  $ loopAt 2 
+  $ "crutcher:1" 
+  # cut 4
+  # room 0.4
+  # octerbus 91 (range 0 1.4 "^19")
+  # crushbus 92 (range 16 3 "^18")
+d5 $ gF3 $ gM3 -- MAIN CRUTCH
+  $ midiOn "^90" (ply "2 <4 8>")
+  -- $ slice 4 "<0 1 2 3>"
+  $ chop 8 
+  $ loopAt 2 
+  $ "crutcher" 
+  # cut 5
+  # pan 0.3
+  # gain 1.4
+d7 $ gF3 $ gM3 -- SIDE CRUTCHES
+  -- $ slice 4 "<0 1 2 3>"
+  $ chop 8 
+  $ loopAt 2 
+  $ "crutcher" # n "<2!4 3!8 4!4 5!32>" 
+  # cut 7
+  # pan 0.8
+  # gain 1.3
+  # room 0.3
+d8 $ gF1 $ gM1
+  $ midiOff "^60" (mask "t(4,8,1)" . chop 16) -- Bouton Nassim <3
+  $ midiOn ("^92") ( -- Bouton Nassim <3
+    slice 16 "[0 .. 7] . <[0 .. 7]!7 [0 1 . [2 3]]>"
+    . loopAt 0.5 . (# "breaks165") . (# octersub 2)
+  )
+  $ midiOn "^36" (loopAt 0.5 . (# n 45))
+  $ midiOn "^56" (loopAt 0.5 . (# n 55))
+  $ loopAt 2 
+  $ chop 8
+  $ "jungle_breaks:24" # cut 8

live/collab/bobylito/exquis1.tidal

+do
+setcps (125/60/4)
+-- resetCycles
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gMute2 
+  $ "k*4" # "jazz"
+d2 $ gF1 $ gM1 $ "~ cp ~ cp*<1!3 [<2 4> 2]>" 
+  # "vec1_claps:1"
+d3 $ gF1 $ gM1 $ "~ h ~ h ~ h ~ <h h*2 h [~ h]>" # "ho:2"
+d4 $ gF2 $ gMute3 
+  $ slice 8 ("<0 1 2 3>" + "<0!8 4!8>") 
+  $ "bobylito" 
+  # cut 4
+  # room 0.3
+d5 $ gF3 $ gM3 $ slow 2 $ note "<<c [c@15 f]> <e [e@15 g]>>" 
+  # "90s_synatm:3" 
+  # cut 5
+d8 $ gF1 $ gM1 $ loopAt 2 
+  $ chop 8 $ "jungle_breaks:22" 
+  # cut 8
+  # hpf 500
+d9 $ gF3 $ gM3 $ note "<c f <e [e@3 g]>>" 
+  # "moog" # n 1
+  # cut 9
+  # room 0.2 # pan 0.2

live/collab/bobylito/l_espace.tidal

+do
+setcps (125/60/4)
+-- resetCycles
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gMute2 
+  -- $ midiOn "^41" (fast "<1!8 1 2 2 1 2 4 4 [4 8]>" )
+  $ midiOn "^42" (<| "k k k <k <k*2 [~ k]>>")
+  $ midiOff "^42" (fast 2 . (<| "k . ~ k ~ ~"))
+  $ "[808bd:3,jazz]"
+  # gain 1.8
+d2 $ gF2 $ gM2 
+  $ midiOn "^43" (fast "<1!8 4!24>")
+  $ "~ s*<1!7 [4 <2 4>]>" 
+  # "snare:32"
+  # note "-4"
+  # gain 1.3 # legato 0.35
+  # hpf 1300
+d3 $ gF1 $ gM1 
+  $ midiOn "^44" (fast 2 . (>| "~ hh ~ hh ~ hh ~ hh"))
+  $ midiOff "^44" (<| "dr*[8 <8 8 16 [32 16 32 16]>]")
+  $ "dr"
+-- d4 $ gF2 $ gM3 
+  -- -- $ note "<c3 c3 e3 c3>" 
+  -- $ slice 4 "<0 1 2 3>" 
+  -- $ "gfunk_bass:0"
+  -- # gain 1.6
+  -- # cut 4
+  -- # crushbus 41 (range 16 4.5 "^53")
+  -- # octersubbus 42 (range 0 1.5 "^33")
+d4 $ gF2 $ gM3 
+  $ fast 4 
+  $ arp "up" 
+  $ note ("<e3!4 a3!4>" + "c'sevenSus2'4")
+  -- $ slice 4 "<0 1 2 3>" 
+  # "bassWarsaw"
+  # gain 1.6
+  -- # cut 4
+  # crushbus 41 (range 16 4.5 "^53")
+  # octersubbus 42 (range 0 3.5 "^33")
+
+d5
+  $ arp "up"
+  $ note ("<g4 c5>" + "[c'min'4]") 
+  # "FMRhodes1" 
+  # modIndex 5
+  # gain 1.4
+d9 $ note "[~ g4]*4" # "moog:3" # cut 9
+d8 $ gF1 $ gM1 $ chop 8 
+  $ chop 8
+  $ loopAt 2
+  $ midiOn "^60" (mask "t(4,8,1)" . chop 2
+  )
+  $ midiOn "^56" (loopAt 0.5 . (# "breaks165"))
+  $ "jungle_breaks:45" 
+  # cut 8
+  # hpf 500
+  # gain 1.3
+
+  
+-- d4 $ gF2 $ gM2 
+--   $ midiOn "^57" (
+--     (|+| note ("0 . [<0 2 0 0> <7 7 8 7>](<3!3 5>,8)"))
+--     )
+--   $ midiOn "^89" (struct "t . t(3,8)")
+--   $ note "<fs3 d3 cs3 <b2 e2>>" 
+--   # "bassWarsaw"
+--   # crushbus 41 (range 16 2 "^53")
+-- d5 $ gF3 $ dMask $ gM3 -- Evasif
+--   $ superimpose (const 
+--       $ (0.125 ~>)
+--       $ midiOn "^42" (fast 2)
+--       $ slice 4 "<0 1 2 3>" 
+--       $ "numb:27/2" 
+--       # room 0.3
+--       # cut 51
+--       # lpf 3000
+--       |* gain ("^34")
+--       )
+--   $ midiOn "^90" (ply "<4!3 [8 8 16 <8 16>]>")
+--   -- $ slow 16 $ mask "t(8,16) t(8,16)" 
+--   $ chop 8
+--   $ "numb/2" 
+--   # cut 5
+--   # room 0.3
+-- d6 $ gF3 $ gM3 -- MoRE LIKE ME // LESS LIKE YOU
+--   $ whenmod 64 32 (stut 2 0.7 "e")
+--   $ (0.625 ~>) 
+--   $ "numb/2" # n (slow 2 $ ply 2 $ "<20 21>")
+--   # end 0.9
+--   -- # cut 6
+--   # room 0.4
+-- d7 $ gF3 $ gM3 -- SO NUMB 
+--   $ midiOn "^91" (superimpose (
+--       const 
+--         $ slow 8 
+--         $ ply 4 $ chop 4 $ "numb:11" 
+--       # cut 71 # hpf 5000 # pan "<0.8 0.2>" # gain 1.3)
+--     )
+--   $ slice 16 (slow 2 $ run 16) 
+--   $ n "<1 2>/2" 
+--   # "numb" 
+--   # gain 0.55
+--   # room 0.3
+-- d8 $ gF1 $ gM1 $ chop 8 
+--   $ midiOff "^60" (mask "t(8,16,1)" . chop 16)
+--   $ midiOn  "^36" (loopAt 2 . (>| "jungle_breaks:44"))
+--   $ midiOn  "^56" (loopAt 1 . (>| "jungle_breaks:19"))
+--   $ loopAt 2 $ "jungle_breaks:42" 
+--   # cut 8
+--   # gain 1.4
+-- d9 $ gF3 $ gF3 
+--   $ chop "<16!15 1>" 
+--   $ "numb:18/2" 
+--   # cut 9
+--   # end 0.35
+-- d10 $ gF3 $ gM3 -- Keys cloche 
+--   $ "numb:24" 
+--   # cut 10
+-- d11 $ gF3 $ gM3 
+--   $ "numb:25/2" -- Keys joie 
+--   # cut 11
+--   # room 0.4
+-- d12 $ gF3 $ gM3 $ "numb:26" -- KEYS ORAGE
+--   # cut 12
+--   # octerbus 120 (slow 32 $ range 0 "^16" perlin)
+--   # room 0.2
+--   # freezebus 121 (range 0 1 "^31")
+
+
+once $ "nujazz_keys120:20"

live/collab/bobylito/new_jam_nu_jazz.tidal

+do
+setcps (125/60/4)
+-- resetCycles
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gMute2 
+  -- $ midiOn "^41" (fast "<1!8 1 2 2 1 2 4 4 [4 8]>" )
+  $ midiOn "^42" (<| "k k k <k <k*2 [~ k]>>")
+  $ midiOff "^42" ((<| "k . ~ k ~ ~"))
+  $ "[808bd:3,jazz]"
+  # gain 1.4
+  -- # room 0.3 # dry 1.1 # sz 0.8
+d2 $ gF1 $ gM1 
+  $ midiOn "^43" (fast "<1!8 4!24>" . (<| "~ s*<1!7 [4 <2 4>]>"))
+  $ midiOff "^43" (<| "~ s ~ s")
+  $ "snare:40"
+  -- # note "-4"
+  -- # gain 1.8
+  -- # legato 0.35
+  -- # hpf 1300
+d2 $ gF1 $ gM1 $ "~ s ~ s" 
+  # "snare:24"
+  # gain 1.5
+d3 $ gF1 $ gM1 $ "~ h ~ h ~ h*<1!4 1 1 2 2> ~ h*<1!3 2>" 
+  # "h2ogmhh:4"
+  # "ho:1" 
+  # gain 1.2
+  # room 0.2
+d4 $ gF2 $ gM3 
+  $ superimpose (arp "up" . (|+| note "0 7 0 <7 9> 12"))
+  $ note ("<c c f c g f g f>" - 24)
+  # "bassWarsaw"
+  # gain 1.3
+  # crushbus 41 (range 16 3.5 "^53")
+
+d3 $ gF1 $ gM1 
+  $ midiOn "^44" (fast 2 . (<| "~ hh ~ hh ~ hh ~ hh"))
+  $ midiOff "^44" (<| "dr*[8 <8 8 16 [32 16 32 16]>]")
+  $ "dr" # "h2ogmsn:4"
+  # gain 1.3
+d4 $ gF2 $ gM3
+  $ midiOn "^89" (ply 8)
+  $ midiOn "^57" (fast 4) 
+  $ arp "up"
+  -- $ (off "0.125" (|+ note "12")) 
+  $ note (
+    -- "c g fs <<ef!3 ef5> ef>"
+    -- "[g5,[c6](<3 5>,8)]"
+    "[c@7 <ef bf4>]"
+    )
+  -- $ slice 4 "<0 1 2 3>" 
+  # "bassWarsaw" |- note 24
+  # gain 1.6 
+  # crushbus 41 (range 16 4.5 "^53")
+  # octersubbus 42 (range 0 3.5 "^33")
+  # pan 0.9  
+d5 $ gF3 $ gM3 
+  $ fast 4 
+  $ arp "up" 
+  $ note (
+    "<c'maj'4>"
+    + "<5!4 7!4>"
+    + "<0!8 12!8>"
+    )
+  -- $ slice 4 "<0 1 2 3>" 
+  # "FMRhodes2"
+  # gain 1.2
+  # pan 0.8
+  # room 0.9
+  # gain 1.3
+  -- # cut 4
+  # modIndex (range 0 4.5 "^53")
+  -- # octersubbus 42 (range 0 3.5 "^33")
+d7 $ gF3 $ gM3 $ "vocalOoh1/2" # n "<4 5>" # cut 7
+  # gain 1.2
+  # room 0.3
+d8 $ gF1 $ gM1
+  -- $ loopAt 2 
+  $ midiOff "^60" (mask "t(4,8,1)" . chop 16)
+  $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:20"))
+  $ midiOn "^56" (loopAt 2 . (# "jungle_breaks:19"))
+  $ midiOn "^92" ( -- Bouton Nassim <3
+    slice 16 "[0 .. 7] . <[0 .. 7]!3 [0 1 . [2 3]]>"
+    . loopAt 1 . (# "breaks165")
+    -- . (# octer 0.4) . ( octersubsub 4)
+    . (# lpf 2500)
+    . (# room 0)
+  )
+  $ chop 8 
+  $ "break:6"
+  # gain 1.4
+d11
+  $ "movie_wolf/4" 
+  # n (slow 4 $ "<2 3 6 18 2 14>") 
+  -- # cut 9
+  # "movie_dance" -- ???
+  # "movie_cat" -- SURPRISE CATS
+  # "movie_ends" -- CALIFORNIA
+  # room 0.3
+  # gain 1.3
+  
+d7 $ gF1 $ gM1  
+  $ slow 1
+  -- $ midiOn "^91" (ply "<[2 <2!4 4!3 8>] <2!4 8!3 [8 4]> 2 4>")
+  -- $ jux rev
+  $ chop "<8!3 16>"
+  $ chop 2  
+  $ loopAt 8
+  $ "break:2"
+  # gain 1.9
+  # pan "<0.2 0.4>"
+
+-- d6 $ gF2 $ gM2 $ "90s_matrix/4" # n "<0 0 1 2>" # cut 6 # gain 1.4
+d8 $ gF1 $ gM1 $ chop 8 
+  $ midiOff "^60" (mask "t(4,8,1)" . chop 16)
+  $ chop 8
+  $ loopAt 2
+  $ midiOn "^56" (loopAt 0.5 . (# "breaks165"))
+  $ "jungle_breaks:45" 
+  # cut 8
+  # hpf 500
+  # gain 1.3
+  
+d9 $ gF3 $ gM3
+  $ "90s_synatm:13/4"
+  # note (
+    "<c!8 g!8>"
+    -12)
+  # cut 9
+  # crushbus 91    (range 16 3 "^18")
+  # octersubbus 92 (range 0 1.3 "^19")
+  # room 0.8
+d10 -- CUES AND NOISES TODO Rework following
+  $ fix (# lpf 2000) "rampleD5:3" -- Porte spaciale
+  $ fix ((# legato 4) . (# cut 101) . mask "<f!3 t>" . slow 8) "risers"
+  $ "[<~!3 rampleD5:3>,risers:5]"
+  # gain 1.2
+d11 $ gF3
+  $ chop 4
+  $ "fx_gameboy/4" # n "<10!4 <11 12>!4>" -- LASERS!!!
+  # gain 0.7
+  # pan "<0.2 0.8>"
+d12 $ gF3 $ ""
+-- d4 $ gF2 $ gM2 
+--   $ midiOn "^57" (
+--     (|+| note ("0 . [<0 2 0 0> <7 7 8 7>](<3!3 5>,8)"))
+--     )
+--   $ midiOn "^89" (struct "t . t(3,8)")
+--   $ note "<fs3 d3 cs3 <b2 e2>>" 
+--   # "bassWarsaw"
+--   # crushbus 41 (range 16 2 "^53")
+-- d5 $ gF3 $ dMask $ gM3 -- Evasif
+--   $ superimpose (const 
+--       $ (0.125 ~>)
+--       $ midiOn "^42" (fast 2)
+--       $ slice 4 "<0 1 2 3>" 
+--       $ "numb:27/2" 
+--       # room 0.3
+--       # cut 51
+--       # lpf 3000
+--       |* gain ("^34")
+--       )
+--   $ midiOn "^90" (ply "<4!3 [8 8 16 <8 16>]>")
+--   -- $ slow 16 $ mask "t(8,16) t(8,16)" 
+--   $ chop 8
+--   $ "numb/2" 
+--   # cut 5
+--   # room 0.3
+-- d6 $ gF3 $ gM3 -- MoRE LIKE ME // LESS LIKE YOU
+--   $ whenmod 64 32 (stut 2 0.7 "e")
+--   $ (0.625 ~>) 
+--   $ "numb/2" # n (slow 2 $ ply 2 $ "<20 21>")
+--   # end 0.9
+--   -- # cut 6
+--   # room 0.4
+-- d7 $ gF3 $ gM3 -- SO NUMB 
+--   $ midiOn "^91" (superimpose (
+--       const 
+--         $ slow 8 
+--         $ ply 4 $ chop 4 $ "numb:11" 
+--       # cut 71 # hpf 5000 # pan "<0.8 0.2>" # gain 1.3)
+--     )
+--   $ slice 16 (slow 2 $ run 16) 
+--   $ n "<1 2>/2" 
+--   # "numb" 
+--   # gain 0.55
+--   # room 0.3
+-- d8 $ gF1 $ gM1 $ chop 8 
+--   $ midiOff "^60" (mask "t(8,16,1)" . chop 16)
+--   $ midiOn  "^36" (loopAt 2 . (>| "jungle_breaks:44"))
+--   $ midiOn  "^56" (loopAt 1 . (>| "jungle_breaks:19"))
+--   $ loopAt 2 $ "jungle_breaks:42" 
+--   # cut 8
+--   # gain 1.4
+-- d9 $ gF3 $ gF3 
+--   $ chop "<16!15 1>" 
+--   $ "numb:18/2" 
+--   # cut 9
+--   # end 0.35
+-- d10 $ gF3 $ gM3 -- Keys cloche 
+--   $ "numb:24" 
+--   # cut 10
+-- d11 $ gF3 $ gM3 
+--   $ "numb:25/2" -- Keys joie 
+--   # cut 11
+--   # room 0.4
+-- d12 $ gF3 $ gM3 $ "numb:26" -- KEYS ORAGE
+--   # cut 12
+--   # octerbus 120 (slow 32 $ range 0 "^16" perlin)
+--   # room 0.2
+--   # freezebus 121 (range 0 1 "^31")
+
+
+once $ "nujazz_keys120:20"

live/collab/cricri/citar1.tidal

+do
+-- setcps (134/60/4)
+-- resetCycles
+setcps (112/60/4)
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t f> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+  $ midiOn "^42" (<| "k k k <k k*2 k <k [~ k] k*2 [~ . k*2 k*<1 2>]>>")
+  $ midiOff "^42" (<| "k . <~!8 k!8> ~ ~ k")
+  -- $ fix (|* gain 0.6) "jazz"
+  $ "[jazz]"
+  # gain 0.9
+d2 $ gF1 $ gM1
+  $ midiOn  "^43" ((whenmod 4 3 (superimpose (("e" <~) . ply "<1 2 [4 2] [8 4]>" . (|* gain 0.95)))) . (<| "~ s ~ s*<1 <2 [2 4]>>") . (# legato 0.5))
+  $ midiOff "^43" (<| "~ <s <~ [~ s]>>")
+  $ "vec1_claps" 
+  # gain 1
+  # room (slow 16 $ range 0 0.8 perlin)
+  # sz 0.67 
+  # dry 0.9
+  # gain 0.8
+  -- # att 0.03 # rel 2
+d3 $ gF1 $ gM1 
+  $ midiOff "^44" (mask "t(4,8,1)")
+  $ "h*[<12 16 32 8> <8 [4 16]>]"
+  # "drum:2"
+  # gain 1.2
+  # room 0.3 # dry 0.8
+d4 $ gF2 $ gM3 
+  $ midiOn "^57" ( 
+    |+ note (arp "up" "<c'maj'4!8 g'maj'4!8> c'maj'4")
+  )
+  $ struct "t. t(<3 5 8>,8)"
+  $ note "<d3 e3 fs3 e3>" 
+  # "bassWarsaw" 
+  # gain 0.8
+  # room 0.4 # sz 0.4
+d5 $ gF3 $ gM3 
+  $ midiOn "^90" (ply "8 <8 16>")
+  $ slice 8 ("<0 1 2 3 4 5 6 7>")
+  -- $ loopAt 4
+  $ "cricri:7" 
+  # cut 5
+  # gain 1.2
+  # room 0.6 # sz 0.4 # dry 1.2
+  # octersubsub 0.8
+d11 $ gF3 $ gM3 
+  $ ("s" ~>)
+  $ slow 2
+  $ "cricri" # n "<0 1 2 3>"
+  # pan 0.3
+d7 $ gF1 $ gM1
+  -- $ fast 2 $ ply 2 $ slice 2 "<0 0 0 1>"
+  $ juxBy 0.2 (rev)
+  $ loopAt 2 
+  $ chop 8
+  $ "trance_loops:3" 
+  # cut 8
+  # room 0.4 # dry 0.9
+  # att 0.24 # rel 2
+  # gain 1
+  # octersub (slow 16 $ range 0 1.9 saw)
+  # pan (segment 16 $ range 0.07 0.93 (slow 4 perlin))
+  # room (slow 16 $ range 0 0.9 saw) 
+  # sz 0.8 # dry 0.9
+d8 $ gF1 $ gM1
+  $ fast 2 $ ply 2 $ slice 2 "<0 0 0 1>"
+  $ loopAt 2  $ chop 8
+  $ "jungle_breaks:16" 
+  # cut 8
+  # room 0.4 # dry 0.9
+  # att 0.24 # rel 2
+  # gain 0.8
+  # pan 0.8
+d9 $ gF3 $ gM3 
+  $ slow 2 $ note "<a fs e fs>" 
+  # "90s_glassatm:2" 
+  # room 0.8 
+  # gain 0.5
+  # legato 2 # att 0.01 # rel 2
+  # cut 9
+  
+
+d4 
+  $ arp "up" $ slow 4 $  note (scale "indian" (run 8)) 
+# "cricri:3" # gain 1.3 # cut 4
+# lpf 400
+# gain 2
+
+once $ note "a" # "cpluck:" # cut 1

live/collab/raph/aria_sans_serif.tidal

+resetCycles
+
+do
+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 width = pF "width"
+let fundamental = slow 4 $ "<gb3'maj db3'maj bb2'min bb2'maj>"
+setcps (160/60/4)
+d1 $ gF1 $ gMute2
+  -- $ midiOff "^42"  (<| "<k [~!7 k*<1 2>]>")
+  $ fix (# bandf 300) "clubkick"
+  $ midiOff "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
+  $ midiOn "^42" (<| "k  k . k <k [~ k] k k*2>")
+  $ "[jazz,clubkick]"
+  # cut 1
+  # gain 1.5
+d2 $ gF1 $ gM1
+  $ midiOn "^43" (<| "~ s ~ [s*<1 2> <~!7 [~ s]>]")
+  $ midiOff "^43" (<| "~ s")
+  $ "snare:45"
+  # "jazz:4" # gain 1.3
+d3 $ gF1 $ gM1 
+  $ midiOff "^44"  (
+    (<| "h(3,8)") . (# "jbk_kick:43")
+    . (# room 0.2) . (# sz 0.4)
+    )
+  $ midiOn "^44" (<| "~ h ~ h ~ h*<1!3 2> ~ h*<1 [1|2]>")
+  $ "h2ogmhh" # n "<0!4 1!3 2>"
+  # gain (1.4 * (range 0.9 1.2 perlin))
+d4 $ gF2 $ gM3
+  $ midiOn "^89" (ply 4)
+  $ slow 2 $ note ("<[e3@7 f3]!4 [b2@7 c2]!4>") 
+  # "moog:2" 
+  # cut 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # octerbus 42 (range 0 2.5 "^33")
+  # gain 1.1
+d5 $ gF2 $ gM3  -- 
+  $ midiOn "^90" ((# n ("<0>" + "<0 0 0 [0 0 1 0] 3 5 4 5>"))
+  . (ply 4) . (slice 4 2))
+  $ midiOn "^58" (
+    slice 4 "0 1 2 3"
+    . (>| n "<2 2 2 2 4 4 4 4>")
+    )
+  $ midiOff "^58" (slow 2)
+  $ whenmod 16 12 (# n 8)
+  $ "oil" 
+  # n (
+    slow 2 $ ply 2 $ "<0 1 2 3 4 5 6 7>/2"
+  )
+  # room 0.4 # sz 0.6 #dry 1.3
+  # cut 5
+  # gain 1.4
+  # squizbus 51 (range 0 2.5 "^54")
+d7 $ gF3 $ gM3
+  $ midiOn "^89" (ply 4)
+  -- $ slow 2 
+  $ note (
+    "<e3!4 b2!4>") 
+  # "acidOto3091" 
+  # cut 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # octerbus 42 (range 0 2.5 "^33")
+  # gain 1.1
+d8 $ gF1 $ gM1
+  $ midiOn ("^60" - "^92") (mask "f(4,8)")
+  $ midiOn ("^36" - "^92") ((loopAt 2) . (# hpf 1500) . (# "jungle_breaks:45")) -- ORL RPZ
+  $ midiOn ("^56" - "^92") ((loopAt 2) . (|* gain 1.1) . (# "jungle_breaks:30")) -- Clochettes?
+  $ midiOn ("^92") ( -- Bouton Nassim <3
+    slice 16 "[0 .. 7] . <[0 .. 7]!7 [0 1 . [2 3]]>"
+    . loopAt 1 . (# "breaks165") . (# octersub 2)
+    . (|* gain 0.9)
+  )
+  $ chop 16
+  $ loopAt 1
+  -- $ loopAt 2
+  $ "jungle_breaks:28" -- BREAKS LOVER <3
+  # room 0
+  # gain 1
+
+--   $ chop 8 
+--   $ loopAt 4 
+--   $ midiOn "^57" ( -- HIGHER
+--     slow 2 . ply 2 . 
+--     (# n "<1 1 2 2 6 6 6 1 16 16 17 18>" )
+--   )
+--   $ midiOff "^57" ( -- LOWER
+--     (# n "<5 5 5 6>")
+--     )
+--   $ "perfect" 
+--   # room 0.4 
+--   # sz 0.4
+--   # octersub 0.4
+--   # crushbus 41 (range 16 4.5 "^53")
+--   # octersubbus 42 (range 0 2.5 "^33")
+--   # octersubbus 43 (range 0 5 "^17")
+--   # cut 4 
+--   # gain 1.4
+-- d5 $ gF3 $ gM3 -- COUNT TO SUPERSTARDOM
+--   $ midiOn "^29" (
+--     slice 16 "<<[0 1 2 3] [<0 10> <1 11> 10 11]> <[8 9 10 11] [<12!3 15> <13!3 15> <14 12> <15 13>]>>" 
+--     . (>| "perfect")
+--     )
+--   $ midiOn "^90" (ply "<2 4>")
+--   $ midiOn ("^34" - "^18") ( -- THE HIPS THE FACE THE LIPS THE MICROPHONE 
+--     slice 4 (fast 2 
+--       . ply "<1!16 <2 1>!16>" 
+--       . "<0 1 2 3>") 
+--     . (# n 14) . (|* gain 0.8)
+--     )
+--   $ midiOn "^18" -- SUPERSTAR
+--     (
+--       -- mask "<t f!3>" 
+--       loopAt 4
+--       . (0.5 ~>)
+--       . (# n 8)
+--       . mask "<t!4 t f t t>"
+--       . (# end "<0.18!3 0.45 1!4>")
+--       . (# begin "<0!4 0.5!4>")
+--       . (|* gain 1.3)
+--       )
+--   $ midiOn ("^58") ( -- Slice 1 2 3 4!
+--     slice 8 "<[0 1] [0 1] [0 0 <0 1> <1 0>] [2 3]>" )
+--   $ midiOff ("^58"+"^29") ( -- WATCH ME WORK IT
+--     slice 8 "<[0 1] [2 3] [4 5] [6 <7 <6 6*2>>]>"
+--     )
+--   $ "perfect" 
+--   # cut 5
+--   # room 0.4 # sz 0.39
+--   # pan "0.2 0.8 0.2 0.8"
+--   # gain 1.8
+--   # octersub 0.8  
+-- d6 $ gF1 $ gM3 
+--   $ mask "f t" 
+--   $ midiOn "^89" (ply "<4 8>")
+--   $ chop 16
+--   $ "meth_bass:3/8" 
+--   # room 0.4 
+--   # sz "<0.7!3 1.1>"
+--   # delay 0.8 # delayt 0.125 # delayfb 0.5
+--   # gain 1.4
+--   # cut 6
+-- d7   -- $ gF3 $ gM3 
+--   $ midiOn "^59" (off (1/16) (|+ note 7))
+--   $ note (
+--     fast 2 
+--     "<[f3 <bf3!2 bf3!2 cs4!2 f4!2> <cs4!2 gs4!2> f4]>"
+--      + "[0,<0!8 12!8>]"
+--     )
+--   # s "acidOto3092"
+--   # gain 1.4
+--   # width (range 0.5 0.98 "^35")
+--   # crushbus 71  (range 16 3.5 "^55")
+--   # cutoff (slow 3 $ range 300 3000 (sine * saw)) -- more erratic filter
+--   # room 0.2 # sz 0.4 
+-- d12 $ gF3 $ gM3 -- Acid techno arp with structured rhythms
+--   $ note (slow 2 $ 
+--         "<[bf2 . cs3 [ef3 bf3]] [cs3 ef3 . bf3] [ef3 . [bf3 cs4] ef3] [[bf3 gs3] . cs3 ef3]>")
+--     # s "acidOto3091" 
+--     # gain 1.3
+--     # cutoff (slow 4 $ range 400 2500 saw)  -- classic acid filter sweep
+--     # resonance 0.3
+--     # accelerate (choose [0, 0.1, -0.1]) -- slight pitch drift
+--     # room 0.2 # sz 0.3
+-- d8 $ gF1 $ gM1 
+--   $ midiOff "^60" (mask "t(<4 [<2 4> 8]>,8,1)" . chop 8)
+--   $ midiOff "^56" (
+--     slice 8 "0 1 <2!3 ~> <3!3 0> <4!3 1> 5 <6!12 ~!3 6*4> 7*<1 2 0 8>")
+--   $ midiOn "^56" (loopAt 2 . (# "jungle_breaks:19"))
+--   $ chop 8 
+--   $ loopAt 1 
+--   $ "breaks165" 
+--   # cut 8
+--   # gain 1.2 
+-- d9 $ gF2 $ gM3-- slow arpeggiated synth, high register 
+--   $ mask "t <f!8 t!8> <f!4 t!4> <f!8 t!8>"
+--  $ fast 4
+--  $ arp "up" 
+--  $ note (slow 2 $ "<bf4'min cs4'maj ef4'min bf4'min>")
+--  # "90s_synatm:3" |+ note 12  -- or "foo" 
+--  # room 0.7 # sz 0.9
+--  # delay 0.5 # delaytime (1/3) # delayfb 0.4
+--  # lpf 1400
+--  # cut 9
+-- d10 -- Euclidian mid arps
+--  $ struct "t(5,8,2)" 
+--  $ note (slow 2 $ "<bf3 cs4 ef3 bf3>" + "<0 7 12>")
+--  # s "moogBass"
+--  # gain 1.2
+--  # room 0.5 # sz 0.6
+--  # lpf (slow 4 $ range 2000 3500 sine)
+-- -- d11: sparse chord stabs, ambient pad
+-- d11 
+--  -- $ slow 8
+--  $ note (slow 2 $ "<bf3'min'5 cs3'maj'5 ef3'min'5 bf3'min'5>")
+--  # s "sine" |- note 12
+--  # gain 1.4
+--  # attack 0.5 # release 2
+--  # room 0.9 # sz 0.95
+--  # lpf 3000
+--  # delay 0.7 
+--  # delayt "e" 
+--  # delayfb 0.8

live/collab/raph/biscuit_acide.tidal

+do
+setcps (128/60/4)
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute1 = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM1 = gMask . gMute1
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+  $ midiOn "^42" (<| "k k k <k <k*2 [<~!3 k> k*<1 2>]>>")
+  $ midiOff "^42" (<| "k . ~ k")
+  $ "kick:5" 
+  # gain 1.8
+d2 $ gF1 $ gM1 
+  $ "~ s ~ [s*<1 2> <~ s*<2 [4 2]>>]"
+  # "vec1_snare" # gain 1.4
+d3 $ gF1 $ gM1 
+  $ midiOn "^44" (sometimes rev . stut 3 0.8 "s")
+  $ "~ h ~ h ~ h ~ h" 
+  # "ho:2" # gain 1.1 # cut 3
+d4 $ gF2 $ gM3 -- LA ACID BASS DOUBLE AMOUR
+  $ midiOn "^57" (superimpose (
+    (0.25 ~>) . (|+ note "[7 12 7 <7 12>]")
+    . (# pan 0.7)
+    . (# squizbus 41 (range 0 4 "^53"))
+    . (|* gain 1.3)
+    ))
+  $ note (
+    "fs [fs a] <a [fs a]> fs fs <a!3 e>" 
+    + "c4"
+    )
+  # "vec1_acid:0" |+ note 3 # legato 0.7
+  # room 0.3
+  -- # cut 4
+  # octersubbus 42 (range 0 2.5 "^33")
+  -- |+ note 3
+d9 $ gF3 $ gM3 
+  $ sometimesBy "^18*4" (ply 4)
+  $ note "<fs a b cs>/2" # "moog" # n "<0!8 1!8>"
+  # room 0.3
+  # gain 1.4
+  # crushbus 91 (range 16 2.5 "^19")
+  # cut 9
+  

live/collab/raph/coffee_pot.tidal

+
+d4 $ "coffee" # cut 4

live/collab/raph/des_efforts.tidal

+do
+setcps (120/60/4)
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ "jazz*4" # lpf 3000
+d1 $ gF1 $ gM2 
+  $ "[jazz,kick:5]*4"
+d2 $ gF1 $ gM1 $ dMask
+  $ fix (
+    (# lpf 800) . 
+    (|* gain (slow 16 $ range 0.5 1.35 saw))
+    ) "cp"
+  $ "~ cp ~ cp*<1!3 2>" 
+  # "[h2ogmcy:1,cp]" 
+  # gain 1
+d3 $ gF1 $ gM1 $ dMask 
+  $ midiOff "^76" (mask "t(4,8,1)")
+  $ midiOn "^44" ((# "vec1_snare") -- Mechant drum-snare!!
+  . (struct "t t t t t t*<1 2 1 1> ~ t*<1!3 2>")
+  )
+  $ midiOff "^44"(<| "~ h ~ h [~ <~!4 h!4>] h*2 ~ h*<1!15 2>" )
+  $ "h2ogmhh:19"
+  # legato "<0.33!16 0.5!16 0.75!16 1!16>"
+  # hpf (slow 32 $ range 200 8000 sine)
+d4 $ gF2 $ gM3 
+  $ midiOn "^57" (superimpose ((0.25 ~>) 
+  . (|+| note (
+    "[0 7 0 12]*2" + 
+    "0 0 0*<1!4 2!4> 0*<1 2 1 2 2!3 4>"
+    + "<12!6 24 [24 . 12 0]>"
+    ))))
+  $ midiOn "^89" (ply "<4!3 [4 8] [4 8] 8 [4 8] [4 1] [16 8]*2!8>")
+  $ note "<g3 g3 bf3 d3>" 
+  # "bassWarsaw"
+  # gain 1.2
+  # crushbus 41 (range 16 4 "^53")
+  # octersubbus 42 (range 0 2.5 "^33")
+  # room 0.2
+  # sz 0.2
+d5 $ gF3 $ gM3
+  $ midiOn "^90" (ply "4 8")
+  $ midiOn "^59" (<| n "<[0 0 1 0]!3 0 0 ~ 0 1 2 ~ 2 ~ 2 ~ 2 2*<1 2>>" )
+  $ midiOff "^59" (<| n "<0 1>") 
+  $ "law_adri"
+  # cut 5
+  # pan 0.8
+d7 $ gF3 $ gM3
+  $ midiOn "^91" (ply "<2 2 [4 2] 8>")
+  $ "law_adri" 
+  # n "<4!4 5!4 5!4 8 8 5 89 10 9*2 9*2 11 12 13 14>" 
+  # room 0.3
+  # pan 0.3
+  # cut 7
+d8 $ gF1 $ gM1
+  $ midiOff "^60" (mask "t(4,8,1)")
+  $ chop 16 
+  $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:45"))
+  $ midiOn "^56" (loopAt 2 . (# "jungle_breaks:19"))
+  $ loopAt 1 $ "breaks165" 
+  # gain 1.1

live/collab/raph/esperluette.tidal

+do
+setcps (140/60/4)
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute1 = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM1 = gMask . gMute1
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+  $ midiOn "^42" (<| "k*4")
+  -- $ midiOff "^42" (<| "k . ~ k")
+  $ "kick:5" 
+  # gain 1.5
+d2 $ gF1 $ gM1 
+  $ "~ s ~ [s*<1 2> <~ s*<2 [4 2]>>]"
+  # "vec1_claps" # n 10
+  # gain 1.8
+d3 $ gF1 $ gM1 
+  $ "[~ h*<1!3 <1 2 [4 2] 1?>>]*4" 
+  # "h2ogmhh" # gain 1.4
+  # room 0.3 
+  # dry (slow 16 $ range 0.2 1.8 perlin)
+  # sz 0.4
+d4 $ gF2 $ gM3 
+  $ midiOn "^89" (ply 16)
+  $ note "<gs2 gs2 gs2 ef3>" 
+  # "bassWarsaw"
+  # gain 1.4
+  # crushbus 41 (range 16 3.5 "^53")
+  # octerbus 42 (range 0  1.5 "^33")
+  # room 0.3
+d5 $ gF2 $ gM3 
+  $ midiOn "^89" (ply 16)
+  $ note "<gs2 gs2 gs2 ef3>" 
+  # "bassWarsaw"
+  # gain 1.4
+  # crushbus 41 (range 16 3.5 "^53")
+  # octerbus 42 (range 0  1.5 "^33")
+  # room 0.3
+d9 $ gF3 $ gM3 
+  $ note ("<gs gs gs ef>" 
+  + "<[0]!16 [[0 <12 5> 0]. 7(<1 3>,8)]!16>"
+  )
+  # "moog:3"
+  # gain 1.4
+  # crushbus 91 (range 16 3.5 "^19")
+  -- # room 0.3 
+  # cut 9
+d5 $ gF3 $ gMute3 -- PRAISE YOU VOICE.
+  -- $ midiOn "^90" (ply 16)
+  -- $ midiOn "^58" (ply 4 . (# begin 0) 
+  -- . (# end 0.115) -- A LONG LONG WAY
+  -- ) 
+  $ midiOn "^58" (slice 8 (run 4))
+  $ n "3"
+  # "praise" 
+  # cut 5
+  # pan 0.3
+  # room 0.3
+  # gain 1.5
+d8 $ gF1 $ gM1
+  $ midiOn "^92" (ply "1 <2!3 4>")
+  $ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
+  $ midiOn ("^36" - "^56") ((# n "22")) -- Hmmm Break
+  $ midiOn "^56" ((# n "23")) -- Raise COMEON!
+  $ chop 16
+  $ loopAt 2
+  $ "jungle_breaks:45"
+  # cut 8
+  # gain 1.3
+
+-- d8 $ gF1 $ gM1
+--   $ midiOn "^92" (ply "<2 2 4 2 4 4 8 [8 16]>")
+--   $ midiOff "^60" (mask "t(4,8,1)" . chop 8)
+--   $ loopAt 1 
+--   $ chop 8
+--   $ midiOn "^56" (>| "jungle_breaks:50")
+--   $ "jungle_breaks:25" 
+--   # cut 8
+--   # gain 1.4
+--   # hpf 500
+-- d10 $ gF1 $ "risers:0" # cut 10
+-- d11 $ gF3 $ gM3 -- GUITARS OF LOVE
+--  $ loopAt 2 $ "praise:16" # cut 11
+--  # gain 1.5
+--  # room 0.4 # dry 1.1 # sz 0.6
+--  # crushbus 110 (range 16 2.8 "^16")
+--  # pan 0.1
+-- d12 $ gF3 $ gM3 -- GUITARS OF LOVE
+--   $ loopAt 2 $ "praise:17" # cut 11
+--   # gain 1.5
+--   # room 0.4 # dry 1.1 # sz 0.6
+--   # crushbus 111 (range 16 2.8 "^16")
+--   # pan 0.9
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 

live/collab/raph/long_way.tidal

+do
+setcps (102/60/4)
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute1 = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM1 = gMask . gMute1
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+  $ fast 2 
+  $ midiOn "^42" (<| "k k k k*<1 2>")
+  $ midiOff "^42" (<| "k . ~ k ~ ~")
+  $ "kick:5" 
+  # gain 1.8
+d2 $ gF1 $ gM1 
+  $ fast 2 $ "~ s ~ [s*<1 2> <~ s*<2 [4 2]>>]"
+  # "vec1_snare" # gain 1.4
+d3 $ gF1 $ gM1 
+  $ "[~ h*<1!3 <1 2 [4 2] 1?>>]*4" 
+  # "h2ogmhh" # gain 1.4
+d4 $ gF2 $ gM3 
+  $ midiOn "^57" (>| n "12 12(<1 1 3 4 4!4 8!16>,8)")
+  $ midiOn "^89" (ply 16)
+  $ "praise" 
+  # n "<12 12 13 13 14 14 15 15 12!4 13!4 14!4 15!4 12 13 14 15>" 
+  # cut 4 
+  # gain 1.7
+  # crushbus 41 (range 16 2.5 "^53")
+  # octerbus 42 (range 0 1.2 "^33")
+d7 $ gF3 $ gM1 
+  $ midiOn "^59" (slow 1 . slow 2 . slice 8 "0 1 2 3*<1 <2 4>> 4*2 5*2 [6 7]*<1 <2 4>> 7*4")
+  $ midiOn "^91" (slice 8 "0 1 2 3")
+  $ "praise:1/2" 
+  # cut 7
+  # gain 1.4
+d5 $ gF3 $ gMute3 -- PRAISE YOU VOICE
+  $ midiOn "^90" (ply 16)
+  $ midiOn "^58" (ply 4 . (# begin 0) 
+  . (# end 0.115) -- A LONG LONG WAY
+  ) 
+  $ "praise/8" 
+  # cut 5
+  # pan 0.3
+  # room 0.3
+  # gain 1.3
+d8 $ gF1 $ gM1
+  $ midiOn "^92" (ply "<2 2 4 2 4 4 8 [8 16]>")
+  $ midiOff "^60" (mask "t(4,8,1)" . chop 8)
+  $ loopAt 1 
+  $ chop 8
+  $ midiOn "^36" (>| "jungle_breaks:80")
+  $ midiOn "^56" (>| "jungle_breaks:50")
+  $ "jungle_breaks:25" 
+  # cut 8
+  # gain 1.4
+  # hpf 500
+d10 $ gF1 $ "risers:0" # cut 10
+d11 $ gF3 $ gM3 -- GUITARS OF LOVE
+ $ loopAt 2 $ "praise:16" # cut 11
+ # gain 1.5
+ # room 0.4 # dry 1.1 # sz 0.6
+ # crushbus 110 (range 16 2.8 "^16")
+ # pan 0.1
+d12 $ gF3 $ gM3 -- GUITARS OF LOVE
+  $ loopAt 2 $ "praise:17" # cut 11
+  # gain 1.5
+  # room 0.4 # dry 1.1 # sz 0.6
+  # crushbus 111 (range 16 2.8 "^16")
+  # pan 0.9
+  
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 

live/collab/raph/piment_bresilien.tidal

+do
+setcps (124/60/4)
+let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
+let gMute1 = (midiOn "^73" (mask "f*16"))
+let gMute2 = (midiOn "^74" (mask "f*16"))
+let gMute3 = (midiOn "^75" (mask "f*16"))
+let gM1 = gMask . gMute1
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM2 
+  $ midiOn "^42" (<| "k*4")
+  -- $ midiOff "^42" (<| "k . ~ k")
+  $ "kick:5" 
+  # gain 1.5
+d2 $ gF1 $ gM1 
+  $ "~ s ~ [s*<1 2> <~ s*<2 [4 2]>>]"
+  # "vec1_claps" # n 10
+  # gain 1.8
+d3 $ gF1 $ gM1 
+  $ "[~ h*<1!3 <1 2 [4 2] 1?>>]*4" 
+  # "h2ogmhh" # gain 1.4
+  # room 0.3 
+  # dry (slow 16 $ range 0.2 1.8 perlin)
+  # sz 0.4
+d4 $ gF3 $ gM3 
+  $ note "<bf2 bf2 bf2 [bf2@7 cs3]>" 
+  # "bassWarsaw"
+  # room 0.3 
+  # crushbus 41 (range 16 3.5 "^53")
+  # room 0.2 # dry 1.2 # sz 0.7
+  # gain 1.2
+d5 $ gF3 $ gM3  -- LE PIMENT BRESILIEN
+  $ midiOn "^90" (ply "<4!3 8>")
+  $ midiOn "^58" (striate "2" . chop 8)
+  $ slice 4 "<0 1 2 3>" 
+  $ "gfunk_lead:2" # cut 5
+  # gain 1.7
+  # room 0.3
+  # octerbus    51 (range 0 1.4 "^54")
+  # octersubbus 52 (range 0 2 "^34")
+d7 $ gF3 $ gM3
+ $ note ("[f3 cs3 c3 cs3 f3 cs3 <c3 f3> <cs3 fs3>]"
+ -- + "[0,12]" 
+ +"<0!4 12!4 24!4 36!4>"
+ )
+ # "FMRhodes2"
+ # gain 1.5
+ # modIndex (range 0 16 "^55")
+ -- # cut 9
+d10 $ gF3 $ gM3 -- Menace
+ $ note "<bf3 ~ ~ <~ <[~!7 b3] [f4 cs4 c4 cs4 f4 cs4 c4 cs4]>>>"
+ # "90s_synatm:10"
+ # room 0.3 # sz 0.8
+ # gain 2
+ # att 0.10
+ # rel 10
+ # crushbus 101 (range 16 3.5 "^14")
+ # legato 2
+ # octersub 1
+ # cut 9
+d8 $ gF1 $ gM1 -- La Boite à breaks de ParVagues <3
+  $ midiOn "^92" (ply "1 <2!3 4>")
+  $ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
+  $ midiOn ("^36" - "^56") ((# n "22")) -- Hmmm Break
+  $ midiOn "^56" ((# n "23")) -- Raise COMEON!
+  $ chop 16
+  $ loopAt 2
+  $ "jungle_breaks:45"
+  # cut 8
+  # gain 1.4
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 
+-- 

live/midi/nova/acid/la_dub_sour.tidal

+-- C'est la Dub Sour
+-- Sucree Acidulee
+-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
+do
+setcps (135/60/4)
+-- resetCycles
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 width = pF "width"
+let curve = pF "curve"
+-- out = 0, gate = 1, freq = 440, amp = 0.1, pan = 0, att = 0.001, dec = 0.5, sus = 0.1, rel = 0.5, curve = -4,
+let rq = pF "rq "
+let filterRange = pF "filterRange"
+let lagTime = pF "lagTime"
+d1 $ gF1 $ gM2
+  $ midiOn  "^42"  (<| "k k k <k k*2 k [~ <k <k? k*2>>]>")
+  $ midiOff "^42" (<| "k  . ~ k ~ ~")
+  $ "[jazz,kick:4]"
+  # gain 1.4
+d2 $ gM1 $ gF1 -- Clap timer
+  $ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c"))
+  $ midiOff "^43" ((|* gain "1 0.8") . (<| "~ c . ~ ~ ~ <~!3 c>"))
+  $ drumFrom "[sakatadpm48,rolandr8]" "cp"
+  # lpf 2000
+  # gain 1.8
+d3 $ gF1 $ gM1 -- Drumroll chaser de highs technooo
+  $ midiOn "^76" (struct "t([16 . <16 32> <16!3 <8 32>>],16)" . (# n 20))
+  $ midiOff "^76" (<| "~ h ~ h ~ h*<1 2> ~ h") 
+  $ "h2ogmhh" 
+  # n "<19!4 20!4 19!8 20!8 19!16 20!16>"
+d4 $ gF3 $ gM3 -- Smooth Wobble LPF modulated bass
+  $ midiOn "^89" (ply "<<2!4 4!4> <2!3 4> <4!4 8!4> [8 <6 16>]>" . fast 2)
+  $ slow 4 $ note ("<[f@3 [g f] . c]!3 [c@3 [ef g] . f]>"
+   - 24)
+  # "bassWarsaw" 
+  # "giorgio_syn:32" |+ note 24 
+  -- Perplexity's Light Wobble, via LFO cut-off modulation
+  # lpf (range 200 3000 $ slow 8 sine)
+  # lpq 0.3
+  # room 0.4
+  # sz 0.5
+  # cut 4
+  # crushbus 41 (range 16 2.5 "^53")
+  # octersubbus 42 (range 0 4 "^33")
+  # gain 1.2
+  # pan 0.3  
+d5 $ gF3 $ gM3  -- ACID SYNTH <3
+  $ midiOn "^58" (|- note 12)
+-- out = 0, gate = 1, freq = 440, amp = 0.1, pan = 0, att = 0.001, dec = 0.5, sus = 0.1, rel = 0.5, curve = -4,
+-- // Other Controls
+-- // width is 0 - 1
+-- // filterRange is in octaves
+  $ struct "t(<16!7 <8 [8 32]>>,16)" 
+  $ note ("<[f@3 [g f] . c]!12 [c@3 [ef g] . f]!4>")
+  # "acidOto3092"
+  |+ note ("[0,<0!4 12!4>]" + "[0,12]")
+  # room 0.14 # sz 0.05 # dry 0.9 
+  # pan 0.7
+  # width (range 0.05 0.5 "^54")
+  # filterRange (range 0 6 "^34")
+  # gain 1.4
+  # room 0.2 # sz 0.2 # dry 0.98
+-- d5 $ gF2 $ gM3 -- Giorgio Friendo
+--   $ slow 2 
+--   $ stack [
+--     note ("c3(3,8) <d3 <d3*2 d3(3,8)>> e3([3 1 3],8) <g3 [g3 <e3 d3>]>" 
+--     + "<0!7 -3>" 
+--     + 24) 
+--     # "giorgio_syn:7" 
+--     # cut 51
+--     # gain 0.7 
+--     # att 0.14 # rel 2 
+--     # legato 1.2
+--     ,
+--     note "<c3 g2 a2 f2>" 
+--     # "FMRhodes1" 
+--     # gain 1.0 
+--     # legato 1.5
+--   ]
+--   # room 0.8 # size 0.8
+--   # gain 2
+--   # pan 0.3
+--   # crushbus 51 (range 16 3.5 "^54")
+-- d12 $ gF3 $ gM3
+--   -- $ midiOff "^29" (# delay 0)
+--   $ slow 4 $ ply 2
+--   $ note "<[c4,e4,g4] [c4,f4,a4] [c4,e4,g4] [g3,b3,d4]>"
+--   # "FMRhodes2"
+--   # legato 2
+--   # delay (range 0 1 "^29") 
+--   # delayt 1.125  
+--   # delayfb 0.8
+--   # gain 1.4
+--   # lpf (slow 16 $ range 800 2000 sine)
+--   # room 0.4
+-- d7 $ gF3 $ gMute3 -- Lady Perplexity
+--   -- $ whenmod 8 7 (# silence)
+--   $ midiOn "^91" (ply "2 4 <8 8 4 16>")
+--   $ midiOn "^59" (chop 4)
+--   $ someCyclesBy "^19" (mask "t(3,8) t(<3 <5 8>>,8) t(<3 [<5 3> <3 5>]>,8) t(<3!3 5>,8)")
+--   $ sometimesBy "^35" (juxBy 0.25 (loopAt 0.5 . (# cut 71) . (|* gain (slow 8 $ range 0.7 1 saw))))
+--   $ sometimesBy "^55" (rev)
+--   -- $ midiOff "^59" (chop 4)
+--   $ chop 16 
+--   $ loopAt 8
+--   $ "rhadamanthe_vocal:1"
+--   # cut 7
+--   # pan 0.6 
+--   # room 0.4 # sz 0.5 # dry 1.4
+--   -- # pan (slow 16 $ range 0.9 0.6 saw)
+--   # gain 1.2
+d8 $ gF1 $ gM1 
+  $ midiOn "^92" (slice 4 "0 1 2 3 0 1 3 3 1 3 1 2 0 1 3*2 3*2")
+  $ midiOff "^60" (mask "t(4,8,1)")
+  $ midiOn "^36" (loopAt 2 . (# "break:2"))
+  $ midiOn "^56" (loopAt 2 . (# "jungle_breaks:90"))
+  $ chop 16 
+  $ loopAt 1 $ "jungle_breaks:2" # cut 8
+  # room 0.3 # dry 1.4 # sz 0.3
+  # lpf 5000
+  # gain 1.7
+
+
+once $ "reeseBass"

live/midi/nova/breaks/jesus_loves_disco.tidal

+
+do
+setcps (130/60/4)
+-- resetCycles
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t f> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+d1 $ gF1 $ gM1 
+  $ midiOn "^42" (<| "k k k <k k*2 k [~ k?]>")
+  $ midiOff "^42" (<| "k . k" )
+  $ "[kick:5,808bd:5]" 
+  # gain 1.4
+d2 $ "~ s ~ s" # "vec1_snare:30"
+d3 
+  $ "~ h ~ h ~ h ~ h*<1!3 [<2 4> 2]>" # "h2ogmhh" 
+  # n "<1!7 2 1!7 2 2!4 3!4>" 
+  # gain 1.4
+d5 $ gF3 $ gM3 
+  $ superimpose ((# cut 51) . (jux (# cut 52)) .
+  (midiOn "^90" (ply 4)) .
+  (# begin 0.79) . (# end 0.85) . (# pan 0.8) . (# hpf 3000)
+  . (# gain "^54")
+  )
+  $ midiOn "^58" (slow 2)
+  $ "rhadamanthe_melo:20/4" 
+  # cut 5
+  -- # pan 0.3
+  
+once$ "rhadamanthe_melo:20" 
+# begin 0.79 
+# end 0.85 
+# cut 5
+
+
+
+movie_haunted : "HM PlayingGod", "HM LittleDevil", "HM Midnight"
+movie_search : "TS Devil"
+movie_telescope : "TE Devil"
+
+Sombres/provocants:
+
+movie_tyrant : "OT HellOnEarth", "OT Attack", "OT DeathMissile"
+movie_deadly : "DM Revolution", "DM OutOfMind", "DM Patriot"
+movie_not_dead : "ND ColdBlood"
+movie_rude : "RW Blow", "RW Cumming" (si tu veux du provoc direct)
+
+Concepts intéressants:
+
+movie_memory : "MM Truth", "MM Is he crazy"
+movie_final : "FP DarkWorld"
+
+-- d1 $ gF1 $ gM1 
+--   $ midiOn "^42" (<| "k k k <k k*2 k <k [~ k] k*2 [~ . k*2 k*<1 2>]>>")
+--   $ midiOff "^42" (<| "<k ~>")
+--   -- $ fix (|* gain 0.6) "jazz"
+--   $ "[808bd:13,jazz,kicklinn]"
+--   # gain 1.4
+-- d2 
+--   $ midiOn  "^43" ((<| "~ s ~ s*<1 <2 [2 4]>>") . (# legato 0.5))
+--   $ midiOff "^43" (<| "~ <s <~ [~ s]>>")
+--   $ "vec1_claps" 
+--   # gain 1
+--   # room (slow 16 $ range 0 0.8 perlin)
+--   # sz 0.67 
+--   # dry 0.9
+--   -- # att 0.03 # rel 2
+-- d3 $ gF1 $ gM1 $ 
+--   "dr*[8 <8!7 16>]"
+--   # gain 0.8
+
+-- d4 $ gF2 $ gM3 
+--   $ note "<<g3 [g3@2 g3 a3@2]> <e3!3 [e3 c3]>>" 
+--   # "bassWarsaw"   
+--   # gain 1.4
+--   # crushbus 41 (range 16 3.5 "^53")
+-- d7 $ gF3 $ gM3 
+--   $ midiOn "^91" (ply 2 . (# legato 0.25))
+--   $ midiOn "^59" ((|+ note 12))
+--   $ fast 2 
+--   $ note "e3 b3 <e3 <c4 e4>> <b3!15 ~>" 
+--   # "FMRhodes1" 
+--   # modIndex (range 0 2.4 "^35")
+--   # crushbus 71 (range 16 2.4 "^55")
+--   # gain 1.8
+--   # room 0.5 # dry 1.3 # sz 0.9
+--   -- # crushbus 41 (range 16 3.5 "^53")
+-- d5 $ gF3 $ gM3 -- guitar+synth mariés pour toujours
+--   $ chop 2
+--   $ "gfunk_lead:4/4" 
+--   # cut 5 
+--   # gain 1.3
+--   # bandf 200
+-- d8 $ gF1 $ gM1
+--   $ midiOn "^92" (ply "1 <2!3 4>")
+--   $ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
+--   $ midiOn ("^36" - "^56") ((# n "22")) -- Hmmm Break
+--   $ midiOn "^56" ((# n "23")) -- Raise COMEON!
+--   $ chop 16
+--   $ loopAt 2
+--   $ "jungle_breaks:45"
+--   # cut 8
+--   # gain 1.5

live/midi/nova/dnb/plosive.tidal

+
+
+
+
+
+
+
+
+once $ "xplosive" -- RIFF
+  # cut 1 
+  # lpf 400
+  # room 1
+  -- # freeze 0.2
+  # octersub 2 
+  # hpf 500 # lpf 3000 # gain 0.6 
+  # delayfb 0.9 # delay 0.89 # delayt 0.25
+  
+
+once $ "xplosive:3" -- HOES
+  # gain 0.9 # cut 7
+
+ -- REAL SMOKERS
+do
+setcps (80/60/4)
+once $ "d d" 
+  # "xplosive:30"
+  # cut 1
+  # end "0.28 0.5" 
+  # gain 0.8
+
+
+
+
+do
+let width = pF "width"
+let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 dMask = (whenmod 8 7 (mask "t t <t f> f"))
+let gM1 = gMask . gMute
+let gM2 = gMask . gMute2
+let gM3 = gMask . gMute3
+setcps (81/60/4)
+d1 $ gF1 $ gM2 -- YRVHTECHNO KICK TO DNB
+  $ fast 2 
+  $ midiOn "^42" (<| "k k k*<1 2 2 [4 2]> k*<1 <2 <4 [4 2]>>>")
+  $ midiOff "^42" (<|"k . ~ k ~ <~ k>" )
+  $ "[808bd:13,jazz,kicklinn]"
+  # gain 1.8
+d2 $ gF1 $ gM1 $ fast 2 
+  $ "~ s ~ [s*<1!3 2> <~ <s s*[4 2]>>]" 
+  # "vec1_snare:4" # gain 1 # cut 2 # gain 0.9 
+  # lpf 5000
+d3 $ gF1 $ gM1 
+  $ "dr*[<32!3 16> . 16 <32 [8 32]>]"
+  # "h2ogmsn:4" 
+  # gain 1
+d4 $ gF2 $ gM3
+  -- $ arp "up"
+  -- $ ply 2 
+  -- $ note "<[f3,gs3,c4] [c3,ds3,g3]>" 
+  $ midiOn "^57" (>| note (
+    "[0,0(3,8) <0([3 2],8) ~>]" 
+    + "<[f3 gs3 f3 c4] [c3 ds3 c3 g3]>"))
+  $ midiOff "^57" (>| note (
+    "[0]" 
+    |+| "<[f3, [gs3 f3 <c4 c5>]] [c3, [ds3 c3 <g3 g4>]]>"))
+  $ "bassWarsaw"
+  # gain 1
+  # crushbus 41 (range 12 3.8 "^53")
+  # octersubbus  42 (range 0 1.8 "^33")
+  # room 0.4
+  # lpf 1400
+d5 $ gF3 $ gM3-- RIFFs <3
+  $  "xplosive" 
+  # n "<0!12 <32 33 34 35>!4>" 
+  # cut 5 -- RIFF
+d7 $ gF3 $ gM3  -- VOICES 
+  $ midiOn "^59" (# n "<24!2 25 <26 27>>")
+  $ (midiOff "^59" (superimpose (chop 16) 
+    . (# cut 61) 
+    . (# pan "[0.2 0.8]*2")) )
+  $ "xplosive" 
+  # n "<14!3 15 <14 15> <14 15> <15 16> <16 16*2>>" 
+  # cut 7
+  # gain 1.2
+d8 $ gF1 $ gM1 
+  $ chop 8 
+  $ loopAt 0.5 
+  $ "breaks165" # bandf 1400 # room 0.3 # dry 1.2 # sz 0.8
+  # cut 8
+  # gain 1.4
+d12 $ gF3 $ gM3
+  $ chop 8 
+  $ loopAt 1 
+  $ someCyclesBy "^19" (loopAt 0.33 . (# n 7))
+  $ "xplosive:6" 
+  # cut 12 
+  

live/midi/nova/dubstep/break_my_new_synths.tidal

+do
+let detune = pF "detune"
+let filterFreq = pF "filterFreq"
+let drive = pF "drive"
+let fmRatio = pF "fmRatio"
+let fmIndex = pF "fmIndex"
+let sweepRate = pF "sweepRate"
+let sweepTime = pF "sweepTime"
+let lowFreq = pF "lowFreq"
+let pitchMod = pF "pitchMod"
+d1 $ n "c2 [f2 g2] a1 bf1" 
+   # s "reeseBass"
+   -- # detune (range 0.1 0.8 $ slow 8 $ sine)
+   -- # filterFreq (range 300 1200 $ slow 4 $ tri)
+   -- # drive (range 1 4 $ slow 16 $ sine)
+   # gain 0.0
+d2 
+  $ "metallicScreech" 
+-- growlMachine.scd  laserZap.scd  .scd  pluckStab.scd  reeseBass.scd  sub808.scd  talkingBass.scd
+  -- # n (run 8 + 60)
+  -- # fmRatio "2.1 3.2 4.5 1.8"
+  -- # fmIndex (range 4 12 $ fast 2 $ sine)
+  -- # sweepRate (choose [4, 6, 8, 12])
+d3 
+ -- $ sometimes (# pitchMod 36)
+ $ note (fast 4 $ "<a c a b>") #  "laserZap" 
+ -- # freq (scale "minor" $ run 8 * 100 + 600)
+ -- # sweepTime "0.05 0.08 0.12 0.06"
+ -- # lowFreq (range 60 200 $ slow 8 $ sine)
+d4 $ n "c2 ef2 g2 bf2" 
+   # s "talkingBass"
+   -- # talkRate (choose [1, 2, 4, 0.5])
+   -- # brightness (range 0.5 2 $ slow 8 $ sine)
+   # drive (range 2 6 $ slow 4 $ tri)
+
+ once $ "talkingBass" # note "c4" # orbit 5
+
+
+ setcps (92/60/4) -- 92 BPM typical for G-funk
+ 
+once $ "gfunk"
+ 
+do
+let cc n = cF n 0.5  -- Center default values
+let lagLev = pF "lagLev"
+d1 
+  $ n ("c3 ef3 g3 bf3")
+    # "gfunk"
+    # lagLev 0.06  -- portamento control
+    # cutoff (slow 4 $ range 800 2400 sine)
+    # resonance 0.3
+    # amp 0.4
+d1 $ n "c3 ef3 g3 bf3 c4 bf3 g3 ef3"
+   # s "gfunk" 
+   # cutoff (slow 6 $ range 500 3000 (sine + 0.3 * tri))
+   # resonance (slow 12 $ range 0.2 0.6 cosine)
+   # lagLev 0.06
+   -- Main melody
+d1
+  $ swing 3
+  $ n "c3 ef3 g3 bf3 c4 bf3 g3 ef3"
+   # s "gfunk"
+   # cutoff (slow 4 $ range 1000 2500 sine)
+   # lagLev 0.08
+   # pan 0.1
+   # amp 0.4
+-- Harmony layer (fifth above)
+d2
+  $ swing 6
+  $ n "g3 bf3 d4 f4 g4 f4 d4 bf3"
+  # s "gfunk" 
+  # cutoff (slow 4 $ range 800 2000 sine + 0.2)
+  # lagLev 0.08
+  # pan 0.8
+  # amp 0.25
+  # detune 0.02  -- slight detune for thickness
+  -- Map Launch Control knobs to key parameters
+d1 $ n "c3 ef3 g3 bf3"
+   # s "gfunkLead"
+   # cutoff (cc 1 * 3000 + 500)      -- Knob 1: Filter cutoff
+   # resonance (cc 2 * 0.6 + 0.1)    -- Knob 2: Resonance
+   # lagLev (cc 3 * 0.15 + 0.01)     -- Knob 3: Portamento time
+   # detune (cc 4 * 0.1 + 0.01)      -- Knob 4: Detuning amount

live/midi/nova/remix/perfect.tidal

+resetCycles
+
+
+do
+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 width = pF "width"
+let fundamental = slow 4 $ "<gb3'maj db3'maj bb2'min bb2'maj>"
+setcps (128/60/4)
+d1 $ gF1 $ gMute2
+  -- $ midiOff "^42"  (<| "<k [~!7 k*<1 2>]>")
+  $ fix (# bandf 300) "clubkick"
+  $ midiOff "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
+  $ midiOn "^42" (<| "k  k . k <k [~ k] k k*2>")
+  $ "[jazz,clubkick]"
+  # cut 1
+  # gain 1.5
+d2 
+  $ midiOn "^43" (<| "~ s ~ [s*<1 2> <~!7 [~ s]>]")
+  $ midiOff "^43" (<| "~ s")
+  $ "snare:45"
+  # "h2ogmcp" # gain 1.3
+d3 $ gF1 $ gM1 
+  $ "~ h ~ h ~ h*<1!3 2> ~ h*<1 [1|2]>" 
+  # "h2ogmhh" # n "<0!4 1!3 2>"
+  # gain (1.4 * (range 0.9 1.2 perlin))
+d4 $ gF2 $ gM3
+  $ chop 8 
+  $ loopAt 4 
+  $ midiOn "^57" ( -- HIGHER
+    slow 2 . ply 2 . 
+    (# n "<1 1 2 2 6 6 6 1 16 16 17 18>" )
+  )
+  $ midiOff "^57" ( -- LOWER
+    (# n "<5 5 5 6>")
+    )
+  $ "perfect" 
+  # room 0.4 
+  # sz 0.4
+  # octersub 0.4
+  # crushbus 41 (range 16 4.5 "^53")
+  # octersubbus 42 (range 0 2.5 "^33")
+  # octersubbus 43 (range 0 5 "^17")
+  # cut 4 
+  # gain 1.4
+d5 $ gF3 $ gM3 -- COUNT TO SUPERSTARDOM
+  $ midiOn "^29" (
+    slice 16 "<<[0 1 2 3] [<0 10> <1 11> 10 11]> <[8 9 10 11] [<12!3 15> <13!3 15> <14 12> <15 13>]>>" 
+    . (>| "perfect")
+    )
+  $ midiOn "^90" (ply "<2 4>")
+  $ midiOn ("^34" - "^18") ( -- THE HIPS THE FACE THE LIPS THE MICROPHONE 
+    slice 4 (fast 2 
+      . ply "<1!16 <2 1>!16>" $ "<0 1 2 3>") 
+    . (# n 14) . (|* gain 0.8)
+    )
+  $ midiOn "^18" -- SUPERSTAR
+    (
+      -- mask "<t f!3>" 
+      loopAt 4
+      . (0.5 ~>)
+      . (# n 8)
+      . mask "<t!4 t f t t>"
+      . (# end "<0.18!3 0.45 1!4>")
+      . (# begin "<0!4 0.5!4>")
+      . (|* gain 1.3)
+      )
+  $ midiOn ("^58") ( -- Slice 1 2 3 4!
+    slice 8 "<[0 1] [0 1] [0 0 <0 1> <1 0>] [2 3]>" )
+  $ midiOff ("^58"+"^29") ( -- WATCH ME WORK IT
+    slice 8 "<[0 1] [2 3] [4 5] [6 <7 <6 6*2>>]>"
+    )
+  $ "perfect" 
+  # cut 5
+  # room 0.4 # sz 0.39
+  # pan "0.2 0.8 0.2 0.8"
+  # gain 1.8
+  # octersub 0.8  
+d6 $ gF1 $ gM3 
+  $ mask "f t" 
+  $ midiOn "^89" (ply "<4 8>")
+  $ chop 16
+  $ "meth_bass:3/8" 
+  # room 0.4 
+  # sz "<0.7!3 1.1>"
+  # delay 0.8 # delayt 0.125 # delayfb 0.5
+  # gain 1.4
+  # cut 6
+d7   -- $ gF3 $ gM3 
+  $ midiOn "^59" (off (1/16) (|+ note 7))
+  $ note (
+    fast 2 
+    "<[f3 <bf3!2 bf3!2 cs4!2 f4!2> <cs4!2 gs4!2> f4]>"
+     + "[0,<0!8 12!8>]"
+    )
+  # s "acidOto3092"
+  # gain 1.4
+  # width (range 0.5 0.98 "^35")
+  # crushbus 71  (range 16 3.5 "^55")
+  # cutoff (slow 3 $ range 300 3000 (sine * saw)) -- more erratic filter
+  # room 0.2 # sz 0.4 
+d12 $ gF3 $ gM3 -- Acid techno arp with structured rhythms
+  $ note (slow 2 $ 
+        "<[bf2 . cs3 [ef3 bf3]] [cs3 ef3 . bf3] [ef3 . [bf3 cs4] ef3] [[bf3 gs3] . cs3 ef3]>")
+    # s "acidOto3091" 
+    # gain 1.3
+    # cutoff (slow 4 $ range 400 2500 saw)  -- classic acid filter sweep
+    # resonance 0.3
+    # accelerate (choose [0, 0.1, -0.1]) -- slight pitch drift
+    # room 0.2 # sz 0.3
+d8 $ gF1 $ gM1 
+  $ midiOff "^60" (mask "t(<4 [<2 4> 8]>,8,1)" . chop 8)
+  $ midiOff "^56" (
+    slice 8 "0 1 <2!3 ~> <3!3 0> <4!3 1> 5 <6!12 ~!3 6*4> 7*<1 2 0 8>")
+  $ midiOn "^56" (loopAt 2 . (# "jungle_breaks:19"))
+  $ chop 8 
+  $ loopAt 1 
+  $ "breaks165" 
+  # cut 8
+  # gain 1.2 
+d9 $ gF2 $ gM3-- slow arpeggiated synth, high register 
+  $ mask "t <f!8 t!8> <f!4 t!4> <f!8 t!8>"
+ $ fast 4
+ $ arp "up" 
+ $ note (slow 2 $ "<bf4'min cs4'maj ef4'min bf4'min>")
+ # "90s_synatm:3" |+ note 12  -- or "foo" 
+ # room 0.7 # sz 0.9
+ # delay 0.5 # delaytime (1/3) # delayfb 0.4
+ # lpf 1400
+ # cut 9
+d10 -- Euclidian mid arps
+ $ struct "t(5,8,2)" 
+ $ note (slow 2 $ "<bf3 cs4 ef3 bf3>" + "<0 7 12>")
+ # s "moogBass"
+ # gain 1.2
+ # room 0.5 # sz 0.6
+ # lpf (slow 4 $ range 2000 3500 sine)
+-- d11: sparse chord stabs, ambient pad
+d11 
+ -- $ slow 8
+ $ note (slow 2 $ "<bf3'min'5 cs3'maj'5 ef3'min'5 bf3'min'5>")
+ # s "sine" |- note 12
+ # gain 1.4
+ # attack 0.5 # release 2
+ # room 0.9 # sz 0.95
+ # lpf 3000
+ # delay 0.7 
+ # delayt "e" 
+ # delayfb 0.8
+
+-- d12: high shimmer, random note selection from chords
+d12 
+ $ fast 2
+ $ note ((slow 2 $ "<bf cs ef bf>") 
+        + (slow 3 $ "0 12 19 24 <0 7>"))  -- chord tones, high octaves
+ # s "superpiano"
+ # gain 0.5
+ # velocity (range 0.3 0.6 perlin)
+ # room 0.8 # sz 0.8
+ # lpf 5000 # hpf 800  -- shimmer zone
+ # delay 0.6 # delaytime "0.375" # delayfb 0.5
+
+
+
+
+
+-- Layered periodicities - 4 bar chords + 3 bar melody = phasing
+d1 $ note ((slow 4 "<gb4 db4 bb3 bb3>") 
+          + (slow 3 "<[0 2] [3 5] [7 5]>"))
+   # s "FMRhodes1" 
+   # velocity (slow 2 $ range 0.6 0.9 sine)
+   # room 0.5
+
+-- Fundamental + rhythmic variation at different rates
+d1 $ note ((slow 4 "<gb4 db4 bb3 bb3>") 
+          + (slow 2 "0 ~ 3 ~ 5 ~ 7 2"))
+   # s "FMRhodes1" 
+   # lpf (slow 8 $ range 2500 4000 sine)
+   # room 0.4
+
+-- Complex algorithmic: structure + melody + octave shifts
+d1 $ note ((slow 4 "<gb4 db4 bb3 bb3>")        -- 4-bar roots
+          + (slow 2 "<0 3 5 7>")                -- 2-bar melody
+          + (slow 3 "<0 12 -12>"))              -- 3-bar octaves (polyrhythm!)
+   # s "FMRhodes1" 
+   # room (slow 8 $ range 0.3 0.7 sine)        -- reverb automation
+   # lpf 3500
+
+-- Sparse topline with evolving density
+d1 $ note ((slow 4 "<gb4 db4 bb3 bb3>") 
+          + (slow 2 "<[0 ~ 5 ~] [3 ~ 7 ~] ~ [2 5]>"))
+   # s "FMRhodes1" 
+   # delay 0.4 # delaytime (1/3) # delayfb 0.3
+   # room 0.5
+
+-- Full algorithmic composition
+d1 $ note ((slow 4 "<gb4 db4 bb3 bb3>")        -- fundamental
+          + (slow 3 "<0 2 3 5 7 9>")            -- melodic movement
+          + (slow 5 $ "0 ~ 12 ~ -12"))          -- octave variation
+   # s "FMRhodes1" 
+   # velocity (slow 2.5 $ range 0.5 0.9 perlin) -- random dynamics
+   # lpf (slow 6 $ range 2800 4200 sine)
+   # room 0.4 # sz (slow 4 $ range 0.6 0.9 sine)
+
+
+once $ "perfect"