diff --git a/live/ambient/inquiry.tidal b/live/ambient/inquiry.tidal new file mode 100644 index 0000000..e6bb657 --- /dev/null +++ b/live/ambient/inquiry.tidal @@ -0,0 +1,48 @@ +-- Broken down from LoFi's Pure Bliss Chord: +-- Amin11, D7, Fmaj7, Cmaj7 +"<[a,c6,e6,g6,b6,d7] [fs,a,c6,d6,fs6,a6,c7] [f,a,c6,e6,f6,a6,c7] [c,e,g,b,e6,g6,b6]>" + + +resetCycles + +do +setcps (90/60/4) +let gDJF1 = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.15 saw))) +let gDJF2 = (whenmod 64 32 (# djfbus 1 (slow 32 $ range 0.25 0.75 saw))) +let g = gDJF1 . gDJF2 +d1 $ g $ "k ~ ~ <~ > . ~ <~ k> ~ ~" # "jazz" # gain 0.8 +d2 $ g $ "~ sn:30" # gain 0.7 +d3 $ g + $ fast 4 + $ ply "<1!3 <2 [2|4]>>" + $ "drum:2" + # gain 0.5 +d4 $ g + $ whenmod 16 12 (ply "<2 2 4 4>") + $ iter "1 8" + $ mask (slow 4 "") + $ loopAt 2 + $ "break:3" + # cut 4 # gain (slow 64 $ range 0.6 0.9 (saw + slow 4 perlin)) +d5 $ g -- Low angels + $ note ( + "" + |+| "<0!8 [0 12]!8>" + - 12 + ) + # "moogBass" + # gain 0.4 + # pan 0.2 + # room 0.3 +d6 $ g -- High angels + $ whenmod 32 58 (superimpose ( -- Higher arps! + (|+ note 12) . arp ">") + ) + $ note ( + "<[c6,e6, g6,b6] [a, c6, d6,fs6] [a, c6, e6,f6] [e, g, b,e6]>" + - 12 + ) + # "moogBass" + # gain 0.4 + # pan 0.7 + # room 0.3 diff --git a/live/ambient/scintillance_bleue.tidal b/live/ambient/scintillance_bleue.tidal new file mode 100644 index 0000000..80662aa --- /dev/null +++ b/live/ambient/scintillance_bleue.tidal @@ -0,0 +1,53 @@ +once $ "dr" + +do +resetCycles +setcps (90/60/4) +let gDJF = (# djfbus 1 (range 0.05 0.95 "^49")) +let g = gDJF +d1 $ g + $ midiOn "^73" (fast 2) + $ midiBoth "^41" "^42" (struct "t t t >") + $ midiOn "^42" (struct "t*2") + $ "jazz" + # midiG' "^78" 0 1 +d2 $ g + $ midiOn "^43" (superimpose (const + $ midiOn "^41" (fast 2) + $ "~ . c*<1!3 <2 1>> <~!7 [~ c]>" # "cp" + # note "-4!7 -2" + # lpf 4000 + # midiG' "^79" 0 1.4 + )) + $ ply "<1!16 [2 1]!4 [2!3 1]!8 2!6 [4 1] [2 4]>" + $ n "[0 <0 1 2 3>]*2" + # "amencutup" + # midiG' "^79" 0 1.4 +d3 $ g + $ midiOn "^43" (fast 2) + $ "d*<4 8 <4 8> <4!3 8>> d*<3 <4 6>> d*<2 3 4 3> d*[1 <1 2 4 8>]" + # "cpu:4" + # midiG' "^80" 0 1.8 +d4 $ g + $ "90s_glassatm:3/4" + # cut 4 + # crushbus 41 (range 16 3.5 "^55") + # midiG' "^83" 0 1 +d5 $ g + $ stut' 4 "h" ((|* gain 0.6) . (|+ pan 0.05)) + $ "90s_matrix:0/2" + # midiG' "^84" 0 1 + # crushbus 51 (range 10 1.5 "^56") + # pan 0.7 +d6 $ g + -- $ slow 2 + $ fix (|* gain 0.93) (note "c6") + $ midiOn "^89" (fast 4) + -- $ note ("") -- 1&2' + -- $ note ("") -- 3&4 + $ note ("") -- 1&2&3&4 + # octave 2 + # "supersaw" + # voice 0.01 + # crushbus 61 (range 16 1.5 "^53") + # midiG' "^81" 0 1.3 diff --git a/live/collab/raph/el_diablo.tidal b/live/collab/raph/el_diablo.tidal new file mode 100644 index 0000000..d83e48d --- /dev/null +++ b/live/collab/raph/el_diablo.tidal @@ -0,0 +1,52 @@ + +do +setcps (120/60/4) +let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let g1 = (gDJF1) +let g2 = (gDJF2) +d1 $ g1 + $ midiOn "^42" (<| "k . k(<<3 1> 1 3 5>,8)") + $ midiOff "^42" (<| "k") + $ "[jazz,909]" + # midiG' "^78" 0 1.2 +d2 $ g2 $ "~ snare:42" + # midiG' "^79" 0 1.2 +d4 $ g1 + $ midiOn "^44" (iter "1 4") + $ midiOn "^76" (ply 2) + $ slice 16 (run "8 <8!3 <[4 8] 4>>") + -- $ midiOn "^44" (loopAt 4) + $ loopAt 2 + $ "break:1" + # cut 4 + # midiG' "^80" 0 1 + # octerbus 40 (range 0 1.2 "^52") + # octersubbus 41 (range 0 5 "^32") + # octersubsubbus 42 (range 0 5 "^16") +d5 + $ g2 + $ superimpose ( -- étoiles juxées + (|+ note 12) + . juxBy 0.8 (0.5 ~>) + . striate 8 + -- . (|* gain 0.8) + ) + $ stut 4 0.5 1 + $ slow 4 $ "tristram" + # n "<0 1>" + # room 0.84 # sz 0.8 # dry 1 + # midiG' "^82" 0 1 +d6 $ g2 + $ slice 4 "0 <1 ~> <2 [1 2]> [<3 ~> 3]" + $ note (arp "up" ((slow 4 "") + "c'min'4")) + # "supersaw" + # lpf 3000 + # voice 0.1 + # midiG' "^81" 0 1 + # crushbus 61 (range 16 3.2 "^53") + # room 0.4 + + -- La pub c'est le mitard + -- Et le prof me voyait + -- La cerise en retard diff --git a/live/hip/instru/jardin_dhiver.tidal b/live/hip/instru/jardin_dhiver.tidal index e132a9f..f4247aa 100644 --- a/live/hip/instru/jardin_dhiver.tidal +++ b/live/hip/instru/jardin_dhiver.tidal @@ -1,7 +1,7 @@ -- Jardin d'hiver do -resetCycles +-- resetCycles setcps (90/60/4) let gLPF = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.15 0.8 saw))) let gHPF = (whenmod 64 48 (# djfbus 2 (slow 8 $ range 0.5 0.8 saw))) diff --git a/live/jam/cbow.tidal b/live/jam/cbow.tidal index f704c2c..f424729 100644 --- a/live/jam/cbow.tidal +++ b/live/jam/cbow.tidal @@ -1,5 +1,7 @@ d1 $ slow 17 $ n (run 17) # "cbow" # gain 0.8 # cut 1 +once $ "dr" + resetCycles -- P P T . P T @@ -9,22 +11,33 @@ let chord = "d4'min7'4" let gF = midiDJF "^49" 200 9800 0 2000 let gLeslie = ((# leslie "^29") . (# lsize (range 0 2.5 "^30")) .(# lrate 6.7)) let gDJF = (whenmod 32 24 (# lpf (max 200 (slow 16 $ range 5000 0 sine)))) -let g = gF . gLeslie +let g = gF setcps (100/60/4) d1 $ gDJF $ g $ midiOff "^41" (mask "") - $ midiOn "^41" (<| "k*4" ) - $ midiOff "^41" (<| "k [~!6 ] . k*2 ~" ) + $ midiOn "^41" (<| "k*4") + $ midiOff "^41" (<| "k . k <~ [<~ k> ]>")-- RubADub $ "[jazz,bd]" - # midiG' "^78" 0 0.75 -d2 $ gDJF $ g - $ fast "<0!4 0 [0 1] 1 1 0 [0 1] 1 1 [1 2] 1 2 4>" - $ "~ s ~ s" + # midiG' "^78" 0 1.1 +d2 $ gDJF $ g -- Snare prog + $ "~ ~ " # "h2ogmsn:6" # midiG' "^79" 0 0.8 -d3 $ g -- Bass +d5 $ g -- Breakbeat + $ midiOn "^76" (ply "<2!3 [4 <4 1>]>") + $ midiOff "^44" (slow "<4 2>") + $ sometimesBy "^32" rev + $ someCyclesBy (0.9 * "^52") (scramble "1 4") + $ slice 8 "0 1 <0 2 6 2> <1 3 7 3>" + $ loopAt 2 + $ "fbreak100" + # cut 5 + # midiG' "^80" 0 1.2 +d3 $ g -- Bass bows $ gDJF + $ gLeslie $ midiOn "^57" (euclid "<1 <1 [1 2] 5> 3 5>" 8) + $ midiOn "^89" (chop 16) $ slow 4 $ note ( (arp "up " chord)) @@ -33,9 +46,10 @@ d3 $ g -- Bass # cut 3 # room 0.6 # sz 0.5 - # midiG' "^81" 0 0.56 - # crush (range 10 2 "^53") -d4 $ g + # midiG' "^81" 0 0.86 + # crushbus 31 (range 10 2 "^53") +d4 $ g -- Higher bows + $ midiOn "^58" gLeslie -- $ mask "" $ whenmod 8 7 (ply "1 4") $ slow 2 @@ -46,27 +60,20 @@ d4 $ g # "cbow:2" # cut 4 # room 0.2 - # midiG' "^82" 0 0.4 -d5 $ g -- Breakbeat - $ midiOn "^76" (fast "<2!3 4>") - $ midiOff "^44" (slow "<4 2>") - $ sometimesBy "^32" rev - $ someCyclesBy (0.9 * "^52") (scramble "1 4") - $ slice 8 "0 1 <0 2 6 2> <1 3 7 3>" - $ loopAt 2 - $ "fbreak100" - # cut 5 - # midiG' "^80" 0 0.8 + # crushbus 41 (range 10 2 "^54") + # midiG' "^82" 0 1.05 d8 $ g -- Angels $ midiOff "^59" (mask "") $ note "<[c . ~!3 <~ >] a4>" # "cbow:3" # cut 8 - # midiG' "^83" 0 0.56 - -d4 + # crushbus 81 (range 10 2 "^55") + # midiG' "^83" 0 0.86 +d9 + $ midiOn "^92" (ply "2 <1 <4 [4 8]>>") + $ midiOff "^60" (slow 2) $ whenmod 32 16 (jux rev) $ "h2ogmcp(5,8,<0!3 [0 3]>)" - # gain 0.45 + # midiG' "^84" 0 1.3 (5) h2ogmcb (5) h2ogmcp (1) h2ogmcy (25) h2ogmft (5) h2ogmhh (20) h2ogmht (5) h2ogmmt (5) h2ogmsn ( diff --git a/live/midi/nova/ambient/contre_visite.tidal b/live/midi/nova/ambient/contre_visite.tidal index a343d6d..a6cdf2b 100644 --- a/live/midi/nova/ambient/contre_visite.tidal +++ b/live/midi/nova/ambient/contre_visite.tidal @@ -1,17 +1,18 @@ -- TODO: Add some spaceship fx --- TODO: Reconsider if enough rythmic variations what about a DROP? +-- TODO: Reconsider if enough rythmic variations - what about a DROP? 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 +-- TODO TRIGGER INTRO :) +resetCycles +once $ "90s_synatm:8" # gain 0.94 # 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")) +let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let f2 = (# djfbus 2 (range 0.05 0.95 "^50")) let maskLoops = (mask "" . mask "") setcps (90/60/4) -d1 $ f -- TODO: Rework kick - $ midiOn ("^42" - "^41") (slow 4) +d1 $ f1 -- TODO: Rework kick + $ midiOn ("^42" - "^41") (slow 4) -- PAUSE -- $ mask "" $ midiOff "^41" (maskLoops) $ midiOn "^41" ((<| "k k k k]>") . (# legato 0.6)) @@ -19,7 +20,7 @@ d1 $ f -- TODO: Rework kick $ "[reverbkick,808bd:6]" # lpf 1000 # midiG' "^78" 0 1 -d2 $ f +d2 $ f1 $ mask ",4)!4 t!28>" -- Intro / break/32 $ midiOff "^75" maskLoops $ midiOn "^43" (slice 4 (run 8)) @@ -32,7 +33,8 @@ d2 $ f # cut 2 # speed (range 0.05 1.95 "^51") # midiG' "^79" 0 1.3 -d3 $ f-- Sidekick, doubtful, yet hardworking hats +d3 $ f1 -- Sidekick, doubtful, yet hardworking hats + $ midiOn "^76" (ply "[4 <1 2>]*<4!3 8>") $ mask ",4)!4 t(2,8)!8 []!52>" -- Intro / break/32 $ maskLoops $ someCyclesBy "<0.6 1>" (stut "<2 3 4>" 0.5 "s") @@ -42,8 +44,8 @@ d3 $ f-- Sidekick, doubtful, yet hardworking hats # "h2ogmhh" # pan 0.6 # room 0.2 - # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 0.9 -d4 $ f -- Atmospheric synth: aerial questions + # midiG' ("^80" + 0.08 * (slow 2 perlin)) 0 1.3 +d4 $ f2 -- Atmospheric synth: aerial questions $ "90s_synatm:8/4" # cut 4 # room 0.8 @@ -51,18 +53,18 @@ d4 $ f -- Atmospheric synth: aerial questions # dry 1 # pan "<0.3 0.25 0.2>" # crushbus 42 (range 16 4.5 "^53") - # midiG' "^81" 0 1 -d5 $ f -- Synth: ELECTRONIC ANSWERS + # midiG' "^81" 0 1.4 +d5 $ f2 -- Synth: ELECTRONIC ANSWERS -- $ mask "" -- Intro - $ midiOn "^90" (ply 8) - $ midiOn "^58" (chop 8) + $ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>")) + $ midiOn "^58" (chop "<4 8 16 [32 64 . 128]>") $ "90s_synatm:14/4" # cut 5 # room 0.65 # dry 1 # panbus 51 (range 0.8 0.65 saw) # crushbus 52 (range 12 2.85 "^54") - # midiG' "^82" 0 1.3 + # midiG' "^82" 0 1.6 d6 -- High lead: Winds of truth $ whenmod 8 6 (swing "<4 2>") $ whenmod 32 8 (superimpose ( -- Echos of doubts @@ -81,7 +83,7 @@ d6 -- High lead: Winds of truth # midiG' "^83" 0 0.58 # dry 0.1 # cut 6 -d10 $ f -- RANDOM FOREST NOISES +d10 $ f1 -- RANDOM FOREST NOISES $ fix ( struct "t t t t t*<1 2> [ ] t t" . (# "[future:1]") @@ -93,16 +95,18 @@ d10 $ f -- RANDOM FOREST NOISES . (# midiG' "^14" 0 1.5) ) "n2" -- tchak reverb phantome $ fix ( - struct "t([3 <3!3 5>],8,<0!8 3!8>)" + whenmod 32 16 (someCyclesBy (slow 16 $ saw) (iter 4 . ply "2 [2|1]")) + . struct "t([3 <3!3 5>],8,<0!8 3!8>)" . (# n "<3!3 [3 2]>") . (# "amencutup") - . (# midiG' "^15" 0 1.5) + . (# midiG' "^15" 0 1.25) ) "n3" -- amen excerpt $ fix ( (# "gretsch:10") . (struct "t*3 ~ . t*<1!3 2> t*<1 3>") . (# cut 104) - . (# midiG "^16") + . (# pan (range 0.5 0.9 perlin)) + . (# midiG' "^16" 0 1.4) ) "n4" -- FX1 $ "[n1,n2,n3,n4]" -- n4 # gain 0.8 diff --git a/live/midi/nova/ambient/drone_aveugle.tidal b/live/midi/nova/ambient/drone_aveugle.tidal index 4f751e5..f3f70b3 100644 --- a/live/midi/nova/ambient/drone_aveugle.tidal +++ b/live/midi/nova/ambient/drone_aveugle.tidal @@ -21,6 +21,16 @@ d2 $ g2 -- Snare minitel $ midiOn "^43" (fast 2) $ "~ . [glitch:5,snare:11,<~!8 cp!24 cp!8 ~!8 cp!16>]" # midiG' "^79" 0 1.4 +d7 $ g -- Down Break + $ midiOn "^60" (chop 4) + $ midiOn "^92" (ply 4) + $ slice 4 "0 1 <2 [2|1]> <1 2 3 7*<1 <2 4>>>" + $ loopAt 2 + $ "break:15" + # speed (range 0 2 "^56") + # midiG' "^84" 0 1.2 + # cut 7 + # pan 0.35 d3 $ g -- Fight hats -- FIXME Rework? Could be loved <3 $ midiOn "^44" (fast "4!3 <8 [<4 8> <4!3 8>]>") -- RUN $ "h2ogmhh(3,8)" # n "<1 <2!3 1 2!2 1 1>>" @@ -36,7 +46,8 @@ d4 -- Frequency-modulated hopes ])) $ note ("d" - 12) # "superfm" - # crushbus 41 (range 10 0.95 "^53") -- Harmonics of destruction + # voicebus 42 (range 0 8 "^33") + # crushbus 41 (range 10 0.85 "^53") -- Harmonics of destruction # midiG' "^81" 0 (0.75 - 0.2 * "^17") d5 $ g2 -- BASSLINE $ midiOn "^58" (chop 4) @@ -50,7 +61,7 @@ d5 $ g2 -- BASSLINE # s "superchip" # voicebus 51 (range 0.75 0.05 "^34") # crushbus 52 (range 16 2 "^54") - # midiG' "^82" 0 (0.8 - 0.1 * "^54") + # midiG' "^82" 0 (1.2 - 0.1 * "^54") # room 0.7 # dry 1.02 # sz 0.8 @@ -68,16 +79,6 @@ d6 $ g2 -- Sirene apocalyptico-commerciale # midiG' "^83" 0 0.6 # panbus 63 (range 0.4 0.8 (sine - 2 * (fast "<2!3 4 4!3 0.25>" $ perlin))) -d7 $ g -- Down Break - $ midiOn "^60" (chop 4) - $ midiOn "^92" (ply 4) - $ slice 4 "0 1 <2 [2|1]> <1 2 3 7*<1 <2 4>>>" - $ loopAt 2 - $ "break:15" - # speed (range 0 2 "^56") - # midiG' "^84" 0 0.8 - # cut 7 - # pan 0.35 once $ loopAt 2 $ "fbass:1" diff --git a/live/ambient/empreinte_du_numerique.tidal b/live/midi/nova/ambient/empreinte_du_numerique.tidal similarity index 85% rename from live/ambient/empreinte_du_numerique.tidal rename to live/midi/nova/ambient/empreinte_du_numerique.tidal index ae9a0f6..350f6f4 100644 --- a/live/ambient/empreinte_du_numerique.tidal +++ b/live/midi/nova/ambient/empreinte_du_numerique.tidal @@ -1,10 +1,11 @@ +once $ "dr" do let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw))) let gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw))) let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF) let gPont1 = (whenmod 32 24 gLPF) -let g = gPont1 +-- let g = gPont1 let g = (# djfbus 1 (range 0.05 0.95 "^49")) let modIndex = pF "modIndex" -- resetCycles @@ -15,17 +16,19 @@ d1 $ g $ "jazz" # midiG' "^78" 0 1.3 d2 $ g - $ "~ s" # "[dr55:3,snare:4]" - # midiG' "^79" 0 1.3 + $ "~ s" # "[sn:40,cp]" # lpf 3000 + # midiG' "^79" 0 1.8 + # note "<-2!3 -4>" 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>>") + # midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>") # room 0.3 # dry 0.95 d4 -- Break bonus banane $ g + $ midiOn "^92" (ply "2!3 1 2!3 <2 4>") $ midiOn "^60" ( -- Aerial mask mask "t f t" ) @@ -42,13 +45,18 @@ d5 $ g $ gPont2 # cut 5 # room 0.4 # sz 0.9 - # crushbus 51 (range 10 1.61 "^53") + # lrate 0.93 + # lsizebus 51 (range 0.8 4.8 "^17") + # lesliebus 52 "^33" + # crushbus 53 (range 10 1.61 "^53") # 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 + # room (range 0 0.3 "^55") + # crushbus 71 (range 10 3.61 "^55") # midiG' "^83" 0 1.3 d6 -- RHODES FOLIE <33 $ g @@ -60,5 +68,3 @@ d6 -- RHODES FOLIE <33 # crushbus 61 (range 10 4.4 "^54") # modIndex (range "-0.1" 100 "^34") # midiG' "^82" 0 1.3 - -once $ "dr" # gain 2 diff --git a/live/midi/nova/breaks/break_90s.tidal b/live/midi/nova/breaks/break_90s.tidal index a927e2a..5bfd3cc 100644 --- a/live/midi/nova/breaks/break_90s.tidal +++ b/live/midi/nova/breaks/break_90s.tidal @@ -78,7 +78,7 @@ d5 $ g2 -- Piano base (0.5 ~>) . degradeBy (1 - "^54") . fast "<1!8 2!8 4!8 1!4 2!4 4!8>" - . (|+ note ("12")) + . (|+ note 12) . (|* gain 1.2) . (|+ pan 0.125) )) diff --git a/live/midi/nova/breaks/break_the_night.tidal b/live/midi/nova/breaks/break_the_night.tidal index b84a72e..667fd36 100644 --- a/live/midi/nova/breaks/break_the_night.tidal +++ b/live/midi/nova/breaks/break_the_night.tidal @@ -5,40 +5,53 @@ setcps (90/60/4) let g1 = (# djfbus 1 (range 0.05 0.95 "^49")) let g2 = (# djfbus 2 (range 0.05 0.95 "^29")) d1 $ g1 - $ midiOn "^41" (<| "k*4") + $ midiOn "^42" (fast 2) + $ midiOn "^41" (<| "k k k k*<1 2>]>") $ midiOff "^41" (<| "k . k(<3 [5 3] 3 <5 [5!3 8]>>,8)") - $ "jazz" - # midiG' "^78" 0 1.5 + $ "[jazz,909]" + # midiG' "^78" 0 2 d2 $ fast "<2!6 [4 8] 8>" $ "~ snare:5" # midiG' "^79" 0 1.5 d3 $ g1 + $ midiOn "^76" (fast "2 <2!3 <[2 4]>>") + $ midiOn "^44" (<| "~ h ~ h") $ chop 16 $ loopAt 1 $ "noir_beats:6" - # speed (range 0 2 "^51") + # speed (range 0 2 "^52") # midiG' "^80" 0 1.5 # cut 1 d4 $ g2-- CHOIR BASS - $ mask "t(<4 <2 8>>,8)" + $ midiOff "^57" (mask "t(<4 <2 8>>,8)") $ slice 8 ("0 1 2 3 <4 ~> 5 <6!3 6?> <7 7 <7 3> 3>") $ "noir_choir:7" + # lesliebus 41 "^33" + # lrate 1 + # lsize (range 0.17 6.7 "^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") # cut 4 - # crushbus 41 (range 14 2 "^53") + # crushbus 42 (range 14 0.85 "^53") # midiG' "^81" 0 1.5 # room 0.3 -- d4 $ -- Noir Bass! d5 $ g2 - $ chop 16 - $ "noir_angels:1/4" - # midiG' "^82" 0 1.5 + $ midiOn "^90" (chop 16 . mask "") + $ "noir_angels:1" + # legato 4 + # cut 5 + # crushbus 51 (range 14 2 "^54") + # midiG' "^82" 0 1.8 # cut 1 -d6 +d6 $ g2 $ loopAt 2 $ slice 4 (run 8) $ "fguitar" # n "<12!32 13!16 12!16>" + # crushbus 61 (range 14 2 "^55") # cut 6 # midiG' "^83" 0 1 diff --git a/live/midi/nova/breaks/nova_bossa.tidal b/live/midi/nova/breaks/nova_bossa.tidal index 33a1dd8..49e8b67 100644 --- a/live/midi/nova/breaks/nova_bossa.tidal +++ b/live/midi/nova/breaks/nova_bossa.tidal @@ -12,7 +12,7 @@ once $ "reverbkick" # gain 0.7 do let gDJFManuel1 = someCyclesBy "<1!24 0!8>" (# djfbus 1 (range 0.05 0.95 "^49")) -let gDJFManuel2 = someCyclesBy "<1!24 0!8>" (# djfbus 2 (range 0.05 0.95 "^29")) +let gDJFManuel2 = someCyclesBy "<1!24 0!8>" (# djfbus 2 (range 0.05 0.95 "^50")) -- let gDJFPont = (midiOn "^41" (whenmod 32 24 (# djfbus 3 (slow 8 $ range 0.15 0.45 saw)))) let mBreak = ((mask "f . t f!3")) let mBreak = (midiOn "^42" (mask "t f . f t")) @@ -30,28 +30,29 @@ d1 $ g1 $ m d2 $ g1 $ m $ fast 2 $ "~ . <~!4 s!4> ~ ~" + -- $ "~ . s" # "[snare:20,clap]" # note "<0!7 <0 -3>>" # midiG' "^79" 0 1.4 -d3 +d3 $ g2 $ m $ mask "" - $ g2 $ m $ midiOn "^76" (iter "4 8") $ midiOn "^44" (slice 4 (run "<8!3 <16 32>>")) $ loopAt 2 $ chop 8 $ "break" + # pan 0.2 # cut 3 # speed (range "0" 2 "^52") # midiG' "^80" 0 1.1 -d4 - $ g2 +d4 $ g2 $ whenmod 16 14 (# n "<6 ~>") $ midiOn "^57" (striate "4 <4 2>" . chop 8) $ loopAt 1 $ "bossa" # n "<0 0 0 1 0 1 <2!3 3> <1 0>>" # cut 4 + # pan 0.8 # midiG' "^81" 0 1 d5 $ g2 $ note (arp "" "*4" diff --git a/live/midi/nova/dnb/alerte_verte.tidal b/live/midi/nova/dnb/alerte_verte.tidal index ee0cdc2..05935a2 100644 --- a/live/midi/nova/dnb/alerte_verte.tidal +++ b/live/midi/nova/dnb/alerte_verte.tidal @@ -15,6 +15,7 @@ d1 $ f1 -- KICK # release 0.8 # midiG' "^78" 0 1.5 d2 $ f1 -- Snare tchak! + $ midiOn "^75" (ply 2) $ g32Bridge $ whenmod 16 12 (struct "t*<4 4 8 16>") -- Snare Rush $ "~ s . ~ <~ ~ s ~ s!3 ~ s s ~ s s ~ s s ~ s s s>" @@ -25,7 +26,6 @@ d2 $ f1 -- Snare tchak! # midiG' "^79" 0 1.2 d3 $ f1-- Running Hats $ g32Bridge - -- $ degradeBy ("1 0 0 1!13" - "^52") $ midiOn "^44" (slow 2) $ midiOn "^76" (fast 2) $ "hh*[8 . 8 <16 8 4 [4 8]>]" @@ -33,6 +33,7 @@ d3 $ f1-- Running Hats # midiG' "^80" 0 (1.7 + (slow 4 perlin/4)) # room (slow 8 $ range 0.2 0.45 saw) # sz (slow 8 $ range 0.8 0.2 saw) + # note (range "-12" 12 "^52") # dry (slow 4 $ range 0 2 perlin) # pan 0.6 # cut 3 @@ -46,9 +47,9 @@ d4 $ f1 -- Resolute Bass $ chop 16 $ "fbass:25" # pan 0.15 - # room 0.125 # sz 0.1 # dry 1 + -- # room 0.125 # sz 0.1 # dry 1 # crushbus 41 (range 16 1.25 "^53") - # midiG' "^81" 0 1.1 + # midiG' "^81" 0 1.5 # cut 4 d6 -- Guitar A -- L'attente (18=0) TODO Rework? $ f2 @@ -79,15 +80,14 @@ d7 -- Guitar B -- Le run (18=127) # cut 71 d8 $ f1 -- Clave de l'été pitchable $ midiOn "^59" (fast 2) - $ midiOn ("^91"-"^59") (fast 2) + $ midiOn ("^91" - "^59") (fast 2) $ (|* gain "0.75 1 1 1 0.75 1 1 1") $ "d ~ ~ d d ~ d <~!3 d>" # "[<808lc!6 808hc!2>,<~!4 808mc!4>]" # speed (range 0.5 2 "^55") # midiG' "^83" 0 1.5 d9 $ f1 -- CLAPS! -- FIXME Broken whenmod 4 3 - $ midiOn "^60" (fast "<1 [1 4]> <1!3 4>") - $ "~ . [~ cp] <~!3 cp>" + $ "~ c ~ " # "cp" # midiG' "^84" 0 1.5 d10 $ f2 -- Nappes crushées indépendantes $ midiOn "^92" (ply "<2 4 [8 16 [4|6|4]!6]>") @@ -99,7 +99,7 @@ d10 $ f2 -- Nappes crushées indépendantes # rel 1 # pan 0.85 # crushbus 100 (range 16 0.35 "^36") - # midiG' "^20" 0.2 1 + # midiG' "^20" 0.2 1.5 d11 $ f2 -- Sirene indépendante $ note ("/4") # octave 3 diff --git a/live/midi/nova/dnb/break_the_loop.tidal b/live/midi/nova/dnb/break_the_loop.tidal index d68a9d2..dfabb71 100644 --- a/live/midi/nova/dnb/break_the_loop.tidal +++ b/live/midi/nova/dnb/break_the_loop.tidal @@ -22,7 +22,7 @@ d1 -- TODO: Improve kick. Sound? Rhythm? d2 $ gF $ gM -- Snare glitch high -- $ midiOn "^43" (superimpose (<| )) FIXME LATER SNARE MOD $ fix ((|* gain 0.9)) ("snare:40") - $ "~ s ~ >>" # "[snare:31,snare:40]" + $ "~ s ~ >>" # "[snare:31,snare:40]" # note (range "-12" 12 "^51") # pan 0.46 # room 0.74 # sz 0.2 # dry 1 diff --git a/live/midi/nova/fusion/all_the_way.tidal b/live/midi/nova/fusion/all_the_way.tidal new file mode 100644 index 0000000..1203eca --- /dev/null +++ b/live/midi/nova/fusion/all_the_way.tidal @@ -0,0 +1,79 @@ +once $ "bd" +setcps (-1) + +do +-- Accompagnement: +-- Gauche <[c,e] [b,d] [f,a,c]@2> +-- Droite All the way <3 +let modIndex = pF "modIndex" +let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gMask = mask "t t t >" +let g1 = (gDJF1 . gMask) +let g2 = (gDJF2 . gMask) +setcps (86/60/4) +d1 $ g1 + $ fix ( + (|> note ( + -- " " + " " + + "4" -- Proper tuning + + "[0,12]" + ) + ) + . (|* gain 0.8) + ) + "808bd" + $ midiOn "^42" (<| "k k k k k k ") + $ midiOn ("^41" - "^42") (<| "k k k ]>") + $ midiOff ("^41" + "^42") (<| "k . k(<5 <7 [3 7]>>,8,<0!6 3 <3 0>>)") + $ "[bd,808bd:4]" + # midiG' "^78" 0 1.2 +d2 $ g1 + $ fast 2 + $ "~ cp" + # "clap:1" + # midiG' "^79" 0 1.2 +d3 $ g2 + $ midiOn "^44" (fast "<1!6 2 [2 4]>") -- Gratuitous snare rush + $ ply "2 <2 4>" + $ "sn:27*4" + # midiG' "^80" 0 1.2 +d4 $ g2 + $ note "@2>" + # "supersaw" # octave 3 + # cut 4 + # crushbus 41 (range 16 2.5 "^53") + # panbus 42 (0.5 + 0.1 * perlin) + # room 0.2 + # sz 0.5 + # dry 0.8 + # midiG' "^81" 0 (1.2 - 0.2 * "^53") +d5 $ g2 + $ sometimesBy "0 0.05!14 0" (# crush 2) + $ sometimesBy 0.1 (ply 2) + $ swing "1 4" + $ midiOn "^58" (superimpose ( + mask ",16)!3 t!13>" . + (|+| note ( + arp ">" + "*4" + )) + -- . (|* gain 0.86) + )) + $ note "e3 " + # "FMRhodes1" + # pan 0.7 + # room 0.4 + # midiG' "^82" 0 1.2 + # modIndex (range 0 100 "^34") + # crushbus 51 (range 16 2.5 "^54") +d6 -- Break balance + $ g1 + $ midiOn "^60" (sometimesBy "0.5!14 0!2" $ ply 2) + $ midiOn "^92" (slice 8 ("0 1 2 3 0 5 6 <7 3 7 [3 3]>")) + $ midiOff "^92" (slice 16 (run 8)) + $ loopAt 2 + $ "break:26" + # cut 6 + # midiG' "^84" 0 1.2 diff --git a/live/midi/nova/lofi/soleil_de_sete.tidal b/live/midi/nova/lofi/soleil_de_sete.tidal index 5712c5a..a57b491 100644 --- a/live/midi/nova/lofi/soleil_de_sete.tidal +++ b/live/midi/nova/lofi/soleil_de_sete.tidal @@ -2,7 +2,7 @@ resetCycles -- Soleil de Sete - LoFi avec accompagnement -once $ "dr" # gain 0.9 +once $ "dr" # gain 1 -- TODO: @@ -48,6 +48,7 @@ d3 $ g2 d5 $ g -- BREAKBEAT BUDDY -- $ mask "" -- Post-filter break -- $ mask "" + $ midiOn "^91" (mask "t(8,16)" . fast 2) $ whenmod 16 8 ( sometimesBy "0 0.2 . 0.75!3 0" (ply "2 . [2|4]")) diff --git a/live/midi/nova/lounge/cbow.tidal b/live/midi/nova/lounge/cbow.tidal index c709af8..3948cac 100644 --- a/live/midi/nova/lounge/cbow.tidal +++ b/live/midi/nova/lounge/cbow.tidal @@ -16,8 +16,8 @@ d1 $ gDJF $ g $ midiOff "^41" (mask "") $ midiOn "^41" (<| "k k k ") $ midiOff "^41" (<| "k [~!6 ] . k*2 ~") - $ "[jazz,kick:14]" - # midiG' "^78" 0 1 + $ "[jazz,kick:14,bd:2]" + # midiG' "^78" 0 1.2 d2 $ gDJF $ g $ fast "<0!4 0 [0 1] 1 1 0 [0 1] 1 1 [1 2] 1 2 4>" $ "~ s ~ s" @@ -26,8 +26,6 @@ d2 $ gDJF $ g d6 -- $ g $ midiOn "^44" (slow 2) - -- $ midiOn "^41" (struct "t*[<8 8 16 8> 8]") - -- $ degradeBy ("0 0.95!7 0" - "^52") $ "~ h ~ h ~ h*2 ~ h" # "hh27:2" # note ( whenmod 4 3 (2 -) @@ -52,7 +50,7 @@ d3 $ g -- CBOW Electric Bass $ note ( (arp "up " chord)) # "cbow:0" - # pan 0.3 + # pan 0.15 # cut 3 # room 0.6 # sz 0.5 @@ -65,12 +63,13 @@ d4 $ g -- Lead aigus $ whenmod 16 8 (ply 2) $ whenmod 4 3 (off "e" ((# cut 41) . (# legato 1))) $ note (arp "converge" chord) - # pan 0.4 + # pan 0.75 # "cbow:2" # cut 4 # room 0.2 - # midiG' "^82" 0 1.05 + # midiG' "^82" 0 1.25 # lesliebus 41 (range 0 2 "^54") + # lsizebus 42 (range 0.2 6.2 "^34") d8 $ g -- Angels $ juxBy 0.8 (sometimesBy "0 1" rev) -- $ midiOff "^59" (mask "") @@ -78,7 +77,7 @@ d8 $ g -- Angels # "cpluck" |>| n "7 8" # room 0.4 - # midiG' "^83" 0 1.1 + # midiG' "^83" 0 1.0 d10 $ (# lpf 2000) $ g $ "~ cp" diff --git a/live/midi/nova/lounge/hoover_sepia.tidal b/live/midi/nova/lounge/hoover_sepia.tidal index 0c05bcb..7c57a20 100644 --- a/live/midi/nova/lounge/hoover_sepia.tidal +++ b/live/midi/nova/lounge/hoover_sepia.tidal @@ -1,15 +1,9 @@ --- TODO Try Control with busses :D + do --- region Utils let modIndex = pF "modIndex" -let cF5 ch = cF 0.5 ch -let gDJF = (# djfbus 1 (range 0.15 0.99 "^49")) -let gRoom = (# roombus 2 (cF5 "29")) -let gSize = (# sizebus 3 (cF5 "30")) -let g = gDJF . gRoom . gSize +let gDJF = (# djfbus 1 (range 0.05 0.95 "^49")) +let g = gDJF let gG = 1 * "^77" -let gM' ch l h = gain (range l h (gG * ch)) -let gM ch = gM' ch 0 1 let ampb bus pat = (ampbus bus (gG * pat)) let midiOn ch pat = someCyclesBy ch pat -- endregion @@ -17,33 +11,39 @@ let prog = "" setcps (95/60/4) d1 -- Kick techno 1-2-4/4 $ g - $ midiOn "^41" (fast 2) $ midiOn "^42" (fast 2) - $ whenmod 4 3 (ply "2") - $ "[jazz]" - # gM' "^78" 0 2 + $ midiOn "^41" (struct "t t t t]>") + $ "[jazz,bd:2]" + # midiG' "^78" 0 2 d2 $ g $ midiOn "^43" (struct "t*[4 8 16 <8 [32 16]>]") $ "~ ~ h ~ ~ h*2 [<~ h h ~> ] h" # "h2ogmhh" # n "<0!4 1!4 2!4 3!4>" - # gM' "^79" 0 1.25 + # midiG' "^79" 0 1.25 d3 $ g $ loopAt 2 - $ midiOn "^76" (scramble "1 2") + $ midiOn "^76" (ply "1 2") $ midiOn "^44" (scramble "1 8") $ slice 8 ("0 1 2*<1 <2 4>> 3 4 <5 4> <6!3 4> 7*<1!3 <2 4>>") $ "fbreak100:4" - # gM' "^80" 0 1.8 + # midiG' "^80" 0 1.8 d4 $ g -- Hoover bassline - $ slow 2 - $ n ("0*[4 8]" + prog - 12) + $ midiOn "^57" (superimpose ( + arp "up" + . struct "t*<2!3 4>" + . (|+| note (12 + "c'maj'3")) + -- . (|* gain 0.9) + )) + -- $ slow 2 + $ n ("0" + prog - 24) # s "superhoover" - # squizbus 30 (range 1 1.7 "^33") - # crushbus 31 (range 16 1 "^53") - # ampb 32 (range 0 0.125 "^81") + # squizbus 30 (range 0 1.37 "^33") + # crushbus 31 (range 16 1.3 "^53") + # ampb 32 (range 0 0.25 "^81") # pan 0.2 - # gM' "^80" 0 1.8 + # midiG' "^81" 0 1.38 # legato 1.05 d5 $ g -- Arp aigus Rhodes + $ superimpose (|- note 24) $ midiOn ("^58" + 0.05) (struct "t(3,8) t(<5 <4 [2 4]>>,8)") $ note (arp "" $ prog @@ -52,9 +52,9 @@ d5 $ g -- Arp aigus Rhodes ) # "FMRhodes1" # ampbus 40 (range 0 0.82 "^82") - # crushbus 41 (range 16 1 "^54") - # modIndex "[0,5]" + # crushbus 41 (range 16 3.9 "^54") + # modIndex "[0,2.5]" d10 $ g $ "~ [h2ogmcp,clap]" - # gM' "^84" 0 1.5 - # room 0.7 # sz 0.7 # dry 0.9 + # midiG' "^84" 0 1.5 + # room 0.2 # sz 0.7 # dry 0.99 diff --git a/live/midi/nova/lounge/invoque_ete.tidal b/live/midi/nova/lounge/invoque_ete.tidal index ac88a82..bcee270 100644 --- a/live/midi/nova/lounge/invoque_ete.tidal +++ b/live/midi/nova/lounge/invoque_ete.tidal @@ -2,6 +2,7 @@ import Sound.Tidal.ParVagues.Control resetCycles + -- Invoque l'été -- Il ne viendra pas tout seul ;) do @@ -16,48 +17,49 @@ d1 $ f1 $ m $ midiOn "^42" (<| "k k k ") $ midiOff "^42" (<| "k*2") $ "[jazz,kick:5]" - # midiG' "^78" 0 1.5 + # midiG' "^78" 0 1.2 d2 $ f1 $ m -- Clave de l'été $ midiOn "^43" (fast 2) $ midiOn ("^75"-"^43") (fast 2) $ (|* gain ("0.75 1 1 1 0.75 1 1 1" * 1.7)) $ "d ~ ~ d d ~ d <~!3 d>" - # "snare:22" - # midiG' "^79" 0 1.4 + # "[snare:22,sn:4]" + # midiG' "^79" 0 1 # speed (range 0 2 "^51") d4 $ f1 $ m -- Mecano Course -- $ fast "<<4 2> 4!7 2!4 2 2 4 8>" - $ midiOn "^76" (fast "<2!3 <4 [4 2]>>" . (# speed 1.2) . (>| "breaks165")) - $ midiOn "^44" (slice 16 ("0*<1 2> 1 2 3*<2 1>") . (>| "breaks125")) - -- $ midiOn "^76" (slice 8 "0 <1 ~> 7 3*<1 2 4 4>") $ sometimesBy "0 ^32!7" (ply 4) $ someCyclesBy "^52" (iter 4) + $ midiOn "^76" (slice 8 (run 8) . (|* speed 2) . (>| "breaks165")) + $ midiOn "^44" (slice 16 ("0*<1 2> 1 2 3*<2 1>")) + -- $ midiOn "^76" (slice 8 "0 <1 ~> 7 3*<1 2 4 4>") -- $ slice 8 "0 1 <2!3 0> <3!3 1 4 5 6 7>" "0 1 <2!3 0> <3!3 1>" - $ chop 8 - $ loopAt 2 $ "breaks125:3" - # midiG' "^80" 0 1.3 - # speed (range 0 2 "^16") + -- $ chop 8 + $ loopAt 2 + $ "breaks125:3" + # midiG' "^80" 0 1.5 + -- # speed (range 0 2 "^16") # cut 4 d5 $ f1 $ m -- Bassline variable double piste $ loopAt 2 $ slice 8 (run "<4!4 8 8 [4 8 4] [8 4 8]>") - $ midiOn "^57" (# n 14) + $ midiOn ("^57" + "^89") (# n 14) $ "fbass:13" # pan 0.2 - # room 0.2 + -- # room 0.2 # crushbus 51 (range 16 4.5 "^53") - # midiG' "^81" 0.3 1.45 + # midiG' "^81" 0 1.2 # cut 4 d6 $ f2 $ m -- Douce guitare juxée $ chop 16 - $ midiOn "^58" (juxBy 0.85 ((# cut 31) . rev)) + $ midiOn "^58" (juxBy 0.85 ((# cut 31) . rev . (|* gain 0.93))) $ whenmod 16 12 (rev) $ whenmod 8 4 (chop 4) $ loopAt 4 $ "fguitar" # n "<12!16 13!16>" # midiG' "^82" 0 1 # release (range 2 0.15 "^34") - # crushbus 61 (range 8 1.4 "^54") + # crushbus 61 (range 16 1.4 "^54") # pan 0.85 # room 0.2 # dry 1 # cut 3 @@ -71,7 +73,7 @@ d7 $ f2 $ m # midiG' "^83" 0 1.4 # cut 7 d12 $ f2 $ m -- Angels of moogland - $ midiOn "^92" (|+ note 12) + $ midiOn "^92" (|+ note 24) $ midiOn "^60" ( superimpose ( struct "t(5,8)" @@ -83,6 +85,7 @@ d12 $ f2 $ m -- Angels of moogland # octave 4 # room 0.24 # "moogBass" + # pan 0.4 # crushbus 81 (range 16 1.4 "^56") -- Even an angel can fall in love # midiG' "^84" 0 1.3 diff --git a/live/midi/nova/lounge/michael.tidal b/live/midi/nova/lounge/michael.tidal index 8332eee..860b3e2 100644 --- a/live/midi/nova/lounge/michael.tidal +++ b/live/midi/nova/lounge/michael.tidal @@ -8,27 +8,31 @@ let g = gDJF setcps (120/60/4) d1 $ g $ midiOn "^41" (struct "t t t*<2 1 1 2> t*<1 2>") - $ midiOff "^41" (struct "t(<3!3 [3 <8 [5 8]>]>,8)") + $ midiOff "^41" (struct "t*<1!3 2> . t(3,8)") $ "jazz" # room 0.5 # sz 0.5 # dry 1 # midiG' "^78" 0 1.6 d2 $ g + $ superimpose (const + $ midiOff "^43" (# silence) + $ mask "" + $ "~ . cp*<1!3 2> ~" + # lpf 2000 + # midiG' "^79" 0 1.2) $ whenmod 8 6 (ply "2 <2 4>") $ "~ s . ~ <~!7 s> <~!3 s>" # "snare:20" # midiG' "^79" 0 0.8 - # note (range "-12" 12 "^50") + # note (range "-12" 12 "^51") d3 $ g $ midiOn "^44" (slow 2) - -- $ midiOn "^41" (struct "t*[<8 8 16 8> 8]") - -- $ degradeBy ("0 0.95!7 0" - "^52")z $ "~ h ~ h ~ h*2 ~ h" # "hh27:2" # note ( whenmod 4 3 (2 -) "0 . 2 0" ) - # midiG' "^80" 0 1.6 + # midiG' "^80" 0 1.3 d4 $ g -- Synth brass choir $ midiOn "^57" (# crushbus 4 6) $ fix ( @@ -54,22 +58,27 @@ d4 $ g -- Synth brass choir ) "c" $ slice 4 "<0 1 2 3>" $ "[a,b,c]" - # midiG' "^81" 0 1.5 + # midiG' "^81" 0 1 + # crushbus 41 (range 16 1.6 "^13") # room 0.3 + # pan 0.6 # sz 0.6 d5 $ g -- Jumpy Piano $ midiOff "^58" (struct "t(2,4)") - $ degradeBy ("0 0.95!7 0" - "^34") + -- $ degradeBy ("0 0.95!7 0" - "^34") $ juxBy 0.8 (rev . (# cut 51)) $ mask "f !3 . t" $ slice 8 (run ("4 <4 8>" * "<1!3 2>")) $ "fpiano:3" # cut 5 + # pan 0.2 # crush (range 12 3 "^54") # room 0.5 # sz 0.7 - # midiG' "^82" 0 1.5 + # midiG' "^82" 0 1 d7 $ g + $ midiOn "^59" (ply "<1 1 2 2>") + $ midiOn "^91" (ply "<2!3 4>") $ slice 8 (run ( "<2!3 4>" * "<1!4 2!4 [2 1]*4 [2 4]*4>" @@ -78,12 +87,14 @@ d7 $ g # midiG' "^83" 0 (1.2 - 0.5 * "^55") # crushbus 7 (range 10 1.5 "^55") d8 $ g + $ midiOn "^60" (iter 4) + $ midiOn "^92" (ply 2) $ loopAt 2 $ degradeBy ("0 0.9!7 0" - "^56") $ scramble 2 $ slice 8 (run 8) $ "fbreak120" - # room 0.8 - # dry (1 + (slow 8 $ perlin * "^36")) + # pan 0.7 + # speed (range 0 2 "^56") # midiG' "^84" 0 1.5 # cut 6 diff --git a/live/midi/nova/party/last_one.tidal b/live/midi/nova/party/last_one.tidal index e79a5ae..e2c090b 100644 --- a/live/midi/nova/party/last_one.tidal +++ b/live/midi/nova/party/last_one.tidal @@ -23,7 +23,8 @@ d2 $ g $ "~ s ~ " # "sn" # n "[1,10]" # midiG' "^79" 0 1.6 d3 $ g - $ midiOn "^76" (fast 2) + $ midiOn ("^44") (fast 2) + $ midiOn ("^76") (ply 2) $ struct "t*[8 <<4 16> 16 <8 [8 4] 4 8> 16>]" $ "h2ogmhh" # n "[10|11|12]*4" # midiG' "^80" 0 1.5 @@ -68,7 +69,7 @@ d6 -- Guitare nostalgique $ midiOn "^59" (slice 4 "0 1 2 3") $ mask "" $ "fguitar" # n "<34!32 35!16 34!16>" - # midiG' "^83" 0 1 + # midiG' "^83" 0 1.5 # crushbus 60 (range 10 2.85 "^55") # pan 0.65 # cut 6 @@ -79,7 +80,7 @@ d7 $ g -- C-Bows "<0 <-1 2>>" + "0(3,8) 0" )) . (|+ note 24) - . (|* gain (range 0 1 "^56")) + . (|* gain (range 0 0.95 "^20")) ) $ note ( -- Graves! progm @@ -88,7 +89,7 @@ d7 $ g -- C-Bows ) # "cbow:8" # pan "<0.7!7 0.3>" - # midiG' ("^84" * "^20") 0 0.9 + # midiG' ("^84" * "^56") 0 1.4 d8 $ g $ midiOn "^60" (off "q" (# n 11) . (|* gain 0.95)) $ note (