diff --git a/live/chill/swing.tidal b/live/chill/bad_bad_guy.tidal similarity index 55% rename from live/chill/swing.tidal rename to live/chill/bad_bad_guy.tidal index 8f3f51c..2ef46bc 100644 --- a/live/chill/swing.tidal +++ b/live/chill/bad_bad_guy.tidal @@ -1,14 +1,11 @@ setcps 0.5 d1 -$ whenmod 16 8 ( - superimpose (# s "defaultB") . (# gain 0.9) . (# release 0.5) -) -$ note ("<<0 3> <0 3> <0 -4> <0 -4>>" + "0 7 ~ 0 6 7 6 3") -# s "bass3" -# gain 0.8 +$ fast 2 -- faster! +$ euclid "<1 1 1 1 2 2 2 2>" 2 +$ s "jazz:0" -d2 +d2 -- drums, someroll $ whenmod 16 8 (# gain 1) $ whenmod 16 4 (# gain 0.8) $ whenmod 16 0 (# gain 0.6) @@ -16,15 +13,27 @@ $ fast 2 $ sometimes (# s "dr 808cy:5") $ s "dr*<2 4> [hh hh?]" -d3 + +d3 -- bass +$ note ("<<0 3> <0 3> <0 -4> <0 -4>>" + "0 7 ~ 0 6 7 6 3") +# s "bass3" +# gain 0.8 + +d3 -- pont 80 drums +$ fast 2 $ someCycles ((off 0.625 (|+ 0)) . (# n "3")) $ off 0.125 (|+ 0) $ s "e" # s "electro1" # n "2" -d4 $ silence-- TODO: gets annoying, do something -$ chop 2 -$ s "sillyVoice" # cut 1 -# note "<0 0 3 0 0 3 7 0> <7 3>" -# gain 1 +d4 -- TODO: gets annoying, do something +$ (chop 4) . (# cut 1) -- chopped echo +$ off 0.25 ((|+ note 7) . (# cut 1)) +$ off 0.125 (|+ note 3) +$ "moogBass" +# note "<0 0 0 0 3 3 3>" +# gain 0.7 +-- # cut 1 + +d6 $ s "cp/4" diff --git a/live/chill/dub.tidal b/live/chill/dub.tidal index e907afc..0e0ea5c 100644 --- a/live/chill/dub.tidal +++ b/live/chill/dub.tidal @@ -1,7 +1,7 @@ setcps 0.6 d1 -- beat: default chill, run tous les 64 -$ whenmod 128 0 ( -- run +$ whenmod 128 64 ( -- run const $ "[r r?] r r [r r?]" # s "[kick:4,kick:10]" # release 0.8 # gain 0.8 @@ -26,20 +26,19 @@ $ s "hh(<4 4 4 2>,4) [~ clap]" # n "8 8 8 <8 8 8 9> 3" d4 -- Basse -- $ rev $ jux degrade -$ note (scale "aeolian" +$ note (scale "major" "<[<3 [4 3]> . ~ <0 3>] [<0 3?> 1 0 1]> . <~ ~ <0 1>? ~>~" ) # s "bassWarsaw" # attack 3 # room 0.3 # size 0.8 -# gain 1.1 |- note 30 -d5 -- Synth fou dub +d5 -- Reggaeman bloqué dub $ fast 2 -$ superimpose (|+ note "<5 5 3 3 0 0>") +$ superimpose (|+ note "<3 3 5 5>") $ note (scale "major" "~ 0") # s "cheapPiano1" |- note 7 @@ -50,8 +49,8 @@ $ note (scale "major" "~ 0") d6 -- lead harpe joyeuse $ jux rev --- $ sometimes (fast 2) --- $ sometimes (off 0.125 (|+ 5)) +$ sometimes (fast 2) +$ sometimes (off 0.125 (|+ 5)) $ "h?*8" # n (scale "aeolian" "0 2 4 <7 9> <0 -3>") # s "harpsichord2" diff --git a/live/chill/dub/80s.tidal b/live/chill/dub/80s.tidal new file mode 100644 index 0000000..6938af2 --- /dev/null +++ b/live/chill/dub/80s.tidal @@ -0,0 +1,45 @@ +setcps 0.5 + +d3 -- bass +$ whenmod 8 4 (|+ note 3) +$ note (scale "minPent" "<<0 [0 0?]> [3 0]> <[3 .. 0][0 .. 3]>" ) +-- $ note (scale "minPent" "[[3 2] 0 3] [0 [<0 2 0 0> .. <2 0>]]") +# s "ikedaBass" +|- note 21 + +d1 -- kick techno +$ s "kick(2,4)" # room 0.2 # dry 4 -- metallique +-- $ s "kick:4(<1 2 4 4>,4,1)" -- rond +# gain 0.9 + +d2 -- drums 80s +$ n "[2 <[3 2] [2 3]> ~] [3 2 <3? ~>]" +# s "electro1" + +d4 -- synth fou dub +$ whenmod 16 8 (|- note 3) +$ fast 2 +$ superimpose (|+ note "<5 5 3 3>") +$ superimpose (|- note "7") +$ note (scale "major" "~ 0") +# s "cheapPiano1" +|+ note 8 +# gain 0.7 +# room 0.2 + +d5 +$ someCycles (slow 2) +$ always (superimpose (rev . (# gain 0.5))) +-- $ someCyclesBy 0.8 (|- note (choose [1,2,3,5])) +$ off 0.125 (|+ note 5) +$ off 0.375 (|+ note 7) +$ arpeggiate +$ note (scale "major" "[0, 7, 5, 3]") +# s "bsguitar:3" +|- note 7 +# gain 0.7 + +d6 +$ s "~ c ~ [c? ~ c?]" +# s "clap" +# n 2 diff --git a/live/chill/major_nostalgia.tidal b/live/chill/major_nostalgia.tidal index 8721dea..46c4848 100644 --- a/live/chill/major_nostalgia.tidal +++ b/live/chill/major_nostalgia.tidal @@ -1,17 +1,21 @@ setcps 0.5 d1 -- batterie +$ every' 4 3 (sometimes (# silence)) $ every 4 (sometimes (# s "cpu:6")) -$ s "[bd,[hh*2 dr:1 hh dr:1]]" +$ s "[sosKick,[hh*2 dr:1 hh dr:1]]" d2 -- drums $ whenmod 16 8 (# gain (1.2 * tri)) $ whenmod 16 6 (# gain (1 * tri)) $ whenmod 16 4 (# gain (0.9 * tri)) $ whenmod 16 0 (# gain (0.8 * tri)) -$ "hh:12(<2 4 2 6>,<4 8>)" +$ someCycles (fast 2) +$ euclid "<2 4 2 6>" "<4 8>" +$ "hh:12" d3 -- basse +$ whenmod 8 4 (|- note 5) -- quinte $ 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) @@ -20,6 +24,7 @@ $ note (scale "major" "0(3,8) [<3 3 -6 -6> -2(<1 2 4>, 6)]" - 7) d4 -- lead piano $ whenmod 32 16 (someCycles $ degrade) +$ whenmod 8 4 (|- note 5) -- quinte $ someCycles (jux rev) $ whenmod 16 14 (|+ note 15) $ whenmod 16 10 (|- note 3) @@ -32,18 +37,26 @@ $ note (scale "major" "~ [3,<8 7 5>,10]" - 7) # velocity 0.8 # gain 0.8 -d5 +d5 -- choeur fou +$ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>") +$ whenmod 64 32 (# gain 0.9) +$ whenmod 8 4 (|- note 7) -- quinte +-- $ superimpose ((|+ note 5) . degrade) -- variations quinte $ 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 -- final aigu -$ degrade -$ superimpose (|- note 7) +d6 -- final aigu +$ whenmod 64 32 degrade +$ sometimes degrade +$ sometimes rev +$ whenmod 64 48 (# gain 0.8) +$ off 0.25 (|- note 7) +$ off 0.125 (|- note 7) +$ off 0.125 (|- note 3) $ note (scale "major" "0 3 7 12") # s "~ sosBell ~" # release 0.5 -# gain 0.7 +# gain 0 diff --git a/live/fusion/anthropocene.tidal b/live/fusion/anthropocene.tidal index 1c379cb..dc98f91 100644 --- a/live/fusion/anthropocene.tidal +++ b/live/fusion/anthropocene.tidal @@ -6,31 +6,33 @@ setcps 0.5 -- Acte quatre: résolution d1 --beat --- $ fix ((# s "sosKick") . (# gain 1.2)) (s "k") -- 1: kick soft --- $ fix ((fast 2) . (off 0.5 (|+ 0)) . (# s "[kick:0,reverbkick]")) (s "k") -- 2: kick harder --- $ fix (((off 0.125 (|+0) . (>| s "kick:5")))) (s "k") -- kick hard (heartbeat) -$ fix ((someCyclesBy 0.25 (off 0.125 (|+0))) . (>| s "kick:5(<<2 2 4 4 4 4 2 2 3 4 4 3 2 2 0 0> 4>,4)")) (s "k") -- 3: kick hard (heartbeat) -- $ someCyclesBy 0.1 ((# s "beating") . (stut 4 0.5 0.25)) -- 2: tension +$ fix ((# s "sosKick") . (# gain 1.2)) (s "k") -- 1: kick soft +-- $ fix ((off 0.5 (|+ 0)) . (# s "[kick:0,reverbkick]")) (s "k") -- 2: kick harder +-- $ fix (((off 0.125 (|+0) . (>| s "kick:5*<1 2 1 1>")))) (s "k") -- kick hard (heartbeat) +-- $ fix ((someCyclesBy 0.25 (off 0.125 (|+0))) . (>| s "kick:5(<<2 2 4 4 4 4 2 2 3 4 4 3 2 2 0 0> 4>,4)")) (s "k") -- 3: kick hard (heartbeat) -- $ s "k(2,4)" -- 1 tranquille --- $ s "k(<2 2 2 2 4 4 4 4>,4)" -- 1 setup 4 temps --- $ s "k(<2 2 2 2 4 4 4 4>,4)" -- 1 final 4 temps -$ s "k k " -- 2 : variation pour kick hard -# gain 0.9 +$ s "k(<2 2 2 2 4 4 4 4>,4)" -- 1 setup 4 temps +-- $ s "k(4,4)" -- 1 final 4 temps +-- $ s "k k " -- 2 : variation pour kick hard +# gain 0.8 -d2 -$ s "hh [dr:1,hh]" -# gain "1 0.8" +d2 -- 1: batterie tic tac +-- $ fast 2 -- 1: faster! +$ whenmod 8 4 (const $ n "2 1 . ~ . ~ . ~" # s "bshihat") +$ n "2 1" +# s "bshihat" -d3 $ s "bskick:3(3,8)" d5 -- basse $ whenmod 8 4 (|- n 2) -$ someCyclesBy 0.4 ((superimpose (|- 7)) . (|+ 7)) -- 2: matiere plastique +$ someCyclesBy 0.8 (superimpose (# s "subBass2")) +-- $ someCyclesBy 0.4 ((superimpose (|- 7)) . (|+ 7)) -- 2: matiere plastique $ someCycles (off 0.25 (|- 7)) $ n (scale "major" "[0 0] ~ 1 0 1 1 0 0") |- 14 # s "subBass1" -# gain 1.0 +# gain 1.1 -- ACTE 2: METAL ET PLASTIQUE @@ -40,7 +42,8 @@ $ n "2 1 2 <1 1*2>" # s "bshihat" d3 -- batterie indus metal -$ stut 2 0.9 0.05 +$ every 2 (someCycles (# silence)) +-- $ stut 2 0.7 0.1 $ n "3 3 3 4" # s "bskick" # delay 5 @@ -49,37 +52,42 @@ $ n "3 3 3 4" d4 $ -- noise guitar tension s "bsguitar:6*2" # note "<0 0 0 0 1 1 1 1>" |- note 1 -# gain 0.7 +# gain 0.5 -- 3 -> 4 d6 -- claps encourageants -$ fast 2 +-- $ whenmod 64 32 (# silence) +-- $ fast 2 +-- $ every' 2 1 ((# release 0.8)) -- deuxieme clap sans echo +$ fix ((# s "clap:2") . (# room 0)) (s "clap") -- claquements de doigts $ s "~ clap" -# room "<0.2 .. 0.5 0.6 .. 0.2>" -# dry "<1 .. 4 3 .. 0>" +# room "<<0.2 .. 0.5 0.6 .. 0.2> 0>" +# dry "<0 .. 3 3 .. 0>" -- Acte quatre: résolution +d4 $ s "bsguitar:4" # cut 1 # begin 0.2 -- ACTE 4 +d4 -- lead guitar pensive +-- $ whenmod 16 8 (# begin 0.5) -- 2: alterne au debut +$ s "bsguitar:4" # cut 1 +-- # begin "<0 0 0.5 0.5 0.2 0.4 0 0>" +-- # begin "0.6" -- pont! +-- # begin "0.8" -- pont evanescent! +# up 1 +# room 0.8 +# size 0.6 +# gain 1 +# size "<0.4,0.05 .. 0 0,0.1 .. 0.4>" d6 --phazer joyeux, resolution +$ fast 2 $ someCycles (rev) $ someCycles (chop 2) $ someCyclesBy 1 (|- n 2) -- 3: parfois mineure! $ jux (degrade . rev . chop "<1 2 4 8>") $ n (scale "major" "<3 [3,5] [3,7] [3, 5, 7]>") # s "phazer" -# gain 0.5 -|- n 2 -- 3: parfois mineure! - -d4 -- lead guitar pensive --- $ whenmod 16 8 (# begin 0.5) -- 2: alterne au debut -$ s "bsguitar:4" # cut 1 --- # begin "<0 0 0.5 0.5 0.2 0.2 0.3 0.3>" -# begin "0.6" -- pont! --- # begin "0.8" -- pont evanescent! -# up 1 -# room 0.6 -# gain 0.7 -# size "<0.4,0.05 .. 0 0,0.1 .. 0.4>" +# gain 0.6 +|- n "2" -- 3: parfois mineure! diff --git a/live/late/temps.tidal b/live/late/temps.tidal new file mode 100644 index 0000000..9455abf --- /dev/null +++ b/live/late/temps.tidal @@ -0,0 +1,27 @@ +setcps 0.5 + +d1 +$ whenmod 16 8 (euclid 4 8) +$ whenmod 16 0 (euclid 2 8) +$ s "kick:5" + +d2 +$ euclid "<3 5>" 8 +$ s "[~ hh]" + +d3 +$ every 4 rev +$ note "0 3 5 [7 7?]" +# s "bass3" + +d4 +$ someCycles (# crush 5) +$ superimpose (|- note 7) +$ off 0.125 (|+ note "<3 5 7>") +$ s "~ superpiano" + +d5 + +$ off 0.25 (|+ note "<3 5 7>") +$ s "superpiano" +|- note 21 diff --git a/live/techno/delic_jazz.tidal b/live/techno/delic_jazz.tidal index 2d7e6cd..f3f4d98 100644 --- a/live/techno/delic_jazz.tidal +++ b/live/techno/delic_jazz.tidal @@ -12,22 +12,22 @@ $ s "tech:5*4" # note (-4) # gain 1.3 d2 -$ s "[~ hh ~ ]*2" $ every 4 (const $ "[~ [hh,hh:8] ~ [hh ~ hh]]*2" # gain 1.2) +$ s "[~ hh ~ ]*2" # gain 1.2 d3 $ s "bd sn bd " d4 -- main gauche --- $ whenmod 32 24 (|+ note 7) +$ whenmod 32 24 (|+ note 7) $ s "superpiano" # note "<-20 [-19,-15] [-20,-16] ~>" -# velocity "<0.7 0.5 0.6>" +# velocity "<0.7 0.6 0.7>" # sustain 3 -# gain 1.2 d5 -- main droite +$ whenmod 128 64 rev $ whenmod 64 48 ( const $ slow 4 @@ -39,8 +39,6 @@ $ whenmod 64 48 ( # velocity 1 # sustain 2 ) -$ whenmod 32 16 (# gain 0.8) -$ whenmod 32 0 (# gain 0) $ every 4 ((>| s "superpiano*16") . (# note "6 <2 5> <2 1>")) $ someCycles (# sustain 3) $ s "[p?*3] . ~ . [p*2] . ~ [p? p] . ~" @@ -48,7 +46,7 @@ $ s "[p?*3] . ~ . [p*2] . ~ [p? p] . ~" # note "<1 [2,6] [1,5] ~>" # velocity 0.8 -d5 -- white noise +d6 -- white noise $ someCycles (# silence) $ sometimes (jux rev) $ (# speed (rand / 2)) @@ -56,7 +54,7 @@ $ s "glitch:2" -- # n (run 8) # cut 1 # gain 1.2 -d6 +d7 -- ??? TODO: What is that supposed to be? $ someCyclesBy 0.2 (# gain 1) $ slow 2 $ s "[~ jazz:2]*8" diff --git a/live/techno/feeling_electric.tidal b/live/techno/feeling_electric.tidal new file mode 100644 index 0000000..0760fd8 --- /dev/null +++ b/live/techno/feeling_electric.tidal @@ -0,0 +1,80 @@ +setcps 1 + +d1 -- bass +$ whenmod 64 32 ((# gain 1) . (# room 0.2)) +$ whenmod 32 16 (# silence) +$ slow 2 +$ note ( + scale "major" ( + cat [ + " 1 1 ~ . ~ [~ 0]", + "0 [0 1] ~ ~ . ~ " + ] + + "[0, 7]" -- gamme + ) +) +# s "bass3" +# gain 0.8 + +d1 -- autre Basse +$ whenmod 8 4 (|- n 2) +$ someCyclesBy 0.4 ((superimpose (|- 7)) . (|+ 7)) -- 2: matiere plastique +$ someCycles (off 0.25 (|- 7)) +$ n (scale "major" "[0 0] ~ 1 0 1 1 0 0") +|- 14 +# s "subBass1" +# gain 1.2 + + +d2 -- hit roll +$ someCycles (# s "dr:2") +$ someCycles (# s "dr:1") +$ s "" +# s "hh" +# release 0.5 + +d3 -- claps +$ whenmod 32 16 (degradeBy 0.2) +$ s "<[~ cp] [~ cp] [~ cp] [~ cp . cp ~]>" +# s "clap" +# gain 1.1 + +d4 -- fork +$ whenmod 50 0 (# release "0.05,0.01 .. 0.5") +$ off 0 ((# s "supergong") . (# gain 0.5) . (# release 0.5)) +$ s (cat [ +"~ f f*2 ~" +, "f f ~ f" +, "f*2 ~ f f" +, "[f*4] ~" +]) +# s "superfork" # n (scale "major" (-4)) +# release 0.5 + +d5 -- kick +-- $ fast 2 +$ fast "<2 4 2 2 1 0>" +$ every 4 (degrade) +-- $ s "kick:19" +$ s "kick:5" + +d6 -- drums 80s +$ degrade +$ superimpose (# n 0) -- tick +$ fast 8 $ "electro1" # n (choose [1,2,2,2,3,3,3]) + +d7 -- lead orgue +$ degradeBy 0.4 +$ rev +-- $ slow 2 $ degrade $ (|+ note 7) +$ sometimes (off "<0 0.125 0.25 0.25>" (# s "[organTonewheel0,organTonewheel4]") . (|- gain 0.1)) +-- $ superimpose (# s "organTonewheel2") +$ superimpose (# s "organTonewheel3") +$ chop "<2 4 4 8 8 2>" +$ off (1/4) (|+ note "<5 7 3 0 5>") +$ note "-7" +# gain 0.75 +# room 0.8 +# dry 2 +# size "<0,0.05 .. 0.3 0.3,0.05 .. 0>" +# s "organTonewheel1" diff --git a/live/techno/german_wings.tidal b/live/techno/german_wings.tidal new file mode 100644 index 0000000..08acd51 --- /dev/null +++ b/live/techno/german_wings.tidal @@ -0,0 +1,83 @@ +-- Techno - 80s - aerian +setcps 0.5 + +d1 +-- $ fast 4 . (off 0.5 (# s "<~ clap>")) +$ (fast 2) . (off 0.5 ((# s "clap:1") . (# room 0.5) . (# dry 1))) +$ s "kick:2" +# gain 0.8 + +d2 -- batterie, FIXME too loud +$ fix (# s "electro1:0") (n 1) +$ n "3 1 3 [[1 ~ 1?] 1]" +# s "jazz" +-- # note (irand 7) + +d3 -- drums +$ whenmod 16 10 ( -- 80s drumroll + const $ every 4 (off 0.25 (# n 2)) + $ n "[2 3] . 2 . 3 . 2 2 3 2" # s "electro1" + -- const $ n "[2 <[3 2] [2 3]> ~] [3 2 <3? ~>]" # s "electro1" +) +$ whenmod 32 16 (degrade) +$ whenmod 16 8 (off 0.125 (|+ 0)) +$ sometimes (# s "dr") +$ s "hh(<4 4 3 4>,8)" + +d4 +$ every 8 (fast 2) +$ s "[~ electro1:1]*4" +# gain 0.8 + +d5 +$ whenmod 8 4 (|- note 2) +$ off 0.125 (degrade . (# room 0.2) . (# size 0.8)) +$ superimpose ((# s "bass3:2") . (|+ note 7)) +$ note "0 [~ 0 ~] . <0 <[0 3] [0 -2]>>" +|- note 14 +# s "bassWarsaw" + +d7 -- piano lead +$ whenmod 8 0 (off (1/8) (# s "jazz:6")) -- scratched +$ off (3/8) (|+ note 7) +$ s "jazz:5?*16" +# note (scale "major" "11") +|+ note "7 0 -7" +# gain 0.8 + +d6 -- piano second +$ whenmod 32 30 ((# s "control") . (# gain 0.8)) -- transition synth: violent +$ whenmod 8 4 (|- note 2) +$ sometimes (off 0.125 (|+ note 7)) +$ superimpose ((# s "FMRhodes2") . (|+ note 7)) +$ note "0 [~ 0 ~] . <0 <[0 3] [0 -2]>>" +# s "FMRhodes1" + +d9 -- noise +$ sometimes (# crush 6) +$ whenmod 32 28 (often $ (# gain 0.7)) +$ whenmod 32 0 (almostNever $ (# gain 0.7)) +$ s "~ cosmicg:2/2" +# gain 0 + +d8 -- white noise +$ someCycles (# silence) +$ sometimes (jux rev) +$ (# speed (rand / 2)) +$ s "glitch:2" -- # n (run 8) +# cut 1 +# gain 1.2 + + +--- SANDBOX + +d6 -- lead synth? too low currently +$ whenmod 32 30 ((# s "control") . (# gain 0.8)) -- transition synth: violent +$ whenmod 8 7 (# note (scale "major" "1 3 5 7")) +$ whenmod 8 6 (|+ note 7) +$ whenmod 8 2 (|- note 7) +-- $ whenmod 32 24 (degradeBy 0.8) +-- $ whenmod 32 16 (degrade) +$ superimpose ((# s "moogBass") . (# gain 0.8)) +$ s "FMRhodes1*8" +# note (scale "major" "1 3 7 <5 ~>") diff --git a/live/techno/major_nostalgia.tidal b/live/techno/major_nostalgia.tidal new file mode 100644 index 0000000..2cb2a0d --- /dev/null +++ b/live/techno/major_nostalgia.tidal @@ -0,0 +1,61 @@ +setcps 0.5 + +d1 -- batterie +$ whenmod 64 16 (fast 4 . (every 4 (off 0.5 (|+ 0)))) +$ s "kick:5" +# gain 0.8 + +d2 -- drums +$ whenmod 64 16 (sometimes (# s "dr") . (# s "hh:5")) +$ whenmod 64 14 (fast 2 . (# s "hh:1")) +$ whenmod 4 3 (sometimes (# n "1")) +$ someCycles (fast 2) +$ euclid "<2 4 2 6>" "<4 8>" +$ "hh:12" + +d3 -- basse +$ whenmod 8 4 (|- note 5) -- quinte +$ 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) +$ whenmod 8 4 (|- note 5) -- quinte +$ someCycles (jux rev) +$ whenmod 16 14 (|+ note 15) +$ whenmod 16 10 (|- note 3) +$ whenmod 4 2 (|- note 7) +$ 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 "superpiano" +# sustain 2 +# velocity 0.8 +# gain 0.8 + +d5 -- choeur fou +$ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>") +$ whenmod 64 32 (# gain 0.9) +$ whenmod 8 4 (|- note 7) -- quinte +-- $ superimpose ((|+ note 5) . degrade) -- variations quinte +$ someCyclesBy 0.2 rev +$ chop "<2 4 6 8>" +$ off 0.25 (|+ 7) +$ s "moogBass" # cut 1 +# note (scale "major" "<1 0 [1 3] ~>") + +d6 -- final aigu +$ whenmod 64 32 degrade +$ sometimes degrade +$ sometimes rev +$ whenmod 64 48 (# gain 0.8) +$ off 0.25 (|- note 7) +$ off 0.125 (|- note 7) +$ off 0.125 (|- note 3) +$ note (scale "major" "0 3 7 12") +# s "~ sosBell ~" +# release 0.5 +# gain 0 diff --git a/live/techno/phazer.tidal b/live/techno/phazer.tidal index 49a1277..f6a6838 100644 --- a/live/techno/phazer.tidal +++ b/live/techno/phazer.tidal @@ -12,8 +12,6 @@ $ note (scale "major" "<0 2 7 <5 5 4>*2>") # s "phazer" # gain 0.7 -unmute 1 - d2 -- beat + dark amp $ (fast 4 . (fix (# n "[9,7?]") (s "kick"))) -- FASTER! $ every' 4 3 (# gain "0 <0 1 1 0>") -- dark amp diff --git a/live/techno/violent_violin.tidal b/live/techno/violent_violin.tidal index d8fb369..56c45cd 100644 --- a/live/techno/violent_violin.tidal +++ b/live/techno/violent_violin.tidal @@ -18,7 +18,7 @@ d3 -- mid drums 80s $ whenmod 32 24 (# gain 1) $ someCycles (# n 3) $ s "electro1:2(<3 5 3 5 3 5 3 8>,8)" -# gain 0 +-- # gain 1.4 d4 -- bass -- $ degrade . fast 2 -- rythme glitch @@ -42,21 +42,22 @@ $ n (scale "aeolian" "~ <[0 3] [5 4]>") # s "violin" # gain 0.9 -d6 +d6 -- lead carillon $ whenmod 16 12 (|+ 7) $ whenmod 16 8 (off 0.125 (|+ "<5 4>")) $ someCyclesBy 0.2 (arpeggiate . degrade) +$ someCycles (off 0.25 (rev)) $ superimpose (# n "[0?,3?,7?]") $ n (scale "aeolian" "<[5 4] ~> ~") # s "kalimba" # gain 0.9 -|- note "7 0 0 7" +|- note "7 <0 0 2 2> <0 2 2 0> 7" d7 $ every 2 (# silence) $ jux rev $ slow 2 $ off 0.125 (|+ 7) -$ note "[0,7] [3,<5 12>]" +-- $ note "[0,7] [3,<5 12>]" +$ note "<[7] [7 7 7 0]>" # s "cs80leadMH" -# gain 0.7