live: cyberspace - du miel

live/collab/cam/i_come_from_cyberspace.tidal

+once $ "jazz"
+
+once $ "h2ogmsn"
+
+once $ "ircam:1"
+  # gain 0.85
+  # cut 3
+
+once $ "cyberspace:3"
+  # gain 0.85
+  # cut 3
+
+
+do
+-- resetCycles
+setcps (120/60/4)
+let gPontFiltre = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.1 0.5 saw)))
+let g = gPontFiltre
+let fadeIn = someCyclesBy "<1!4 0!60>" (|* gain (slow 4 $ range 0.4 1 saw))
+d1
+  $ g
+  $ mask "<f!7 [f t] t!24>" -- Intro /32
+  $ mask "<t!32 f!16 t!16>" -- Pont instrumental
+  $ whenmod 16 4 (<| "k*4")
+  $ "jazz"
+  # gain 0.9
+d2 $ g
+  $ mask "<f!8 t!24>"
+  $ "~ [cp,glitch:7]"
+  # lpf 2000
+d3 $ g
+  $ mask "<t!32 t(8,16)!16 t!16>" -- Pont instrumental
+  $ "hh*[8!3 16 <16 8 8 16>]"
+  # gain (slow 16 $ range 0.55 0.8 saw)
+  # pan (slow 4 $ range 0.8 0.2 isaw)
+d4
+  $ g
+  $ whenmod 64 32 (superimpose (
+    struct "t(<8 <8 [5 8]> 5 0>,8)" .
+    (+| note (arp "up" "[0, 7, 12]"))
+  ))
+  $ s "superpiano"
+  # note "<-20 [-19,-15] [-20,-16] ~>"
+  # velocity "<0.7 0.5 0.6>"
+  # sustain 3
+  # pan 0.8
+  # gain 0.8
+d6 -- BASSLINE
+  $ g
+  $ fadeIn
+  $ whenmod 32 4 (superimpose (
+    (# crush 10)
+    . (# cut 61)
+    . (+| note (arp "up" "[<0 0 3 0> 12 0 12]*2"))
+    . (|+ pan 0.15)
+    ))
+  $ s "bassWarsaw"
+  # note "<-20 <-19 -15> <-16!3 -20> ~>"
+  # crush 5
+  # room 0.4
+  # cut 6
+  # sz 0.7
+  # pan 0.7
+  # gain 0.8
+d5 -- CYBERDECLARATI0N
+  $ fadeIn
+  $ someCyclesBy "<0!32 0!8 0!8 1!16>" (>| n "<5 <1 9> 5 9>") -- DO NOT THINK!
+  $ someCyclesBy "<0!32 0!8 1!8 0!16>" (>| n "<10 <2 6>>") -- Not on behalf of the future!
+  $ someCyclesBy "<0!32 1!8 0!24>" (>| n "10 10 10 <10 ~ 3 ~>") -- DO NOT THINK!
+  $ someCyclesBy "<0!24 1!8>"     (>| n "<0 ~ 8 <~ 10>>") -- You giants do not know us
+  $ someCyclesBy "<0!8 1!16 0!8>" (>| n "<10 <6 4>>") -- Do not think... you have no morat
+  $ someCyclesBy "<1!8 0!24>"     (>| n "<5 1 5 <4 6>>") -- I declare.. you are not welcome!
+  $ n "0" # "cyberspace"
+  # cut 5
+  # leslie (slow 16 $ range 0.2 0.8 saw)
+  # lrate 6.8
+  # lsize (slow 8 $ range 0 1.8 saw)
+  # pan 0.2
+  # gain 0.9

live/hip/instru/nuit_au_quartier_latin.tidal

+
+do
+-- resetCycles
+setcps (120/60/4)
+let gDJF = whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.05 0.45 saw))
+let g = gDJF
+-- d10 $ mask "<t!32 t(2,8)!8 t!24>" $ "dr*8" # gain 0.4 -- Guideline
+d1 $ g
+  $ mask "<t!128 [t f] f!127>" -- Outro
+  $ mask "<f!8 t!24 f!16 t!16 t!32>"
+  $ whenmod 32 16 (<| "k . k(<3!3 <5 [5 3]>>,8)")
+  $ fix (|* 0.68) ("jazz")
+  $ "k . ~ k <~ k> <~!3 k>"
+  # "[808bd:2,jazz]"
+  # lpf 200
+  # gain 1.35
+d2 -- Snare classique
+  $ mask "<t!128 [t f t f] f!127>" -- Outro
+  $ g
+  $ mask "<f!7 t!25 f!8 t!24>"
+  $ fast 2
+  $ ply "<1!3 2>"
+  $ "~ <sn:2!3 <sn:4!3 [sn:4 sn:2]>>"
+  # note "-2"
+  # room 0.8 # dry 1 # sz 0.87
+  # gain 0.7
+d3 -- Drumroll analogique
+  $ g
+  $ mask "<t!128 t(12,16) t(4,16)!127>" -- Outro
+  $ mask "<t(<2 4 4 7>,8)!4 t!60>"
+  $ whenmod 8 6 (ply "<1 [2 <[1 2] [2 4]>]> <0.5 [4 0.5]>")
+  $ "dr*<8 <8 [8 4]> 16 [8 . 4 16]>"
+  # "h2ogmsn" # n "<[14 13 13 12]!6 11 10>"
+  # gain 0.5
+  # room 0.4
+  # pan (slow 2 $ range "<0.6!3 0.4>" "<0.4!3 0.6>" isaw)
+  # sz 0.012
+  # dry 0.97
+d4 -- Lead Guitar: Signor Loop
+  $ mask "<f!3 t t!60>"
+  -- V1: LoopAll
+  -- $ someCyclesBy "<f!16 t!16>" (slice 16 (slow 2 $ "<8 9 9 8 8 10 11 [12 13]>"))
+  -- $ someCyclesBy "<t!16 f!16>" (slice 16 (slow 2 $ "<5 1 5 1 5 2 2 3 5 1 5 6 5 6 6 7>"))
+  -- V2: Storytold
+  $ someCyclesBy "<f!32 f!16 t!16>" (slice 16 "<8 8 10 8 10 10 8 <10 12>> <9 9 3 9 11 12 13 13>")
+  $ someCyclesBy "<f!32 t!16 f!16>" (slice 16 "<5 6 5 7> <7 8 6 8*2>")
+  $ someCyclesBy "<t!32 f!32>" (slice 16 "<5 <5!3 [5 6]> <5!3 7> <1 3 1 8>>")
+  -- 0/16:Toi
+  -- 1/16:Viens, Je Reviens
+  -- 2/16:pour toi
+  -- 3/16:oui toi, que toi
+  -- 4/16:Pause
+  -- 5/16:Bonjour
+  -- 6/16: Et c'est bien toi que je
+  -- 7/16 veux...
+  -- 8/16: Oui c'est toi
+  -- 9/16: toi, toi, toi
+  -- 10/16: Bien toi
+  -- 11/16: Je te vois t'en aller
+  -- 12/16: Va...
+  -- 13/16: Il y en aura d'autres
+  -- 14/16:Pause
+  $ "latin"
+  # cut 4
+  # room 0.84
+  # dry 1.12
+  # pan 0.35
+  # sz 0.9
+  # lpqbus 41 (slow 4 $ range 0 0.5 sine)
+  # lpfbus 42 (range 500 5000 (slow 8 $ sine + 0.25 * perlin))
+  # gain 0.8
+d5
+  $ g -- Support guitar
+  $ whenmod 4 3 (ply "<1 2>" . (# begin 0.56) . (# end 0.58))
+  $ "latin"
+  # begin 0
+  # end 0.044
+  # cut 5
+  # room 0.4
+  # dry 1
+  # sz 0.6
+  # pan 0.8
+  # gain 0.8
+d6 $ g -- Core BREAK
+  $ mask "<f!32 t!32>"
+  $ slice 4 ("0 <1 ~> <2 0> <3 <~ 3>>")
+  $ loopAt 1
+  $ "breaks125:0"
+  # gain (slow 16 $ range 0.45 0.8 saw)
+  # pan 0.4
+d9 $ g -- Support break
+  $ mask "<f!16 t!16>"
+  $ slice 32 "0*<1!7 2> 1*<1!7 2> 2*<1 1 2 <1 2>> 3*<1 2>"
+  $ loopAt 2
+  $ "break:29"
+  # cut 7
+  # gain (0.65 + (slow 32 $ range 0 0.1 saw))
+  # pan 0.23
+  # room 0.2 # dry 1 # sz 0.2

live/hip/lofi/du_miel.tidal

+
+
+do
+-- resetCycles
+setcps (82/60/4)
+let modIndex = pF "modIndex"
+let chords = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>"
+let chordsMin = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>"
+let chordsMin = "<[c] <[f] [g]>>"
+let gPontHPF = (whenmod 64 32 (# djfbus 1 (slow 16 $ range 0.5 0.9 cosine)))
+let g = (# djfbus 2 (range 0.05 0.95 "^49"))
+d1 $ g
+  $ mask "<f!4 [t f] f!2 [f!3 t] t!56>" -- Intro
+  $ fix (
+    (|* gain 0.9)
+    . (# lpf 200)
+    . (# att 0.2)
+    . (# rel 10))
+    ("reverbkick")
+  $ "k . <k!2 <k ~> ~> [~ <~ k>] <~ [~ <~ k>]> k" -- Chaloupé/élagué
+  # "[jazz,reverbkick]"
+  # lpf 5000
+  # midiG' "^78" 0 1
+d2
+  $ mask "<f!16 t!48>" -- Intro
+  $ g
+  $ fast 2 $ "~ snare:20"
+  # att 0.125
+  # rel 2
+  # gain 0.85
+  # midiG' "^79" 0 1.2
+d3
+  $ g
+  $ someCyclesBy "<1!4 0!28>" (slow "<4!3 [4 2]>") -- Intro
+  $ someCyclesBy "<0!32 1!8 0!24>" (slow 2) -- Pont
+  $ ply "<2 [4 <2!3 <4 8>>]>" -- TODO: Plutot des triolets?
+  $ "d <~ d> d <d ~ d d>"
+  # "drum:2"
+  # cut 3
+  # gain 0.6
+  # pan 0.3
+  # midiG' "^80" 0 0.9
+d4
+  $ g
+  $ mask "<f!8 t!24>"
+  $ struct "<t!8 [~ t] t!6 t(3,8)> . t(<3 [3 <5 1>]>,[8 <8!3 1>])"
+  $ arp "up!3 <converge <down downup>>"
+  $ note (chordsMin - 24)
+  # "bassWarsaw"
+  # crushbus 41 (range 14 8 "^53")
+  # pan 0.3
+  # room 0.2
+  # gain 0.6
+  # midiG' "^81" 0 1.1
+d5 $ g
+  $ note (chords - 24)
+  # "FMRhodes1"
+  # att 1 # rel 2
+  # modIndex (range 0 2 "^54")
+  # room 0.8
+  # dry 1
+  # sz 0.2
+  # gain 0.7
+  # pan 0.68
+  # midiG' "^82" 0 1.2
+d6 -- Fantomatic break loop
+  $ g
+  $ mask "<t!4 t(<5!3 [8 5]>,8)!3 t([5 8],8)>"
+  $ ply ("1 <1!3 2>")
+  $ iter "1 <4!3 1>"
+  $ slice 16 (run 16)
+  $ loopAt 2
+  $ "break"
+  -- # gain 0.45
+  # midiG' "^84" 0 1

live/hip/lofi/sete_et_match.tidal

-resetCycles
 
 -- Soleil de Sete - LoFi avec accompagnement
 
@@ -6,10 +5,11 @@ resetCycles
 -- Add lead - or use it to improvise? <3
 -- Add wind noises at transition points - or equivalent spacey sounds
 do
+-- resetCycles
 setcps (90/60/4)
 let chords = "<[a,c,e,g6,b6,d6] [d,fs,a6,c6] [f,a,c6,e6] [c,e,g6,b6]>"
 let chordsMin = "<<a c e> <d!3 fs> [f] [c]>" -- TODO confirm/finish/validate
-let gFilter = whenmod 32 24 (# djf (slow 8 (range 0.5 0.05 saw)))
+let gFilter = whenmod 32 24 (# djf (slow 8 (range 0.05 0.5 saw)))
 let gFilter2 = whenmod 32 24 (# djf (slow 8 (range 0.45 0.75 saw)))
 let g = gFilter
 let g2 = gFilter2
@@ -53,7 +53,7 @@ d4 $ g2
   $ whenmod 4 3 (rarely (off "h" (arp "up" . mask "f f t? t")))
   $ superimpose ((|* gain "0 0.79") . (|+ note 12)) -- Depth
   $ whenmod 16 12 (someCyclesBy "0 1" rev)
-  $ note (chords
+  $ note ("[0,<~ [~!7 0*<1!3 2>] ~ ~>]" + chords
     - 24
   )
   # "FMRhodes1"

live/midi/nova/ambient/drone_aveugle.tidal

+do
+let slide x = acceleratebus 01 (2**(x/12))
+let g =  (# djfbus 1 (range 0.05 0.95 "^49"))
+let g2 = (# djfbus 2 (range 0.05 0.95 "^29"))
+d1 $ g
+  $ midiOn  "^41"  (<| "k k k [k <~!3 k>]")
+  $ midiOff "^41" (<| "k . ~ ~ ~ <k!3 [~ k]>")
+  $ "[909,jazz]"
+  # room 0 # sz 0 # dry 1
+  # midiG' "^78" 0 0.75
+d2 $ g
+  $ fix (|* gain 0.58) ("sn")
+  $ fix (|* gain 0.8) ("snare")
+  $ "~!7 <~!3 sn:27> . [glitch:5,snare:28]"
+  # midiG' "^79" 0 1
+d3 $ g
+  $ midiOn "^44" (fast "4!3 <8 [<4 8> <4!3 8>]>")
+  $ "hh(3,8)"
+  # midiG' "^80" 0 1
+d4
+  $ g2
+  $ superimpose (|+ note (cat [
+    2,2,2,3,
+    3,3,4,5,
+    4,5,4,5,
+    5,6,7,8
+  ]))
+  $ note ("d" - 12)
+  # "superfm"
+  -- # slide "0 12 3"
+  # crushbus 41 (range 16 0.95 "^53")
+  # lesliebus 42 (slow 64 $ range 0 4 perlin)
+  # lsizebus 44 (range 0.2 2 "^17")
+  # lratebus 43 "^33"
+  # midiG' "^81" 0 (0.59 - 0.1 * "^17")
+d5 $ g2
+  $ midiOff "^58" (slow 8)
+  $ arp "up"
+  $ n (scale "aeolian"
+      "<0 <2 [<2 0> . ~ <~ 2> 4 2]>>"
+      -- "<d'maj11'8!3 [d'maj11'i'6]>"
+  - 24)
+  # s "superchip"
+  # voicebus 51 (range 0.05 0.35 "^34")
+  # crushbus 52 (range 16 1.85 "^54")
+  # midiG' "^82" 0 0.7
+  # room 0.4
+  # dry 1.02
+  # sz 0.8
+d6 $ g2
+  $ midiOn "^91" (
+    slice 4 (mask "t" $ fast 8 $ run "<4!3 [4|2]*8>"))
+  $ midiOff "^59" (slow 8)
+  $ n (
+    scale "aeolian" "[0 <[<5 6> <4 5>]>]/2"
+  - 36)
+  -- $ n ""
+  # "supersiren"
+  # acceleratebus 61 (range "-12" 12 "^35")
+  # crushbus 62 (range 10 2.5 "^55")
+  # midiG' "^83" 0 0.6
+  # panbus 63 (range 0.4 0.8
+    (sine - 2 * (fast "<2!3 4 4!3 0.25>" $ perlin)))
+d7 $ g
+  $ slice 4 "0 1 <2 [2|1]> <1 2 3 7*<1 <2 4>>>"
+  $ loopAt 2
+  $ "break:15"
+  # gain 0.9
+  # speed (range 0.1 1.9 "^56")
+  # midiG' "^84" 0 1.1
+  # cut 7
+  # pan 0.1

live/midi/nova/breaks/break_90s.tidal

@@ -10,11 +10,13 @@ once "dr"
 -- Break90s∷ :)
 do
 -- let gF = (whenmod 32 28 (# djf (slow 4 $ range 0 0.5 sine)))
-let gDJF = (# djfbus 1 (range 0.15 0.85 "^49"))
-let g = (gDJF)
+let gDJF1 = (# djfbus 1 (range 0.15 0.85 "^49"))
+let gDJF2 = (# djfbus 2 (range 0.15 0.85 "^29"))
+let g1 = (gDJF1)
+let g2 = (gDJF2)
 setcps (80/60/4)
 d1
-  $ g
+  $ g1
   $ midiOn "^41" (superimpose ((# "kick:5")
   . (|* gain 0.7))
   . (<| "k k k k k k k [<k ~> <k k ~ k>]")
@@ -32,7 +34,7 @@ d1
   # room 0.5 # sz 0.2 # dry 0.99
   # midiG' "^78" 0 1.4
 d2
-  $ g
+  $ g1
   $ midiOn "^75" (ply 2)
   $ midiOn "^43" (slice 4 "0 1*<1 1 2 4>")
   $ midiOff "^43" (
@@ -47,7 +49,7 @@ d2
   # cut 2
 d3 -- Bassline
   $ (# lpf (range 10000 500 "^53"))
-  $ g
+  $ g1
   $ midiOn "^89" (off "h" (
     mask "t(<8 16> ,16)"
     . ply 2
@@ -71,7 +73,7 @@ d3 -- Bassline
   # crushbus 31 (range 16 4 "^53")
   # pan 0.2
   # midiG' ("^81" + 0.125*"^53") 0 1.8
-d5 $ g -- Piano base
+d5 $ g2 -- Piano base
   $ midiOn "^58" (superimpose (
     (0.5 ~>)
     . degradeBy (1 - "^54")
@@ -91,7 +93,7 @@ d5 $ g -- Piano base
   # orbit 5
   # midiG' "^82" 0.3 1.7
 d4 -- Skank organ
-  $ g
+  $ g2
   -- $ superimpose (const $ g
     -- $ whenmod 8 4 (iter "1 4")
     -- $ segment 8 $ "fmono:9"
@@ -112,7 +114,7 @@ d4 -- Skank organ
   # crushbus 41 (range 16 4 "^55")
   # midiG' "^83" 0.2 1
 d8 -- Tom roll
-  $ g
+  $ g2
   $ midiOn "^76"  (fast 2)
   $ midiOn "^44"  (<| "~ h ~ h")
   $ midiOff "^44" (<| "h(<4 5 8 [8 16]>,8)")
@@ -130,4 +132,4 @@ d9 -- Finger claps
   $ "clap"
   # speed (range 0.75 1.25 "^56")
   # release "<0.25!3 0.125 0.25!4 0.125!4>"
-  # midiG' "^84" 0 1.7
+  # midiG' "^84" 0 1.4

live/midi/nova/breaks/nova_bossa.tidal

+resetCycles
+
+
+-- LA NOVA BOSSERA
+-- breakbeat X bossa nova <3
+
+d10 $ "drum:2*8" # gain 0.9
+
+once $ "dr"
+
+once $ "reverbkick" # gain 0.7
+
+do
+let gDJFManuel1 = someCyclesBy "<1!24 0!8>" (# djfbus 1 (range 0.05 0.95 "^49"))
+let gDJFManuel2 = someCyclesBy "<1!24 0!8>" (# djfbus 2 (range 0.05 0.95 "^29"))
+-- let gDJFPont = (midiOn "^41" (whenmod 32 24 (# djfbus 3 (slow 8 $ range 0.15 0.45 saw))))
+let mBreak = ((mask "f . t f!3"))
+let mBreak = (midiOn "^42" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
+let g1 = gDJFManuel1
+let g2 = gDJFManuel2
+let modIndex = pF "modIndex"
+let m = mBreak
+setcps (60/60/4)
+d1 $ g1 $ m
+  -- $ "k(<3!3 5>,8)"
+  $ midiOn "^41" (fast 2) -- TODO: Comment to Cooldown :')
+  $ "k . <~ [k . <k k(<3 [5 3]>,8)>]>" # "[808bd:3,cpu2]"
+  -- $ fast 2 $ "k k k <k [<~ k> k]>" # "[909,jazz]" -- TECHNOOOO
+  # midiG' "^78" 0 1.4
+d2 $ g1 $ m
+  $ fast 2
+  $ "~ . <s!4 ~!3 s> <~!4 s!4> ~ ~"
+  # "[snare:20,clap]"
+  # note "<0!7 <0 -3>>"
+  # midiG' "^79" 0 1.4
+d3
+  $ mask "<t!3 [t!3 f]>"
+  $ g2 $ m
+  $ midiOn "^76" (iter "4 8")
+  $ midiOn "^44" (slice 4 (run "<8!3 <16 32>>"))
+  $ loopAt 2
+  $ chop 8
+  $ "break"
+  # cut 3
+  # speed (range "0" 2 "^52")
+  # midiG' "^80" 0 1.1
+d4
+  $ g2
+  $ whenmod 16 14 (# n "<6 ~>")
+  $ midiOn "^57" (striate "4 <4 2>" . chop 8)
+  $ loopAt 1
+  $ "bossa"
+  # n "<0 0 0 1 0 1 <2!3 3> <1 0>>"
+  # cut 4
+  # midiG' "^81" 0 1
+d5 $ g2
+  $ note (arp "<up down>" "<f'min'4 fs'min'4>*4"
+    + "[0,12]"
+    - 24
+  )
+  # room 0.4 # dry 1 # sz 0.9
+  # modIndex (range 0 35  ("^54"))
+  # crushbus 5 (range 12 3.5 ("^34"))
+  # "FMRhodes1"
+  # release 4
+  # lpf 2000
+  # midiG' "^82" 0 1.3
+d8 $ g2 -- Clave de l'été pitchable
+  $ midiOn "^59" (fast 2)
+  $ midiOn ("^91") (scramble 4 . fast 2)
+  $ (|* gain "0.75 1 1 1 0.75 1 1 1")
+  $ "d ~ ~ d d ~ d <~!3 d>"
+  # "[h2ogmhh:13]"
+  # speed (range 0.5 1.5 "^55")
+  # midiG' "^83" 0 1.5
+d9
+  $ g2
+  $ midiOn "^92" (ply "2 4")
+  $ midiOn "^60" (ply 8)
+  $ note (
+    "<f'min fs'min>"
+    + "[0,12]"
+    - 12
+  )
+  # "superhammond"
+  # att (range 0.5 1.5 saw)
+  # rel 4
+  # crushbus 9 (range 10 3.5 (sine))
+  # midiG' "^84" 0 1
+  # pan 0.8

live/midi/nova/breaks/solar.tidal

@@ -17,7 +17,7 @@ d1 $ g1 $ m --
   $ fix (# cut 1) ("808bd")
   $ midiOn "^42" (<| "k k k <k [<~ k> k]>")
   $ midiOff "^42" (<| "k . ~ <k k ~ ~> k*<1!3 2 2 2 1 2> <~ ~ k <k ~>>")
-  $ "[jazz,<808bd:2!6 <808bd:2 808bd:1> 808bd:1>,hh:5]"
+  $ "[jazz,<808bd:2!6 808bd:1!2>,hh:5]"
   # midiG' "^78" 0 1.3
 d3 $ g1 $ m -- Snare
     $ mask "<f!3 [f t] t!8 [t f]!4>"
@@ -36,7 +36,7 @@ d2 $ g1 $ m -- BREAK
   $ slice 8 (run 8)
   $ "break:11"
   # hpf 500
-  # octerbus       20 (range 0 0.25 "^52")
+  # octerbus       20 (range 0 0.5 "^52")
   # octersubbus    21 (range 0 1.2 "^52")
   # octersubsubbus 22 (range 0 1.2 "^52")
   # midiG' "^80" 0 1
@@ -65,7 +65,7 @@ d5 $ g2
   # modIndex (range 0 128 "^34")
   # crushbus 51 (range 16 4.6 "^54")
   # midiG' "^82" 0 1.5
-d8 $ g2
+d8 $ g2 -- FIXME REMOVE OR SAVE
   $ whenmod 8 4 (rarely (striate 2))
   $ whenmod 16 8 (sometimesBy "0 1" rev)
   $ midiOn "^59" (

live/midi/nova/breaks/spanish_thingy.tidal

+do
+setcps (115/60/4)
+let g = (# djfbus 1 (range 0.05 0.95 "^49"))
+d1 $ g
+  $ mask "<t!32 f!16 t!16>" -- Break
+  $ fix (|* gain 0.85) ("kick") -- Layering :)
+  $ "k k k <k <[<~ k> k]>>"
+  # "[jazz,909,kick:5]"
+  # lpf 2000
+  # gain 0.99
+  # sz 0.4
+  # room 0.2
+  # dry 1
+d2 $ g
+  $ mask "<t!32 f!16 t!16>" -- Break
+  $ "~ cp"
+  # lpf 1500
+  # gain 0.81
+d3 $ g
+  $ someCyclesBy "<0!3 0.25>" (ply 2)
+  $ someCyclesBy 0.2 (ply 2)
+  $ fast "<1 <2 4>>"
+  $ "hh*4"
+  # gain 0.85
+d4
+  $ slice 32 (3 + "<0 4 8 12>" + (run "<1 2>"))
+  -- $ "g/4"
+  $ "latin"
+  # cut 3
+d5 $ g
+  $ note "<e3 e3 d3 c3 e3 e3 d3 e3>"
+  # "bassWarsaw"
+  # gain 0.75
+  # lpf 4000
+  # crush 7.5
+  # cut 5
+d6 $ g
+  $ whenmod 8 7 (# speed 0.25)
+  $ loopAt 2
+  $ slice 4 (run 8)
+  $ "breaks165"
+  # room 0.82 # sz 0.9 # dry 1
+  # gain 0.85

live/midi/nova/computer_riddim.tidal

@@ -4,8 +4,6 @@
 -- Skipped: Chap 21 (Too complex, rather live synth)
 -- TODO: Chap 22 - From reggae to dub
 
-
-
 do
 -- region Nova Utils
 let gFactor = 2
@@ -19,7 +17,7 @@ let gDJF = (# djfbus 1 (range 0.05 0.95 "^49"))
 let gRoom = ((|+ room (range 0 0.5 "^29")) . (# dry 0.99))
 let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29")))
 -- let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2))
-let g = (gDJF . gRoom)
+let g = (gDJF . gRoom) -- TODO djf2 separate instruments
 let chords = "<[a5,c5,e5] [e4,g4,b4]>"
 let gDelay = id
 let gDelayD = id

live/midi/nova/dnb/meurice.tidal

@@ -10,8 +10,9 @@ let g = (gDJF)
 d1
   $ g
   $ (|* gain "1!7 0.95")
-  $ midiOn "^41" (<| "k k k <k!3 k*2>")
-  $ midiOff "^41" (<| "b . ~ b ~ <~!3 b>")
+  $ midiOn ("^41"-"^42") (<| "k k k <k!3 k*2>")
+  $ midiOff ("^41"-"^42") (<| "b . ~ b ~ <~!3 b>")
+  $ midiOn "^42" (<| "k*2")
   $ "[jazz,bd:2,kick:5]"
   # release 0.8
   # midiG' "^78" 0 1.2
@@ -42,7 +43,7 @@ d4 -- Resolute Bass
   $ g
   $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin)))
   $ midiOn "^57" ( -- Glitch vary end
-    whenmod 32 8 (slice 8
+    whenmod 32 0 (slice 8
     "<[0 1 <2!3 1*2> <3!3 1*2>]!4 0*4!2 [0 1 0 1] [0 1 0 [0 1 2 3]]>"
   ))
   $ loopAt 4
@@ -90,14 +91,15 @@ d8 -- Clave de l'été pitchable
   # midiG' "^83" 0 1.5
 d9 $ g -- CLAPS!
   $ midiOff "^60" (mask "<f!8 t!124>")
-  $ midiOn "^92" (fast 4)
   $ "~ cp"
   # midiG' "^84" 0 1.5
 d10 -- Nappes crushées indépendantes
+  $ midiOn "^92" (ply 4)
   $ juxBy 0.9 (# cut 101)
-  $ note ("<e e c e>")
+  $ note (euclid "<5 3 6>" 6 $ "<e e <c c g> <e b>>")
   # "moog"
   # cut 10
+  # rel 1
   # djfbus 2 (range 0.05 0.95 "^29")
   # crushbus 10 (range 16 1.5 "^36")
   # midiG' "^56" 0.2 1

live/midi/nova/dub/skunky.tidal

+-- TODO WAVES :)
+once $ "dr"
+
+do
+setcps (85/60/4)
+let g1 = (# djfbus 1 (range 0.05 0.95 "^49"))
+let g2 = (# djfbus 2 (range 0.05 0.95 "^29"))
+let harmonic = pF "harmonic"
+let gate = pF "gate"
+d1
+  $ g1
+  $ midiOn "^41" q(fast 2) -- TODO: Comment to Cooldown :')
+  $ superimpose ((|* gain 0.5) . (# "kick:5"))
+  $ midiOn "^42" (<| "k . k <k [~ k]>") -- Jump?
+  $ midiOn ("^43" - "^42") (<| "k k k <k [<[<~ k>]!16 ~!3 k ~!3 k k!3 ~ k!3 ~> k]>") -- RUN!
+  $ "jazz"
+  # legato 2
+  # lpf 4000
+  # room 0.85
+  # dry 1
+  # sz 0.8
+  # midiG' "^78" 0 1.5
+d2 $ g1 -- Snare cloc fantome
+  $ whenmod 32 8 (fast 2)
+  -- $ fix ((# rel "<0.18!7 0.45>") . (|* gain "<0.7!7 0.5>")) ("glitch")
+  $ fix ((|* gain 0.8)) ("snare")
+  $ "~ sn" # "[808lc,cpu:8,tech:5,snare:5]" -- ,glitch:2
+  # room ("<0.25!3 0.5>" + (slow 4 $ range 0 0.25 perlin))
+  # dry 0.98
+  # sz 0.9
+  # midiG' "^79" 0 1.5
+d3 $ g2
+  $ someCyclesBy 0.2 (ply 2)
+  $ midiOff "^44" (slow "<2!3 <1 2>>")
+  $ ply "2 <2!3 [2|4|8]*4>"
+  $ "h h h h*<1 2>"
+  # "hh"
+  # pan "<0.4 0.4 [0.4|0.6] <0.6 0.8>>"
+  # midiG' "^80" 0 (range 0 2 "^32")
+d7 $ g2 -- BREAKBEAT <3
+  $ loopAt 2
+  $ midiOn "^76" (mask "t(<3<5 8>>,8) t(<1 2>, 4) t?" . iter 4 . splice 8 (run 32) . (|> "breaks165"))
+  $ midiOn "^44" (slice 8 (run 8))
+  $ midiOff "^44" (slice 8 (run 4))
+  $ "break" # n "<21!32 22!8>"
+  # midiG' "^80" 0 (range 0 2 "^16")
+  # speed (range 0 2 "^52")
+d4 $ g2
+  $ note "[c3(<3!3 <1 5>>,8),[~!7 <<b3 ~> b3 b3 ~ ~ ~ b3>]] <c3 g3>"
+  # "ikedaBass"
+  # legato 2
+  # att 0.1 # rel 2
+  # room "<0.25!3 0>"
+  # sz 0.8
+  # midiG' "^81" 0 1.2
+  # crushbus 41 (range 14 2 "^53")
+  # panbus 42  (range 0.4 0.2 saw)
+  # harmonic (range "-25" 25 (fast 8 saw))
+  # cut 4
+d5 $ g2
+  $ note "<c3 [c3@2 ~ c3 . <~ bf2> ~ ~ bf2 c3 bf2 g2@2]>"
+  # "bassWarsaw"
+  # legato 2
+  # lfobus 50 (fast 4 sine)
+  # midiG' "^82" 0 1.5
+  # crushbus 51 (range 16 3.5 "^54")
+  # octerbus 52 (range 0 "<0.4 0.5 0.9 1.2>" (fast "<4!3 8>" sine))
+  # octersubbus 53 (range 0 8 ("^34" + 0.5 * (fast 16 cosine)))
+  # panbus 54 (range 0.6 0.8 saw)
+  # room 0.5 # sz 0.8
+  # cut 5
+d6 $ g2 -- Skank organ
+  $ midiOn "^59" (
+    superimpose (arp "<up up converge down>"
+    . (|+ note "0*<2 <2 4> 4 8>"))
+  )
+  $ note ("~ 0*<2 2 1 2> ~ 0*<2!3 <1 2>>"
+      + "<c5!2 [<f4!3 d5>, bf4]!2>*2"
+      + "[0,12]"
+      - 24
+  )
+  # "[<~!3 organTonewheel2>,organTonewheel3]"
+  # pan (0.7 + 0.2 * perlin)
+  # midiG' "^83" 0 1.3
+  # sustain 0.35
+  # room 0.85
+  # sz 0.8
+  # dry 1

live/midi/nova/lofi/soleil_de_sete.tidal

@@ -6,7 +6,6 @@ once $ "dr" # gain 0.9
 
 -- TODO:
 
-d1 $ "bd dr"
 
 do
 setcps (90/60/4)
@@ -20,8 +19,6 @@ let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
 let g  = gDJF1 -- . gFilter
 let g2 = gDJF2 -- . gFilter2
 d1 $ g
-  $ midiOn ("^44" - "^76") (ply 2)
-  $ midiOn "^76" (striate 4)
   -- $ mask "<t!16 f!4 t!12>" -- First break
   -- $ mask "<t!32 f!8 t!24>" -- Post-filter break
   -- $ mask "<f!6 t f t!24>"  -- Intro mask
@@ -32,6 +29,8 @@ d1 $ g
   # att 0.1
   # rel 0.8
 d2 $ g -- Aerian snare
+  $ midiOn ("^44" - "^76") (ply 2)
+  $ midiOn "^76" (striate 4)
   -- $ mask "<t!16 f!3 t t!12>" -- First break
   -- $ mask "<f!12 t!4 f!5 t!13>" -- Snare mask
   $ n "~ <~!3 [~!3 <10 10?>]>. 9"