From 81bc908c2ce133ee348276e3db388221fa423bfb Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Tue, 25 Jan 2022 16:18:58 +0100 Subject: [PATCH] collab raph: Diable, partir --- live/ambient/empreinte_du_numerique.tidal | 10 ++++++---- live/collab/raph/diable.tidal | 43 +++++++++++++++++++++++++++++++++++++++++++ live/collab/raph/partir.tidal | 77 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/dnb/bluesify.tidal | 31 +++++++++++++++++++++++++++++++ live/hip/boombap/plage.tidal | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/boombap/princesse_de_mars.tidal | 76 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/lofi/poke_bone.tidal | 34 ++++++++++++++++++++++++++++++++++ live/hip/lofi/soleil_enthousiaste.tidal | 54 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/lofi/toujours_plus.tidal | 24 ++++++++++-------------- live/midi/nova/ambient/contre_visite.tidal | 7 ++++--- live/midi/nova/ambient/drone_aveugle.tidal | 1 + live/midi/nova/breaks/solar.tidal | 20 +++++++++++++++++++- live/midi/nova/dnb/break_the_loop.tidal | 6 ++++-- live/midi/nova/dnb/lucy_rode.tidal | 6 +++--- live/techno/nightly_repair.tidal | 93 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 15 files changed, 505 insertions(+), 27 deletions(-) create mode 100644 live/collab/raph/diable.tidal create mode 100644 live/collab/raph/partir.tidal create mode 100644 live/dnb/bluesify.tidal create mode 100644 live/hip/boombap/plage.tidal create mode 100644 live/hip/boombap/princesse_de_mars.tidal create mode 100644 live/hip/lofi/poke_bone.tidal create mode 100644 live/hip/lofi/soleil_enthousiaste.tidal create mode 100644 live/techno/nightly_repair.tidal diff --git a/live/ambient/empreinte_du_numerique.tidal b/live/ambient/empreinte_du_numerique.tidal index 2816b85..ae9a0f6 100644 --- a/live/ambient/empreinte_du_numerique.tidal +++ b/live/ambient/empreinte_du_numerique.tidal @@ -7,6 +7,7 @@ let gPont1 = (whenmod 32 24 gLPF) let g = gPont1 let g = (# djfbus 1 (range 0.05 0.95 "^49")) let modIndex = pF "modIndex" +-- resetCycles setcps (110/60/4) d1 $ g $ midiOn "^41" (<| "k k k ") @@ -17,12 +18,13 @@ d2 $ g $ "~ s" # "[dr55:3,snare:4]" # midiG' "^79" 0 1.3 d3 $ g + $ midiOn "^76" (fast 2) $ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>") $ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0" # midiG' "^80" 0 (1.3 * "1.2 1!6 <1 1 1.1 <1.2 1>>") # room 0.3 # dry 0.95 -d4 +d4 -- Break bonus banane $ g $ midiOn "^60" ( -- Aerial mask mask "t f t" @@ -41,14 +43,14 @@ d5 $ g $ gPont2 # room 0.4 # sz 0.9 # crushbus 51 (range 10 1.61 "^53") - # midiG' "^81" 0 1.3 -d7 $ g + # midiG' "^81" 0 0.9 +d7 $ g -- Back solar mandoline $ superimpose (|+| note "<[0 12 0]!3 [0 12 0 12]>") $ note " c>" # "supermandolin" # pan 0.8 # midiG' "^83" 0 1.3 -d6 -- RHODES FOLIE +d6 -- RHODES FOLIE <33 $ g $ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)" $ swing (1 + ("0 2" * "^58") + (2 * "^90")) diff --git a/live/collab/raph/diable.tidal b/live/collab/raph/diable.tidal new file mode 100644 index 0000000..f181ff0 --- /dev/null +++ b/live/collab/raph/diable.tidal @@ -0,0 +1,43 @@ +do +setcps (170/60/4) +let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.1 saw))) +d1 $ g + $ fix ((# att 1) . (# rel 2)) "kick" + $ "[jazz,bd,kick:5]*4" # gain 1 +d2 $ g + $ note "~ 0 . <~ <[~ -2]!3 ~>> 0" + # "snare:4" # lpf 2000 +d3 $ g $ "hh*8" +d4 $ g + $ note ( + "[d3 ]*4" + ) + # "superhammond" + # cut 4 + # gain 1.1 + # begin 0 +d5 + $ g + $ mask "t(<1!3 5 1 5 1 5>,8)" + $ slice 4 "0 1 2 3*<1!3 2>" + $ loopAt 1 + $ "breaks165" + # gain 1.1 + # lpf 5000 +d6 + $ sometimesBy (slow 8 $ range 0 0.8 saw) (ply 2) + $ juxBy 0.4 (rev . (|- note 24)) + $ mask "t(<4 3>,8) . t(<5 3>,8)" + $ arp "converge" + $ note "d4'maj11'8" + # "superfork" + # pan 0.8 + # gain (slow 64 $ range 0.5 1.6 saw) + # begin 0 +d7 + $ slice 4 "<0 0 1 1>" + $ "punk:0" + # note ("<0!32 -4!32>") + # cut 7 + # pan 0.2 + # gain 0.9 diff --git a/live/collab/raph/partir.tidal b/live/collab/raph/partir.tidal new file mode 100644 index 0000000..4d63515 --- /dev/null +++ b/live/collab/raph/partir.tidal @@ -0,0 +1,77 @@ +resetCycles + +do +setcps (85/60/4) +let gDJF1 = (# djfbus 1 (range 0.10 0.80 "^49")) +let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^29")) +let mBreak = (midiOn "^41" (mask "t f . f t")) +let g1 = (gDJF1) +let g2 = (gDJF2) +let mDegrade = (midiOn "^73" (chop 4)) +let m = mBreak . mDegrade +d1 $ g1 $ m -- Kick basic + $ "k . ~!3 <~ >" + # "[jazz,808bd:2]" + # lpf 1200 + # midiG' "^78" 0 1.2 +d2 $ g1 $ m -- Snare 90s hip-hop + -- $ mask "" + -- $ whenmod 4 3 (ply "<2!4 2 2 4 <4 8>>") + -- $ fast "<2 <2!8 [4!3 2]!8>>" + $ midiOff "^43" (mask "f t") + $ "~ s ~ s" # "[snare:8]" + # midiG' "^79" 0 1.2 +d3 $ g1 $ m -- Drumroll offert + $ ply "1!3 <1 2>" + $ mask "t " + $ "drum:2*8" + # midiG' "^80" 0 1.1 + # pan 0.4 +d4 $ g1 $ m -- Break lourd pneumatique déconstruit + $ midiOn ("^44" - "^76") (ply 2) + $ midiOn "^76" (striate 4) + $ slice 4 (run 4) + $ loopAt 1 + $ "break:15" + # gain 0.5 + # pan 0.6 + # midiG' "^80" 0 1.2 + # cut 4 +d5 $ g2 -- BASSLINE + $ midiOn "^57" ((|+ note 12) . (# legato 4)) + $ note ("a4@2 c@3 ") + # "90s_matrix:3" + # cut 4 + # pan 0.3 + # midiG' "^81" 0 0.57 + # lesliebus 41 (range "-1" 1 "^17") + # lrate (slow 4 $ "<[0.7 1.2!3] 2.4 4.8 6.7>") + # lpf 5000 + # lsizebus 42 (range 1.9 6.7 "^33") + # crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin))) + # room 0.2 +d6 + $ midiOn "^58" (iter "1 4") + $ midiOn "^90" (ply "<2 4>") + $ someCyclesBy "<0!4 1!60>" (slice 4 ( + "0 1 2 <3!3 2*<1 2>>" + )) + $ someCyclesBy "<1!4 0!60>" (slice 4 ("0 <~!3 0>")) + $ loopAt 1 + $ "celtic_guitar85" + # pan 0.67 + # midiG' "^82" 0 1.2 + # cut 6 + + +once $ "808bd:1" # note "d" # gain 2 + +d5 -- SUB accompagnateurs + $ g + $ mask "" + $ note "d*<1!4 2!4> ~!3 . ~!3 <~ *<1!3 <4 [4 2]>>>" + # "808bd:1" + # lpf 4000 + # gain 1.1 + # room 0.5 + # pan 0.33 diff --git a/live/dnb/bluesify.tidal b/live/dnb/bluesify.tidal new file mode 100644 index 0000000..62e18d4 --- /dev/null +++ b/live/dnb/bluesify.tidal @@ -0,0 +1,31 @@ +do +-- resetCycles +let whenDJF = (whenmod 32 20) +let g = (whenDJF (# djfbus 1 (slow 16 $ range 0.5 0.12 saw))) +-- let g = id +setcps (140/60/4) +d1 $ g + $ mask "" + $ "k . ~ <~ k!31> ~ ~" + # "[jazz,kick:5]" + # gain 0.9 +d2 $ g + $ mask "" + $ whenmod 64 32 ( + |* gain (slow 32 $ range 0.4 1.1 saw) + ) + $ fast 2 $ "~ snare:8" +d3 $ fast "1 1 <1!3 4> <1 0.5>" $ "hh*16" + # gain (slow 32 $ range 0.65 0.95 sine) + # pan 0.3 +d4 $ g + -- $ mask "" + $ mask "t!3 ]>" + $ chop 16 $ loopAt 2 $ "break:0" # cut 4 # pan 0.8 +d5 + $ slice 4 0 + $ "blues_elmore:7" + # cut 5 + # pan 0.3 + # gain 0.8 + # room 0.5 diff --git a/live/hip/boombap/plage.tidal b/live/hip/boombap/plage.tidal new file mode 100644 index 0000000..275dd84 --- /dev/null +++ b/live/hip/boombap/plage.tidal @@ -0,0 +1,50 @@ +resetCycles + +do +setcps (85/60/4) +let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.18 saw))) +d1 $ g + $ mask "" + $ "k*<1!4 2 1!3> ~ . ~ k ~ <~ k ~ <~ k>>" + # "reverbkick" # gain 0.86 +d2 $ g + $ mask "" + $ whenmod 4 3 (ply "<2!4 2 2 4 <4 8>>") + $ fast "<2 <2!8 [4!3 2]!8>>" $ "~ cp" # "[cp,sn:10]" + # gain 0.85 +d3 $ g + $ mask "" + $ fast "1 <1 <2 [<2 [4 8]> <4 [4 . 16 8]>]>>" + $ "drum:2*8" + # gain 0.8 +d4 + $ whenmod 64 0 ((# legato "<1!8 h!4 q q e s>") . chop "<4 4 16 <4 2>>") + $ whenmod 32 16 (# djfbus 4 (slow 16 $ range 0.5 0.98 saw)) + $ n "<0!4 1 0 1 1*2>" + # "celtic_guitar85" + # gain 0.9 + # room (slow 16 $ range 0.35 0.8 saw) + # pan 0.67 + # drybus 41 (1.3 + 0.4 * perlin) + # sz 0.49 + # cut 4 +d5 -- SUB accompagnateurs + $ g + $ mask "" + $ note "d*<1!4 2!4> ~!3 . ~!3 <~ *<1!3 <4 [4 2]>>>" + # "808bd:1" + # lpf 4000 + # gain 1.1 + # room 0.5 + # pan 0.33 +d6 + $ whenmod 64 32 ( + (|* gain (slow 32 $ range 4 1 saw)) + . mask "t!3 . t" + ) + $ whenmod 32 16 (|* gain (slow 16 $ range 1.5 4 saw)) + $ slice 8 (run "8 <8!3 16>") + $ chop 8 + $ loopAt 1 + $ "break:11" + # gain 0.2 diff --git a/live/hip/boombap/princesse_de_mars.tidal b/live/hip/boombap/princesse_de_mars.tidal new file mode 100644 index 0000000..cddb580 --- /dev/null +++ b/live/hip/boombap/princesse_de_mars.tidal @@ -0,0 +1,76 @@ + +do +-- resetCycles +-- once $ "choir:5" # gain 0.5 +setcps (100/60/4) +let g = (whenmod 32 24 (# djfbus 1 (range 0.5 0.1 saw))) +d1 $ g + $ superimpose (const + $ mask "" -- Intro + $ mask ">" + -- $ "k(<1!4 [1 3]!4 3!4 [3 5]!4>,8)" + $ "k" + # "[bd,jazz]") + -- SUBS + $ mask "" + $ "k . ~ <~!2 k!2> ~ <~!3 k>" # "808bd:6" +d2 $ g + $ mask "" -- Intro + $ "~ s" # "[sn,snare:28]" +d3 $ g + $ mask "" -- Intro + $ fast "<1!8 <2 [2|4] 4>!8>" + $ "h*<1!4 2 1 2 1> h h h*<1!3 2>" + # "dr" + # gain 0.75 +d4 $ g -- Clave résolu + -- $ slow 2 + $ mask "" + $ note "c ~ ~ c ~ c <~ c ~ >" + # "gretsch:6" + # gain 1 + # pan 0.8 + # hpf (slow 32 $ range 400 2000 sine) +d5 -- Base layer choir + $ superimpose ( + mask "" + . (+| note ("0 12 0 12")) + . (# cut 11) + . (# room 0.5) + . (|* gain 0.84) + . (# sz "<0.9!7 <1.2 1.4>>") + ) + $ note " b4>" + # "choir" + # cut 5 + # gain (slow 16 $ range 0.45 0.8 saw) +d6 + $ mask "" + $ note ( + " b4>" + "<0 [0 0] 0 <[0@5 0@2 0] [0@6 0 0]>>" + - 24) + # "bassWarsaw" + -- # crush 9 + # gain 0.85 + # pan 0.6 +d7 -- Slit Singer + $ mask "" -- Intro + $ slice 16 "<2 2 3 3 [3 2] [3 2] 3 3 4(<1 1 2 1 3 3 5 5>,8)!8 5!3 6 5!3 [6 6] 7!3 6 7!3 5>" + $ "choir:4" + # cut 2 + # att 2 + # release 5 + # gain 0.78 + # room 0.2 + # sz 0.5 + # pan 0.4 +d8 -- DRUMROLL PRINTER + $ mask "t(<1!3 3 1!3 [3 5] 4!3 8 4!3 16 4!3 [8 4] 4!3 [8 16] 16!8>,16)" + $ ply "1!3 <1 2 <1 2> 4>" + $ iter "1 4" + $ slice 16 (run 16) + $ loopAt 2 + $ "break" + # gain 0.8 + +once $ "super808" # gain 1 diff --git a/live/hip/lofi/poke_bone.tidal b/live/hip/lofi/poke_bone.tidal new file mode 100644 index 0000000..26fd7f6 --- /dev/null +++ b/live/hip/lofi/poke_bone.tidal @@ -0,0 +1,34 @@ +once $ "hh" # gain 1.2 + +do +setcps (70/60/4) +let djfsine = (# djfbus 1 (slow 32 $ range 0.35 0.65 sine)) +d1 $ djfsine $ "k*2 ~!6" # "jazz" # gain 0.8 +d2 $ "~ s ~ [s*<1!3 2> ~]" # "[snare:20,clap]" # gain 0.6 +d3 $ "h*12" # "hh" # gain 1.1 +d4 $ note ("0*[16 <16 2>]" + + (fast 2 "<[g,bf] [f,a]>") + ) + # legato "q!7 . " + # octave 4 + # "FMRhodes2" # gain 1.2 +d5 + $ someCyclesBy "<1!8 0!8 0!16>" (>| note ("<[d3@3 g3@13]!3 [d3 f3 d3 g3@13]>") ) + $ someCyclesBy "<0!0 1!8 0!16>" (>| note ("[d3 f3 g3@13]") ) + $ someCyclesBy "<0!16 1!16>" (>| note ("[d3 d3 f3 g3@7 d4@2 >@4]")) + $ note ("<[d3@3 g3@13]!3 [d3 f3 d3 g3@13]>") + # "bassWarsaw" # gain 1.2 + # room 0.2 +d6 + $ djfsine + $ whenmod 64 32 (slice 4 "<0 1>*4") + $ loopAt 2 + $ chop 16 + $ slice 4 (run "4 <4!3 8 4 4 8 8>") + $ "break:0" + # cut 6 + # gain 1.3 + # pan 0.7 + +once $ loopAt 4 $ "breaks165" + # gain 2 diff --git a/live/hip/lofi/soleil_enthousiaste.tidal b/live/hip/lofi/soleil_enthousiaste.tidal new file mode 100644 index 0000000..1a18ece --- /dev/null +++ b/live/hip/lofi/soleil_enthousiaste.tidal @@ -0,0 +1,54 @@ +resetCycles + +do +setcps (110/60/4) +let gDJF1 = (# djfbus 1 (range 0.10 0.90 "^49")) +let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^29")) +let mBreak = (midiOn "^41" (mask "t f . f t")) +let g1 = (gDJF1) +let g2 = (gDJF2) +let mel = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>" +let melB = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>" +let modIndex = pF "modIndex" +d1 $ g1 $ "k<1!4 2 1 1 2> . ~!3 <~!3 k>" + # "[808bd:1,jazz]" + # midiG' "^78" 0 0.9 +d2 $ g1 $ "~ . s ~ ~ <~!4 s!4>" + # "[sn:20,snare:8]" + # midiG' ("^79" * "~ . 1 0.9") 0 0.9 +d3 $ g1 + $ midiOn "^44" (fast 2) + $ sometimesBy 0.1 (fast 2) + $ "d*[8 <8 <4 [4 16]>>]" + # "drum:2" + # midiG' "^80" 0 0.9 +d4 $ g2 + $ whenmod 32 24 (superimpose ( + arp "" + . (|+ note 12) + . (# pan 0.7) + )) + $ note ("<0 0(<3 5>,8)>" + + (slow 4 mel) + -- # Cmin11,Fmin9,Cmin11,G7#5 - Enthusiasm + - 24) + # "FMRhodes1" + # att 1 # rel 2 + # modIndex 0 + # room 0.8 + # dry 1 + # sz 0.2 + # midiG' "^82" 0 1.3 +d5 $ g2 + $ note ("<[f af bf] [f@2 ]> []" + - 24) + # "bassWarsaw" + # midiG' "^81" 0 1.3 + # crushbus 51 (range 16 4.6 "^53") + # pan 0.3 +d6 + $ slice 16 ("<0!4 ~!3 0> 1 2 3 4 5 6*<1!3 2> <7 15>") + $ "break:18" + # midiG' "^84" 0 1.3 + # speed (range 0 2 "^56") + # cut 6 diff --git a/live/hip/lofi/toujours_plus.tidal b/live/hip/lofi/toujours_plus.tidal index 2aad789..8fcd989 100644 --- a/live/hip/lofi/toujours_plus.tidal +++ b/live/hip/lofi/toujours_plus.tidal @@ -2,7 +2,7 @@ -- Les cours montent au firmament -- Mais la tension scrute do -resetCycles +-- resetCycles let modIndex = pF "modIndex" setcps (75/60/4) -- # Amin11, D7, Fmaj7, Cmaj7 - Pure bliss @@ -10,18 +10,18 @@ let chords = "<[a,c6,e6,g6,b6,d7] [fs,a,c6,d6,fs6,a6,c7] [f,a,c6,e6,f6,a6,c7] [c let chordsN = "<[a,c6,e6,g6] [,a,c6,d6] [f,a,c6,e6] [c,e,g,b]>" let g = (# djfbus 1 (slow 32 $ range 0.15 0.85 cosine)) d1 $ g $ "k . [<~ k ~ ~> <~ ~ k k>] >" # "jazz" - # gain 0.8 + # gain 1.1 # att 0.1 # rel 10 d2 $ g $ "~ cp" # hpf 4000 - # gain 0.5 + # gain 0.8 d3 $ g $ ply "8 <8 8 4 <8 [4 8]>> . 16 [32 <8 <16 32>>]" $ "drum:2" # cut 3 - # gain 0.45 + # gain 0.85 d4 $ g -- Base arps $ whenmod 64 32 (superimpose ( struct "t t t t <~ t> " @@ -39,20 +39,16 @@ d4 $ g -- Base arps # room 0.8 # dry 1 # sz 0.2 - # gain 0.65 + # gain 0.95 d5 $ g -- Bassline - $ ply 2 + $ ply "1!3 <2 [2 4]>" $ note (arp ">" $ chordsN - 36) # "bassWarsaw" - # gain 0.5 - # room 0.5 - # dry 1 - # sz 0.8 + # gain 1.3 # pan 0.2 # cut 5 d6 $ g -- Angel in the Wire $ mask "" - -- [a,c6,e6,g6] [,a,c6,d6] [f,a,c6,e6] [c,e,g,b] $ note (" >") # "90s_synatm:2" # cut 6 @@ -60,12 +56,12 @@ d6 $ g -- Angel in the Wire # room 0.5 # sz 0.5 # dry 0.8 - # gain 0.35 + # gain 0.8 d9 $ chop 8 $ loopAt 2 $ "break:20" - # gain (slow 16 $ range 0.3 0.55 saw) + # gain (slow 16 $ range 0.6 0.9 saw) d10 $ g $ fix ( -- Trainwreck (mask "") @@ -77,4 +73,4 @@ d10 $ g "[~ 7]*<4!3 8>", "" ]) # "auto" - # gain 0.5 + # gain 0.9 diff --git a/live/midi/nova/ambient/contre_visite.tidal b/live/midi/nova/ambient/contre_visite.tidal index ec8b176..a343d6d 100644 --- a/live/midi/nova/ambient/contre_visite.tidal +++ b/live/midi/nova/ambient/contre_visite.tidal @@ -3,8 +3,8 @@ do -- TODO TRIGGER INTRO -resetCycles -once $ "90s_synatm:8" # gain 0.84 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94 +-- resetCycles +-- once $ "90s_synatm:8" # gain 0.84 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94 let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) let gF = 1.01 let f = (# djfbus 1 (range 0.05 0.95 "^49")) @@ -46,7 +46,8 @@ d3 $ f-- Sidekick, doubtful, yet hardworking hats d4 $ f -- Atmospheric synth: aerial questions $ "90s_synatm:8/4" # cut 4 - # room 0.4 + # room 0.8 + # legato 4 # dry 1 # pan "<0.3 0.25 0.2>" # crushbus 42 (range 16 4.5 "^53") diff --git a/live/midi/nova/ambient/drone_aveugle.tidal b/live/midi/nova/ambient/drone_aveugle.tidal index 98ef371..4f751e5 100644 --- a/live/midi/nova/ambient/drone_aveugle.tidal +++ b/live/midi/nova/ambient/drone_aveugle.tidal @@ -1,3 +1,4 @@ + -- Le DR0NE AVEUGLE -- Intro weird superchip: is this even music? -- Pont superchip crushed+plyed diff --git a/live/midi/nova/breaks/solar.tidal b/live/midi/nova/breaks/solar.tidal index 182510b..9b313e0 100644 --- a/live/midi/nova/breaks/solar.tidal +++ b/live/midi/nova/breaks/solar.tidal @@ -46,6 +46,7 @@ d2 $ g1 $ m -- BREAK # midiG' "^80" 0 1 # cut 2 d4 $ g1 $ m -- Drum/hh roll! + -- FIXME I'd rather be in bassland $ midiOn "^57" (# "drum:2") $ midiOn "^89" (fast "2 . <2!3 4>") $ "d d*<1 2> [d . d]" @@ -53,7 +54,23 @@ d4 $ g1 $ m -- Drum/hh roll! # room "^53" # dry 0.99 # cut 4 - # midiG' "^81" 0 1 + # midiG' "^81" 0 1.8 +d4 + $ whenmod 4 3 (off "q" id) + $ midiOn "^58" (( + (|+| note ( + arp "" + "c'maj'8") + ))) + $ rev + $ struct "~ t" + $ slow 4 + $ arpeggiate + $ note "e3'maj" + # "bassWarsaw" + # crushbus 51 (range 16 4.6 "^53") + # midiG' "^81" 0 1.5 + # pan 0.2 d5 $ g2 $ midiOn "^58" (superimpose ( (|+| note ( @@ -66,6 +83,7 @@ d5 $ g2 $ note "e3'maj" # "FMRhodes1" # room "<0.4!3 0.7>" + # pan 0.8 # modIndex (range 0 128 "^34") # crushbus 51 (range 16 4.6 "^54") # midiG' "^82" 0 1.5 diff --git a/live/midi/nova/dnb/break_the_loop.tidal b/live/midi/nova/dnb/break_the_loop.tidal index db58eae..d68a9d2 100644 --- a/live/midi/nova/dnb/break_the_loop.tidal +++ b/live/midi/nova/dnb/break_the_loop.tidal @@ -62,7 +62,7 @@ d4 -- BASSLINE BRULANTE # midiG' ("^81" - 0.3 * "^33") 0 1.5 # cut 4 d5 $ gF2 $ gM -- Ritournelle Rhodes TODO: Variations mélodie? - $ midiOn "^58" (off "e" (+ note 12)) + $ midiOn "^58" (off "q" (|+ note 12) . (|* gain 0.85)) $ note ( "<[c ~ c d ~ d ~]!0 [f ~ f g ~ ~]!8>" - "<24!12 12!4>") @@ -74,7 +74,7 @@ d5 $ gF2 $ gM -- Ritournelle Rhodes TODO: Variations mélodie? d6 $ gF2 -- Voices from the st0rm $ midiOn "^91" ((# cut 6) . slow 8) $ swingBy 0.125 8 - $ midiOn "^59" (superimpose ( + $ midiOn "^59" (superimpose ( -- Resolution chant (>| note (scale "aeolian" "<7 [7@3 <5 9>]>")) . (# cut 61) . (# legato 1.2) @@ -90,5 +90,7 @@ d6 $ gF2 -- Voices from the st0rm # pan 0.6 # midiG' "^83" 0 1 d8 + $ midiOn "^60" (slow 2) + $ midiOn "^92" (mask "t(<8!3 4>,16)") $ "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 45a1cd9..76feddd 100644 --- a/live/midi/nova/dnb/lucy_rode.tidal +++ b/live/midi/nova/dnb/lucy_rode.tidal @@ -21,14 +21,14 @@ do $ midiOn "^42" (<| "k . k <~ [<~ k> ]>")-- RubADub $ midiNo "^41" "^42" (<| ">") $ "[jazz,kick:5]" - # midiG' "^78" 0 1.75 + # midiG' "^78" 0 0.9 d2 $ g -- Break $ midiOn "^43" (scramble 4 . often (ply 2)) $ midiOn "^75" (struct "t*[8 16]") $ slice 4 (run 8) $ loopAt 1 $ "break:15" - # midiG' "^79" 0 1.5 + # midiG' "^79" 0 1.2 # pan 0.35 # speed (range 0 2 "^51") # cut 2 @@ -72,7 +72,7 @@ do # room 0.2 # dry 2 # sz 0.8 # crush (range 10 3.7 "^54") # modIndex (range 0 4.19 "^34") - d7 $ g -- Hammond + d7 $ g -- Hope's Hammond $ ("0.125" ~>) $ fast 2 $ midiOn "^59" ( diff --git a/live/techno/nightly_repair.tidal b/live/techno/nightly_repair.tidal new file mode 100644 index 0000000..b7712c6 --- /dev/null +++ b/live/techno/nightly_repair.tidal @@ -0,0 +1,93 @@ + +do +setcps (90/60/4) +let scale = getScale (scaleTable ++ [("blues",[0, 3, 5, 6, 7, 10])]) +let modIndex = pF "modIndex" +let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^29")) +let gLPQ = (# lpqbus 3 (range 0 0.95 "^13")) +let gHPQ = (# hpqbus 4 (range 0 0.95 "^14")) +let g1 = (gDJF1 . gLPQ . gHPQ) +let g2 = (gDJF2 . gLPQ . gHPQ) +d1 $ g1 + $ midiOn "^41" (<| "k*4") + $ midiOff "^41" (<| "k") + $ "jazz" + # midiG' "^78" 0 1.2 +d2 + $ g1 + $ midiOn "^43" (fast 2) + $ "~ cp" + -- # lpf 1400 + -- # lpq 0 + # midiG' "^79" 0 1 +d3 $ g1 + $ sometimesBy "^52" (ply "1 2 1 2") + $ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch" + $ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]" + # midiG' "^80" 0 1 +d9 $ g2 -- G0dz1ll4 + $ midiOn "^60" (off 1 ( + (|+ pan 0.3) + . (# cut 91) + . (|+| note "[0|12]*8") + . (|* gain 0.9) + . (# squizbus 92 (range 0 10 perlin)) + )) + $ "90s_matrix:1/4" + # cut 9 + # gain 0.55 + # crushbus 9 (slow 16 $ range 2.6 2 perlin) + # roombus 91 (slow 16 $ range 0 0.82 perlin) + # sz 0.9 + # pan 0.7 + # midiG' "^84" 0 0.9 + # dry 2 +d4 $ g2 -- BASSLINE + $ midiOn "^57" ((|+ note 12) . (# legato 4)) + $ note ("" - 24) + -- $ note ("c6") + # "90s_matrix:3" + # cut 4 + # pan 0.3 + # midiG' "^81" 0 1.3 + # lesliebus 41 (range "-1" 1 "^17") + # lrate (slow 4 $ "<[0.7 1.2!3] 2.4 4.8 6.7>") + # lpf 5000 + # lsizebus 42 (range 1.9 6.7 "^33") + # crushbus 43 (range 16 2 ("^53" - 0.1 * (fast 4 perlin))) + # room 0.2 +d5 $ g1 + $ degradeBy (range 0.95 0.05 ("^18!15 1")) + $ slice 16 (run 16) + $ midiOn "^58" (striate 2) + $ superimpose (# modIndex (range 0 96 "^34")) + $ ply "1 4" + $ note (scale "blues" ( + -- arp + -- up, down, updown, downup, converge, diverge, disconverge, pinkyup, + arp "" "[0,1,2,<3 4>,<4 <5 6>>]") + + "0!3 <0!3 <1 3>>" + - 12 + ) + # "FMRhodes1" + # crushbus 5 (range 16 4.2 "^54") + # midiG' "^82" 0 1.5 + + + +let scale = getScale (scaleTable ++ [("blues",["c", "ef", "f", "fs", "g", "bf"])]) + + +once + $ note (fastcat ) + # "FMRhodes1" + +scaleList + + + + +once $ "90s_weird" # cut 4 + +once $ "90s_matrix:3" # cut 1 -- libgit2 0.27.0