diff --git a/live/dub/steps.tidal b/live/dub/steps.tidal new file mode 100644 index 0000000..6696dd2 --- /dev/null +++ b/live/dub/steps.tidal @@ -0,0 +1,60 @@ +-- Steps: Baby dub steps, trying out some delay +-- TODO Elaguer pause delay piano drums only +-- TODO Autre pause delay hammond + +resetCycles + +do +let chords = "" +setcps (120/60/4) +d1 + $ "k . [~ <~ k>]" # "reverbkick" # lpf 1500 + # gain 0.8 + # release 0.8 +d2 + $ fix (mask "f t") ("hh27:3") + $ superimpose ( + sometimesBy "0 <0 0.2!3>!2 <0!3 [0 0.5]>" (fast 2) + . (<| "k*[8 <8!3 4>]") . (# n 2) . (# cut 31) . (|* gain 0.65) + ) + $ "h h" # "hh27:3" # cut 3 # gain 1 +d4 + $ juxBy 0.5 ((# cut 41) . (# octave 4)) + $ struct "t*2 t . t*<2 [4 2] 4 [2 4]>" + $ note (arp "up . " (chords + "c'min7")) + # "bass3:1" + # cut 4 + # room 0.15 + # gain (slow 8 $ range 0.55 0.75 cosine) +d5 + $ every' 16 15 (# silence) + $ mask "" + $ every' 16 8 ( + (|+ note 12) + . (# delay 0.75) + . (# delayfb 0.8) + . (# delaytime 1) + ) + $ "~ p ~ p" # "superpiano" + # note (chords + "") + # room 0.3 # sz 0.6 + # velocity 0.7 + # gain 0.75 +d6 -- Skank Hammond + $ mask "" + $ mask "[ t?] . f <~!8 t!8> f f" + $ fast 2 + $ note (("[0 12 0 <~!6 12!2>]" |+ (slow 2 chords))) + # "superhammond" + # gain (0.68 * "[1 0.85 1 0.85]") + # voice 6 + # octave 6 + # sustain 0.25 +d9 + $ "hh*[8 . 8 8 <8 16> <8 8 4 16>]" + # gain "<0.5!4 0.7!4 0.6!4 0.7!4>" +d7 + $ note "<[2 . ~ <2!3 4>] [0 . <~ 0> <0 0 1 4>]>" # "brass:20" + # gain (slow 8 $ range 0.3 0.47 saw) + # pan 0.25 # room 0.3 + # cut 7 diff --git a/live/midi/nova/dnb/BreakBass.tidal b/live/midi/nova/dnb/BreakBass.tidal index d9d892e..665290a 100644 --- a/live/midi/nova/dnb/BreakBass.tidal +++ b/live/midi/nova/dnb/BreakBass.tidal @@ -27,44 +27,49 @@ let gDJF = (gLPF . gHPF) -- endregion Nova Utils let g = (gDJF . gReverb) let prog = "<1 1 2 4>" -setcps (135/60/4) --- resetCycles +setcps (139/60/4) +resetCycles d1 $ g - -- $ mask "" - -- $ novaOn "^42" (<| "k k k ") - -- $ novaOff "^42" (<| "k k . ~ k k ~") - $ novaOff "^42" (<| "k . ~ k ~ ~") - -- $ novaOff "^42" (<| "k*2") + $ mask "" + $ someCyclesBy "<0!8 2 0!55>" (<| "k*12") + $ someCyclesBy "<0!6 2!2 0!56>" (<| "k*8") + $ someCyclesBy "<0!9 1!55>" (<| "k . ~ k ~ ~") + $ someCyclesBy "<1!9 0!55>" (<| "k*4") $ "reverbkick" # sus "0.25" - -- $ "[kick:2,kick:5,kick:9]" # sustain 0.5 # gM' 0 1 "^78" d2 $ g - $ novaOn "^75" (<| "k*8") + $ mask "" $ "~ s ~ s*<1 2 1 1>" # "[snare:21,snare:22,snare:3]" # gM' 0 1.2 "^79" # note (range "-4" 12 "^51") d3 $ g - $ novaOn ("^76") (slice 8 (run 8) . (loopAt 1) . (>| "breaks165")) + $ whenmod 128 64 ( + slice 8 (run 8) . (loopAt 1) . (>| "breaks165") + . (|* gain "<1.1!8 0.95!24>") + ) $ "d*[8!3 <[8 . 8 4] [16 <4 16>]>]" # "[hh27,drum:2]" # gM' 0 1 "^80" d4 $ g + $ mask "" + $ novaOn "^89" (chop 4) $ whenmod 16 8 (rev) $ slice 8 ("0(3,8)" + "0 <0 1!3>") $ "fbass:3" - -- # crush 5 - # gM' 0 1 "^80" + # crush (range 10 4.5 "^53") + # gM' 0 1.1 "^81" # pan 0.2 # cut 1 d5 $ g + $ someCyclesBy "<1!64 0!64>" (# octave 4) + $ novaOn "^90" (scramble 4 . fast 4) $ slice 4 ("<0 1 2 3>") $ "fguitar:1" - # octave 4 # pan 0.7 - -- # crush 2 + # crush (range 10 2 "^54") # room 0.2 # sz 0.8 - # gain 0.8 + # gM' 0 1.1 "^82" # cut 1 diff --git a/live/pair/be_my_punk.tidal b/live/pair/be_my_punk.tidal new file mode 100644 index 0000000..1f2f1a4 --- /dev/null +++ b/live/pair/be_my_punk.tidal @@ -0,0 +1,75 @@ +do +resetCycles +setcps (80/60/4) +d1 -- grosse caisse / caisse claire poum tchak + $ fix (# s "[bd,808bd]") (s "k") + $ fix ( + whenmod 16 12 (fast "2 [4!3 8]") + . (# s "[snare:2,snare:49]") + . (|- note 2) + . (|* gain "<0!4 1!60>") + ) (s "s") + $ s "k s k s" + # gain 0.9 +d2 -- charley double croche + $ mask "" + $ s "[hh,h2ogmcy:1]*[16 <16!3 32>]" + # 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 +d3 + -- $ superimpose ((|* speed 2) . (# cut 31)) -- Chipmunk + $ whenmod 64 32 ( + sometimesBy "0 <1 1 0 1>" ((# delay 0.75) . (# delayfb "<0 0 0 0.75>") . (# delaytime "h")) + . slice 16 "<[14 15] [14 15] [12 13] [14 15]>" + ) + $ someCyclesBy "<1!32 0!32>" ( + slice 8 (run "<8!4 4 4 8 4 2 2 8 2 1!4 1!48>")) + $ whenmod 16 12 (# hpf 5000) + $ "nina/4" + # pan 0.4 + # gain 1.25 + # cut 3 +d4 + $ mask "" + $ someCyclesBy "<1!4 0!4 1!6 0!2>" ( + (# lpf 1000) + . (|* gain "<1!3 1.15 0!4 1!4 1.1 1.15 0!2>") -- Fade out up + ) + $ superimpose ( + (# crush (slow 8 $ range 2.5 8 sine)) + . (# cut 41) + . (|* gain 0.85) + ) + $ slice 2 "<0 0 1 1>" + $ "punk" + # pan 0.8 + # gain 0.8 + # cut 4 + + + + +once + $ slice 8 ("7") $ "nina/4" # gain 1.3 # cut 4 + + + +once + $ slice 4 0 + $ "punk:2" # cut 5 + +-- TODO: TECHNOPUNK!!1! +do +setcps (130/60/4) +d1 $ "jazz*4" # gain 1.15 +d2 $ "~ cp" # lpf 2000 # gain 1.5 # room 0.5 # dry 0.99 +d3 $ "hh*16" # gain 1.6 +d4 + $ loopAt 2 + $ "punk" + # crush (1.5) + # pan 0.8 + # gain 0.95 + # cut 4