diff --git a/copycat/electric_fever.tidal b/copycat/electric_fever.tidal index c3d10c3..059f195 100644 --- a/copycat/electric_fever.tidal +++ b/copycat/electric_fever.tidal @@ -16,7 +16,6 @@ $ note ( # gain 0.8 - d2 -- hit roll $ s "" # s "hh" @@ -39,6 +38,7 @@ $ s (cat [ # release 0.5 d5 +$ someCycles (fast 2) -- $ whenmod 32 16 (# silence) $ whenmod 32 4 (# gain 0.8) $ every 4 (# silence) diff --git a/live/bdmania.tidal b/live/bdmania.tidal index 0ddd226..32e6a5a 100644 --- a/live/bdmania.tidal +++ b/live/bdmania.tidal @@ -1,31 +1,49 @@ -d1 $ sound "bd(<<0 1 5 7> 3>,8)" +d1 -- kick +-- $ euclid "<4 6>" 4 +$ euclid "<<0 1 5 7> 3>" 8 +$ sound "bd" -d2 +d2 -- tic toc +$ someCycles (degrade . fast 2) $ every 8 (off (1/8) (|+0)) $ every' 16 7 degrade $ every 16 (# gain 0) $ s "bd(5,8)" # note "<50 <55 <60 65>>>" -d3 +d3 -- vibration montante! $ every' 16 12 (# gain 0) $ every' 16 13 (# gain 0) $ every' 16 14 (# gain 0) -$ every' 16 15 (# gain saw) +$ every' 16 15 (# gain (0.5 + saw / 2)) $ sometimesBy 0.01 (# crush 4) $ every 4 (rev) $ sound "bd" # note "<<28 21 14 7 0> <7 14 21 28 35 42 49 56 63 70>>" >| speed ( - -- segment "<80 100 120 80>/16" segment 100 $ range 1 3 saw ) # gain 0.5 -d4 +d4 -- helico $ every' 4 3 (off 0.125 (|+ 0)) $ every 8 (# gain 0) -$ every' 8 7 (# gain 1.5) +$ every' 8 7 (# gain 1.2) $ rev $ iter 4 $ loopAt 4 $ chop 16 $ "bd" -# gain 1.6 + +d5 -- cordes guitare pincée +$ someCycles (fast 2 . degrade) +$ someCycles (slow 2 . off 0.125 (|- up 12)) +$ off 0.125 (|+ up 12) +$ off 0.125 (|+ up 12) +$ off 0.25 (|- up 12) +$ up "40 47" +# s "bd" + + +d6 -- clap! +$ stut 2 1.05 0.05 +$ s "~ ~ bd ~" +# hpf 400 +# lpf 1000 diff --git a/live/chill/bad_bad_guy.tidal b/live/chill/bad_bad_guy.tidal index 2ef46bc..2363b53 100644 --- a/live/chill/bad_bad_guy.tidal +++ b/live/chill/bad_bad_guy.tidal @@ -9,11 +9,10 @@ d2 -- drums, someroll $ whenmod 16 8 (# gain 1) $ whenmod 16 4 (# gain 0.8) $ whenmod 16 0 (# gain 0.6) -$ fast 2 +-- $ fast 2 $ sometimes (# s "dr 808cy:5") $ s "dr*<2 4> [hh hh?]" - d3 -- bass $ note ("<<0 3> <0 3> <0 -4> <0 -4>>" + "0 7 ~ 0 6 7 6 3") # s "bass3" diff --git a/live/chill/dub.tidal b/live/chill/dub.tidal index 0e0ea5c..fb224e4 100644 --- a/live/chill/dub.tidal +++ b/live/chill/dub.tidal @@ -1,16 +1,16 @@ setcps 0.6 d1 -- beat: default chill, run tous les 64 -$ whenmod 128 64 ( -- run +$ whenmod 128 1000 ( -- run const $ "[r r?] r r [r r?]" # s "[kick:4,kick:10]" # release 0.8 - # gain 0.8 + # gain 0.7 ) $ euclid "<1 2>" 4 $ s " k>" # s "kick:4" # release 0.8 -# gain 0.8 +# gain 0.7 -- # room 0.5 -- # size 0.5 @@ -21,44 +21,44 @@ $ 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 +$ rev $ jux degrade $ 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 -|- note 30 - d5 -- Reggaeman bloqué dub $ fast 2 +$ sometimes (superimpose (|- note 7)) $ superimpose (|+ note "<3 3 5 5>") $ note (scale "major" "~ 0") -# s "cheapPiano1" +# s "superpiano" |- note 7 -# gain "<0.75 .. 1 1 .. 0.65>" +# gain "<0.75 .. 0.8 0.8 .. 0.65>" # room "<0.2 .. 2 2 .. 0.2>" # size "<0.8 .. 0.2>" # dry "1,0.2 .. 4 5,0.5 .. 1" +# velocity (0.5 + (rand / 2)) d6 -- lead harpe joyeuse $ jux rev +$ whenmod 32 16 (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" # gain "<0.9,0.05 .. 0.7 0.7,0.05 .. 0.9>" d7 -- lead second +$ sometimes (|+ note 7) +$ sometimes (|- note 7) $ someCycles (degrade . off 0.5 (|+ 0)) $ s "~ dsynth(<4 3 5>,8)" # note (scale "major" "0 7") |- note "<12 9 7 12 5>" - 21 -# gain 0.7 +# gain 0.5 diff --git a/live/chill/dub/rebond.tidal b/live/chill/dub/rebond.tidal new file mode 100644 index 0000000..48e070d --- /dev/null +++ b/live/chill/dub/rebond.tidal @@ -0,0 +1,15 @@ +setcps 0.5 + +d1 -- kick rond, lourd +$ s "kick:7" + +d2 -- synthe regulier +$ superimpose (|+ note "<3 5>") +$ n (scale "aeolian" "[0 0] ~ 7 ~") +# s "superpiano" + +d3 +$ note (scale "aeolian" "0 3") +# s "bass3" +# n "5" +# release (rand / 4) diff --git a/live/chill/major_nostalgia.tidal b/live/chill/major_nostalgia.tidal index 46c4848..0313152 100644 --- a/live/chill/major_nostalgia.tidal +++ b/live/chill/major_nostalgia.tidal @@ -20,7 +20,6 @@ $ 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) @@ -35,7 +34,7 @@ $ note (scale "major" "~ [3,<8 7 5>,10]" - 7) # s "superpiano" # sustain 2 # velocity 0.8 -# gain 0.8 +# gain 0.9 d5 -- choeur fou $ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>") @@ -48,6 +47,18 @@ $ off 0.25 (|+ 7) $ s "moogBass" # cut 1 # note (scale "major" "<1 0 [1 3] ~>") + +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) -- octave inferieure +$ 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 diff --git a/live/dnb/nass.tidal b/live/dnb/nass.tidal index 0274dd1..31bccfd 100644 --- a/live/dnb/nass.tidal +++ b/live/dnb/nass.tidal @@ -18,7 +18,7 @@ $ fix ( $ fix (# s "[kick:8,kick:9]") (s "p") -- $ s "bd ~ s ~ ~ bd s <~ s>" $ s "p ~ t <~ t ~ ~> ~ p t <~ p>" -# gain 0.7 +# gain 0.9 d2 -- bass diff --git a/live/fusion/anthropocene.tidal b/live/fusion/anthropocene.tidal index dc98f91..68a2bc2 100644 --- a/live/fusion/anthropocene.tidal +++ b/live/fusion/anthropocene.tidal @@ -1,5 +1,4 @@ setcps 0.5 - -- Acte un: l'humain pose son rythme -- Acte deux: l'humain impose sa matiere -- Acte trois: tension @@ -9,12 +8,12 @@ d1 --beat -- $ 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) +-- $ fix (((off 0.125 (|+0) . (>| s "kick:5*<1 2 1 1>")))) (s "k") -- 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 setup 4 temps -- $ s "k(4,4)" -- 1 final 4 temps --- $ s "k k " -- 2 : variation pour kick hard +$ s "k k " -- 2 : variation pour kick hard # gain 0.8 d2 -- 1: batterie tic tac @@ -26,7 +25,7 @@ $ n "2 1" d5 -- basse $ whenmod 8 4 (|- n 2) -$ someCyclesBy 0.8 (superimpose (# s "subBass2")) +-- $ 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") @@ -52,18 +51,19 @@ $ 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.5 +# gain 0.65 -- 3 -> 4 d6 -- claps encourageants -- $ 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 +$ 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> 0>" # dry "<0 .. 3 3 .. 0>" + -- Acte quatre: résolution d4 $ s "bsguitar:4" # cut 1 # begin 0.2 @@ -71,14 +71,16 @@ 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 +$ whenmod 16 5 (off 0.125 (|- note 3)) -- TODO: Variations guitare +$ whenmod 16 0 (off 0.125 (|- note 3)) $ s "bsguitar:4" # cut 1 --- # begin "<0 0 0.5 0.5 0.2 0.4 0 0>" +# 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 +# gain 0.6 # size "<0.4,0.05 .. 0 0,0.1 .. 0.4>" d6 --phazer joyeux, resolution @@ -90,4 +92,4 @@ $ jux (degrade . rev . chop "<1 2 4 8>") $ n (scale "major" "<3 [3,5] [3,7] [3, 5, 7]>") # s "phazer" # gain 0.6 -|- n "2" -- 3: parfois mineure! +-- |- n "2" -- 3: parfois mineure! diff --git a/live/fusion/batterie.tidal b/live/fusion/batterie.tidal new file mode 100644 index 0000000..9ad3050 --- /dev/null +++ b/live/fusion/batterie.tidal @@ -0,0 +1,54 @@ +setcps 0.9 + +d1 +$ s "lt <~ ~ lt ~> mt <~ mt>" +# gain 0.7 + +d2 +$ someCyclesBy 1 (# s "sn") +$ s "~ <~ sn:2 [sn:2*2 ~]>" + +d3 -- drumroll +$ whenmod 64 32 (const $ s "[dr:3?,dr:4?]*<2 4 8 8>") -- scratch +$ whenmod 32 28 (const $ degrade $ s "dr*16") +$ whenmod 8 7 (degradeBy 0.8) +$ whenmod 8 6 (# n 1) +$ every 4 (degrade) +$ s "dr*8" + +d4 +$ whenmod 64 32 (rev) +$ whenmod 16 12 (|+ note 10) +$ whenmod 16 8 (|+ note 7) +$ whenmod 16 4 (|- note 3) +$ off 0.125 (|+ 5) +$ superimpose ((|- note 21) . (off 0.25 (|+ 5))) +$ n (scale "major" "<[0,3] [0,5] [0,7]>") +# s "superpiano" +# velocity 0.5 +# sustain 0.5 + +d5 -- bassline +$ whenmod 64 48 (fast 2) +$ degrade +$ n (scale "aeolian" "<0 3 0 5 3 2 0>*8") +# s "bassWarsaw" +# room 0.2 + +d6 -- synth backup +$ superimpose ((|+ 7) . (# gain 1.1). (|- note "<0 3 5 0>")) +$ n (scale "aeolian" "<0 3 0 5 3 2 0>*8") +# s "defaultB" +# gain 0.9 +|- note 7 + +d7 -- cymbale +-- $ whenmod 16 12 (# gain 1) +$ s "~ ~ co:<0 .. 3> ~" +-- # gain 0 + +d8 -- beat? +-- $ euclid "<2 2 2 4 2 2 4 4 2 4 4 4 4 4 2 2>" 4 +$ euclid 4 4 +$ s "kick:2" +# gain 1.25 diff --git a/live/fusion/bogdanerie.tidal b/live/fusion/bogdanerie.tidal new file mode 100644 index 0000000..1aafdbb --- /dev/null +++ b/live/fusion/bogdanerie.tidal @@ -0,0 +1,44 @@ +d1 +$ euclid "<2 2 4 2 4 4 4 2 4 2 2 2>" 4 +$ s "kick" +# gain 0.7 +# n "[2,4]" + +d2 +$ whenmod 32 20 (# gain 0) +$ whenmod 32 16 (# gain 0.8) +$ s "hh:3?*8" +# room 0.5 +# dry 0.3 +# gain 0 + +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)" + +d7 +$ degrade +$ s "~ bogdan/8" # cut 1 +# n (irand 10) +# room (rand) +# dry (irand 4) + +d4 +$ whenmod 32 16 (rev) +$ whenmod 16 15 (# gain 0.5) +$ whenmod 16 12 (# silence) +$ whenmod 16 10 (# release 0.1) +$ whenmod 16 2 (# gain 0.8) +$ whenmod 16 1 (# gain 0.7) +$ whenmod 16 0 (# gain 0.6) +-- [b ] [b b] +$ s "[b ~ b ~] [b ~ ~ ~] [b <~ b> <~ ~ ~ b> b] [~ b? ~ b?]" +# s "bass3:1" +# note "0 5 [[8 5] [8 <12 5>]] 0 " diff --git a/live/techno/blade-piano.tidal b/live/techno/blade-piano.tidal index 6cdd772..afc5275 100644 --- a/live/techno/blade-piano.tidal +++ b/live/techno/blade-piano.tidal @@ -3,24 +3,26 @@ setcps (-1) setcps (0.5) d1 --- $ fast 2 --- $ whenmod 64 32 (# silence) --- $ whenmod 32 16 (rev) +$ fast 2 +$ whenmod 64 32 (# silence) +$ whenmod 32 16 (rev) $ chop "<1 2> <4 4 1 1>" $ s "cs80leadMH*2" # note (scale "major" "<[0 3] [3 5] [5 7] [7 10]>") # room 0.3 # dry 2 +# gain 0.9 d2 --- $ whenmod 64 48 (# silence) +$ whenmod 64 48 (# silence) -- $ fast 2 --- $ every 4 (off 0.75 (|+ 0)) --- $ off 0.5 (|+ 0) +$ every 4 (off 0.75 (|+ 0)) +$ off 0.5 (|+ 0) $ s "reverbkick(<2 4 4 4 3 4>,4)" +# gain 0.7 d3 --- $ whenmod 64 48 (# gain 0) +$ whenmod 64 48 (# gain 0) -- $ whenmod 64 8 (# gain 1) $ fast 2 $ every 2 (off 0.25 (|+ 0)) @@ -39,16 +41,16 @@ $ whenmod 31 24 (|+ note 0) $ whenmod 31 16 (|- note 7) $ whenmod 31 8 (|+ note 0) $ whenmod 31 0 (|+ note 7) --- $ someCyclesBy 0.2 (off (1/16) (|+ 0)) --- $ someCycles (off (1/8) (|- 7)) --- $ swing 4 +$ someCyclesBy 0.2 (off (1/16) (|+ 0)) +$ someCycles (off (1/8) (|- 7)) +$ superimpose ((|- note 21) . (# gain 0.7)) $ note ( -- 3 * (-7) + (scale "major" "[0, 3, 5]") + "<0 5 7 12>" ) # s "cheapPiano1" -# gain 0.9 +# gain 0.8 d5 $ whenmod 16 14 (# velocity 0.5) @@ -60,4 +62,4 @@ $ someCyclesBy 0.2 (# release 0.2) $ s "superpiano" # note (scale "major" "<[0 3] [3 5] [5 7] [7 10]>" - 7) # pan 0.8 -# velocity 0.9 +# velocity 0.8 diff --git a/live/techno/german_wings.tidal b/live/techno/german_wings.tidal index 08acd51..4a4b684 100644 --- a/live/techno/german_wings.tidal +++ b/live/techno/german_wings.tidal @@ -1,16 +1,17 @@ -- Techno - 80s - aerian -setcps 0.5 +setcps 0.6 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 +# gain 1 d2 -- batterie, FIXME too loud $ fix (# s "electro1:0") (n 1) $ n "3 1 3 [[1 ~ 1?] 1]" # s "jazz" +# gain 0.8 -- # note (irand 7) d3 -- drums @@ -31,7 +32,7 @@ $ s "[~ electro1:1]*4" d5 $ whenmod 8 4 (|- note 2) -$ off 0.125 (degrade . (# room 0.2) . (# size 0.8)) +-- $ 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 @@ -68,7 +69,6 @@ $ s "glitch:2" -- # n (run 8) # cut 1 # gain 1.2 - --- SANDBOX d6 -- lead synth? too low currently diff --git a/live/techno/major_nostalgia.tidal b/live/techno/major_nostalgia.tidal index 8c7e1e1..099b2c9 100644 --- a/live/techno/major_nostalgia.tidal +++ b/live/techno/major_nostalgia.tidal @@ -2,11 +2,11 @@ setcps 0.5 d1 -- batterie $ whenmod 64 16 (fast 4 . (every 4 (off 0.5 (|+ 0)))) -$ s "popkick" +$ s "{popkick,kick:5}" # gain 0.8 d2 -- drums TODO: too loud on 16/64 -$ whenmod 64 16 (sometimes (# s "dr") . (# s "hh:5")) +$ whenmod 64 16 (sometimes (# s "dr") . (# s "hh:5") . (# gain 0.9)) $ whenmod 64 14 (fast 2 . (# s "hh:1")) $ whenmod 4 3 (sometimes (# n "1")) $ someCycles (fast 2) @@ -15,7 +15,7 @@ $ "hh:12" d3 -- basse $ whenmod 8 4 (|- note 5) -- quinte -$ someCyclesBy 0.2 ((# room 0.2) . (# dry 8)) +$ someCyclesBy 0.2 ((# room 0.1) . (# dry 8)) $ someCycles (# attack 0.2) $ note (scale "major" "0(3,8) [<3 3 -6 -6> -2(<1 2 4>, 6)]" - 7) # s "bassWarsaw" @@ -34,7 +34,7 @@ $ note (scale "major" "~ [3,<8 7 5>,10]" - 7) # s "superpiano" # sustain 2 # velocity 0.8 -# gain 0.8 +-- # gain 1 d5 -- choeur fou $ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>") diff --git a/live/techno/phazer.tidal b/live/techno/phazer.tidal index e6078c9..988cef7 100644 --- a/live/techno/phazer.tidal +++ b/live/techno/phazer.tidal @@ -8,9 +8,11 @@ $ every' 4 3 (# gain "0 <0 1 1 0>") -- dark arp $ whenmod 32 0 (fix (# gain 0) (s "arp")) $ whenmod 32 16 (someCycles (fix (# silence) (s "electro1"))) $ s "kick:14 [electro1:2, arp]" -# gain 0.9 +# gain 1 -d2 $ s "hh*2 clap:3(<2 2 1 1>,4)" +d2 $ s "hh*2 clap(<2 2 1 1>,4)" +# n "0 <2 2 2 3>" +# gain 0.9 d3 $ someCycles (# silence) @@ -25,8 +27,8 @@ $ sometimes (off 0.125 (|+ 0)) $ s "~ electro1:2" d5 -$ whenmod 128 100 ((# gain "<0.7 0 0.7 [0 0.7]>") . (# lpq "1")) --- $ whenmod 128 1 (# gain "<0.8 1 0.8 [0.8 0.8]>") +-- $ whenmod 128 100 ((# gain "<0.7 0 0.7 [0 0.7]>") . (# lpq "1")) +$ whenmod 128 1 (# gain "<0.8 1 0.8 [0.8 0.8]>") $ whenmod 64 32 ((|- note 7) . chop "2 0") $ whenmod 64 1 (|+ note 7) $ someCyclesBy 0.1 (chop 2 . superimpose (rev)) diff --git a/live/techno/piano_forte.tidal b/live/techno/piano_forte.tidal new file mode 100644 index 0000000..873433d --- /dev/null +++ b/live/techno/piano_forte.tidal @@ -0,0 +1,32 @@ + + +d1 +$ s "~ clap:1" + +d2 +$ euclid "<2 3 4 3>" 4 +$ s "kick:5" +# gain 0.8 + +d3 +$ euclid "<3 5 8 3>" 8 +$ s "sosHats" +# n "<0 0 0 1 1 1>" + +d4 --- lead Piano: TODO Parov's Number one MC +$ superimpose (|- note 5) +$ s "p ~ ~ p ~ p ~ ~" +# note "<3 3 5 3> ~ ~ 5 ~ <8 3 3 8> ~ ~" +# s "superpiano" +# velocity (0.6 + rand /4) +# sustain 0.8 + +d4 +$ rev +$ note "<3 3 5 3> ~ ~ 5 ~ <8 3 3 8> ~ ~" +# s "bass3:5" + +once $ s "bogdan:5" # cut 1 -- money + +once $ s "bogdan:6" +# cut 1 -- that's right diff --git a/live/techno/piano_intro.tidal b/live/techno/piano_intro.tidal new file mode 100644 index 0000000..4fd66c6 --- /dev/null +++ b/live/techno/piano_intro.tidal @@ -0,0 +1,14 @@ +-- From Introspective by LAAKE +setcps 0.42 + +d1 -- kick: encore un peu sec +$ euclid 4 4 +$ s "[armora,bassdm:2]" +# release 0.1 +# gain 0.8 + +d2 -- white noise +$ s "~ glitch:2" -- # n (run 8) +# cut 1 + +d3 $ s ""