diff --git a/live/ambient/before.tidal b/live/ambient/before.tidal index b05572c..8ac0301 100644 --- a/live/ambient/before.tidal +++ b/live/ambient/before.tidal @@ -5,24 +5,25 @@ setcps (80/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) let gMask = (midiOn "^41" (mask "t . > >")) -let gMute = (midiOn "^73" (mask "f*16")) -let gM = gMask . gMute -d1 +let gM1 = (midiOn "^73" (mask "f*16")) +let gM2 = (midiOn "^74" (mask "f*16")) +let gM = gMask +d1 $ gM2 $ gF $ midiOn "^14" (fast 2) $ midiOn "^42" (superimpose (# "808bd:2") . struct "t t t >") -- $ midiOff "^42" (<| " . ~ ~ <~ t> <~!3 t>") $ midiOff "^42" (<| "t") $ "[808bd:13,cpu]" -- 4 6 # midiG' "^78" 0 1.2 -d2 $ gF -- Slow clap +d2 $ gM1 $ gF -- Slow clap $ midiOn "^41" (<| "~ s ~ s ~ s ~ s*<1 2>") -- RUN! $ midiOn ("^43" - "^42") ((whenmod 8 4 (fast "<1 2 1 4> <2 2 4 4>")) . (struct "~ t ~ t")) - $ midiOff ("^43" + "^42") (struct "~ t") + $ midiOff ("^43" + "^41" + "^42") (struct "~ t") $ "clap" # hpqbus 22 (range 0 (1 - "^41") "^31") # hpfbus 21 (range 0 5000 "^51") # midiG' "^79" 0 1.2 -d3 $ gM $ gF -- Broken drummer +d3 $ gM1 $ gMask $ gF -- Broken drummer $ sometimesBy (1 - "^52") (mask "t(3,8)") $ sometimesBy "0!4 1 0!3" (mask "t(4,16)") $ sometimesBy "0!7 1" (ply 2) @@ -31,13 +32,14 @@ d3 $ gM $ gF -- Broken drummer -- $ chop 32 $ loopAt 1 $ "fbreak80" -- V1: Existing # midiG' "^80" 0 1.2 # cut 3 -d6 $ gMute +d6 $ gM1 -- Drumroll fou + $ midiOn "^91" (fast "2 <2!3 <4 [4 8]>>") $ "dr*[<16 [16 32 16]> 16 <32 [32 16 32]> <16 [8 16]>]" # "drum:2" # midiG' "^83" 0 1.1 -d7 $ gM $ gF -- Final cymbal +d7 $ gM1 $ gMask $ gF -- Final cymbal $ mask "" - $ "808cy:4" # gain 0.8 + $ "808cy:4" # midiG 0.8 # room 0.5 # dry (slow 8 $ range 0 0.8 saw) # lpf 3400 d4 $ gF2 "atmos/4" # "90s_synatm:0" # cut 4 diff --git a/live/boeuf/algorythm/fdlm2022/toxic.tidal b/live/boeuf/algorythm/fdlm2022/toxic.tidal index fc26a13..66a304a 100644 --- a/live/boeuf/algorythm/fdlm2022/toxic.tidal +++ b/live/boeuf/algorythm/fdlm2022/toxic.tidal @@ -50,4 +50,4 @@ d8 $ gDJF -- CUE Toxic Theme # rel 2 # sz 0.5 # pan 0.9 - # midiG' "^83" 0 1.5 + # midiG' "^83" 0 1.1 diff --git a/live/boeuf/algorythm/fix_you.tidal b/live/boeuf/algorythm/fix_you.tidal index 82678d7..9100b62 100644 --- a/live/boeuf/algorythm/fix_you.tidal +++ b/live/boeuf/algorythm/fix_you.tidal @@ -23,7 +23,12 @@ d3 $ gF # midiG' "^80" 0 1.2 -- d4 -once $ "supergong" # note "e6" - # room 1.2 - # orbit 1 - # gain 0.8 +once $ "ikedaBass" # note "e6" + -- # room 1.2 + -- # orbit 1 + # gain 0.5 + + +once + $ note "b'min'3" # "organDonor" + # gain 0.99 diff --git a/live/boeuf/algorythm/fly_me_to_the_moon.tidal b/live/boeuf/algorythm/fly_me_to_the_moon.tidal index 395881a..c8c2416 100644 --- a/live/boeuf/algorythm/fly_me_to_the_moon.tidal +++ b/live/boeuf/algorythm/fly_me_to_the_moon.tidal @@ -6,7 +6,7 @@ let gMask = (midiOn "^41" (mask "t . > >")) let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute d1 $ gMute $ gF -- Tradition never disappoints: 4 on the fl00r... - $ midiOn "^74" (<| "k*4") + $ midiOn "^74" (<| "k lk k ") $ midiOn "^42" (<| "k k") $ midiOff "^42" (<| "k") -- $ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . ]>") -- ..or not? @@ -21,3 +21,9 @@ d3 $ gF $ midiOff "^44" (<| "h*4") $ drumFrom "rolandtr808" "[hh:1]" # midiG' "^80" 0 1.2 +d8 $ gF + $ midiOn "^92" (ply 8) + $ chop 4 + $ loopAt 4 + $ "jungle_breaks:40" + # midiG' "^84" 0 1.2 diff --git a/live/boeuf/algorythm/lonely_day.tidal b/live/boeuf/algorythm/lonely_day.tidal new file mode 100644 index 0000000..2d8b437 --- /dev/null +++ b/live/boeuf/algorythm/lonely_day.tidal @@ -0,0 +1,36 @@ +do +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +setcps (160/60/4) +d1 $ gMute + -- $ midiOn "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>") + -- $ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>") + $ "k ~ <~ [~ k]>" # "[bd,808bd:3]" + # midiG' "^78" 0 1.2 +d2 $ gMute2 $ gF1 + $ ((|* gain "1 <1!3 [1 0.9 1]>") . (whenmod 4 3 (fix (# "snare:30") "snare:29"))) + $ "~ " + # "[snare:29,snare:4]" + # lpf 5000 + # midiG' "^79" 0 1 +d3 $ gF1 $ gMute2 + $ "h h h h h*<1!7 2>" |* gain "0.8 1 1.1 1 1 1.1" + -- # drumFrom "sakatadpm48" "[hh,oh]" + # "hh" + -- # n "0!3 <0!3 1>" + # lpf 4500 + # midiG' "^80" 0 1 +d8 $ gF1 $ gMute2 + $ loopAt 2 + $ slice 8 "~ 0 ~ 2 ~ 4 ~ 6" + $ "break:10" + -- $ loopAt 2 $ chop 4 + -- $ "jungle_breaks:44" + # cut 8 + # midiG' "^84" 0 1.2 diff --git a/live/boeuf/algorythm/love23/killing_me_softer.tidal b/live/boeuf/algorythm/love23/killing_me_softer.tidal new file mode 100644 index 0000000..6490488 --- /dev/null +++ b/live/boeuf/algorythm/love23/killing_me_softer.tidal @@ -0,0 +1,214 @@ +-- Softer version via Roberta Flack + +k 1/8 +hh 8/8 + +resetCycles + +do +setcps (72/60/4) +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +let modIndex = pF "modIndex" +d1 $ gF1 $ gM -- Kick + $ midiOn "^42" (struct "t . ~ t ~ <~!7 t>") + -- $ struct ("t t ") -- RUN! + $ "cpu" + # midiG' "^78" 0 1.2 + # pan 0.8 +d2 $ gF1 $ gM2 -- Snare + $ midiOn "^43" (struct "~ t ~ t") + $ midiOff "^43" (struct "~ . t") + $ "808sd:6" -- "snare:5" + # release 0.4 + # att 0.02 + # midiG' "^79" 0 1.5 +d3 $ gF1 $ gMute -- Hats complément + $ midiOn "^44" (fast 2) + $ midiOn "^76" (ply "<2 4>") + -- $ "~ h ~ ~ <~!8 h!8> ~ h" + $ "h h h h" # "cpu:4" + -- # "snare:51" + # att 0.0125 # rel 2 # hpf 3000 + # pan 0.7 + # midiG' "^80" 0 1 +d8 $ gF3 + $ midiOn "^92" (ply 8) + $ midiOn "^60" (>| "break:22") + $ loopAt 2 $ chop 4 $ "break:21" + # midiG' "^84" 0 1 + # cut 8 +d4 $ gF2 + $ midiOn "^57" (struct "t(3,8)" . arpeggiate . (# legato 2) . (# room 0.2) . (# size 0.8)) + -- $ note (slow 2 "<[c4, e4, a4] [g3, b4, d4]>") + -- TODO: Try with just the fundamentals: + -- "e3 a3 d3 g3 e3 a3 d3 c3 g2 c3 f3 e3" -- 12 Chorus + -- "e3 ~" -- Bridge x2 -- OR SILENT? + -- "a3 d3 g3 c3 a3 d3 e3 e3 a3 d3 g3 b2" -- 12 Verse + -- Pasted: Chorus/Bridge/Verse/Chorus/Bridge2/Verse/Chorus/Bridge8 + $ midiOn "^89" (chop 8) + -- $ note ("") + -- TODO: Move along new fundamentals + -- Mapping to: F G Ab Bb C Db Eb + -- Map from: E Ff G A B C D + -- FIXME: Remove/replace intro sync + -- let introSync = "bf4 ef4 af4*[4 8]" + $ note ("") + # "bassWarsaw" + # legato 1 + -- # cut 4 + # midiG' "^81" 0 1 + + +-- TODO: Add the bass gimmick on 7/8th bars + +resetCycles + +-- Chorus 12 +-- Bridge 2 +-- Verse 12 +-- Chorus 12 +-- Bridge 2 +-- Verse 12 +-- Chorus 12 +-- Bridge 8 +-- Chorus 12 + -- # cut 4 + + +do +-- Chorus +-- Alternate 2xMain 2xAlt chords for 8 bars +let chorusMainArp = "[a c e g]" +let chorusMainChord = "[c4, e4, a4]" +let chorusAltArp = "[g fs a c]" +let chorusAltChord = "[g3, b4, d4]" +once $ note chorusMainChord + # "bassWarsaw" # gain 0.7 + +g c f f +let + +fs +a +g +b +d +g + +-- + +-- FIXME: Adapt or remove former copy-pasted content +do +setcps (92/60/4) +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gM = gMask . gMute +let modIndex = pF "modIndex" +d1 $ gF1 $ gM -- Kick + $ midiOn "^42" (struct "t . ~ t ~ ~") + -- $ struct ("t t ") -- RUN! + $ fix (|* gain 0.7) "jazz" + $ fix ((|* gain 0.7) . (# "jazz") . (# n "<4 4 <3 3 4 4> 3>")) "sub" + $ "[808bd,<808bd:4!2 808bd:3!2>,jazz]" + # midiG' "^78" 0 1.2 + # pan 0.8 +d2 $ gF1 $ gMask -- Snare + $ midiOff "^43" (struct "~ ~ ~ t") + $ midiOn "^43" (struct "~ t ~ t") + $ "808sd:6"-- "snare:5" + # release 0.4 + # att 0.02 + # midiG' "^79" 0 1.5 +d3 $ gF1 $ gMute -- Hats complément + $ midiOn "^76" (ply "<2 4>") + $ "~ h ~ ~ <~!8 h!8> ~ h" + # "snare:51" + # att 0.0125 # rel 2 # hpf 3000 + # pan 0.7 + # midiG' "^80" 0 1 +d4 $ gF2 $ gMute -- Hats pirouette + $ mask "<[t f] t>" + $ "~ . [s [~ s] s ~ . ~]" + # note "0 . [[0 [2 0] 0] . 0]" + # "snare:51" + # midiG' "^80" 0 0.8 + # pan 0.65 +d5 $ gM $ gF2 -- BASSLINE! + $ midiOn "^58" (|- note 24) + $ mask ",8)>" + $ midiOn "^90" ( -- FIRELINE + off 0.5 ( + -- (# crush 6) . + (|- note 12) + . (# cut 51) + . (# pan 0.8) + . (# room 0) + . (|* gain 0.9) + )) + $ note (">" + + "0 . [-2 0@3]" -- Algoritmic addition + - 0) -- Scholar :nerd: + -- $ note ("@6 d@2" - 24) -- Nice but is that it? + # "FMRhodes1" + # cut 5 + # legato 2 + # room 0.64 # sz 0.5 # dry 1 + # pan 0.2 + # midiG' "^82" 0 1.6 + # modIndex (range 0 2 "^54") +d6 $ gM $ gF1 + $ fix (|* gain 0.7) "cpu" + -- $ sometimesBy "0 0.25" (mask "t . t(<3 5 8 1>,8)") + $ "[hh,cpu:1]*8" + # rel 0.5 + # att 0.5 + # lpf 6000 + # room 0 # dry 0 + # midiG' "^83" 0 1.6 + + + +d7 + $ midiOff "^91" (mask "f") + $ note ("c" -7) + # release 2 + # att 1 + # "pad:2" + # midiG' "^83" 0 1 + # cut 7 + +once $ "organDonor" # cut 7 # gain 1.4 + +once $ "ikedaBass" # gain 2 + +d8 $ gM $ gF1 + $ midiOn "^92" (ply "<2!3 [<4 1> 1]>") + $ chop 8 + $ loopAt 1 + $ "break:4/2" + # cut 8 + # midiG' "^84" 0 1 + + + +-- Graveyard: other break +d8 $ struct "t([5 <<5 5 3 5> <10 5 10 16>>], 16)" $ chop 16 $ "break:1" # cut 2 + # pan 0.28 + # gain 0.3 + +-- t d t d t db t d + +scaleList + +once $ note (scale "marva" (run 8) + 12) + # "pluck" + # cut 12 # gain 0.8 diff --git a/live/boeuf/algorythm/love23/killing_me_softly.tidal b/live/boeuf/algorythm/love23/killing_me_softly.tidal index d93750e..76958ca 100644 --- a/live/boeuf/algorythm/love23/killing_me_softly.tidal +++ b/live/boeuf/algorythm/love23/killing_me_softly.tidal @@ -40,7 +40,7 @@ d4 $ gF2 $ gMute -- Hats pirouette # midiG' "^80" 0 0.8 # pan 0.65 d5 $ gM $ gF2 -- BASSLINE! - $ midiOn "^58" (|- note 12) + $ midiOn "^58" (|- note 24) $ mask ",8)>" $ midiOn "^90" ( -- FIRELINE off 0.5 ( @@ -60,7 +60,7 @@ d5 $ gM $ gF2 -- BASSLINE! # legato 2 # room 0.64 # sz 0.5 # dry 1 # pan 0.2 - # midiG' "^82" 0 0 -- FIXME: DISABLED FOR CONCERT ;) 1.6 + # midiG' "^82" 0 1.6 # modIndex (range 0 2 "^54") d6 $ gM $ gF1 $ fix (|* gain 0.7) "cpu" @@ -103,3 +103,9 @@ d8 $ struct "t([5 <<5 5 3 5> <10 5 10 16>>], 16)" $ chop 16 $ "break:1" # cut 2 # gain 0.3 -- t d t d t db t d + +scaleList + +once $ note (scale "marva" (run 8) + 12) + # "pluck" + # cut 12 # gain 0.8 diff --git a/live/boeuf/biarritz/blue_tuesday.tidal b/live/boeuf/biarritz/blue_tuesday.tidal new file mode 100644 index 0000000..fa15d8b --- /dev/null +++ b/live/boeuf/biarritz/blue_tuesday.tidal @@ -0,0 +1,177 @@ +do +setcps (90/60/4) +let gF = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +let gLPF = whenmod 64 48 (# lpfbus 4 (slow 16 $ range 20000 200 saw)) +let gLPFSoft = whenmod 64 48 (# lpfbus 5 (slow 16 $ range 20000 2000 saw)) +let chorus = pF "chorus" +let lagamount = pF "lagamount" +let dec = pF "dec" +let sus = pF "sus" +let cutoff = pF "cutoff" +let blues = ["c", "f", "c", "c", "f", "f", "c", "c","g", "f", "c", "c", "g", "f", "c", "g"] +d1 $ gF $ gMute + -- $ "k . ~ ~ <~!3 k> <~!2 k <~ k*2>>" + $ midiOn "^42" (<| "k k k >") + $ midiOff "^42" (<| "k . k(<3!3 5>,8)") + $ "k" + # "[cpu,jazz,808bd:3,808bd:2]" + # midiG' "^78" 0 1.9 +d2 $ gF $ gMute + $ n "~ [40,39] ~ [42]*<1!3 <2 4>>" # "snare" + # midiG' "^79" 0 1.3 +d3 $ gF $ gMute2 + $ midiOn "^76" (ply 2) + $ rarely (ply 2) + $ "drum:2*[8 <8 16>]" # gain 0.5 + # midiG' "^80" 0 1.9 +d9 $ gF + $ midiOn "^36" ((# "break:18") . loopAt 2) + $ midiOn "^60" (mask "f . f(3,8)" . chop 8) + $ midiOn "^92" (ply 2) + $ loopAt 2 + $ slice 4 "0 <1!2 ~ 1> <2 ~> 3*<1!3 2>" + $ "break:9" + # cut 9 + # midiG' "^84" 0 1.9 +d4 $ gF2 + $ midiOn "^89" (slice 4 "0 1 2 3*<2 <4 [4 8]>>") + $ midiOn "^57" (juxBy 0.2 ( + -- ply "<2 4 [4 8] 8>" . + arp "pinkyup" + . (often (ply 2)) + -- . (|* gain 0.8) + -- . (# pan 0.6) + -- . (# crush 16) + -- . (|+ note 12) + )) + $ superimpose (|+ note "[0,7]") + $ note ( + cat blues + - 24 + ) + # "bassWarsaw" + # pan 0.3 + # room 0.1 + # voice 0.8 + # crushbus 41 (range 16 3 "^53") + # midiG' "^81" 0 1.3 + + + + + + + + + + + + + + +d7 $ gF3 $ gM2 -- High Cello Dauphin + $ struct "t@2 t*<1 2 1 <4 1>> t*<1 2 4 8>" + $ midiOn "^59" (|- note 12) + $ note ( + "<[g4 c ef@14] [ ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>" + ) + # "[cbow:3]" + # cut 7 + # room 0.2 + # pan 0.9 + # crushbus 71 (range 16 2.5 "^55") + # midiG' "^83" 0 1.2 +d3 $ gF $ gMute2 + $ midiOn "^44" (mask "t([8 4 <4 <8 16>>],16)") + $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]") + $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh" + $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]" + # n "0!3 <0!3 1>" + # midiG' "^80" 0 1.6 +d4 $ gF2 $ slow 2 -- Basse Germanique + $ midiOn "^89" (struct "t*<16 32>") -- Basse folle + $ (0.125 <~) -- Calage :) + $ someCyclesBy (1 - "^33") ( + (mask " f t@14") . (|* room 1.2) + ) -- + $ fix ((midiOff "^57" (# silence)) . (|* gain 0.8) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5)) + "bass2" + $ note ( + "<[g4 c ef@14] [ ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>" + - 24 + ) + # "[bass2:1,bassWarsaw]" -- TODO: Autre basse moins venere? + # room 0.2 + # pan 0.4 + # crushbus 41 (range 16 2.5 "^53") + # midiG' "^81" 0 1.6 +d6 $ gF3 $ gMute2 -- Leads reponse + $ midiOn "^90" (struct "t*<16 32>") -- Basse folle + $ midiOn "^58" (|+ note 12) + $ sometimesBy "^18" (bite 4 "[0, [~ 2]]") + $ someCyclesBy "" (mask "t f!15". (# legato 2)) + -- $ (0.125 <~) -- Calage :) + -- $ someCyclesBy "^17" ( + -- (mask " f t@14") . (|* room 1.2) + -- ) -- + $ whenmod 32 24 (ply "2 <2!4 4!4>") + $ swing (1/3) + $ note ( + " d>" + + "<0!0 [0 12]!0 [0(2,8), <12!3 -12>([<1 3> 3],8,3)]!32>" + + "[0,<7 12 12 7>]" + - 12 + ) + # "FMRhodes1" + # room 0.2 + # pan 0.33 + # modIndex (range 0 16 "^34") + # crushbus 61 (range 16 2.5 "^54") + # midiG' "^82" 0 1.5 +d8 $ gM $ gF3 -- Breaks divins + $ midiOn "^92" (off "e" id) + $ midiOn "^60" (mask "[f t]") + $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81)) + $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3")) + $ loopAt 2 + $ chop 8 + $ "jungle_breaks:1" + # cut 8 + # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4" + # midiG' "^84" 0 1.4 +d10 $ gF3 -- Pads angéliques + $ sometimesBy "^19" (superimpose ( + (# cut 101) + . (arp "up") + . (|+ note ( + "<[0,0] [0,7] [0,9] [0,7,9,12]>" + )) + . (|+ pan 0.1) + )) + $ midiOff "^58" (mask "t([0 2],4)") + $ note ( + slow 2 " [bf4 a4@3]>" + + "[0,[0*<1 1 2 <2 1>> . 0 12*<1 2>]]" + ) + # chorus (range 0 2 "^35") + # "moogBass" -- FIXME: Other synth? + # dec 0.2 + # sus 1 + # att (range 0.001 2 "^16") + # rel (range 0.2 10 "^17") + # roombus 101 (range 0 0.5 "^18") + # lesliebus 102 (range 0 2 "^19") + # sz 0.6 # dry 2 + # midiG' "^20" 0 1.6 + # legato 2 + # pan 0.64 + # cut 10 + +bf g bf diff --git a/live/chip/ataright.tidal b/live/chip/ataright.tidal index fead5ef..35be6ff 100644 --- a/live/chip/ataright.tidal +++ b/live/chip/ataright.tidal @@ -29,7 +29,8 @@ do let g1 = (# djfbus 1 (range 0.05 0.95 "^49")) -let g2 = (# djfbus 2 "^50") +let g2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let g3 = (# djfbus 3 (range 0.05 0.95 "^51")) let gMask = (midiOn "^41" (mask "t . > >")) let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute @@ -93,8 +94,10 @@ d5 $ g2 $ gMask -- THE RAIN # pan 0.8 # orbit 4 # midiG' "^82" 0 1.9 -d8 $ g1 $ gM -- THE UNAVOIDABLE BREAKS +d8 $ g3 $ gM -- THE UNAVOIDABLE BREAKS $ mask "t(16,64)" + $ midiOn "^36" (# n 6) -- Double light + $ midiOn "^56" (# n 4) -- DOUBLE HEAVY $ midiOn "^60" (ply 2) $ midiOn "^92" (fast 2) $ slice 8 ("<0!3 ~> <1!3 3> <2 2 [2 6][ 2 6 6 6]> <3!3 7>*<1 2>") diff --git a/live/collab/raph/meshuggah.tidal b/live/collab/raph/meshuggah.tidal new file mode 100644 index 0000000..7344c71 --- /dev/null +++ b/live/collab/raph/meshuggah.tidal @@ -0,0 +1,48 @@ +do +setcps (120/60/4) +-- resetCycles +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gM = gMask . gMute +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +d1 $ gM $ gF1 $ mask "" + $ midiOn "^42" (struct "t*<4!3 [4 4 4 <12 6>]>") + $ fix (|* gain 0.8) "kick" + $ "[jazz,808bd:4,kick:4]" + # midiG' "^78" 0 1.2 +d2 $ gM $ gF1 $ "~ ~ cp ~" # "snare:40" + # midiG' "^79" 0 1.2 +d3 $ gM $ gF1 $ "drum:2*<[8 4] 8 8 [8 16]>" -- [8 8 8 8] 32 + # midiG' "^80" 0 1.4 +-- d4 $ note (slow 5 $ "b2 b2 a2 b2 b2 d3 b2 b2 a2 b2 b2 d3 b2 b2 a2 b2 b2 d3 b2 b2 a2 b2") +-- # "superpiano" +-- # gain 0.8 +d4 $ slow 4 + $ contrast + (gF2 . (# midiG' "^81" 0 2) . (# crush 16)) -- Graves + (gF3 . (# midiG' "^82" 0 1.4) . (midiOn "^58" rev) . (# pan 0.8) . (fix (|+| note (arp " down>" "")) "FMRhodes1") + . (# sustain "e e e e e e q") . (|+ note 12) . (# "[FMRhodes1,FMRhodes2]")) -- Aigus + (note (scale "aeolian" "[0,1,2,3,4,5,6,7]" - 28)) + -- $ fix (# pan 0.8) (note (scale "aeolian" "[0,1,2,3,4,5,6,7]" + 7 - 28)) + $ note (scale "aeolian" ( + "{[[0 <~!8 1!8> 2 <~!8 3!4 ~ ~ 3> 4 <~ 5> 6 <~!3 5>]*4],[8 9 10 9 8 9 10 8 9 10 9 8 10 11 8 9 10 9 8 11 12 <8 10> 9 10 9 8 13 14 14 13 12 11]}" + ) - 28) + # "bassWarsaw" + # pan 0.2 + # crushbus 41 (range 16 2.5 "^53") +d8 $ gM $ gF1 + $ midiOn "^92" (ply "2") + $ midiOn "^60" (ply "1 2 . <2!3 4>") + $ chop 16 + $ loopAt 2 + $ "jungle_breaks:6" + # midiG' "^84" 0 1.4 + + +d1 $ "d@6 d@4 d@4 d@2" + # note "c3 ef3 g3" # "superpiano" + +7 7 7 7 4 +32 diff --git a/live/collab/raph/ragga_la_hierarchie.tidal b/live/collab/raph/ragga_la_hierarchie.tidal index 5e71f70..65630b3 100644 --- a/live/collab/raph/ragga_la_hierarchie.tidal +++ b/live/collab/raph/ragga_la_hierarchie.tidal @@ -50,7 +50,7 @@ d5 $ gF2 -- Prendre l'acid bus pour trouver du boulot # crushbus 51 (range 16 1.5 "^53") # pan 0.4 # room 0.2 # sz 0.2 # dry 2 - # midiG' "^81" 0 1.3 + # midiG' "^81" 0 1.53 # cut 5 d8 $ gF $ gM $ midiOn "^20" (# n "48") diff --git a/live/fusion/sel_marin.tidal b/live/fusion/sel_marin.tidal new file mode 100644 index 0000000..dcefe87 --- /dev/null +++ b/live/fusion/sel_marin.tidal @@ -0,0 +1,85 @@ +-- Sel Marin +-- Le grand air du large +-- Ses crabes mécaniques +-- Ses baleines mélancoliques + +do +setcps (120/60/4) +let width = pF "width" +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +d1 $ gF1 $ gM -- Kick "Underwater Rave" + $ midiOn "^42" (<| "k k >") + $ midiOff "^42" (<| "k*<1!8 2 1!7> . k(<<3 1> [3 <1 5> 3]>,8)") + $ "[jazz,clubkick:1]" + # midiG' "^78" 0 0.8 +d2 $ gF1 $ gM2 -- Clap sonar intraitable + $ fast "<1!4 2 1 2 1 2 2 2 [4!3 [8 4]] 2 2 2 [4@3 8]>" + -- FIXME Better snare rush progresssion + $ "~ cp" + # lpf 4000 + # midiG' "^79" 0 0.8 + # room 0.8 # sz 0.4 # dry 0.985 +d3 $ gM $ gF1 -- Drumroll de Sebastien + $ midiOn "^76" (ply 4) + $ "drum:2*[4 <4 4 <8 [8 16]>>]" + # midiG' "^80" 0 0.6 + # pan 0.77 +d4 $ gF2 -- Baleine sur la défensive + $ midiOn "^89" (chop (slow 2 "<[8 16 8 8 . 16 8] 1>")) + $ fix ((# width 0.5) . (# cut 12)) "bassWarsaw" + $ fix ((# voice 0.1) . (# cut 11) . (# lfo 0) . (|* gain 0.8)) "supersaw" + $ note "<,8)> ,8)>>" + -- TODO: seconde voix + # "[bassWarsaw,supersaw]" + # midiG' "^81" 0 0.8 + # crushbus 41 (range 16 3.5 "^53") + # room 0.3 # sz 0.4 # dry 1.1 + # pan 0.4 + # cut 1 +d5 $ gF3 -- Accusation juste + $ note "d . <[~ <~ ~ ~ d ~ d d*2 d*4> ~ a4] [~ e f ]>" + # "cpluck:7" + # midiG' "^82" 0 0.8 + # pan 0.8 + # cut 5 +d6 $ gM $ gM2 -- Sirènes lointaines + $ whenmod 8 0 (>| note " . ~ ~ ") + $ note "a g f . ~ ~ e " + # "superfork" + # pan "0.8@3 0.2" + # midiG' "^83" 0 0.8 +d7 $ gF2 -- La certitude du verre brisé + $ note " d [a ~ ~ g ~ f e ~ ~]>" -- TODO: Variations sur la fin + # "90s_glassatm:0" + # cut 7 + # midiG' "^18" 0 0.8 +d8 $ gF2 -- Crystal de sel + $ "90s_synatm:2" + # note "<0 0 -5 -5>" + # midiG' "^19" 0 (range 0.23 0.45 perlin) + # room 0.4 # sz (range 0 0.6 perlin) + # delay 0.5 + # delayt 0.125 + # delayfb 0.9 + # cut 8 +d9 $ gF1 $ gM $ gM2 -- Break clap your hands sous-marin + $ midiOn "^92" (ply "[1 <2 4 [4 8 4] [8 8 4 8]>]") + $ chop 16 + $ loopAt 2 + $ "break:82" + # midiG' "^84" 0 0.8 + # cut 9 +d10 $ gF1 -- Marche rapide des crabes mécaniques + $ slice 8 "<0 1 2 3 4 5 6 7>" + $ loopAt 4 + $ "drums_commodore:0" + # midiG' "^20" 0 0.4 + # pan 0.3 + # cut 10 diff --git a/live/hip/darkside/clameur.tidal b/live/hip/darkside/clameur.tidal index 3839ed5..29da4c2 100644 --- a/live/hip/darkside/clameur.tidal +++ b/live/hip/darkside/clameur.tidal @@ -12,8 +12,8 @@ setcps (93/60/4) d1 $ f1 $ gMute $ midiOn "^42" (<| " ~ . ~ ~ <~!2 k <~ k*2>> <~ k>") $ midiOff "^42" (<| " . ~ ~ ~ ") - $ "jazz" - # midiG' "^78" 0 1.3 + $ "[jazz,kick:5]" + # midiG' "^78" 0 1.2 d2 $ gMute $ juxBy 0.85 (whenmod 8 7 rev) $ f1 @@ -60,7 +60,7 @@ d4 -- BASSES ) "infra" $ "[matrix,infra]" # cut 4 - # midiG' "^81" 0 1.2 + # midiG' "^81" 0 1.5 d6 $ f2 -- VOICES $ fix ( -- Morohai Morshiyum Morohai Naroz (# "voices_celtic:32") @@ -71,7 +71,7 @@ d6 $ f2 -- VOICES . (# hpf 2500) . (# room "<0.5 0.8 0.8 <0.8 0.1>>") . (# squizbus 61 (range 0 4 "^55")) - . (|* gain 1.1) + . (|* gain 0.9) ) "morohai" $ fix ( (# "voices_persian:10") diff --git a/live/hip/lofi/slow_mo.tidal b/live/hip/lofi/slow_mo.tidal index c4cea2b..11f4e31 100644 --- a/live/hip/lofi/slow_mo.tidal +++ b/live/hip/lofi/slow_mo.tidal @@ -1,7 +1,25 @@ +-- Algolia DevCon23 - LiveCoding demo +setcps (120/60/4) --- Lent mouvement +-- you can control short samples +once $ "jazz bd cpu kick:5" # gain 1.3 + +-- or longer ones +once $ "scratch_short:30" # cut 4 + +-- Or synthetizers +once $ arpeggiate $ note "c'majPent'3" # "moog" + # cut 1 + # room "0@3 0.8" + # crush "10@3 7.5" + +-- Then loops +d1 $ "jazz ]>" # gain 1.2 + +-- Then songs... +-- SlowMo: Lent mouvement do --- resetCycles +resetCycles setcps (60/60/4) let rMask = (mask "t!6 >") let rLPF = (someCyclesBy "<0!32 1!8 0!16 1!8>" (# lpf (slow 8 $ range 5000 200 saw))) @@ -16,14 +34,14 @@ d1 $ g $ gR $ "k ~ ~ k . ~" # "[reverbkick,tech:6]" # legato 1.25 # lpf 1000 - # gain 0.75 + # gain 0.7 d2 $ g $ gR $ mask "" $ "[~ cp]*2" # note "-4" # "snare" # n "[1,2,12]" - # gain 0.5 + # gain 0.65 d3 $ g $ gR $ mask "" $ fix (|* gain 0.5) "snare" @@ -42,10 +60,10 @@ d4 $ gB -- Bassline "[7, [~!3 9]] . [4, [~!3 <[8 9] <[11 9] [10 9]>>]]" -- Simplified laggy theme )) # "bassWarsaw" - # octave 2 + # octave "<2!16 3!16>" # lpf 1200 - # room 0.3 - # gain 0.65 + # room 0.13 + # gain (slow 32 $ range 0.9 0.65 saw) # pan 0.2 d5 $ g -- Rhodes base $ mask "" @@ -54,16 +72,18 @@ d5 $ g -- Rhodes base "[0 <7!16 7(<2 2 3 3>,4)!16>]*4" + 7))) . (# "[FMRhodes1,FMRhodes2]") - . (|* gain (slow 8 $ range 0.5 0.6 saw)) + . (|* gain (slow 8 $ range 0.85 0.96 saw)) . (|+ pan 0.1) - . (whenmod 16 6 (# crushbus 5 (range 10 6.5 perlin))) + . (whenmod 16 6 (# crushbus 5 (slow 64 (range 10 6.5 saw)))) )) $ note (scale "aeolian" ( -- Organically grown main theme "[7, ~!7 <~!3 3 ~ 3 ~ 3>] . [4, ~!3 <~ <[~ 8] [8 9] [~ . 8 9] [~ . 9 8]>>]" )) # "FMRhodes1" # pan 0.6 + # gain (slow 32 $ range 0.68 0.85 saw) # octave 2 + # modIndex 0 # room 0.3 d8 $ g -- Runny Maracas $ mask "" @@ -74,4 +94,37 @@ d8 $ g -- Runny Maracas $ "hh27*[8 . 16 8]" # n "2 <2 <[2|9] [9 <9 ~> <~ 9> 2]>>" # pan 0.8 - # gain (slow 32 $ range 0.4 0.6 (saw + perlin / 10)) + # gain (slow 32 $ range 0.5 0.7 (saw + perlin / 10)) +d11 -- FX gratos + $ "fx_commodore/2" + # n "<0 .. 24>" + # gain 0.35 + # pan "<0.2 0.8>" + # hpf (slow 32 $ range 6000 0 saw) + # room (range 0.1 0.53 perlin) + # sz (range 0.2 0.8 perlin) + # cut 11 +d9 -- Nappe de fond + $ mask "" + $ mask "" + $ "90s_megafx:194" + # gain (slow 32 $ range 0.5 0.3 saw) + # room 0.8 + -- # delay 0.9 + # delayfb 0.85 + # delayt 0.25 + # sz 0.8 + # cut 9 +d10 + $ mask "" + $ n "<18!2 [18@3 19] [19 18 19]>" + # "jungle_vocals" + # gain (slow 64 $ range 0.3 0.5 saw) + # pan 0.2 + # room 0.2 + # cut 10 + + +-- once $ "fx_commodore:1" +-- # gain 0.6 +-- # cut 11 diff --git a/live/midi/nova/ambient/contre_visite.tidal b/live/midi/nova/ambient/contre_visite.tidal index 4a7d434..f369bcc 100644 --- a/live/midi/nova/ambient/contre_visite.tidal +++ b/live/midi/nova/ambient/contre_visite.tidal @@ -9,9 +9,11 @@ let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) let gF = 1.01 let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) let f2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) let maskLoops = (mask "" . mask "") setcps (90/60/4) -d1 $ f1 +d1 $ f1 $ gMute2 -- $ kCrush $ midiOn "^42" (struct "t t t ]>") $ midiOff "^42" (struct "t . <~!4 t(<3!3 1>,8,<<0 3 <3 0> 0>>)!12>") @@ -20,7 +22,7 @@ d1 $ f1 $ "[jazz,kick:5]" # room 0 # midiG' "^78" 0 1.3 -d2 $ f1 +d2 $ f1 $ gMute $ mask ",4)!4 t!28>" -- Intro / break/32 $ midiOff "^75" maskLoops $ midiOn "^75" (ply "2 <2!3 4>") @@ -30,10 +32,11 @@ d2 $ f1 $ loopAt 2 $ slice 8 (run 8) $ "break:20" + # pan 0.4 # cut 2 - # speed (range 0.05 1.95 "^51") + # speed (range "-0.25" 2.25 "^51") # midiG' "^79" 0 1.3 -d3 $ f1 -- Sidekick, doubtful, yet hardworking hats +d3 $ f1 $ gMute -- 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 @@ -67,7 +70,7 @@ d5 $ f2 -- Synth: ELECTRONIC ANSWERS # panbus 51 (range 0.8 0.65 saw) # crushbus 52 (range 16 2.85 "^54") # midiG' "^82" 0 2 -d6 $ f1 -- High lead: Winds of truth +d6 $ f2 -- High lead: Winds of truth $ juxBy 0.5 ((# cut 61) . rev) -- Jux rev <3 $ whenmod 8 6 (swing "<4 2>") $ whenmod 32 8 (superimpose ( -- Echos of doubts @@ -92,6 +95,20 @@ d7 $ f1 -- Snare <3 chak reverb phantome $ "[snare:34,cp]" # lpf 2000 # midiG' "^14" 0 1.8 +d8 $ f1 -- Breaks divins + $ midiOn "^92" (off "e" id) + $ midiOn "^60" (mask "[f t]") + $ someCyclesBy "^36" (loopAt 1 . mask "[f t]*4" . chop 16 . (# n 81)) + $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3")) + $ loopAt 2 + $ chop 8 + $ "jungle_breaks:1" + # cut 8 + # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4" + # midiG' "^84" 0 1.2 + # pan 0.8 + + d10 $ f1 -- RANDOM FOREST NOISES $ fix ( diff --git a/live/midi/nova/breaks/break_dynasty.tidal b/live/midi/nova/breaks/break_dynasty.tidal index 0b547d2..acdaf92 100644 --- a/live/midi/nova/breaks/break_dynasty.tidal +++ b/live/midi/nova/breaks/break_dynasty.tidal @@ -15,7 +15,7 @@ d1 slow 2 . (<| "k k k k")) $ midiOff "^42" (<| "k . ~ k ~ ~") -- L'attente $ "[meth_1902:2,kick:8]" # note "-2" - # midiG' "^78" 0 1.5 + # midiG' "^78" 0 1.3 d2 $ gF $ gM -- Snare glitch high $ midiOn "^75" (ply "<2 [2 <4 <2 4>>]>") $ fix ((|* gain 0.9)) ("snare:40") @@ -47,7 +47,7 @@ d5 $ gF2 # legato 2 # cut 5 # crushbus 51 (range 16 2 "^53") - # midiG' "^81" 0 2.5 + # midiG' "^81" 0 1.5 # room 0.2 # sz 0.2 d4 $ gF3 $ midiOn "^58" ( diff --git a/live/midi/nova/breaks/green_land.tidal b/live/midi/nova/breaks/green_land.tidal index 4bec83c..0665a3d 100644 --- a/live/midi/nova/breaks/green_land.tidal +++ b/live/midi/nova/breaks/green_land.tidal @@ -20,10 +20,10 @@ d1 $ gLPF $ gF $ gMute $ midiOn "^75" (fast 2) # midiG' "^78" 0 1.3 # room 0.2 # sz 0.2 # dry 0.99 -d2 $ gLPF $ gF $ mask "" - $ midiOn "^75" (struct "[~ t]*8") +d2 $ gLPF $ gF + $ midiOn "^75" (struct "[~ t]*[4 <4 8>]") $ midiOn ("^43" - "^75") (whenmod 8 7 (fast "2 4") . (struct "~ t ~ t")) - $ midiOff ("^43" - "^75") (struct "~ t") + $ midiOff ("^43" + "^75") (struct "~ t") $ "[bssnare:0,bssnare:3]" # midiG' "^79" 0 1.2 d3 $ gLPF $ gF $ gM2 @@ -69,7 +69,7 @@ d5 $ gF2 $ gM2 -- BASS BONES # crushbus 51 (range 16 2 "^56") # octerbus 52 (range 0 0.63 "^36") # octersubbus 53 (range 0 0.58 "^36") - # midiG' "^84" 0 1 + # midiG' "^84" 0 1.8 d6 $ gF3 $ gM2 -- High pitched guitar $ whenmod 4 3 (someCyclesBy (slow 32 $ range 0.5 0.95 saw) $ ply "<2 [2 4] 4 8>") @@ -79,7 +79,7 @@ d6 $ gF3 $ gM2 -- High pitched guitar $ "celtic_guitar80:4" # pan 0.2 # midiG' "^82" 0 0.8 -d7 $ gF3 +d7 $ gF3 -- Divine $ midiOn "^91" (ply "2 <4 <2 8>>") $ chop 4 $ "voices_celtic" diff --git a/live/midi/nova/breaks/its_about_time.tidal b/live/midi/nova/breaks/its_about_time.tidal index e3ee1b1..619933e 100644 --- a/live/midi/nova/breaks/its_about_time.tidal +++ b/live/midi/nova/breaks/its_about_time.tidal @@ -113,7 +113,7 @@ d6 $ gF3 -- Jump aboard the BASIC BUS # cut 6 d8 $ gM $ gF3 -- Breaks divins -- TODO Rework? $ midiOn "^92" (off "e" id) - $ midiOn "^60" (mask "[f t]") + $ midiOff "^60" (mask "[f t]") $ someCyclesBy "^36" (loopAt 1 . chop 16 . (# "jungle_breaks:21")) $ someCyclesBy "^56" (chop 8 . loopAt 1 . (# "fbreak120:3")) $ loopAt 2 diff --git a/live/midi/nova/breaks/lourd.tidal b/live/midi/nova/breaks/lourd.tidal index c40fd12..206bc92 100644 --- a/live/midi/nova/breaks/lourd.tidal +++ b/live/midi/nova/breaks/lourd.tidal @@ -61,7 +61,7 @@ d5 $ gF2 -- BASS Melody # room 0.3 # dry 0.9 # cut 5 # pan 0.2 -# midiG' "^81" 0 1.2 + # midiG' "^81" 0 1.2 d6 -- Choeurs $ gF -- $ mask "<[f!7 t]!32 t!32>" @@ -101,69 +101,3 @@ d8 -- Lointains vaisseaux # sz (slow 8 sine) # speed ("[0.25,0.5,0.75,1,1.25]") # midiG' "^20" 0 0.8 - - - - - - -d10 -- Ready playerm two - $ mask "" - $ slice 8 "0 <0!3 1>" - $ loopAt 4 - $ "fx_gameboy:5" - # crushbus 101 (slow 32 $ range 1.8 0.61 saw) - # midiG' "^20" 0 0.85 -d2 $ gM $ gF -- Break "80s' Apocalypse in a Box™" - $ midiOn "^44" (fast "1 2") - $ midiOn "^76" -- L'Esprit de Nassim - ( - whenmod 8 7 (ply "1 . 2") . - slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") . - (loopAt "q") . - (# "breaks165") . (# cut 2) - . (|* gain 1.1) - ) - $ chop 8 - $ loopAt 4 - $ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]" - # cut 2 - # midiG' "^80" 0 0.9 - # pan 0.4 -d3 $ gF -- Un peu d'encouragement? - $ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000)) - $ "~ clap" - # midiG' "^79" 0 2 - -- # gain 0.8 -d4 $ gF2 -- BURN THE BASS WITCH - $ midiOn "^57" (superimpose ( -- chain of wicked thoughts - (|+ note ("<0 7 <9 5> <10 10 <10 7> 12>>")) - . (|* gain "<1 1 1.05 1.1>") - . (chop "8 . <8!3 16>") . (# cut 41))) - $ midiOn "^89" (chop (slow 4 $ "[16 32 64 128]")) - $ "synth/4" - # "90s_synatm:9" - # crushbus 41 (range 10 2.5 "^53") - # room 0.3 - # sz "<0.4!7 0.8>" - # dry 1 - # cut 4 - # midiG' "^81" 0 1.6 -d5 $ gM $ gF2 -- Ghosts from an easier time - $ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge") - $ note ("c'maj'4" + "" - 12) - # "90s_synatm:8/4" # cut 5 - # crushbus 51 (range 16 2.5 "^54") - # midiG' "^82" 0 1.1 -d7 $ gM -- Break from the past - $ (# speed (range (-0.25) 0.625 "^56")) - $ midiOn "^60" (often (ply 2)) - $ midiOn "^92" (slice 8 "0 ~ ~ 3 . 4 <~ 5> 6 <~ 7*<1 2>>" . loopAt 2) - $ chop 16 - $ loopAt 4 - $ "fbreak100" # n "<0!3 [0 4]>" - # cut 7 - # pan 0.8 - # room 0.3 - # dry 1 - # midiG' "^84" 0 1.8 diff --git a/live/midi/nova/disco/friends_in_blue.tidal b/live/midi/nova/disco/friends_in_blue.tidal new file mode 100644 index 0000000..ba4fa7e --- /dev/null +++ b/live/midi/nova/disco/friends_in_blue.tidal @@ -0,0 +1,94 @@ +-- You got a friend in blue +-- You've got a frienemy +-- When the road is a barricade +-- And you're miles and miles from keeping a cool head +-- You just remember what an old cop said +-- Bro, you got a friend in blue +do +setcps (60/60/4) +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +d1 $ gF1 $ gMute2 + $ fast 2 -- 120BPM!!! + $ fix ( + (# att 0.001) . (# rel 0.05) . + (# lpf 1500)) "909" + $ "k k k k*<2 <4 [4 2]>>" + # "[909,808bd:3,kick:6]" + # midiG' "^78" 0 0.9 +d2 $ gF1 $ gMute + $ fast 2 + $ midiOn "^43" (<| "~ cp ~ >") + $ midiOff "^43" (<| "~ . cp ~ ~ <~!7 cp>") + $ "cp:1" + # n "<3!7 [3 4]>" + # room 0 + # midiG "^79" +d3 $ gMute $ gF1 -- charley double croche + $ midiOn "^76" (ply 2) + $ s "hh*16" + # note "1 0 0 0 1 0 0 0 1 0 0 0 1 0 1 2 1" + # n 8 + # gain 0.8 + # pan 0.6 + # midiG "^80" +d4 $ gF2 + $ midiOn "^89" (ply "8") + $ midiOn "^57" (slice 4 ("<0!8 2!8> 0 0 <1!3 3>")) + $ chop 8 + $ midiOn "^33" (# n 39) -- BassC_120E + $ "fbass:37" -- BassC_120D + # cut 4 + # crushbus 41 (range 16 2.5 "^53") + # room 0 + # pan 0.2 + # midiG' "^81" 0 0.8 +d5 $ gF3 + $ midiOn "^90" (ply "<8!4 8 16 [16 32] [32 64]>") + $ midiOn "^58" (slice 4 ("0")) + $ chop 16 + $ n "<39!4 37!3 [37 39]>" + # "fguitar" + -- 39: La base + -- 37: high or not? + -- 38: Rif hesitation + # cut 5 + # gain 0.8 + # crushbus 51 (range 16 2.5 "^53") + # midiG' "^82" 0 0.8 +d8 -- TODO: Validate or replace ;) + $ midiOn "^92" (ply 4) + $ loopAt 1 + $ chop 16 + $ "fbreak80:10" + # midiG' "^84" 0 0.8 + + + +once $"fx_:9"# gain 0.8 + +once + $ "fguitar:39" + # gain 0.7 # cut 5 # pan 0.9 + + + + +d9 -- Nappe de fond?? + $ "90s_megafx:189" + # gain "^20" + # room 0.8 + -- # delay 0.9 + # delayfb 0.85 + # delayt 0.25 + # sz 0.8 + # cut 9 + + +once $ "tek_kick:4" + # room 0 diff --git a/live/midi/nova/dnb/alerte_verte.tidal b/live/midi/nova/dnb/alerte_verte.tidal index 36ea282..2964043 100644 --- a/live/midi/nova/dnb/alerte_verte.tidal +++ b/live/midi/nova/dnb/alerte_verte.tidal @@ -50,7 +50,7 @@ d3 $ g1 $ gM -- Running Hats # dry (slow 4 $ range 0 2 perlin) # pan 0.6 # cut 344 -d4 $ g1 -- Resolute Bass +d4 $ g2 -- Resolute Bass -- $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin))) $ midiOn "^89" ( -- Glitch vary end slice 8 "<[0 1 <2!3 1*2> <3!3 1*2>]!4 0*4!2 [0 1 0 1] [0 1 0 [0 1 2 3]]>" @@ -62,8 +62,8 @@ d4 $ g1 -- Resolute Bass # pan 0.15 -- # room 0.125 # sz 0.1 # dry 1 # crushbus 41 (range 16 1.25 "^53") - # midiG' "^81" 0 1.6 - # cut 4 + # midiG' "^81" 0 2 + -- # cut 4 d6 -- Guitar A -- L'attente (18=0) TODO Rework? $ g2 $ mask "" diff --git a/live/midi/nova/dnb/nouveau_soleil.tidal b/live/midi/nova/dnb/nouveau_soleil.tidal index e2b85e5..45aaaec 100644 --- a/live/midi/nova/dnb/nouveau_soleil.tidal +++ b/live/midi/nova/dnb/nouveau_soleil.tidal @@ -2,14 +2,15 @@ do setcps (110/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) -let gF2 = (# djfbus 2 (range 0.05 0.95 "^51")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) let gMask = (midiOn "^41" (mask "t . > >")) let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute d1 $ gF $ gMute $ midiOn "^42" (<| "k k k k]>") $ midiOff "^42" (<| "k . ~ k ~ <~!7 k>") - $ "[jazz,kick:4]" + $ "[techno:0,808bd:2,909,kick:4]" + -- $ "[jazz,kick:4]" # midiG' "^78" 0 1.2 d2 $ gF $ gM -- Snare FOU $ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>") @@ -33,8 +34,8 @@ d4 $ gF2 $ gMask $ midiOn "^57" (# "bass_gameboy:5") $ "bass_gameboy" # cut 4 - # midiG' "^81" 0 1 -d5 $ gF2 $ gMask + # midiG' "^81" 0 1.2 +d5 $ gF3 $ gMask -- La pluie d'étoiles $ whenmod 64 32 (off "q" ((|+ note 12) . (# pan 0.8))) $ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1))) $ whenmod 16 8 (off "h" ((|+ note 12) . (# pan 0.8))) @@ -44,23 +45,24 @@ d5 $ gF2 $ gMask # pan 0.2 # hpfbus 51 (range 0 8000 "^34") # midiG' "^82" 0 0.9 -d6 $ gF2 $ gMask - -- $ juxBy 0.8 (rev . (# cut 61)) +d6 $ gF3 $ gMask -- La corne de l'espoir + $ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61))) $ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>") $ loopAt 2 $ "synth_atari:5" # cut 6 # gain 0.8 # midiG' "^83" 0 0.9 -d8 $ gF2 $ gMask +d8 $ gF $ gMask + $ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11")) $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38")) $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41))) $ sometimesBy "^56" (iter 4) - $ midiOn "^92" (ply "<2 [4 <4 8>]>") + $ midiOn "^92" (ply "<1 [2 <2 4>]>") $ midiOn "^60" (ply 2) $ chop 8 $ loopAt 1 $ "breaks165" # cut 4 # pan 0.7 - # midiG' "^84" 0 1.4 + # midiG' "^84" 0 1.2 diff --git a/live/midi/nova/dnb/venons_ensemble.tidal b/live/midi/nova/dnb/venons_ensemble.tidal index cf448bb..e4b5586 100644 --- a/live/midi/nova/dnb/venons_ensemble.tidal +++ b/live/midi/nova/dnb/venons_ensemble.tidal @@ -31,7 +31,7 @@ d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti # room 0 # note "-2" # legato 0.5 - # midiG' "^79" 0 0.7 + # midiG' "^79" 0 1.2 d3 $ gF $ gMute2 $ midiOn "^44" (ply "1 2") $ midiOn "^76" (ply "<2 [2 4]>") @@ -41,8 +41,8 @@ d3 $ gF $ gMute2 # pan 0.35 # midiG' "^80" 0 1 d4 $ gF2 -- COME WITH THE BASS - $ superimpose (const $ gF2 - -- $ n "<8 8 [8 <8 9>] [<9 [9 9]>]>" + $ superimpose (const $ gF2 + $ whenmod 16 8 (rev . chop 4) $ n "[19 <21!3 <20 22>>]" # "meth_bass" # cut 41 diff --git a/live/midi/nova/lofi/lendemain_divin.tidal b/live/midi/nova/lofi/lendemain_divin.tidal new file mode 100644 index 0000000..719a50c --- /dev/null +++ b/live/midi/nova/lofi/lendemain_divin.tidal @@ -0,0 +1,117 @@ +once $ "bassWarsaw" # gain 2 + +-- Lendemain Divin +do +let gF1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . > >")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +setcps (95/60/4) +d1 $ gMute + $ fix (|* gain 0.9) "kick:5" + $ midiOn "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>") + $ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>") + $ "[jazz,808bd:3]" + # midiG' "^78" 0 1.5 +d2 $ gMute2 $ gF1 + $ midiOn "^43" (fast 2) + $ midiOn "^75" (# "cp") + $ "~ s*<1!3 2>" + # "[snare:32,snare:40]" + # lpf 2000 + # midiG' "^79" 0 1.4 +d3 $ gF1 $ gMute2 + $ midiOn "^76" (ply 2) + $ midiOn "^44" (struct "t*[16!3 <8 [8 <16 32>]>]") + -- $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]") + $ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh" + -- $ midiOff ("^44" + "^76") (<| "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" ) + $ drumFrom "[rolandtr808,rolandtr606]" "[hh]" + # n "0!3 <0!3 1>" + # lpf 4500 + # att (slow 16 $ range 0.001 0.04 cosine) + # rel 0.4 + # room 0.2 # dry 0.9 + # midiG' "^80" 0 1.3 +d4 $ gF2 -- Basse complainte + $ midiOn "^89" ((ply "8 <16 [16 8]>") . (# room "0 0.4") . (# sz "1 1.2")) + -- $ note "[c3,ef3,g3,as3,d4,f4]" + -- Bassline habituelle + $ midiOff "^57" ( + >| note "<]!2> ]!4> [] d3>" + ) + $ midiOn "^57" ( + >| note "<[d3@6 c3@2] <[f4@6 f4 g4] [f4@5 g4 f4 c4]> d4>" + ) + $ "bassWarsaw" + # crushbus 41 (range 16 2.5 "^53") + # room 0.2 + # cut "41 42 43 44" + # midiG' "^81" 0 1.42 +d6 $ gF3 + $ n "<0 0 <6 5> 0 1 1 2 7>" + # "come_guitar" # cut 6 + # crushbus 61 (range 16 2.5 "^54") + # midiG' "^82" 0 1 +d8 $ gM2 $ gF3 + $ midiOn "^92" (ply "<4 4 8 16>") + $ midiOn "^20" (loopAt 4 . (# n 11)) -- Submarine break + $ midiOn "^56" (mask "t [t t ]" . loopAt 1 . (# n 16) . (# lpf 2500)) -- Jumper's break + $ slice 8 "0 1 2 3*<1 2>" + $ loopAt 2 + -- $ midiOn "^36" (# n 1) + $ "jungle_breaks:13" + # midiG' "^84" 0 1.2 + # cut 8 + + + + + +d7 $ gF3 + $ ("h" ~>) + $ slice 4 (ply 4 $ slow 4 $ "<0 1 2 3>") + $ "shiloh:14" + # cut 7 + # gain 0.7 + # midiG' "^83" 0 1.2 + + +d7 + $ slice 4 ("<<0 1 2 3>/4>") + $ fast 8 + $ "shiloh:14/8" + # cut 7 + # gain 0.8 + # room "[0.5!3 <0.5 0.9>]" # dry 1.2 # sz 0.5 + + +once $ "dr" + +d1 $ gF $ gMute2 -- Kick variable + $ midiOn "^75" (fast 2) + $ midiOn "^42" (struct "t t t ") -- COME FOR THE KICK + -- $ midiOff "^42" (struct "~ ") -- L'attente + $ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~") + $ fix (|* gain 0.8) "kick:4" + $ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif! + -- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable + -- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb + # midiG' "^78" 0 1 +d2 $ gF $ gMute $ fast 2 -- Snare dnb assorti + $ midiOn "^42" ( -- STAY FOR THE SNARE + (<| "~ cp ~ cp*<1!3 2 1 2 1 2 1 2 2 2 1 2 1 2 2 2 1 2>") + . (# "[snare:57,909:2]") + ) + $ midiOn "^43" (<| "~ c ~ c*<1!3 2>") + $ midiOff ("^43"+"^42") (<| "~ <~!4 c ~!3> ~ c*<1!7 2>") + $ fix (|* gain 0.8) "snare" + $ "[snare:40,bssnare:3]" + # pan 0.6 + # room 0 + # note "-2" + # legato 0.5 diff --git a/live/midi/nova/lofi/premier_mai.tidal b/live/midi/nova/lofi/premier_mai.tidal index 12cdbba..4104645 100644 --- a/live/midi/nova/lofi/premier_mai.tidal +++ b/live/midi/nova/lofi/premier_mai.tidal @@ -1,3 +1,4 @@ + do setcps (120/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) @@ -16,21 +17,23 @@ d2 $ gF $ midiOff "^43" (<| "~ c") $ "cp" # lpf 2000 # gain 0.8 # midiG' "^79" 0 1.2 -d3 $ gF $ gMute +d3 $ gF3 $ gMute $ midiOn "^76" (ply 4) $ midiOn "^44" (struct "t*[8 8 <8 16> <8!3 16>]") $ midiOff "^44" (<| "h . h([2 <4!3 5>],8)") $ drumFrom "yamaharm50" "hh" # midiG' "^80" 0 1.2 d4 $ gF2 + $ midiOn "^89" (ply "1 . <2 1> <1 <2 4>>") + $ midiOn "^57" (|+ note 12) $ note (stack ["[bf3 ~] bf3@7", "[~!3 <~!4 bf3!4> . bf3 ~ cs4 ]" ]) # "bassWarsaw" - # crushbus 51 (range 16 3.8 "^53") -- BURN ME I'M FAMOUS + # crushbus 51 (range 16 3.4 "^53") -- BURN ME I'M FAMOUS # roombus 52 (range 0 0.8 "^53") -- REVERB AND DINE BEFORE THO # midiG' "^81" 0 1.2 -d6 $ gF2 +d6 $ gF3 $ note ( ">" -- |+| "0 ~ [0 0] ~ ~ 0*2 ~ >" @@ -38,8 +41,9 @@ d6 $ gF2 ) # "cpluck:2" # cut 6 + # crushbus 61 (range 16 2.8 "^54") -- BURN ME I'M FAMOUS # midiG' "^82" 0 1.2 -d7 $ gF3 -- SHILOOOOOH +d7 $ gF3 -- SHILOOOOOH FIXME: Marche plus avec la nouvelle basse $ midiOff "^59" ((# room 0.2) . (# legato 0.5)) -- $ (# hpfbus 71 (range 200 8800 ("^19"))) -- $ (# lpfbus 71 (range 8800 200 ("^35"))) @@ -55,9 +59,10 @@ d7 $ gF3 -- SHILOOOOOH # legato 2 # cut 7 # midiG' "^83" 0 1.2 -d8 $ gF $ gM - $ midiOn "^20" (# n "20") - $ midiOn "^36" (# n "10") +d8 $ gF3 $ gM -- SIDE DRUMS TO THE RESCUE! + $ midiOn "^20" (# n "20") -- SLOW DOWN + $ midiOn "^36" (# n "10") -- HAT TRICK + $ midiOn "^56" ((# n "11")) -- RESOLUTE $ midiOn "^60" (slow "2 <4 8>") $ midiOn "^92" (ply "2 <4 8>") $ loopAt 4 diff --git a/live/midi/nova/lofi/premiere_grillade.tidal b/live/midi/nova/lofi/premiere_grillade.tidal index 4e52fa3..9aeedf8 100644 --- a/live/midi/nova/lofi/premiere_grillade.tidal +++ b/live/midi/nova/lofi/premiere_grillade.tidal @@ -12,7 +12,7 @@ d1 $ gF $ gMute $ midiOn "^42" (struct "t t t >") $ midiOff "^42" (struct "t*[<1!4 [8 <8 4>]!4> . 2] . ~ ~ ~ <~!3 t>") $ "[808bd:13,jazz]" -- 11 - # midiG' "^78" 0 2 + # midiG' "^78" 0 1.42 -- # room 0.2 # sz 0.2 -- # dry 0.99 d2 $ gF $ gM -- Snare clockwork @@ -22,11 +22,11 @@ d2 $ gF $ gM -- Snare clockwork midiOn "^43" (struct "~ t(<3 [3 <1 5>]>,8)") . midiOff "^43" (struct "<[~ t]!32 [~ t ~ t]!32>") ) - $ "[snare:20,clap]" + $ "[snare:40]" # midiG' "^79" 0 1.2 d3 $ gF $ gM $ midiOff "^44" (slow 2) - $ midiOn "^76" (ply 2) + $ midiOn "^76" (ply "2 4") $ drumFrom "yamaharm50" "hh*<8!3 [8 . 16 <8 16 [24 8] 32>]>" # n "<0 1 2 3>" # midiG' "^80" 0 1.2 @@ -44,7 +44,8 @@ d8 $ gF $ gM # cut 3 # pan (slow 8 $ range "<0.2!8 0.8!8>" 0.5 cosine) # midiG' "^84" 0 1.3 -d4 $ gF3 +d4 $ gF3 -- LoFi Girl at the piano! + $ midiOn "^90" (ply 2) $ midiOn "^58" ( -- (often (off 0.5 (slow "1 " . mask "f t" . (|+ note 12) . (|* gain 0.9)))) -- . (off ("h" + "s") id . arp "up") @@ -56,8 +57,8 @@ d4 $ gF3 # "FMRhodes2" # modIndex (range 0 16 "^54") # pan 0.8 - # midiG' "^82" 0 1.3 -d5 $ gF2 + # midiG' "^82" 0 1.5 +d5 $ gF2 -- Bassline langoureuse $ midiOn "^89" (chop 8) $ note ( -- "<[c,e,g,b] [c,e,g,bf] [c,ef,g,bf] [c,e,g,b]>" @@ -65,10 +66,10 @@ d5 $ gF2 - 24) # "bassWarsaw" # crushbus 51 (range 16 2 "^53") - # midiG' "^81" 0 2 + # midiG' "^81" 0 1.52 # room 0.2 # sz 0.2 d7 $ gF3 - $ midiOff "^59" (mask "") + -- $ midiOff "^59" (mask "") $ slice 4 "~ <~ [0 1]>" $ chop 4 $ loopAt 4 diff --git a/live/midi/nova/lounge/invoque_ete.tidal b/live/midi/nova/lounge/invoque_ete.tidal index 191d0d0..88c1643 100644 --- a/live/midi/nova/lounge/invoque_ete.tidal +++ b/live/midi/nova/lounge/invoque_ete.tidal @@ -1,7 +1,6 @@ resetCycles - -- Invoque l'été -- Il ne viendra pas tout seul ;) do @@ -12,6 +11,7 @@ let mMute = (midiOn "^73" (mask "f*16")) let m = mBreak let f1 = (# djfbus 1 (range 0.1 0.9 "^49")) let f2 = (# djfbus 2 (range 0.1 0.9 "^50")) +let f3 = (# djfbus 3 (range 0.1 0.9 "^29")) d1 $ f1 $ m $ mMute $ midiOn "^41" (slow 4) $ midiOn "^42" (<| "k k k ") @@ -25,13 +25,13 @@ d2 $ f1 $ m $ mMute -- Clave de l'été $ "d ~ ~ d d ~ d <~!3 d>" -- $ "d" # "[snare:22,sn:4]" - # midiG' "^79" 0 1 + # midiG' "^79" 0 0.71 # speed (range 0 2 "^51") d8 $ f1 $ m -- Mecano Course -- $ fast "<<4 2> 4!7 2!4 2 2 4 8>" $ sometimesBy "0 ^32!7" (ply 4) $ someCyclesBy "^52" (iter 4) - $ midiOn "^76" (slice 8 (run 8) . (|* speed 2) . (>| "breaks165")) + $ midiOn "^76" (slice 8 (run 8) . chop 16 . (|* 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>" @@ -41,21 +41,21 @@ d8 $ f1 $ m -- Mecano Course # midiG' "^80" 0 1.3 -- # speed (range 0 2 "^16") # cut 8 -d8 $ f1 - $ midiOn "^76" --BOUTON NASSIM - ( - -- whenmod 8 7 (ply "1 . 2") . - -- slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") . - (loopAt 1) . - (# "breaks165") . (# cut 2) - . (|* gain 1.1) - ) - $ midiOn ("^44") (ply 2) - $ m - $ "h(3,8) . h(5,8)" - # "hh" -- TODO CHOOSE OR REMOVE - # midiG' "^80" 0 1.4 -d4 $ f1 $ m -- Bassline variable double piste +-- d8 $ f1 +-- $ midiOn "^76" --BOUTON NASSIM +-- ( +-- -- whenmod 8 7 (ply "1 . 2") . +-- -- slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") . +-- (loopAt 1) . +-- (# "breaks165") . (# cut 2) +-- . (|* gain 1.1) +-- ) +-- $ midiOn ("^44") (ply 2) +-- $ m +-- $ "h(3,8) . h(5,8)" +-- # "hh" -- TODO CHOOSE OR REMOVE +-- # midiG' "^80" 0 1.4 +d4 $ f2 $ m -- Bassline variable double piste $ loopAt 2 $ slice 8 (run "<4!4 8 8 [4 8 4] [8 4 8]>") $ midiOn ("^57" + "^89") (# n 14) @@ -65,20 +65,21 @@ d4 $ f1 $ m -- Bassline variable double piste # crushbus 51 (range 16 4.5 "^53") # midiG' "^81" 0 1.4 # cut 4 -d6 $ f2 $ m -- Douce guitare juxée +d6 $ f3 $ m -- Douce guitare juxée $ chop 16 - $ midiOn "^58" (juxBy 0.85 ((# cut 31) . rev . (|* gain 0.93))) + $ midiOn "^18" (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>" + $ midiOn "^58" (# n 13) + $ "fguitar:12" # release (range 2 0.15 "^34") # crushbus 61 (range 16 1.4 "^54") # pan 0.8 # midiG' "^82" 0 1.2 # room 0.2 # dry 1 # cut 3 -d7 $ f2 $ m +d7 $ f3 $ m $ loopAt 4 $ mask "t(<4 8 12 16>,16)" $ slice 16 (run 16) @@ -86,8 +87,8 @@ d7 $ f2 $ m # pan 0.45 # midiG' "^83" 0 1.4 # cut 7 -d12 $ f2 $ m -- Angels of moogland - $ midiOn "^92" (|+ note 24) +d12 $ f3 $ m -- Angels of moogland + $ midiOn "^92" ((|* gain 0.85) .(|+ note 24)) $ midiOn "^60" ( superimpose ( struct "t(5,8)" diff --git a/live/midi/nova/party/blues_machine.tidal b/live/midi/nova/party/blues_machine.tidal index d9b3aa5..06b687c 100644 --- a/live/midi/nova/party/blues_machine.tidal +++ b/live/midi/nova/party/blues_machine.tidal @@ -13,4 +13,5 @@ d4 once $ "blues_elmore:6" # gain 0.8 # cut 4 - once $ "break" +once $ slice 8 0 $ "break" + # cut 1 # gain 1.3 diff --git a/live/midi/nova/party/electro_blues.tidal b/live/midi/nova/party/electro_blues.tidal index 31aff3e..2e2efd4 100644 --- a/live/midi/nova/party/electro_blues.tidal +++ b/live/midi/nova/party/electro_blues.tidal @@ -34,7 +34,7 @@ d3 $ f1 -- Snakes d4 $ f2 $ midiOn "^89" (slice 4 "0 1 2 3*<2 <4 [4 8]>>") $ midiOn "^57" (juxBy 0.2 ( - -- ply "<2 4 [4 8] 8>" . + ply "<2 4 [4 8] 8>" . arp "pinkyup" . (often (ply 2)) -- . (|* gain 0.8) @@ -42,6 +42,7 @@ d4 $ f2 -- . (# crush 16) -- . (|+ note 12) )) + $ superimpose (|+ note "[0,7]") $ note ( cat blues - 24 @@ -68,7 +69,7 @@ d5 $ f2 -- Choeurs # "moogBass" # octave 3 # midiG' "^82" 0 1.4 - # room 0.4 + # room 0.4² # size 0.7 # dry 1.05 d9 $ f1 $ loopAt (2 + (2 * "^92")) diff --git a/live/midi/nova/techno/ete_a_mauerpark.tidal b/live/midi/nova/techno/ete_a_mauerpark.tidal index 9a4abc4..4e69759 100644 --- a/live/midi/nova/techno/ete_a_mauerpark.tidal +++ b/live/midi/nova/techno/ete_a_mauerpark.tidal @@ -1,5 +1,4 @@ -- L'Ete a MauerPark --- Exercice en progression(s) do setcps (120/60/4) let gF = (# djfbus 1 (range 0.05 0.95 "^49")) @@ -19,22 +18,25 @@ let sus = pF "sus" let cutoff = pF "cutoff" d1 $ gF $ gMute -- $ midiOn "^74" (fast 2) + $ fix (|* gain 0.9)"kick:4" $ midiOn "^42" (struct "t t t t") -- Le Run $ midiOff "^42" (struct "~ ") -- L'attente -- $ midiOff "^42" (struct "t . ~ t ~ ~") $ "[techno:0,808bd:2,909,kick:4]" # att 0.015 # rel 0.125 + # room 0 # lpf 4000 - # midiG' "^78" 0 1.3 + # midiG' "^78" 0 1.9 d2 $ gF $ gMute -- Clap timer - $ midiOn "^43" (<| "~ c ~ c") - $ midiOff "^43" (<| "~ c") + $ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c")) + $ midiOff "^43" ((|* gain "0.8 1") . (<| "c . ~ ~ ~ <~!3 c>")) $ drumFrom "[sakatadpm48,rolandr8]" "cp" # lpf 2000 - # midiG' "^79" 0 1.3 -d7 $ gF3 $ gM2 -- High Dauphin + # midiG' "^79" 0 1.9 +d7 $ gF3 $ gM2 -- High Cello Dauphin $ struct "t@2 t*<1 2 1 <4 1>> t*<1 2 4 8>" + $ midiOn "^59" (|- note 12) $ note ( "<[g4 c ef@14] [ ef g@14] <[g4 c ef@14] [c5 bf5 g5@14]> [c ef d@13 ~]>" ) @@ -43,7 +45,7 @@ d7 $ gF3 $ gM2 -- High Dauphin # room 0.2 # pan 0.9 # crushbus 71 (range 16 2.5 "^55") - # midiG' "^83" 0 1 + # midiG' "^83" 0 1.2 d3 $ gF $ gMute2 $ midiOn "^44" (mask "t([8 4 <4 <8 16>>],16)") $ midiOn "^76" (struct "t*[8 <8 16> <16 8 8 16> <16 [32 <64 128>]>]") @@ -51,10 +53,10 @@ d3 $ gF $ gMute2 $ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]" # n "0!3 <0!3 1>" # midiG' "^80" 0 1.6 -d4 $ gF2 $ slow 2 -- Basse Baleine +d4 $ gF2 $ slow 2 -- Basse Germanique $ midiOn "^89" (struct "t*<16 32>") -- Basse folle $ (0.125 <~) -- Calage :) - $ someCyclesBy "^17" ( + $ someCyclesBy (1 - "^33") ( (mask " f t@14") . (|* room 1.2) ) -- $ fix ((midiOff "^57" (# silence)) . (|* gain 0.8) . (|+ note 24) . (|* gain "<0.93!3 [0.92 0.85]>") . (# cut 5)) @@ -67,7 +69,7 @@ d4 $ gF2 $ slow 2 -- Basse Baleine # room 0.2 # pan 0.4 # crushbus 41 (range 16 2.5 "^53") - # midiG' "^81" 0 1.3 + # midiG' "^81" 0 1.6 d6 $ gF3 $ gMute2 -- Leads reponse $ midiOn "^90" (struct "t*<16 32>") -- Basse folle $ midiOn "^58" (|+ note 12) @@ -87,10 +89,10 @@ d6 $ gF3 $ gMute2 -- Leads reponse ) # "FMRhodes1" # room 0.2 - # pan 0.8 + # pan 0.33 # modIndex (range 0 16 "^34") # crushbus 61 (range 16 2.5 "^54") - # midiG' "^82" 0 1.3 + # midiG' "^82" 0 1.5 d8 $ gM $ gF3 -- Breaks divins $ midiOn "^92" (off "e" id) $ midiOn "^60" (mask "[f t]") @@ -101,7 +103,7 @@ d8 $ gM $ gF3 -- Breaks divins $ "jungle_breaks:1" # cut 8 # pan "[<0.35!3 0.65> <0.65!3 0.35>]*4" - # midiG' "^84" 0 1.8 + # midiG' "^84" 0 1.4 d10 $ gF3 -- Pads angéliques $ sometimesBy "^19" (superimpose ( (# cut 101) @@ -116,8 +118,8 @@ d10 $ gF3 -- Pads angéliques slow 2 " [bf4 a4@3]>" + "[0,[0*<1 1 2 <2 1>> . 0 12*<1 2>]]" ) - # chorus (range 0 2 "^36") - # "moogBass" + # chorus (range 0 2 "^35") + # "moogBass" -- FIXME: Other synth? # dec 0.2 # sus 1 # att (range 0.001 2 "^16") diff --git a/live/midi/nova/techno/panda_rouge.tidal b/live/midi/nova/techno/panda_rouge.tidal new file mode 100644 index 0000000..cafe304 --- /dev/null +++ b/live/midi/nova/techno/panda_rouge.tidal @@ -0,0 +1,146 @@ +""" +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$**$$$$$$$$$**$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$" ^$$$$$$F *$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$ z$$$$$$L ^$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$ e$$$$$$$$$e J$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$eee$$$$$$$$$$$$$e$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$b$$$$$$$$$$$$$$$$$$*$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$)$$$$P"e^$$$F$r*$$$$F"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$d$$$$ "z$$$$" $$$$% $3$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$*"""*$$$ .$$$$$$ z$$$* ^$e*$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$" *$$ee$$$$$$$$$$*" $$$C$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$. "***$$"*"$$"" $$$$e*$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$b "$b.$$" $$$$$b"$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$c. """ $$$$$$$^$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$e.. $$$$$$$$^$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$eeee.. J$$$$$$$$b"$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$r z$$$$$$$$$$r$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$" z$$$$$**$$$$$^$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$*" z$$$P" ^*$$$ $$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$*" .d$$$$ $$$ $$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$" .e$$$$$F 3$$ $$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$. .d$$$$$$$ $PJ$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$eeeeeeed$*""""**"" $\$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $d$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$. $$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$e. d$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$eeeeeee$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ +$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$AsciiArt$by$Gilo94$$$ + + +do +setcps (120/60/4) +let gF = (# djfbus 1 (range 0.05 0.95 "^49")) +let gF2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) +let gMask = (midiOn "^41" (mask "t . [f ] t")) +let gMute = (midiOn "^73" (mask "f*16")) +let gMute2 = (midiOn "^74" (mask "f*16")) +let gM = gMask . gMute +let gM2 = gMask . gMute2 +d1 $ gF $ gM2 + -- $ midiOn "^75" (<| "k ~ ~ <~!3 k>. k ~ <~ k> ")-- RubADub+adjustements + $ midiOn "^42" (<| "k k k k]>") -- 4F + -- $ midiOff "^41" (<| "k . k <~ [<~ k> ]>")-- RubADub + $ midiOff "^42" (<| "k . k <~ [<~ k> ]>")-- RubADub + -- $ midiOn "^42" (struct "t t t > t*<1!3 2>]>") + $ fix (|* gain 0.9) "jazz" + $ fix ( + (# att 0.05). (# rel 1) . (# lpf 200)) "kick" + $ "[kick:3,jazz]" + # midiG "^78" +d2 $ gF $ gM + $ whenmod 8 7 (off "e" ((|* gain 0.8) . (# hpf 5000))) + $ midiOn "^42" (<| "~ s ~ ]>") + $ midiOn ("^43" - "^42") (<| "~ ~ s*<1 1 1 2 2 2 1 2> <~ [~ s*<1 2>]>") + $ midiOff ("^43" + "^42") (<| "~ <~ s>") + $ "[snare:42,snare:11]" + # hpf 500 + # room 0.2 # dry 1 # sz 0.7 + # delay 0.5 + # delayt "s" + # delayfb 0.05 + # midiG' "^79" 0 0.7 + # pan 0.8 +d3 $ gF2 $ gM + $ midiOn "^76" (ply "[2 1 2] <[4 8 4]!3 [8 16 8]>") + $ midiOn "^44" (ply "2 1 2 <1 <2 4>>") + $ "dr*<8!3 [16@3 8]>" + # midiG' "^80" 0 1.1 +d4 $ gF2 $ gMask -- Basic bass + $ note (scale "aeolian" (fast 2 + "<0!3 <-1 [-2 -3@3] <2 [-1@2 -1 2]> <[4@6 4 5] [5@3 5 4@2 4 6]>>>") - 24) + # "bassWarsaw" + # pan 0.2 + # att 0.1 + # legato 2 # cut 4 + # rel 10 + # crushbus 41 (range 16 3.5 "^53") + # roombus 42 (range 0.2 0.5 "^53") # sz 0.9 # dry 1 + # midiG' "^81" 0 1.2 +d5 $ gF3 -- Burning birds + $ fix (mask "t f") "juno:0" + $ fix (mask "t(<2 [2 6]>,8,1)") "juno:3" + $ fix ((# hpf 5000) . (|+ pan 0.2) + . (# delay 0.4) . (# delayfb 0.4) + ) "juno:4" + $ (0.5 ~>) + $ note (scale "aeolian" ("[0 <1!7 2 -1!7 2> . ~@2 2 <4 6>]")) + # "[juno:0,juno:4,juno:3]" + # pan 0.8 + # midiG' "^82" 0 1 +d6 $ gF3 -- guitar dub contretemps + $ note (scale "aeolian" ( + "[~ <1!3 <3 <-1 [-1 0]> 4 <7 [6 7]>>>]*2" + + 7)) + # "pluck" + # end 0.5 + # cut 6 + # pan 0.3 + # midiG' "^83" 0 1 +d10 -- JUNGLE PEOPLE + $ n (stack [ + "<~!7 <10!3 12>>", -- SICK + "~ <~!14 21 21>", -- Drop! + -- "<~!16 <45!3 [45 46]>!16>" -- Cool + "" + ]) + # "jungle_vocals" + # cut 10 + # midiG' "^20" 0 0.8 + # pan 0.14 +d7 + $ note ("<0 0 1 -2>/4") + # "90s_synatm" + # cut 7 + # crushbus 71 (slow 32 $ range 16 3 sine) + # room 0.2 # dry 1.3 # sz 0.7 + # midiG "^19" +d8 $ gF $ gM + $ midiOff "^60" (mask "t . t(<1 3 5 <3 8>>,8)") + $ midiOn "^92" (ply 2) + $ loopAt 2 + $ chop 16 + $ midiOn "^36" (# n "48") + $ n "<40!3 [40 42]>" + # "jungle_breaks" + # cut 8 + # midiG' "^84" 0 0.8 +d11 $ gF3 -- bogdan grime + $ fix (midiOff "^42" $ mask "f") (n "1") + $ n (stack [ + "<[<~!2 <~ <0 [0] [0 2]>> ~>]>", -- Me Love outsourcing + "<~!32 [<1!3 ~>]!16 ~!16>", -- From Cardiff! + "<~!16 [<~!11 3 ~!3>]!16 ~!32>", -- I'll do pints + "<[<<0!3 2> ~>]!8 ~!24>", -- Me Love Critical Thinking! + "" + ]) + # "bogdan_grime" + # cut 11 + # pan 0.8 + # room 0.4 # sz 0.3 + # dry "<1!6 1.5 2>" + # midiG' "^18" 0 1.4 diff --git a/live/mood/fight/grimpe.tidal b/live/mood/fight/grimpe.tidal index 00f59ed..6e469ed 100644 --- a/live/mood/fight/grimpe.tidal +++ b/live/mood/fight/grimpe.tidal @@ -2,7 +2,7 @@ do setcps (90/60/4) let gDJF1 = (# djfbus 1 (range 0.05 0.9 "^49")) -let gDJF2 = (# djfbus 2 (range 0.01 0.99 "^29")) +let gDJF2 = (# djfbus 2 (range 0.01 0.99 "^50")) let mBreak = (midiOn "^41" (mask "t f . f t")) let mBreakManual = (midiOn "^73" (mask "f*16")) let g1 = (gDJF1) @@ -20,7 +20,7 @@ d2 $ g1 $ m d3 $ g2 $ m $ whenmod 8 6 (fast "<2 [4 . 2 1]>") $ "drum:2*[8!3 <16!3 [32 16]>]" - # midiG' "^51" 0 0.65 + # midiG' "^51" 0 0.9 # pan 0.8 d4 $ g2 $ m $ midiOn "^44" (# speed (0.5 * range 0.5 1.5 "^52")) @@ -35,8 +35,8 @@ d5 $ g2 $ m # cut 5 # pan 0.2 # crushbus 50 (range 10 2.1 "^53") - # midiG' "^81" 0 1 -d6 $ m $ note (scale "aeolian" ("0 1 <2 [2@2 1]> <3!2 [2 3]> . ~ <4!3 <6 7>>")) + # midiG' "^81" 0 1.4 +d6 $ g2 $ m $ note (scale "aeolian" ("0 1 <2 [2@2 1]> <3!2 [2 3]> . ~ <4!3 <6 7>>")) # "pluck:5" # cut 6 # att 0 @@ -44,7 +44,7 @@ d6 $ m $ note (scale "aeolian" ("0 1 <2 [2@2 1]> <3!2 [2 3]> . ~ <4!3 <6 7>>")) # crushbus 60 (range 10 1.9 "^54") # pan 0.8 # room 0.4 - # midiG' "^82" 0 0.6 + # midiG' "^82" 0 0.8 d7 $ g2 $ midiOff "^59" (mask "t f!7 . t f!3 t f!3") $ note (scale "aeolian" ( @@ -56,4 +56,4 @@ d7 $ g2 # room 0.4 # sz 0.8 -- TODO: Add cool effect (crush doesn't work well) - # midiG' "^83" 0 1.3 + # midiG' "^83" 0 1.7 diff --git a/live/mood/soothing/breathe.tidal b/live/mood/soothing/breathe.tidal index ec22cee..e2b603f 100644 --- a/live/mood/soothing/breathe.tidal +++ b/live/mood/soothing/breathe.tidal @@ -1,4 +1,3 @@ - do let modIndex = pF "modIndex" let g = (# djfbus 1 (range 0.1 0.9 "^49")) @@ -16,7 +15,7 @@ d2 $ g -- Snare contretemps $ whenmod 4 3 (off (-1/16) (|- note 3)) -- Double shot $ "~ c" # "snare:42" - # midiG' "^79" 0 1.8 + # midiG' "^79" 0 1.3 d3 $ g -- Drumroll $ midiOn "^44" (ply 2) $ midiOn "^76" (ply 2) @@ -38,7 +37,8 @@ d4 $ g2 d5 $ g2 -- Programmatic bass robot $ midiOn "^57" (mask "t f!6 t?") -- Take a break my dear $ whenmod 64 32 (sometimesBy "0 1" rev) -- Run in circles - $ swing 8 + -- $ swing "8" + $ struct "t([16 8 <16 8 <4 32>>],16)" $ arp "" $ superimpose ((|+ note 12) . (# cut 51)) $ note ( diff --git a/live/techno/noir/burn_this_book.tidal b/live/techno/noir/burn_this_book.tidal index ac1295b..9a93d98 100644 --- a/live/techno/noir/burn_this_book.tidal +++ b/live/techno/noir/burn_this_book.tidal @@ -88,7 +88,7 @@ do # sz 0.5 # pan 0.7 # midiG' "^82" 0 1.65 - d7 $ loopAt 8 -- L'auteur + d7 $ loopAt 8 -- L'auteur TODO: Rework? Replace? Remix? $ "90s_synatm:16" # cut 7 # octerbus 71 (range 0 2.4 ("^55")) @@ -102,6 +102,6 @@ do # cut 8 # note (-4) -- # n (4 + "<1 1 [2|3|4] <1 4>>") - # midiG' "^77" 0 1 - -- # room 0.2 # dry 1 - -- # pan "<0.3!3 <0.7 0.3>>" + # midiG' "^20" 0 1 + # room 0.2 # dry 1 + # pan "<0.3!3 <0.7 0.3>>"