chill: dub, melancolia, major nostalgia

live/chill/dub.tidal

 setcps 0.6
 
 d1 -- beat: default chill, run tous les 64
-$ whenmod 128 164 ( -- run
-  const $  "[r r?] r r [r r?]" # s "kick:5"
+$ whenmod 128 0 ( -- run
+  const $  "[r r?] r r [r r?]" # s "[kick:4,kick:10]"
   # release 0.8
   # gain 0.8
 )
 $ euclid "<1 2>" 4
 $ s "<k k*2 <k*2 k> k>"
-# s "kick:5"
+# s "kick:4"
 # release 0.8
+# gain 0.8
 -- # room 0.5
 -- # size 0.5
 
 d2 -- Carillons / Claps
 -- claps apparaissent et disparaissent
--- $ whenmod 64 48 (fix (# gain "<0.9,0.025 .. 0.5>") (s "clap"))
--- $ whenmod 64 32 (fix (# gain "<0.5,0.025 .. 0.9>") (s "clap"))
+$ always (# room 0.4)
+$ whenmod 64 48 (fix (# gain "<0.7,0.025 .. 0.5>") (s "clap"))
+$ whenmod 64 32 (fix (# gain "<0.5,0.025 .. 0.7>") (s "clap"))
 $ whenmod 64 0 (fix (# gain "0") (s "clap"))
 $ fix (# n (wchoose [(0.8,0),(0.2,1)])) (s "clap")
-$ s "hh(<4 4 4 2>,4) clap" # n "8 8 8 <8 8 8 9> 3"
+$ s "hh(<4 4 4 2>,4) [~ clap]" # n "8 8 8 <8 8 8 9> 3"
 
 d4 -- Basse
 -- $ rev
@@ -28,25 +30,26 @@ $ note (scale "aeolian"
 "<[<3 [4 3]> . ~ <0 3>] [<0 3?> 1 0 1]> . <~ ~ <0 1>? ~>~"
 )
 # s "bassWarsaw"
-# attack "3"
+# attack 3
 # room 0.3
 # size 0.8
+# gain 1.1
 |- note 30
 
 
 d5 -- Synth fou dub
--- $ fast 2
+$ fast 2
 $ superimpose (|+ note "<5 5 3 3 0 0>")
 $ note (scale "major" "~ 0")
 # s "cheapPiano1"
-|- note 12
+|- note 7
 # gain "<0.75 .. 1 1 .. 0.65>"
 # room "<0.2 .. 2 2 .. 0.2>"
 # size "<0.8 .. 0.2>"
 # dry "1,0.2 .. 4 5,0.5 .. 1"
 
 d6 -- lead harpe joyeuse
--- $ jux rev
+$ jux rev
 -- $ sometimes (fast 2)
 -- $ sometimes (off 0.125 (|+ 5))
 $ "h?*8"
@@ -54,16 +57,9 @@ $ "h?*8"
 # s "harpsichord2"
 # gain "<0.9,0.05 .. 0.7 0.7,0.05 .. 0.9>"
 
-d7
+d7 -- lead second
 $ someCycles (degrade . off 0.5 (|+ 0))
 $ s "~ dsynth(<4 3 5>,8)"
--- $ off 0.25 (|- note 7)
 # note (scale "major" "0 7")
-|- note "<12 9 7 12 5>"
+|- note "<12 9 7 12 5>" - 21
 # gain 0.7
--- |- note "<5 10 12 10 5>"
-
-solo 5
-
-mute 4
-unmute 4

live/chill/melancolia.tidal → live/chill/major_nostalgia.tidal

 setcps 0.5
 
-solo 9
-
 d1 -- batterie
-$ every 4 (# s "dr:2")
-$ s "[hh*2 dr:1 hh dr:1]"
+$ every 4 (sometimes (# s "cpu:6"))
+$ s "[bd,[hh*2 dr:1 hh dr:1]]"
 
 d2 -- drums
 $ whenmod 16 8 (# gain (1.2 * tri))
@@ -14,23 +12,38 @@ $ whenmod 16 0 (# gain (0.8 * tri))
 $ "hh:12(<2 4 2 6>,<4 8>)"
 
 d3 -- basse
-$ someCycles (# reverb .2)
+$ someCyclesBy 0.2 ((# room 0.2) . (# dry 8))
 $ someCycles (# attack 0.2)
 $ note (scale "major" "0(3,8) [<3 3 -6 -6> -2(<1 2 4>, 6)]" - 7)
 # s "bassWarsaw"
 # gain 0.9
 
 d4 -- lead piano
+$ whenmod 32 16 (someCycles $ degrade)
 $ someCycles (jux rev)
 $ whenmod 16 14 (|+ note 15)
 $ whenmod 16 10 (|- note 3)
 $ whenmod 4 2 (|- note 7)
-$ someCycles (off 0.125 (|+ 14))
-$ someCycles (off 0.25 (|- 5))
+$ someCycles (off 0.125 (|+ note "<12 7 12 12>"))
+$ someCycles (off 0.25 (|- note 5))
 $ note (scale "major" "~ [3,<8 7 5>,10]" - 7)
-# s "cheapPiano1"
+# s "superpiano"
 # sustain 2
-# attack 0.2
+# velocity 0.8
+# gain 0.8
+
+d5
+$ someCyclesBy 0.2 rev
+$ chop "<2 4 6 8>"
+$ off 0.25 (|+ 7)
+$ s "moogBass" # cut 1
+# note (scale "major" "<1 0 [1 3] ~>")
+# gain 0.9
 
-d5 -- TODO lead?
-$ s "organReed(<1 3>,8)"
+d5 -- final aigu
+$ degrade
+$ superimpose (|- note 7)
+$ note (scale "major" "0 3 7 12")
+# s "~ sosBell ~"
+# release 0.5
+# gain 0.7