diff --git a/live/collab/hugo/faith_in_bass.tidal b/live/collab/hugo/faith_in_bass.tidal new file mode 100644 index 0000000..53c7c9b --- /dev/null +++ b/live/collab/hugo/faith_in_bass.tidal @@ -0,0 +1,51 @@ + +do +resetCycles +let prog = " >" +let mIntro = (mask "") +let modIndex = pF "modIndex" +let gPreBridge = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.05 saw))) +let gBridge = (someCyclesBy "<0!32 1!8 0!24>" (# djfbus 1 (slow 8 $ range 0.5 0.98 saw))) +let g = (gPreBridge . gBridge) +setcps (110/60/4) +d1 $ g + $ mask "" + $ someCyclesBy "<0!32 1!16 0!16>" (mask "t(<1!4 2!12>,4)") -- Pont + $ struct "t t t [ <~!4 t!4>]" + $ "jazz" # gain 1.1 +d2 $ g $ mIntro $ fast 2 $ "~ snare:22" # gain 1.2 +d3 $ g $ mIntro $ "~ d ~ d ~ d*<1 2> ~ d*<1!7 2>" # "drum:2" # gain 1.4 +d4 $ g + $ slice 4 ("0 <1!2 ~ 1*2> <2 <~ 2>> 3*<1!3 4>") + $ loopAt 1 $ "break:1" + # gain 0.83 + # pan 0.2 +d5 + $ "faith/8" + # n (slow 32 $ "<0 1>") + # gain 1.1 + # pan 0.8 + # cut 5 + -- # crushbus 51 (slow 16 $ range 10 8.5 (saw + (2.5 * (fast 4 $ perlin)))) +d6 + $ struct ",8)]!8>" + $ note (prog - 24) + # "bassWarsaw" + # pan 0.2 + # gain (slow 32 $ range 0.5 1.3 saw) +d7 $ g $ arp "up" + $ off ">" id + $ note (prog + "" - 12) + # "FMRhodes1" + # pan 0.9 + # modIndex (slow 32 $ range 0 4 saw) + # gain (slow 32 $ range 0.8 1.1 saw) |* "<0.8 1!3> 1!7" + # room (slow 16 $ range 0.4 0.8 saw) +d8 $ g + $ struct "~ t ~ t ~ t ~ [ <~ t>]" + $ "ho:1" + # room (slow 32 $ range 0.4 0.7 saw) + # dry (slow 32 $ range 0.4 1.7 saw) + # sz 0.9 + # pan (slow 16 $ range 0.75 0.05 saw) + # gain (slow 8 $ range 0.68 0.55 saw) diff --git a/live/hip/darkside/russia.tidal b/live/hip/darkside/russia.tidal new file mode 100644 index 0000000..e4b637c --- /dev/null +++ b/live/hip/darkside/russia.tidal @@ -0,0 +1,45 @@ +do +-- resetCycles +setcps (120/60/4) +d1 $ "[jazz,bd]" # gain 0.9 +d2 + $ mask "" + $ "~ cp" + # gain 0.75 + # lpf 2000 + # room 0.3 + # sz 0.6 # dry 0.9 +d3 + $ sometimesBy (range 0 0.5 sine) (ply 2) + $ mask "" + $ loopAt "<4!8 2!8>" + $ "break:18" + # pan 0.8 + # gain 0.8 +d4 + $ slice 2 "<0!3 [0 1] 0 0 [0 <0 1>]!2>" + $ "bogdan:2" + # n "<23!6 24!2>" + # gain 1 + # cut 4 + # room (0 + 0.2 * perlin) + # sz 0.4 + # pan 0.3 + # dry 2 +d5 + $ mask "" + $ superimpose ( + mask "" + . arp "pinkyup . >" + . (|+ note 5) + . (|+ note 12) + . (|* gain 0.8) + . (# room 0.4) + . (# pan "<0.4!14 0.6 0.8>") + ) + $ note ("") + # "bassWarsaw" + # gain 0.8 + # room 0.8 + # dry 0.4 + # pan 0.1 diff --git a/live/hip/darkside/sub_marine.tidal b/live/hip/darkside/sub_marine.tidal new file mode 100644 index 0000000..ee5a2f0 --- /dev/null +++ b/live/hip/darkside/sub_marine.tidal @@ -0,0 +1,99 @@ +-- Quand les aigus arrivent, il manque qqch qui vient apres +-- Quand les djf baissent, il manque un drop au retour + + +do +resetCycles +setcps (90/60/4) +let whenPont it = (someCyclesBy "<0!32 1!8 0!32>" it) +let gMask = mask "t!3 " +let gDJFDown = ((someCyclesBy "" (# djfbus 1 (range 0.5 0.1 saw)))) +let gDJFUp = ((someCyclesBy "" (# djfbus 2 (range 0.15 0.85 saw)))) +let g = gDJFDown . gDJFUp +d1 $ g $ gMask -- Kick sub-bass + $ mask "" + $ whenPont (# silence) + $ struct "[t*<1!8 <1 2!3> 1!6 <1 2>> <~ t>] ~!3 . ~ <~!8 t!8> ~ <~!3 >>" + $ "jungbass" + # cut 1 +d2 $ g $ gMask -- Snare adéquat + claps opportuns + $ mask "" -- Intro + $ mask "" + $ whenmod 64 0 ( -- claps opportuns + (whenmod 32 8 (ply "<1!3 2>")) + . fix (|* gain 0.85) "cp" + . superimpose ((# "[cp,ab:11]") + . (# lpf "<2000!3 [2500 3000]>") . (# room 0.2) . (# sz 0.9) . (# dry 1))) + $ whenPont (# lpf 2000) + $ whenmod 32 8 (fast 2) + $ "~ . [snare:5,sn:4] ~" + # gain 0.65 +d3 $ g $ gMask -- Drumroll structuré + $ mask "" -- Intro + $ degradeBy "0 . 0 <0.33!3 0.25> <0!3 0.38> 0" -- Élaguage + $ whenPont (# hpfbus 31 (slow 8 $ range 4500 0 (saw+sine/2))) + $ whenmod 4 3 (ply "[1|2|<1!3 2>]*4") + $ struct "[t*8 . t*<8!3 <16 [16 8] 16 [16 [32 16 32 [16 8]]]>>]" + $ "drum:2" + # pan 0.3 + # room 1.2 # sz 0.2 # dry 1 + # gain "<0.65!3 0.75>" +d4 $ g $ gMask -- Bassline de compagnie + $ whenmod 64 32 (# crushbus 41 (slow 4 $ range 12 4 saw)) -- Fade in final + $ whenmod 64 32 (|* gain (slow 32 $ range 0.5 1 saw)) -- Fade in final + $ whenmod 4 3 (off 0.5 (mask "f t")) + $ note "[ef4 c4]@3 [] . ~!3 <~!3 g4>" + # "bassWarsaw" + # gain 0.55 + # lpfbus 41 (slow 32 $ (range 5500 500 saw + perlin)) -- Submarine + # room 0.8 + # sz 0.56 + # pan 0.8 +d5 $ g -- Piano baseline + $ whenmod 64 32 (# speed 0.75) + $ mask "" + $ whenmod 64 32 (|* gain (slow 32 $ range 0.5 0.9 saw)) -- Fade in final + $ mask ",4)!16 t!48>" + $ slice 8 ("0 <0!4 1!4> 2 <3!3 <[4 5] [5 6]>>" + + "<0!8 4!8> <0!8 [4 <4!12 2!3 4>]!8>") + $ "fpiano:12" + # pan 0.42 + # gain 0.6 + # room (slow 8 $ range 0.3 0.45 saw) + # sz 0.8 + # cut 5 +d6 $ g $ gMask -- Breakbeat fidèle + $ mask "" + $ someCyclesBy "" (|* gain 0.8) + $ mask ",4)!16 t!16 f!8 t!24>" + $ whenmod 4 3 (ply "<1 2>" . rev) + $ slice 4 ("0 1" + "<0!3 <2 0> <2!3 <0 2>>>") + $ loopAt 2 + $ "break:13" + # cut 6 + # pan "<0.65!6 0.8 0.9>" + # gain (slow 32 $ range 0.5 0.75 saw) + # room 0.98 + # sz 0.4 + # dry "<1!3 0.993>" +d7 -- ChOiR + $ mask "" + $ superimpose (+| note (arp "up" ( + "" + - 24 + ))) + $ note "[ef4@4 ]" + # "moogBass" + # panbus 71 (range 0.13 "<0.5!3 0.8>" saw) + # gain 0.45 +d8 $ g -- Nappes <3 + $ mask "" + $ note ( + "[ef4 c4]@3 [>] . ~!3 <~!3 g4>" + + 12) + # "moog:4" + # cut 8 + # pan 0.96 + # att 0.09 + # rel 10 + # gain 0.35 diff --git a/live/midi/nova/ambient/contre_visite.tidal b/live/midi/nova/ambient/contre_visite.tidal index a6cdf2b..e8d7a04 100644 --- a/live/midi/nova/ambient/contre_visite.tidal +++ b/live/midi/nova/ambient/contre_visite.tidal @@ -19,7 +19,7 @@ d1 $ f1 -- TODO: Rework kick $ midiOff "^41" (<| " . ~ ~ ~ <~!3 k>") $ "[reverbkick,808bd:6]" # lpf 1000 - # midiG' "^78" 0 1 + # midiG' "^78" 0 1.3 d2 $ f1 $ mask ",4)!4 t!28>" -- Intro / break/32 $ midiOff "^75" maskLoops diff --git a/live/midi/nova/ambient/drone_aveugle.tidal b/live/midi/nova/ambient/drone_aveugle.tidal index f3f70b3..642f9fd 100644 --- a/live/midi/nova/ambient/drone_aveugle.tidal +++ b/live/midi/nova/ambient/drone_aveugle.tidal @@ -8,13 +8,14 @@ let slide x = acceleratebus 01 (2**(x/12)) let g = (# djfbus 1 (range 0.1 0.9 "^49")) let g2 = (# djfbus 2 (range 0.05 0.95 "^29")) d1 $ g -- KICK - $ midiOn "^41" (<| "k k k [k <~!3 k>]") -- Attente Chaloupée - $ midiOff "^41" (<| "k . ~ ~ ~ ") -- Cours toujours - $ "[jazz,808bd:3]" - # midiG' "^78" 0 1.2 -d2 $ g2 -- Snare minitel + $ fix (|* gain 0.8) "kick" + $ midiOn "^41" (<| "k k k []> <~ k>]") -- Cours toujours + $ midiOff "^41" (<| "k . ~ ~ ~ ") -- Attente Chaloupée + $ "[jazz,808bd:3,kick:5]" + # midiG' "^78" 0 1.4 +d2 $ g -- Snare minitel -- $ midiOn "^43" (<| "~ s ~ s*<1!3 <[2 <2 2 4 4>] [4!3 16]>>") - $ fix (ply "1 <1!3 <2 4>>" . (|* gain 0.9) . (# legato "<0.4!6 0.5!2>")) "glitch" + -- $ fix (ply "1 <1!3 <2 4>>" . (|* gain 0.9) . (# legato "<0.4!6 0.5!2>")) "glitch" $ fix ((|* gain 0.85) . (# "realclaps:2")) "cp" $ fix (|* gain 0.8) "snare" $ fix (|* gain 0.9) "glitch" @@ -48,7 +49,7 @@ d4 -- Frequency-modulated hopes # "superfm" # voicebus 42 (range 0 8 "^33") # crushbus 41 (range 10 0.85 "^53") -- Harmonics of destruction - # midiG' "^81" 0 (0.75 - 0.2 * "^17") + # midiG' "^81" 0 (1 - 0.2 * "^17") d5 $ g2 -- BASSLINE $ midiOn "^58" (chop 4) $ arp "up" @@ -59,14 +60,13 @@ d5 $ g2 -- BASSLINE -- "" - 24) # s "superchip" - # voicebus 51 (range 0.75 0.05 "^34") - # crushbus 52 (range 16 2 "^54") - # midiG' "^82" 0 (1.2 - 0.1 * "^54") + # voicebus 51 (range 0.7 0.05 "^34") + # crushbus 52 (range 16 2.9 "^54") + # midiG' "^82" 0 (1.4 - 0.1 * "^54") # room 0.7 # dry 1.02 # sz 0.8 d6 $ g2 -- Sirene apocalyptico-commerciale - -- FIXME: Peu mélodieuse $ midiOn "^91" ( slice 4 (mask "t" $ fast 8 $ run "<4!3 [4|2]*8>")) $ midiOff "^59" (slow 8) diff --git a/live/midi/nova/dnb/alerte_verte.tidal b/live/midi/nova/dnb/alerte_verte.tidal index 05935a2..5755001 100644 --- a/live/midi/nova/dnb/alerte_verte.tidal +++ b/live/midi/nova/dnb/alerte_verte.tidal @@ -46,7 +46,7 @@ d4 $ f1 -- Resolute Bass $ loopAt 4 $ chop 16 $ "fbass:25" - # pan 0.15 +# pan 0.15 -- # room 0.125 # sz 0.1 # dry 1 # crushbus 41 (range 16 1.25 "^53") # midiG' "^81" 0 1.5 diff --git a/live/midi/nova/dnb/break_the_loop.tidal b/live/midi/nova/dnb/break_the_loop.tidal index dfabb71..9969337 100644 --- a/live/midi/nova/dnb/break_the_loop.tidal +++ b/live/midi/nova/dnb/break_the_loop.tidal @@ -9,7 +9,7 @@ let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gM = (midiOn "^42" (mask "t >")) d1 -- TODO: Improve kick. Sound? Rhythm? $ gF - $ midiOn "^42" (mask "t(1,4)") + $ midiOn ("^42" - "^41") (mask "t(1,4)") -- $ mask "" $ fix ((|* gain 0.8) . (# att 0.05) . (# rel 1)) ("kick") $ fix ((|* gain 0.75) @@ -61,7 +61,7 @@ d4 -- BASSLINE BRULANTE # lsize (slow 8 $ range 2 6 saw) # midiG' ("^81" - 0.3 * "^33") 0 1.5 # cut 4 -d5 $ gF2 $ gM -- Ritournelle Rhodes TODO: Variations mélodie? +d5 $ gF2 $ gM -- Ritournelle Rhodes $ midiOn "^58" (off "q" (|+ note 12) . (|* gain 0.85)) $ note ( "<[c ~ c d ~ d ~]!0 [f ~ f g ~ ~]!8>" @@ -91,6 +91,6 @@ d6 $ gF2 -- Voices from the st0rm # midiG' "^83" 0 1 d8 $ midiOn "^60" (slow 2) - $ midiOn "^92" (mask "t(<8!3 4>,16)") + $ midiOn "^92" (ply "[2 1]*8") $ "dr*<4!3 2 4!3 8 <16!3 8>!16>" # midiG' "^84" 0 1 diff --git a/live/midi/nova/dnb/lucy_rode.tidal b/live/midi/nova/dnb/lucy_rode.tidal index 76feddd..33823fb 100644 --- a/live/midi/nova/dnb/lucy_rode.tidal +++ b/live/midi/nova/dnb/lucy_rode.tidal @@ -21,7 +21,7 @@ do $ midiOn "^42" (<| "k . k <~ [<~ k> ]>")-- RubADub $ midiNo "^41" "^42" (<| ">") $ "[jazz,kick:5]" - # midiG' "^78" 0 0.9 + # midiG' "^78" 0 1.1 d2 $ g -- Break $ midiOn "^43" (scramble 4 . often (ply 2)) $ midiOn "^75" (struct "t*[8 16]") @@ -33,6 +33,8 @@ do # speed (range 0 2 "^51") # cut 2 d3 $ g -- Drumroll + $ midiOn "^44" (ply 2) + $ midiOn "^76" (ply 2) $ midiOn "^41" ( (# room 0.4) . (# dry (slow 64 $ range 0.5 1.5 perlin)) diff --git a/live/midi/nova/lounge/top_hats.tidal b/live/midi/nova/lounge/top_hats.tidal index 168359a..382b9b3 100644 --- a/live/midi/nova/lounge/top_hats.tidal +++ b/live/midi/nova/lounge/top_hats.tidal @@ -18,20 +18,22 @@ d1 $ g ((>| "[jazz,kick:5]*<4 4 4 [4!3 8] 4 4 2 <2 [2 8]>>") . (|* gain 0.8)) ) $ midiOff "^41" (<| "[k([1|<3!3 5 [3 8]>],8)]*<1!16 2!16>") - $ "hh27" # n "[5,6]" - # midiG' "^78" 0 2 + $ "[jazz,cpu]" + # midiG' "^78" 0 1.4 d2 $ g -- Breathing snare contretemps $ midiOn "^43" (fast "<2 2 2 2 4 2 2 4 4>") $ "~ [snare:12,drum:2]" - # midiG' "^79" 0.5 1.8 + # midiG' "^79" 0.5 1.3 d3 -- Runny Maracas $ g + $ midiOn "^76" (ply 2) $ whenmod 16 8 (often $ fast 2) $ someCyclesBy "<1!16 0!16>" (often $ slow "2!3 1") $ fix ((|* gain 0.9) . (# release 0.8)) (n 9) $ "hh27*8" # n "2 <2 <[2|9] [9 <9 ~> <~ 9> 2]>>" - # midiG' "^80" 0.25 1.75 + # midiG' "^80" 0.25 1.5 + # note (range "-12" 12 "^52") d6 $ g -- Guitar riffs $ whenmod 16 12 (off "h" ( chop 4 @@ -45,10 +47,10 @@ d6 $ g -- Guitar riffs # "punk" # cut 6 # attack (range 0.5 1 "^33") - # crushbus 61 (range 10 1.1 "^53") + # crushbus 61 (range 16 1.1 "^53") # pan 0.9 - # room 0.3 - # sz 0.9 + # room "<0.13!3 0.05>" + # sz "<0.6!3 0.9>" # midiG' "^81" 0.4 1.5 d4 -- Rhodes base + chords $ g @@ -69,14 +71,27 @@ d4 -- Rhodes base + chords # "FMRhodes1" # modIndex "[0,5,10]" # pan 0.8 - # crushbus 4 (range 10 4 "^54") + # crushbus 41 (range 10 4 "^54") + # roombus 42 (range 0 0.8 "^54") + # szbus 43 (range 0.45 0.9 "^54") # midiG' "^82" 0.3 1.9 +d8 $ g -- Electrified laggy moog + $ midiOn "^92" (ply 2) + $ midiOn "^59" ((|- note 12)) + $ midiOn "^91" (segment "4 <4 <8 [8 16]>>") + $ note (prog + "0 <12!4 12 12 16 <12 16>>") + # "moog:2" + # crushbus 8 (range 10 3.4 "^55") + # midiG' "^83" 0 1.3 + # legato 2 + # cut 8 + # pan 0.6 + # release 100 d5 $ g -- Choirs + arps $ juxBy "0.7" ( arp ">" + . midiOn "^60" ((|- note 12)) . (|+| note "[0,7,12]*2") - -- . (|* gain 0.85) - -- . (# lpf 2000) ) $ "moogBass" # note (prog + "[0,24]") @@ -85,15 +100,3 @@ d5 $ g -- Choirs + arps # midiG' "^84" 0 1.2 # pan 0.2 # chorus 0.6 -d8 $ g -- Electrified laggy moog - $ midiOn "^91" (ply 2) - $ midiOn "^59" ((|- note 12)) - $ midiOn "^91" (segment "4 <4 <8 [8 16]>>") - $ note (prog + "0 <12!4 12 12 16 <12 16>>") - # "moog:2" - # crushbus 8 (range 10 3.4 "^55") - # midiG' "^83" 0 1.8 - # legato 2 - # cut 8 - # pan 0.6 - # release 100 diff --git a/live/pair/be_my_punk.tidal b/live/pair/be_my_punk.tidal index 6e8a7dc..79294d6 100644 --- a/live/pair/be_my_punk.tidal +++ b/live/pair/be_my_punk.tidal @@ -1,10 +1,10 @@ -- if Nina was a punk -- TODO trois couplets: Husband - ??? - All of your life do -resetCycles +-- resetCycles setcps (80/60/4) d1 -- grosse caisse / caisse claire poum tchak - $ fix (# s "[bd,808bd]") (s "k") + $ fix (# s "[bd,jazz]") (s "k") $ fix ( whenmod 16 12 (fast "2 [4!3 8]") . (# s "[snare:2,snare:49]") @@ -19,7 +19,7 @@ d2 -- charley double croche # release 0.7 # note "1 0 0 0 1 0 0 0 1 0 0 0 1 0 1 2 1" # pan (slow 16 $ range 0.35 0.65 sine) - # gain "<0.9!8 0.8!24>" + # gain ("<0.9!8 0.8!24>" * 0.9) d3 -- $ superimpose ((|* speed 2) . (# cut 31)) -- Chipmunk $ whenmod 64 32 ( diff --git a/live/techno/nightly_repair.tidal b/live/techno/nightly_repair.tidal index b7712c6..b40151a 100644 --- a/live/techno/nightly_repair.tidal +++ b/live/techno/nightly_repair.tidal @@ -13,7 +13,7 @@ d1 $ g1 $ midiOn "^41" (<| "k*4") $ midiOff "^41" (<| "k") $ "jazz" - # midiG' "^78" 0 1.2 + # midiG' "^78" 0 1.6 d2 $ g1 $ midiOn "^43" (fast 2) @@ -22,6 +22,7 @@ d2 -- # lpq 0 # midiG' "^79" 0 1 d3 $ g1 + $ midiOn "^44" (fast "1 2") $ sometimesBy "^52" (ply "1 2 1 2") $ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch" $ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]" @@ -57,7 +58,7 @@ d4 $ g2 -- BASSLINE # lsizebus 42 (range 1.9 6.7 "^33") # crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin))) # room 0.2 -d5 $ g1 +d5 $ g2 $ degradeBy (range 0.95 0.05 ("^18!15 1")) $ slice 16 (run 16) $ midiOn "^58" (striate 2)