diff --git a/live/boeuf/may_cafe.tidal b/live/boeuf/may_cafe.tidal new file mode 100644 index 0000000..f4ac2fe --- /dev/null +++ b/live/boeuf/may_cafe.tidal @@ -0,0 +1,167 @@ +-- region First jam: Techno modulée +do + setcps 0.5 + d1 + $ whenmod 16 12 (# silence) + $ s "k(3,8)" # s "jazz" + # gain 0.4 + -- # lpf (slow 10 $ range 20 2000 sine) + d2 + $ juxBy 0.5 (rev) + $ often ((# s "hc:2") . (|* gain 0.8)) + $ s "h(5,8)" + # pan (slow 8 $ sine) + # s "ho:[1|2|3]" + # cut 2 + # gain 0.45 + d3 + $ fast "4 <8!3 16>" + $ s "ifdrums:1" + # gain 0.8 + + d5 -- Random pistolets + $ fast 2 $ degradeBy 0.5 + -- $ whenmod 64 0 (sometimes (# gain 0.9)) + $ often (ply 2) + $ (|+ note "[-12|+6]") + $ s "~ s(<3!3 5>,8,3)" + # s "snare:57" + # pan 0.6 + # gain 0.6 +-- endregion + +-- region Second jam: Electric jazz fever +do + unsolo 1 + unsolo 2 + unsolo 3 + unsolo 4 + unsolo 7 + setcps 1.03 + d1 -- Breakbeat + $ superimpose ( -- BEAT + const $ fast 2 $ s "kick:8" # hpf 100 # gain 0.55 + ) + $ loopAt 4 -- Break + $ slice 8 ( + every 4 (|> "0 7!7") + "0 <1 6> 2*2 3 <4 5> <5 2> <6 1> 7" + ) + $ s "break" # gain 0.8 + d2 + $ someCycles (often $ ply 2) + $ every 4 (jux (0.125 ~>)) + $ s "~ sn:12" # gain 0.6 + d3 $ fast "<[8 4] 8!5 4!2>" $ s "dr" # gain 0 + + d1 -- KICK! + -- $ slow 2 + $ whenmod 32 24 (# n (slow 4 "<0 ~ ~ 0>")) + $ note "0 <0!3 0*2>" # s "jazz" + # lpf (slow 100 $ range 75 200 saw) + # gain 0.6 + d3 -- bass + $ whenmod 32 16 (slice 4 "0 1!3") + $ jux id + $ often (off 0.125 (|+ note "[0,7?]")) + $ slow 2 + $ note ( + scale "major" ( + cat [ + -- " 1 1 ~ . ~ [~ 0]", + -- "<0!3 5> [<0!4 12!4> <1!3 -2>] ~ ~ . ~ " + "1 <1!3 3!2> ~ . 1 <1 3!6 5> ~" + ] + + "[0,7]" -- gamme + ) + ) + # s "bass3" + # pan 0.4 + # gain 0.34 + d2 -- hit roll + $ superimpose ( + fast "2 <1!3 2>" + . (# s "ifdrums:1") + . (# gain 0.8) + ) + $ s "" + # s "hh" + # release 0.5 + # pan (range 0.2 0.8 perlin) + # gain (slow 40 $ range 0.8 1.1 perlin) + d4 + $ someCyclesBy 0.75 (juxBy 0.2 rev) + $ sometimes (hurry 2) + $ sometimes (off (1/8) id) + $ s "d*4" + # s "electro1" # n "[3 . [2|3]]" + # gain 0.0 + d7 -- claps + $ whenmod 4 3 (# room 0.5) + $ s "<[~ cp]!3 [~ cp . cp ~]>" + # gain (slow 128 $ range 0.5 0.8 saw) + # room (slow 10 $ range 0.2 0.5 sine) + # size (slow 20 $ range 0.2 0.5 sine) # dry 0.65 + + +d5 +$ someCycles (fast 2) +-- $ whenmod 32 16 (# silence) +$ whenmod 32 4 (# gain 0.8) +$ every 4 (# silence) +$ s "reverbkick*2" +# gain 0.7 + +once $ s "macron:7" # gain 0.9 # cut 5 +-- endregion + +-- region Third round: Planant qui resonne +do + setcps 0.5 + d1 -- Kick Irregulo-correct juxroomé + -- $ juxBy 0.2 ((# room 0.2) . (|* gain 0.8)) + $ s "jazz(4,8)" # gain (range 0.55 0.6 perlin) + d2 + $ sometimesBy "0 0.5" (fast 2) + $ fast ("<1 1 [2 1] 2>" * "<4!3 8>") + $ s "ifdrums:1" + # gain (slow 16 $ range 0.4 0.65 sine) + # room 0.11 + # sz 0.6 + d3 -- hats suivis reverb + $ almostAlways (jux (# dry 1.1)) + $ s "hh([<6!2 12!2> <12!3 8>],16)" + # gain 0.75 + # room 0.4 + # size (slow 64 $ range 0.2 0.85 cosine) + # dry (slow 8 $ range 0.5 2 sine) + d7 -- macron gabber guerre + -- $ superimpose ( + -- (# octersub 8) . (# octersubsub 2) + -- ) + -- $ every 2 (choose [0,0.125] ~>) + $ n "0*2" + # s "macron:0" # begin 0.65 + # gain 0.6 + d8 -- pivert + $ often (stut 5 0.9 0.05) + $ s "birds3:6(<1 1 3 1> ,8)" + # gain 0.9 + d9 -- jambon fromage + $ slow 4 + $ whenmod 8 6 ( + (# s "~ macron:11") + . (# cut 19) + ) + $ often (superimpose ((# squiz 2) . (|* gain 0.9))) + $ slice 4 ("0 <0!3 1>") + $ s "macron:7" + # gain 0.8 + # room 0.5 + # size 0.2 + # speed (range 0.8 0.95 perlin) + # cut 9 + + d4 $ silence + +once $ s "macron:8" # gain 0.8 diff --git a/live/chill/atm/batteur.tidal b/live/chill/atm/batteur.tidal index 2cdd0cd..9edb4dd 100644 --- a/live/chill/atm/batteur.tidal +++ b/live/chill/atm/batteur.tidal @@ -3,7 +3,7 @@ unmute 6 do setcps 0.3 - d1 $ s "k . ~ [<~ k> <~ k?>]" # s "reverbkick" # gain 0.7 # lpf 400 + d1 $ s "k . ~ [<~ k> <~ k?>]" # s "reverbkick" # gain 0.35 # lpf 400 d2 $ s "~ snare:1" # gain 0.5 # delay 0.5 d3 $ often (stut 4 0.76 0.125) $ fast 4 $ s "~ . drum:8" # gain 0.5 d4 $ s "[ho(3,8),[~ ~ hc:2*[1|2|3|4] ~]]" # cut 4 # gain "0.5 0.6" @@ -13,15 +13,16 @@ do ) $ off 0.25 (slow 2 . arp "updown") $ note (" d4'min7 d4'maj7>") - # s "superpiano" # velocity 0.4 + # s "superpiano" + # velocity (slow 100 $ range 0.2 0.34 sine) # pan 0.7 d6 $ note ("d3" - -- + "[0,3(3,8,2)]" + + "[0,3(3,8,2)]" ) # s "supersaw" # voice 0.1 # release "2 0.8!7" - # gain 0.5 + # gain (slow 88 $ range 0.25 0.5 cosine) d7 $ s "hh(<1 3 5>,8)" # cut 7 # gain 0.6 # pan 0.2 @@ -38,7 +39,7 @@ do ) $ off 0.25 (slow 2 . arp "updown") $ note (" d4'min7 d4'maj7>") - # s "superpiano" # velocity 0.4 + # s "superpiano" # velocity 0.45 d6 $ note (" d3'min d3'maj>" + "[0,3(3,8,2)]") diff --git a/live/chill/atm/break_blue.tidal b/live/chill/atm/break_blue.tidal index 825f1ae..fa17ebc 100644 --- a/live/chill/atm/break_blue.tidal +++ b/live/chill/atm/break_blue.tidal @@ -10,21 +10,22 @@ do solo 8 -- Maracas do - unsolo 1 -- Break/kick + solo 1 -- Break/kick unsolo 3 -- Basse - unsolo 4 -- Piano Aigu + solo 4 -- Piano Aigu unsolo 5 -- Piano Grave unsolo 6 -- Clap - unsolo 8 -- Maracas + solo 8 -- Maracas do + setcps 0.4 let scale = getScale (scaleTable ++ [("blues", [0, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12])]) let gKick = 0.6 - let gBreak = 0.7 + let gBreak = 0.47 let gBass = 0.7 let gClap = 0.7 - let gMaracas = 0.8 - let vPianoMin = 0.35 + let gMaracas = 1 + let vPianoMin = 0.2 let vPianoGauche = 0.4 let vPiano = 0.5 d1 @@ -42,7 +43,7 @@ do "0 1*2 2 3 4*[1|2|4] 5 <6!3 7> 7" ) $ s "break" - # gain gBreak + # gain 0.5 d3 -- Bassline $ note (scale "blues" ("0. 2(3,8)") @@ -94,7 +95,7 @@ do do let scale = getScale (scaleTable ++ [("blues", [0, 2, 3, 4, 5, 6, 7, 9, 10, 11, 12])]) let gKick = 0.65 - let gBreak = 0.85 + let gBreak = 0.45 let gBass = 0.5 let gClap = 0.7 let gMaracas = 0.8 diff --git a/live/chill/dub/mini_deconf.tidal b/live/chill/dub/mini_deconf.tidal index 08445bd..3825e23 100644 --- a/live/chill/dub/mini_deconf.tidal +++ b/live/chill/dub/mini_deconf.tidal @@ -3,7 +3,7 @@ do setcps (60/60/2) d1 -- Kick techno (mask 4) / trance (mask 12) -- TODO: at 12, not really transe yet - $ mask "t(1,12)" + $ mask "t(11,12)" $ whenmod 64 32 (|> n "[0 0 <0 ~>]*4") $ s "k!3 . k k . k!3 . k k " # s "jazz" diff --git a/live/dnb/etienne.tidal b/live/dnb/etienne.tidal new file mode 100644 index 0000000..e859a33 --- /dev/null +++ b/live/dnb/etienne.tidal @@ -0,0 +1,73 @@ +-- DNB Joyeuse mineure 8-bit +-- surprise techno-tribe! + +do + setcps (165/4/60) + solo 1 + solo 2 + unsolo 3 + unsolo 4 + solo 5 + d1 -- Kick regulier, pause de temps en temps + -- section Kick DNB + -- $ mask "" + -- $ fast 4 + -- $ s " . ~" + -- section Kick TECHNO + $ slow "<1!8 2!8>" + $ fast "<1!6 2 4>" + $ s "k k k " + # "kick:5" + # crush 5 + # gain 0.3 + d2 -- Snares contretemps + $ fast "2" + $ sometimesBy "<0 0.5>" ((# lpf 1000) . (|* gain 1.2)) + $ s "~ . " # note (-12) + # s "snare:2" + # gain 0.65 + d3 -- Drumroll + $ fast ("<1!3 2>" * 4) + $ s "drum:8" # gain 0.9 + d4 -- COMETE + $ mask "" + $ s "m(<3!3 <5 1>>,8)" + # s "methbass:3" + # lpf (slow 16 $ range 200 5000 isaw) + # begin (slow 8 $ "<0 0.25 0.75>") + # end 0.85 + # cut 1 + # gain 0.6 + d5 + $ superimpose ( + (arp "up") . (|+ note 24) + . (# gain 0.5) + . (# crush (slow 16 $ range 0.75 8 sine)) + ) + $ s "t(<4!2 5!2>,<4!2 8!2>)" + # note ("" - 12) + # s "supersaw" + # voice 0.01 # gain 0.4 + d9 -- jambon fromage + $ degradeBy 1 + $ slow 4 + $ whenmod 8 6 ( + (# s "~ macron:11") + . (# cut 19) + ) + $ often (superimpose ((# squiz 2) . (|* gain 0.9))) + $ slice 4 ("0 <0!3 1>") + $ s "macron:7" + # room 0.5 + # size 0.2 + # squiz 1.2 + # speed (range 0.8 0.95 perlin) + # cut 9 + + + +once +$ note (scale "major" 1 - (run 4)) +# s "kaamelott:1" +# end 0.04 # cut 1 +# gain 0.8 diff --git a/live/dnb/slow_step_abstract.tidal b/live/dnb/slow_step_abstract.tidal index b897398..4673700 100644 --- a/live/dnb/slow_step_abstract.tidal +++ b/live/dnb/slow_step_abstract.tidal @@ -2,6 +2,8 @@ setcps 0.5 once $ s "methbass" # n 6 +d1 $ fast 4 $ s "kick:5" # lpf 200 # gain 0.8 + do let chordC = "[0, 12, 16, 19]" let chordG = "[-5, 11, 14, 19]" diff --git a/live/hardcore/jambon.tidal b/live/hardcore/jambon.tidal new file mode 100644 index 0000000..1dc7695 --- /dev/null +++ b/live/hardcore/jambon.tidal @@ -0,0 +1,104 @@ +-- Je repensais aux phrases que Simon Leys avait sur Robinson Crusoé : +-- les vrais idéalistes sont des grands pragmatiques. + +-- Robinson Crusoé, il ne part pas avec des grands principes, +-- il va dans la cale chercher ce qui va lui permettre de survivre. +-- Du fromage. Du jambon. Des choses très concrètes. +-- Pour pouvoir ensuite inventer quelque chose et créer. + +-- Robinson, quand le naufrage est là, il ne se prend pas les mains dans la tête en essayant de faire une grande théorie du naufrage. Il prend d'abord du jambon, du fromage, mais il a en lui cette capacité à réinventer une histoire unique. + +-- +d1 $ slice 8 "0 1 2 3 4 5 6 7" # s "break" # cut 1 + +once + +$ s "macron:11" +# begin 0.62 +# gain 1.3 +# cut 0 + +do + solo 1 + solo 2 + solo 3 + solo 4 + solo 5 + solo 8 + let bpm = 165 + let gDrums = 0.6 + let gKick = 0.8 + let melody = "<0 0 0 0 2 2 4 -2>" + setcps (bpm/60/4) -- HARDCORE tranquilou + d1 + $ whenmod 32 16 (slow 2) + $ every 4 (superimpose ( + (# note "<0!3 <2 4>>") . (# s "hardkick:2") . (|- gain 0.1))) + $ sometimesBy 0.95 (# crush 6) + $ s "k k k" # s "jazz" + # gain gKick + d2 -- Hats qui courent! + $ whenmod 32 28 (ply 2) + $ whenmod 8 4 rev + $ fast 4 $ s "[ho hc:1]" + # cut 2 # gain 0.5 + # room 0.5 + # size 0.2 + d4 -- Basse electrique sale + $ off 0.125 (|- note "[0,5]") + $ mask "t(2,3,1)" + $ superimpose ( -- Echo octave + (|+ note 12) + . (|- gain 0.2) + . (# room 0.5) + ) + $ note (scale "aeolian" + ( + whenmod 16 8 (iter 6) + "0 [4 5] 0" + + melody + ) - 24) + # s "supersaw" + # voice (slow 64 $ range 0.01 0.75 sine) + # crush 4 + # gain 0.7 + d8 + $ whenmod 8 7 (# gain 0.6) + $ slice 2 "<1!3 0> . ~" + $ sound "macron:11" # cut 1 + # gain 0 + # room 0.4 + +-- Part 1: technotravail + + d2 -- BassLINE + $ juxBy 0.1 (# crush 3) + $ note (scale "aeolian" "0*<1!3 4> 2(<1 3>,8) <~ 4> 5") + # s "bass3:2" # gain 0.8 + d3 $ juxBy 0.5 rev + $ fast "<4!3> <8 16>" + $ s "drum:8" # gain gDrums + # room 0.2 + d4 + $ superimpose (# crush 5) + $ every 3 rev + $ slow 4 $ chop 4 + $ s "bsguitar:4" + # cut 4 + # gain 0.6 + d5 + $ note ("0(<1 3>,<4!2 8!2>,3)" + "<4 <8 5>>" - 24) + # s "supersaw" # voice 0.1 # gain 0.4 + # sustain "1 0.75 0.5 0.25" + d6 + $ someCycles (often (fast 2)) + $ every' 4 3 (jux rev) + $ s "hh(8,<8!3 12>)" + # gain (slow 32 $ range 0.6 0.8 sine) + # size 0.5 # room 0.2 + d8 + $ whenmod 16 8 (# gain 0.6) + $ slice 2 "<1!3 0> . ~" + $ sound "macron:11" # cut 1 + # gain 0 + # room 0.4 diff --git a/live/hip/instru/training.tidal b/live/hip/instru/training.tidal new file mode 100644 index 0000000..69d183e --- /dev/null +++ b/live/hip/instru/training.tidal @@ -0,0 +1,143 @@ +do + setcps 0.5 + d1 -- KICK filtre grave + $ s "jazz(<3!3 5>,11)" + # gain 0.9 + # lpf 100 + d2 -- SNARE contretemps + $ whenmod 4 3 (fast "2 4") + $ s "~ snare:2" + |- note (slow 8 $ range 0 8 sine) + # room 0.2 # size 0.4 # dry 1 + # gain 0.9 + d3 -- Drumroll (metronome) + $ s "d*4" # s "drum:8" + # gain 0.9 + d5 + -- $ TODO guitare + -- superimpose (swing 2 . (|+ note 36)) + $ note ("0" + "c5(<3 <5 4>>,8)") # s "bass3:5" + # gain 0.8 + +do + unmute 2 -- snare + unmute 3 -- Drumroll + unmute 6 + unmute 1 + setcps 0.3 + d1 -- Breakbeat + $ superimpose (const -- BEAT + $ rarely (0.125 ~>) + $ "k . k(<3!3 5>,8)" + # s "kick:5" # lpf 200 + # gain 0.8 + ) + $ whenmod 32 16 ( -- pont! + mask "t(6,8)" -- cut progressif + ) + $ whenmod 8 6 ( -- pont! + mask "t(5,8,2)" -- cut progressif + ) + $ loopAt 2 -- Etire le break + $ slice 8 ( -- Decoupage + "0*2 1 [0|2] [0|3] <0 4> <0!4 5!4> <0 6> <0 7>" + ) + $ s "break" -- Notre break + # gain 0.8 -- Volume + d2 -- Snare accelere sur la fin + $ rarely (fast 2) + $ whenmod 4 3 (ply "2 4") + $ s "~ sn:1" # gain 0.9 # note (-4) + d3 -- Piano main gauche base accords + $ superimpose ( -- chhoeurs! + (# s "moogBass") + . (|- note 12) + . (# gain 0.9) + . (# sustain 3.5) + ) + $ note ("") + # s "superpiano" + # velocity (0.65 + (perlin * 0.2)) + # sustain 1 + d4 -- Bassline + $ mask "t(<1!4 4 2!3 3 4!7>,4)" + $ off (1/24) (|- gain 0.1) + $ note (scale "minor" -- gamme mineure + "<0!2 6!2> ~ [5 4] <0 5>" + ) + # s "bass3:4" + -- # lpf 2000 + # speed 0.6 + # gain 1.1 + d6 -- Drumroll + $ sometimes (juxBy 0.5 degrade) + $ fast "8 <8!3 16 8!3 16!5 [32 16]!2 [32 . 32 16]!2 [32 . 32 8]!2 [16 32]!4>" + $ s "drum:8" + # gain 0.7 + d7 -- Cymbales + $ slow 2 + $ sometimesBy "0 0.5" (# n "1") + $ stut 4 0.9 0.125 + $ note ("<0 -4>" + "0(3,3)") + # s "808cy" + # gain (slow 10 $ range 0.5 0.7 saw) + d8 -- bourrasque space + $ whenmod 16 10 ( + (swing 2) . (chop 2) + ) + $ s "space:3" + # speed 0.4 + # gain 0.5 + # room 0.8 + d10 -- Random pistolets + $ sometimesBy "<0 0.25>" (# gain "0!30 0.6 0.9") + $ s "~!30 s s" + # s "[snare:57,808cy:0]" + # pan 0.6 + # gain 0 + +-- Cymbal 7/8 + + +once $ s "space:2" # gain 0.8 + +"space:0" -- zip soucoupe +"space:1" -- respirateur +"space:2" -- respirateur court +"space:3" -- vent spacial + + + d5 + $ splice 8 "[0*2, [~ 2]*2]" + $ s "bsguitar:4" # gain 0.9 + +-- Pause techno +do + d1 + $ whenmod 16 14 (fast 2) + $ whenmod 16 10 (slow 2) + $ s "jazz(4,8)" + # hpf (slow 4 $ range 50 400 perlin) + d3 $ sometimes (ply 2) + $ s "ho*8" # n (irand 7) # gain 0.4 + d2 + $ whenmod 4 3 (fast 2) + $ s "~ cp:1" + # room 0.7 # sz 0.4 + # dry 1.1 + d4 + $ superimpose ( -- basse grave + (|- note 12) + . slow 8 + . (|- gain 0.05) + . (# room 0.5) + . (# size 0.5) + ) + $ every 4 rev + $ note (scale "aeolian" (run 8) - 24) + # s "supersaw" # voice 0.1 + # gain 0.6 + + d5 $ note (scale "minor" $ snowball 4 (+) (slow 2) $ (run 3)) + # sound "gtr" + # gain 0.7 diff --git a/live/hip/piano_fight.tidal b/live/hip/piano_fight.tidal new file mode 100644 index 0000000..971434d --- /dev/null +++ b/live/hip/piano_fight.tidal @@ -0,0 +1,60 @@ +-- Battle de pianos! +resetCycles + +d3 $ s "dr*4" + +do + setcps 0.5 + d1 -- Kick basique + $ whenmod 32 24 ( -- Break silence + mask "t(1,2)" + ) + $ whenmod 4 3 ( + (>| n "0(3,8) . ~") + . (|+ gain "0 0.05 0.1 0.15") + ) + $ n "0" + # s "jazz" # gain 0.7 + # cut 1 + d2 -- Snare contretemps + $ whenmod 32 24 ( -- Break silence + fast "<0!4 1 2 4 8>" + ) + $ s "~ snare:48" + # gain 0.8 + # note (slow 2 "<0 1>" - 6) + d3 -- Metrono-roll + $ whenmod 32 24 ( -- Break silence + slow "<2!6 [0.5 0.25] 0.25>" + ) + $ someCyclesBy "<0!3 <0.25!3 0.75>>" (fast "2 [2|4]") + $ s "dr*4" # gain 0.8 # pan 0.3 + d4 -- Toms TODO variations sur rounds + $ juxBy 0.7 rev + $ s "[808lt(5,8),808mt:1(<3!3 5!3>,8,[0|3])]" # gain 0.5 -- todo toms? + d5 -- Piano J1 + $ swingBy (slow 32 "<0!2 1/3 0.5>") 8 + $ mask (slow 32 $ "") -- Rounds + $ note ( + "0!6 [~ 0] <-2!3 3 -2!2 3!3 7 9 7 5 3 -2!2>" -- rythme+melody 16 + + "d4") + # sustain (1/4) + # s "superpiano" + # velocity (0.75 - (perlin * 0.15)) + # gain 0.8 + # room 0.5 # sz 0.5 --TODO fine-tune reverb + d6 -- Piano J2 accords fous ! + $ sometimesBy "0 0.25" ("[1|2]/8" ~>) + $ mask (slow 32 $ "") -- Rounds + $ note ( + "[<0!15 0?> <0!7 ~> <~!3 0> 0]*4" -- rythme fou + + "") + # sustain (1/4) + # s "superpiano" + # velocity (0.6 + (perlin * 0.15)) + # gain 0.8 + # room 0.2 # sz 0.2 --TODO fine-tune reverb + d7 $ silence -- TODO BASS + + +once $ s "industrial:6" # gain 0.8 diff --git a/live/hip/volette.tidal b/live/hip/volette.tidal index 6fe8d21..019d77e 100644 --- a/live/hip/volette.tidal +++ b/live/hip/volette.tidal @@ -97,4 +97,4 @@ once $ note (scale "major" 1 - (run 4)) # s "kaamelott:1" # end 0.04 # cut 1 -# gain 0.9 +# gain 0.8 diff --git a/live/late/good_morning_minneapolis.tidal b/live/late/good_morning_minneapolis.tidal new file mode 100644 index 0000000..ea2218e --- /dev/null +++ b/live/late/good_morning_minneapolis.tidal @@ -0,0 +1,99 @@ +-- Good Morning Minneapolis + +do + let melody = " d4'min>" + let melodyFirst = " d3>" + setcps 0.5 + unsolo 1 -- Kick + unsolo 2 -- Snare + unsolo 3 -- Drumroll + solo 4 -- Piano + unsolo 5 -- Basse/Sirene + unsolo 6 -- Hit roll + unsolo 7 -- Claps fantomes + unsolo 8 -- Guns + Fire + d1 + $ mask "t(1,4)" + $ sometimesBy "<0 0.1>" (# hpf 200) + $ s "k . k(<1 <3 5>>,8)" -- Hip beat + -- $ whenmod 16 10 (slow "<4!4 2>") $ s "k k " -- TECHNO + # "reverbkick" # lpf (slow 64 $ range 500 2500 sine) + # gain 0.65 + d2 + $ every' 8 7 (mask "f t!3" . jux rev) + $ s "~ s(<1!3 3>,8)" # s "snare:20" + # gain (slow 32 $ range 0.5 0.7 saw) + # pan 0.3 + d3 -- Drumroll opposé hit roll + -- $ fast "<4!3 <2 [2 <8 [8 16]>]>>" -- Waiting roll + $ fast "<16!3 [16 8]> [8 <8!3 16>]" -- Running roll + $ s "drum:8" + # gain (slow 40 $ range 0.5 0.75 sine) + d6 -- Hit roll opposé drumroll + $ every' 4 3 ( -- acceleration + cymbale + fast "2 1" . (# n "0!3 1") + . (|* gain "1!3 <0.65 0.8>") + ) + $ s "hh(<3!4 5!4>,8)" + # gain (slow 40 $ range 0.55 0.9 cosine) + # pan 0.7 + d4 + $ degradeBy "0 0.9!8" -- OUTRO + $ mask "t(<1 2!2 4>,4)" + $ superimpose ( + often (off 0.125 (|+ note "<0!3 12>")) + . arp (slow 8 $ "") + . (|+ note 36) + . (# sustain 0.5) + . (# velocity 0.4) + . (# room 0.2) + . (# sz 0.8) + . (|+ pan 0.15) + ) + $ note (melody) + # s "superpiano" + # velocity 0.3 + # sustain 1 + # room 0.4 # size 0.2 + # pan 0.5 + d5 -- Basse + Sirene + $ whenmod 64 32 ( + superimpose ( + slow 4 + . (# s "supersiren") + . (|- note 12) + . (|* gain 1.1) + . (# room 0.5) + )) + -- $ chop 4 $ often (ply 4) $ (# crush 4) -- TECHNOPHILE + $ note (melodyFirst) + # s "supersaw" # voice 0.02 + # gain 0.45 + # pan (slow 10 $ range 0.6 0.8 sine) + d7 -- Claps fantomes + $ s "~ cp" + # room (range 0.5 0.95 perlin) + # sz (range 0.2 0.9 perlin) + # dry 1.2 + # gain 0.65 + # pan (slow 8 $ range 0.45 0.65 saw) + d8 -- Gunfire + $ sometimes ( + superimpose (const -- pistolets + $ sometimes ( -- réplique + off 0.5 (|+ gain 0.1) + . (# room 0.25)) + $ often (stut 4 0.9 (1/16)) -- échos + $ s "~ ~ ~ snare:57" + # speed (range 0.4 1.1 perlin) + # gain (range 0.45 0.6 rand) + # cut 80 + # pan (range 0.2 0.8 perlin) + ) + ) + $ s "fire" + # begin (slow 4 "<0 0.2 0.5>") + # cut 8 + # room 0.6 # size 0.4 + # speed (range 0.8 1 perlin) + # gain 0.7 diff --git a/live/noise/decentering.tidal b/live/noise/decentering.tidal index 28fec54..9226a1f 100644 --- a/live/noise/decentering.tidal +++ b/live/noise/decentering.tidal @@ -38,7 +38,7 @@ $ sometimes (off 1 (|- gain 0.2)) -- copie mesure suivante $ sometimes (1 ~>) -- decalage mesure suivante $ degradeBy (slow 64 $ sine * 0.8 + 0.2) $ s "birds" # n (irand 10) -# gain 0.7 +# gain 0.6 d7 -- moineau roll $ sometimesBy (slow 16 $ sine * 0.95) (off (1/16) id) @@ -47,10 +47,10 @@ $ s "birds3(<[3|6] 8>,8)" d9 -- scratched birds $ fast 2 -$ s "~ [b b?]]" +$ s "~ [b b?]" # s "birds3" # n (wchoose [(9,13),(1,14)]) -# gain (slow 64 $ cosine * 0.5 + 0.3) +# gain (slow 64 $ cosine * 0.5 + 0.2) # room (slow 64 $ cosine * 0.8 + 0.05) # size (slow 64 $ cosine * 0.8 + 0.05) # dry 0 @@ -67,7 +67,7 @@ $ note "<0 <3 [3 3]> <0 [3 0]>>" # hpf (slow 64 $ cosine * 900 + 100) # room (slow 64 $ 1 - cosine * 0.9) |- note 24 -# gain 0.75 +# gain 0.85 d11 -- cymbale $ whenmod 64 32 (always (# n 3)) -- prolonge diff --git a/live/techno/accel.tidal b/live/techno/accel.tidal index f954edf..94446ef 100644 --- a/live/techno/accel.tidal +++ b/live/techno/accel.tidal @@ -4,21 +4,22 @@ -- region Part 1: setup accel vivant do - unsolo 1 -- kick + solo 1 -- kick unsolo 2 -- snare - solo 3 -- drumroll + unsolo 3 -- drumroll solo 4 -- bass - solo 5 -- siren + unsolo 5 -- siren unsolo 6 -- clap solo 7 -- synth - let mKick = "<1!32 0!15 [0 1] 1!64 0.9!4 0.8!4 0.7!4 0.6!4>" - let gKick = 0.8 * mKick -- /128 On off semi-onon fadeout - let gSnare = 0.65 + -- let mKick = "<1!32 0!15 [0 1] 1!64 0.9!4 0.8!4 0.7!4 0.6!4>" + let gKick = 0.5 -- /128 On off semi-onon fadeout + let gSnare = 0.6 let gHats = 0.7 - let gBass = 0.7 * "<1!16 <[1 0]*4 [0 1]*4>!8 1!8>" - let gSiren = "<0!64 0.7!32 0.6!32 0.5!32 0.4!32>" - let gSynth = 0.55 * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" - let gClap = 0.8 + let gDrums = 0.5 + let gBass = 0.5 * "<1!16 <[1 0]*4 [0 1]*4>!8 1!8>" + let gSiren = 0.85 * "<0!64 0.7!32 0.6!32 0.5!32 0.4!32>" + let gSynth = 0.5 * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" + let gClap = 0.6 let melody = "<0 0 0 0 2 2 4 -2>" setcps 0.5 -- TECHNOOO d1 -- Kick @@ -53,7 +54,7 @@ do $ s "dr*8" # s "ifdrums:1" # pan 0.4 - # gain 0.9 + # gain gDrums d4 -- Basse $ superimpose ( -- Echo octave (|+ note 12) @@ -80,10 +81,10 @@ do # sustain 4 # gain 0 d6 -- claps graduels sur 64 - $ whenmod 64 48 (>| n "~ 0*2 ~ 0*2") - $ whenmod 64 40 (>| n "~ 0?*2 ~ 0?*2") - $ whenmod 64 32 (>| n "~ 0 ~ 0*2") - $ whenmod 64 0 (>| n "~") + -- $ whenmod 64 48 (>| n "~ 0*2 ~ 0*2") + -- $ whenmod 64 40 (>| n "~ 0?*2 ~ 0?*2") + -- $ whenmod 64 32 (>| n "~ 0 ~ 0*2") + -- $ whenmod 64 0 (>| n "~") $ whenmod 16 13 (# note "<2 4 6>") $ n "~ ~ ~ 0" # s "clap:1" @@ -103,71 +104,72 @@ do "<0 0 0 0 2 2 4 -2>") # gain gSynth --- endregion +once $ s "abstract:1" # cut 1 # gain 0.6 + -- endregion -- region Part 2: Dry Melancholia do -solo 1 -- kick -solo 2 -- snare -solo 3 -- drumroll -solo 4 -- bass -solo 5 -- siren -solo 6 -- clap -solo 7 -- synth -let gKick = 0.8 -- /128 On off semi-onon fadeout -let gSnare = 0.65 -let gHats = 0.7 -let gBass = 0.7 -let gSiren = 0.6 -let gSynth = 0.55 * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" -let gClap = 0.8 -let melody = "<0 0 0 0 2 2 4 -2>" -setcps 0.5 -- TECHNOOO -d1 -- Kick - $ whenmod 16 14 (# silence) -- break frequent - $ n "0 0 <0!3 0?> 0" - # s "kick:5" - # gain gKick - # lpf (slow 16 $ range 500 200 isaw) -d2 -- Snares + hats - $ n "~ <3*2 3(<1 3>,8) 3 [3 ~ 3 2]> ~ [2 <~ 3?>]" - # s "sn" - # pan (slow 8 $ range 0.3 0.6 sine) - # dry 1 - # gain gSnare -d3 -- Drum metronome chuchoté parfois fou - $ someCyclesBy "<0 0.5!2 0.75>" (fast "<2 2 2 [2|4]>") - $ s "dr*4" - # s "ifdrums:1" - # pan 0.4 - # gain 0.9 - # room (slow 16 $ range 0 0.15 saw) -d4 -- Basse - $ superimpose ( -- Echo octave - (|+ note 12) - . (|- gain 0.2) - . (# room 0.5) - ) - $ note (scale "aeolian" - ( - "0(2,8) [5 4]*<1!3 2> <0!4 2 5>" - + melody - ) - 36) - # s "supersaw" - # voice 0.1 - # gain gBass -d5 -- Siren choppee - $ mask "t(1,4,3)" - $ segment 4 - $ slow 2 - $ note (scale "aeolian" - ( - melody - ) - 36) - # s "supersiren" - # sustain 4 - # gain gSiren - # cut 5 + solo 1 -- kick + solo 2 -- snare + solo 3 -- drumroll + solo 4 -- bass + solo 5 -- siren + solo 6 -- clap + solo 7 -- synth + let gKick = 0.6 -- /128 On off semi-onon fadeout + let gSnare = 0.65 + let gHats = 0.75 + let gBass = 0.6 + let gSiren = 0.6 + let gSynth = 1 * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" + let gClap = 0.8 + let melody = "<0 0 0 0 2 2 4 -2>" + setcps 0.5 -- TECHNOOO + d1 -- Kick + $ whenmod 16 14 (# silence) -- break frequent + $ n "0 0 <0!3 0?> 0" + # s "kick:5" + # gain gKick + # lpf (slow 16 $ range 500 200 isaw) + d2 -- Snares + hats + $ n "~ <3*2 3(<1 3>,8) 3 [3 ~ 3 2]> ~ [2 <~ 3?>]" + # s "sn" + # pan (slow 8 $ range 0.3 0.6 sine) + # dry 1 + # gain gSnare + d3 -- Drum metronome chuchoté parfois fou + $ someCyclesBy "<0 0.5!2 0.75>" (fast "<2 2 2 [2|4]>") + $ s "dr*4" + # s "ifdrums:1" + # pan 0.4 + # gain 0.9 + # room (slow 16 $ range 0 0.15 saw) + d4 -- Basse + $ superimpose ( -- Echo octave + (|+ note 12) + . (|- gain 0.2) + . (# room 0.5) + ) + $ note (scale "aeolian" + ( + "0(2,8) [5 4]*<1!3 2> <0!4 2 5>" + + melody + ) - 36) + # s "supersaw" + # voice 0.1 + # gain gBass + d5 -- Siren choppee + $ mask "t(1,4,3)" + $ segment 4 + $ slow 2 + $ note (scale "aeolian" + ( + melody + ) - 36) + # s "supersiren" + # sustain 4 + # gain gSiren + # cut 5 -- endregion @@ -176,16 +178,16 @@ do solo 1 -- kick solo 2 -- snare unsolo 3 -- drumroll - solo 4 -- bass - solo 5 -- siren + unsolo 4 -- bass + unsolo 5 -- siren solo 6 -- clap solo 7 -- synth - let gKick = 0.8 -- /128 On off semi-onon fadeout + let gKick = 0.6 -- /128 On off semi-onon fadeout let gSnare = 0.65 - let gHats = 0.7 - let gBass = 0.7 - let gSiren = "<0.7!32 0.6!32 0.5!32 0.4!32>" - let gSynth = 0.55 * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" + let gHats = 0.75 + let gBass = 0.6 + let gSiren = 0.3 * "<0.7!32 0.6!32 0.5!32 0.4!32>" + let gSynth = 1.3 -- * "<0!16 <[1 0]*4 [1? 1]*4>!16 1!32>" let gClap = 0.8 let melody = "<0 0 0 0 2 2 4 -2>" setcps 0.5 -- TECHNOOO @@ -252,15 +254,15 @@ $ n "0*12" -- region Part 4: Résolution do solo 1 -- kick -solo 2 -- snare -solo 3 -- drumroll -solo 4 -- bass -solo 5 -- siren +unsolo 2 -- snare +unsolo 3 -- drumroll +unsolo 4 -- bass +unsolo 5 -- choeur unsolo 6 -- clap unsolo 7 -- synth let mKick = "<1!32 0!15 [0 1] 1!64 0.9!4 0.8!4 0.7!4 0.6!4>" let gKick = 0.75 * mKick -- /128 On off semi-onon fadeout -let gSnare = 0.65 +let gSnare = 0.6 let gHats = 0.7 let gBass = 0.7 * "<1!16 <[1 0]*4 [0 1]*4>!8 1!8>" let gSiren = "<0!64 0.7!32 0.6!32 0.5!32 0.4!32>" @@ -300,7 +302,7 @@ d3 -- Drumroll chuchoté $ s "dr*8" # s "ifdrums:1" # pan 0.4 - # gain 0.9 + # gain 0.7 d4 -- Basse $ superimpose ( -- Echo octave (|+ note 12) @@ -330,3 +332,125 @@ d7 -- synthe echos electrique ) # gain gSynth -- endregion + + +-- region Part 5: Restart minimal +do + unsolo 1 -- kick + unsolo 2 -- claps + unsolo 3 -- drumroll + solo 4 -- bass + unsolo 5 -- Choeurs + unsolo 6 -- piano + unsolo 7 -- synth + unsolo 8 -- Pistolets + setcps 0.5 -- TECHNOOO + d1 -- Kick + $ whenmod 16 14 (# silence) -- break frequent + $ n "0 0 <0!3 0?> 0" # s "reverbkick" + # lpf 500 # gain 0.9 + d2 + $ whenmod 4 3 (sometimesBy "0 0.75" (ply 2)) + $ fast 2 $ s "~ cp" # gain 0.8 + d3 + $ whenmod 32 28 (# gain 0) + $ whenmod 16 8 (fast 2) + $ fast "1 <1!3 2>" + $ s "ifdrums:1*4" + -- # gain 0.9 + d4 -- Basse nappes + arp aigues + $ superimpose ( + fast 4 . + arp "" + . (|+ gain 0.0) + . (|+ note 12) + . (|+ note 12) + ) + $ note (scale "lydian" + "/4") + # s "supersaw" + # voice 0.01 + # gain (slow 64 $ range 0.35 0.4 sine) + d5 -- Choeurs + $ note (scale "lydian" + "/4") + # s "moogBass" + # gain (slow 100 $ range 0.65 0.9 cosine) + d6 + $ mask "t([1|2|2|4|8],8)" + $ often (off 0.25 rev) + $ off (0.125) (|+ note + (slow 4 $ "<12 7>") + ) + $ note (scale "lydian" + "") + # s "superpiano" # velocity 0.5 + d8 -- Random pistolets fin boucle 64 + $ whenmod 64 48 (sometimes (# gain 0.8)) + $ every' 4 3 ((sometimes $ jux rev) . (fast 2)) + $ sometimesBy "0 0.5" ((ply 2) . (|+ note "[-12|+6]")) + $ s "~ s(<3!3 5>,8,3)" + # s "snare:57" + # pan 0.6 + # gain 0 +-- endregion + +-- region Part 6: Finish breakbeat +do + solo 1 -- kick + solo 2 -- claps + solo 3 -- drumroll + unsolo 4 -- bass + solo 5 -- Choeurs + unsolo 6 -- piano + unsolo 7 -- synth + solo 8 -- Pistolets + setcps 0.5 -- TECHNOOO + d1 + $ whenmod 4 3 (iter 4) + -- $ fast 4 + $ loopAt 2 + $ slice 8 "[0(3,8) 1]" -- finish [1] + $ s "break" + # gain 0.8 + d2 + $ whenmod 4 3 (sometimesBy "0 0.75" (ply 2)) + -- $ fast 2 + $ s "~ cp" + # lpf (slow 32 $ range 20 20000 saw) + # hpf (slow 64 $ range 200 1000 isaw) + # gain 0.8 + d3 + $ whenmod 32 28 (# gain 0) + $ whenmod 16 8 (fast 2) + $ fast "1 <1!3 2>" + $ s "ifdrums:1*4" + # gain 0.7 + d4 -- Basse nappes + arp aigues + $ note (scale "lydian" + "/4") + # s "supersaw" + # voice 0.01 + # gain 0 + d5 -- Choeurs + $ note (scale "lydian" + "/4") + # s "moogBass" + # gain 0.8 + d6 + $ never (off 0.25 rev) + $ rarely (off (0.125) (|+ note + (slow 4 $ "<12 7>") + )) + $ note (scale "lydian" + "") + # s "superpiano" # velocity 0.65 + d8 -- Random pistolets fin boucle 64 + $ whenmod 64 48 (sometimes (# gain 0.8)) + $ every' 4 3 ((sometimes $ jux rev) . (fast 2)) + $ sometimesBy "0 0.5" ((ply 2) . (|+ note "[-12|+6]")) + $ s "~ s(<3!3 5>,8,3)" + # s "snare:57" + # pan 0.6 + # gain 0 +-- endregion diff --git a/live/techno/multibass.tidal b/live/techno/multibass.tidal new file mode 100644 index 0000000..a319fbf --- /dev/null +++ b/live/techno/multibass.tidal @@ -0,0 +1,43 @@ +do + d1 + $ sometimesBy "0 0.01!3 0 0.05!3" (0.125 ~>) + $ whenmod 8 6 (degradeBy "0 . 0.9 1") + $ ply 4 $ s "kick:5" + # gain 0.5 + # release 0.6 + # lpf (slow 2 $ range 20 5000 perlin) + d2 -- Snares noise etire + $ whenmod 8 7 rev + $ fast 2 + $ s "~ s*<1!3 <2 [2 4]>>" # s "glitch:7" + # speed (range 0.5 1 perlin) + # lpf 4000 + # gain 0.7 # pan (slow 4 $ "<0.3 0.25> <0.3 0.35>") + d3 + $ every 5 (sometimes degrade) + $ every 4 (often (fast 2)) + $ every 3 (sometimes (ply 2)) + $ sometimesBy "0 0.5" ((# s "hc:1") . (|- gain 0.1)) + $ s "hh*8" + # gain 0.75 + # cut 3 + d4 -- MULTIBASSE + $ superimpose ( -- bassline + (+| note ("[0 7](<3!3 4>,8)" - 24)) . + (|* gain 1.3) . + (|- pan 0.1) . + (# voice 0.1) + -- (# crush (slow 8 $ range 5 8 perlin)) + ) + $ superimpose ( -- folie aigue electrique + -- (stut 8 0.5 (1/16)) . + ply "<2 4!2 8!2 16!4 32!8>" . + (|+ note "") . + (|* gain 0.5) + ) + $ note ("<0 2 0 5 8 5 2 0>/4") + |- note 12 + # s "supersquare" + # voice (slow 16 $ range 0.05 2 perlin) + # gain 0.45 + # pan 0.6 diff --git a/live/techno/samedi_interdit.tidal b/live/techno/samedi_interdit.tidal index 6d3ac9b..125282d 100644 --- a/live/techno/samedi_interdit.tidal +++ b/live/techno/samedi_interdit.tidal @@ -127,7 +127,7 @@ $ n "[~ <1 ~ ~> <~ 1 ~> <~ ~ 1>]/2" every 8 (1 -) -- non, à droite! rand / 4 -- plutot à gauche... ) -# gain (slow 32 $ sine * 0.2 + 0.7) +# gain (slow 32 $ range 0.2 0.9 sine) d9 -- glitches! $ every 4 (sometimesBy 0.75 (jux rev))