diff --git a/live/techno/blade-piano.tidal b/live/techno/blade-piano.tidal index d9635fd..6cdd772 100644 --- a/live/techno/blade-piano.tidal +++ b/live/techno/blade-piano.tidal @@ -3,58 +3,61 @@ setcps (-1) setcps (0.5) d1 -$ whenmod 64 32 (# silence) -$ whenmod 32 16 (rev) -$ chop "1 4" +-- $ 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]>") -# gain 0.9 +# room 0.3 +# dry 2 d2 -$ whenmod 64 48 (# silence) -$ fast 2 -$ every 4 (off 0.75 (|+ 0)) -$ off 0.5 (|+ 0) -$ s "kicklinn" +-- $ whenmod 64 48 (# silence) +-- $ fast 2 +-- $ every 4 (off 0.75 (|+ 0)) +-- $ off 0.5 (|+ 0) +$ s "reverbkick(<2 4 4 4 3 4>,4)" d3 -$ whenmod 64 48 (# gain 0) -$ whenmod 64 8 (# gain 1) +-- $ whenmod 64 48 (# gain 0) +-- $ whenmod 64 8 (# gain 1) $ fast 2 $ every 2 (off 0.25 (|+ 0)) $ s "~ cp" # s "realclaps" # pan 0.4 -# gain 0 -d4 -$ someCyclesBy 0.2 (fast 2) +d4 -- drumrolls +$ someCyclesBy 0.2 (slow 2) $ s "[dr*4 ]" # pan 0.2 d6 +$ swing 3 $ 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)) +-- $ swing 4 $ note ( - 3 * (-7) + + -- 3 * (-7) + (scale "major" "[0, 3, 5]") + - "<0 5 7 12>") + "<0 5 7 12>" + ) # s "cheapPiano1" -# gain 0.8 +# gain 0.9 d5 $ whenmod 16 14 (# velocity 0.5) $ whenmod 16 10 (stut 8 0.5 0.1) -$ whenmod 16 8 (off 0.25 ((|+ note 7) . rev)) -$ whenmod 16 0 (off 0.25 ((|+ note 7))) +-- $ whenmod 16 8 (off 0.25 ((|+ note 7) . rev)) +$ whenmod 16 0 (off 0.125 ((|+ note 7))) $ someCyclesBy 0.2 (# release 0.2) -$ off 0.125 ((# s "superpiano") . (|- note 7)) +-- $ off 0.125 ((# s "superpiano") . (|- note 7)) $ s "superpiano" # note (scale "major" "<[0 3] [3 5] [5 7] [7 10]>" - 7) # pan 0.8 -# velocity 0.5 +# velocity 0.9 diff --git a/live/techno/phazer.tidal b/live/techno/phazer.tidal index 5caeb0e..49a1277 100644 --- a/live/techno/phazer.tidal +++ b/live/techno/phazer.tidal @@ -6,7 +6,7 @@ $ whenmod 64 1 (|+ note 7) $ someCyclesBy 0.1 (chop 2 . superimpose (rev)) $ off (1/8) (|+ 7) $ off (3/16) (|- 7) -$ someCyclesBy 1 (<| +$ someCyclesBy 0.2 (<| note (scale "major" "<0*2 2(3,<4 8>) 7(3,<4 8>,2) <5 5 4>*2>")) $ note (scale "major" "<0 2 7 <5 5 4>*2>") # s "phazer" @@ -15,7 +15,7 @@ $ note (scale "major" "<0 2 7 <5 5 4>*2>") unmute 1 d2 -- beat + dark amp -$ (fast 4 . (fix (# n "[9?,7?]") (s "kick"))) -- FASTER! +$ (fast 4 . (fix (# n "[9,7?]") (s "kick"))) -- FASTER! $ every' 4 3 (# gain "0 <0 1 1 0>") -- dark amp $ whenmod 32 0 (fix (# gain 0) (s "arp")) $ whenmod 32 16 (someCycles (fix (# silence) (s "electro1"))) @@ -37,6 +37,10 @@ d5 $ whenmod 32 16 (someCycles (off (1/16) (|+ 0))) $ s "~ ~ ~ glitch:2" +d6 $ note (scale "aeolian" "0 .. 1") +# s "bassWarsaw" +|- note 21 + d6 -- $ whenmod 16 12 (# n 0) -- $ whenmod 16 0 (# n 1) diff --git a/live/techno/violent_violin.tidal b/live/techno/violent_violin.tidal new file mode 100644 index 0000000..d8fb369 --- /dev/null +++ b/live/techno/violent_violin.tidal @@ -0,0 +1,62 @@ +setcps 1 + +d1 -- beat +-- $ fix ((euclid 2 2) . (every 4 $ off 0.5 (# s "kick"))) (s "kick") -- faster +-- $ slow "1 2" -- calm +$ every' 4 1 (stut 2 0.9 0.25) +$ s "kick:5 dr:9(<<1 1 1 3> 1 1 <3 2 2 2>>,4)" +# gain 0.8 + +d2 -- claps +$ whenmod 64 32 (# s "clap:1") +$ every 4 (stut 2 0.5 0.25) +$ someCyclesBy 1 (# s "sn:3") +$ s "~ sn:1" +# gain 0.8 + +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 + +d4 -- bass +-- $ degrade . fast 2 -- rythme glitch +$ whenmod 64 32 (# silence) -- aere +-- $ whenmod 128 24 (# gain "0.7,0.05 .. 1") TODO REFRESH rythm for bass +$ euclid "<1 <2 3 1>>" 8 +$ n ("<0 [[0 .. 1]*2] [3 0 0] [0 3 <7 0> 3]>" - 14) -- trille +# room 0.2 +# size 0.2 +# gain 0.85 +# s "bassWarsaw" + +d5 -- lead violin +$ whenmod 64 48 (degradeBy 0.25) +$ whenmod 64 32 (degrade) +$ every 4 (|+ note 5) +$ every 8 (off 0.25 (|+ 7)) +$ every' 4 3 (|+ note 12) +$ someCycles (off 0.125 (|- 7)) +$ n (scale "aeolian" "~ <[0 3] [5 4]>") +# s "violin" +# gain 0.9 + +d6 +$ whenmod 16 12 (|+ 7) +$ whenmod 16 8 (off 0.125 (|+ "<5 4>")) +$ someCyclesBy 0.2 (arpeggiate . degrade) +$ superimpose (# n "[0?,3?,7?]") +$ n (scale "aeolian" "<[5 4] ~> ~") +# s "kalimba" +# gain 0.9 +|- note "7 0 0 7" + +d7 +$ every 2 (# silence) +$ jux rev +$ slow 2 +$ off 0.125 (|+ 7) +$ note "[0,7] [3,<5 12>]" +# s "cs80leadMH" +# gain 0.7