From 969f1c30c12ef9bdb1eac8b965f4d40579f9ae33 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Sun, 7 Nov 2021 20:40:06 +0100 Subject: [PATCH] live: cyberspace - du miel --- live/collab/cam/i_come_from_cyberspace.tidal | 79 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/instru/nuit_au_quartier_latin.tidal | 99 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/lofi/du_miel.tidal | 75 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/hip/lofi/sete_et_match.tidal | 6 +++--- live/midi/nova/ambient/drone_aveugle.tidal | 72 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/breaks/break_90s.tidal | 20 +++++++++++--------- live/midi/nova/breaks/nova_bossa.tidal | 90 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/breaks/solar.tidal | 6 +++--- live/midi/nova/breaks/spanish_thingy.tidal | 43 +++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/computer_riddim.tidal | 4 +--- live/midi/nova/dnb/meurice.tidal | 12 +++++++----- live/midi/nova/dub/skunky.tidal | 88 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/lofi/soleil_de_sete.tidal | 5 ++--- 13 files changed, 573 insertions(+), 26 deletions(-) create mode 100644 live/collab/cam/i_come_from_cyberspace.tidal create mode 100644 live/hip/instru/nuit_au_quartier_latin.tidal create mode 100644 live/hip/lofi/du_miel.tidal create mode 100644 live/midi/nova/ambient/drone_aveugle.tidal create mode 100644 live/midi/nova/breaks/nova_bossa.tidal create mode 100644 live/midi/nova/breaks/spanish_thingy.tidal create mode 100644 live/midi/nova/dub/skunky.tidal diff --git a/live/collab/cam/i_come_from_cyberspace.tidal b/live/collab/cam/i_come_from_cyberspace.tidal new file mode 100644 index 0000000..77fa97c --- /dev/null +++ b/live/collab/cam/i_come_from_cyberspace.tidal @@ -0,0 +1,79 @@ +once $ "jazz" + +once $ "h2ogmsn" + +once $ "ircam:1" + # gain 0.85 + # cut 3 + +once $ "cyberspace:3" + # gain 0.85 + # cut 3 + + +do +-- resetCycles +setcps (120/60/4) +let gPontFiltre = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.1 0.5 saw))) +let g = gPontFiltre +let fadeIn = someCyclesBy "<1!4 0!60>" (|* gain (slow 4 $ range 0.4 1 saw)) +d1 + $ g + $ mask "" -- Intro /32 + $ mask "" -- Pont instrumental + $ whenmod 16 4 (<| "k*4") + $ "jazz" + # gain 0.9 +d2 $ g + $ mask "" + $ "~ [cp,glitch:7]" + # lpf 2000 +d3 $ g + $ mask "" -- Pont instrumental + $ "hh*[8!3 16 <16 8 8 16>]" + # gain (slow 16 $ range 0.55 0.8 saw) + # pan (slow 4 $ range 0.8 0.2 isaw) +d4 + $ g + $ whenmod 64 32 (superimpose ( + struct "t(<8 <8 [5 8]> 5 0>,8)" . + (+| note (arp "up" "[0, 7, 12]")) + )) + $ s "superpiano" + # note "<-20 [-19,-15] [-20,-16] ~>" + # velocity "<0.7 0.5 0.6>" + # sustain 3 + # pan 0.8 + # gain 0.8 +d6 -- BASSLINE + $ g + $ fadeIn + $ whenmod 32 4 (superimpose ( + (# crush 10) + . (# cut 61) + . (+| note (arp "up" "[<0 0 3 0> 12 0 12]*2")) + . (|+ pan 0.15) + )) + $ s "bassWarsaw" + # note "<-20 <-19 -15> <-16!3 -20> ~>" + # crush 5 + # room 0.4 + # cut 6 + # sz 0.7 + # pan 0.7 + # gain 0.8 +d5 -- CYBERDECLARATI0N + $ fadeIn + $ someCyclesBy "<0!32 0!8 0!8 1!16>" (>| n "<5 <1 9> 5 9>") -- DO NOT THINK! + $ someCyclesBy "<0!32 0!8 1!8 0!16>" (>| n "<10 <2 6>>") -- Not on behalf of the future! + $ someCyclesBy "<0!32 1!8 0!24>" (>| n "10 10 10 <10 ~ 3 ~>") -- DO NOT THINK! + $ someCyclesBy "<0!24 1!8>" (>| n "<0 ~ 8 <~ 10>>") -- You giants do not know us + $ someCyclesBy "<0!8 1!16 0!8>" (>| n "<10 <6 4>>") -- Do not think... you have no morat + $ someCyclesBy "<1!8 0!24>" (>| n "<5 1 5 <4 6>>") -- I declare.. you are not welcome! + $ n "0" # "cyberspace" + # cut 5 + # leslie (slow 16 $ range 0.2 0.8 saw) + # lrate 6.8 + # lsize (slow 8 $ range 0 1.8 saw) + # pan 0.2 + # gain 0.9 diff --git a/live/hip/instru/nuit_au_quartier_latin.tidal b/live/hip/instru/nuit_au_quartier_latin.tidal new file mode 100644 index 0000000..26b9a02 --- /dev/null +++ b/live/hip/instru/nuit_au_quartier_latin.tidal @@ -0,0 +1,99 @@ + +do +-- resetCycles +setcps (120/60/4) +let gDJF = whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.05 0.45 saw)) +let g = gDJF +-- d10 $ mask "" $ "dr*8" # gain 0.4 -- Guideline +d1 $ g + $ mask "" -- Outro + $ mask "" + $ whenmod 32 16 (<| "k . k(<3!3 <5 [5 3]>>,8)") + $ fix (|* 0.68) ("jazz") + $ "k . ~ k <~ k> <~!3 k>" + # "[808bd:2,jazz]" + # lpf 200 + # gain 1.35 +d2 -- Snare classique + $ mask "" -- Outro + $ g + $ mask "" + $ fast 2 + $ ply "<1!3 2>" + $ "~ >" + # note "-2" + # room 0.8 # dry 1 # sz 0.87 + # gain 0.7 +d3 -- Drumroll analogique + $ g + $ mask "" -- Outro + $ mask ",8)!4 t!60>" + $ whenmod 8 6 (ply "<1 [2 <[1 2] [2 4]>]> <0.5 [4 0.5]>") + $ "dr*<8 <8 [8 4]> 16 [8 . 4 16]>" + # "h2ogmsn" # n "<[14 13 13 12]!6 11 10>" + # gain 0.5 + # room 0.4 + # pan (slow 2 $ range "<0.6!3 0.4>" "<0.4!3 0.6>" isaw) + # sz 0.012 + # dry 0.97 +d4 -- Lead Guitar: Signor Loop + $ mask "" + -- V1: LoopAll + -- $ someCyclesBy "" (slice 16 (slow 2 $ "<8 9 9 8 8 10 11 [12 13]>")) + -- $ someCyclesBy "" (slice 16 (slow 2 $ "<5 1 5 1 5 2 2 3 5 1 5 6 5 6 6 7>")) + -- V2: Storytold + $ someCyclesBy "" (slice 16 "<8 8 10 8 10 10 8 <10 12>> <9 9 3 9 11 12 13 13>") + $ someCyclesBy "" (slice 16 "<5 6 5 7> <7 8 6 8*2>") + $ someCyclesBy "" (slice 16 "<5 <5!3 [5 6]> <5!3 7> <1 3 1 8>>") + -- 0/16:Toi + -- 1/16:Viens, Je Reviens + -- 2/16:pour toi + -- 3/16:oui toi, que toi + -- 4/16:Pause + -- 5/16:Bonjour + -- 6/16: Et c'est bien toi que je + -- 7/16 veux... + -- 8/16: Oui c'est toi + -- 9/16: toi, toi, toi + -- 10/16: Bien toi + -- 11/16: Je te vois t'en aller + -- 12/16: Va... + -- 13/16: Il y en aura d'autres + -- 14/16:Pause + $ "latin" + # cut 4 + # room 0.84 + # dry 1.12 + # pan 0.35 + # sz 0.9 + # lpqbus 41 (slow 4 $ range 0 0.5 sine) + # lpfbus 42 (range 500 5000 (slow 8 $ sine + 0.25 * perlin)) + # gain 0.8 +d5 + $ g -- Support guitar + $ whenmod 4 3 (ply "<1 2>" . (# begin 0.56) . (# end 0.58)) + $ "latin" + # begin 0 + # end 0.044 + # cut 5 + # room 0.4 + # dry 1 + # sz 0.6 + # pan 0.8 + # gain 0.8 +d6 $ g -- Core BREAK + $ mask "" + $ slice 4 ("0 <1 ~> <2 0> <3 <~ 3>>") + $ loopAt 1 + $ "breaks125:0" + # gain (slow 16 $ range 0.45 0.8 saw) + # pan 0.4 +d9 $ g -- Support break + $ mask "" + $ slice 32 "0*<1!7 2> 1*<1!7 2> 2*<1 1 2 <1 2>> 3*<1 2>" + $ loopAt 2 + $ "break:29" + # cut 7 + # gain (0.65 + (slow 32 $ range 0 0.1 saw)) + # pan 0.23 + # room 0.2 # dry 1 # sz 0.2 diff --git a/live/hip/lofi/du_miel.tidal b/live/hip/lofi/du_miel.tidal new file mode 100644 index 0000000..7723fed --- /dev/null +++ b/live/hip/lofi/du_miel.tidal @@ -0,0 +1,75 @@ + + +do +-- resetCycles +setcps (82/60/4) +let modIndex = pF "modIndex" +let chords = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>" +let chordsMin = "<[c,ef,g,bf,d6,f6] <[c,f,af,c6,ef6,g6,bf6] [g,b,ds6,f6,g6,b6,ds7]>>" +let chordsMin = "<[c] <[f] [g]>>" +let gPontHPF = (whenmod 64 32 (# djfbus 1 (slow 16 $ range 0.5 0.9 cosine))) +let g = (# djfbus 2 (range 0.05 0.95 "^49")) +d1 $ g + $ mask "" -- Intro + $ fix ( + (|* gain 0.9) + . (# lpf 200) + . (# att 0.2) + . (# rel 10)) + ("reverbkick") + $ "k . ~> [~ <~ k>] <~ [~ <~ k>]> k" -- Chaloupé/élagué + # "[jazz,reverbkick]" + # lpf 5000 + # midiG' "^78" 0 1 +d2 + $ mask "" -- Intro + $ g + $ fast 2 $ "~ snare:20" + # att 0.125 + # rel 2 + # gain 0.85 + # midiG' "^79" 0 1.2 +d3 + $ g + $ someCyclesBy "<1!4 0!28>" (slow "<4!3 [4 2]>") -- Intro + $ someCyclesBy "<0!32 1!8 0!24>" (slow 2) -- Pont + $ ply "<2 [4 <2!3 <4 8>>]>" -- TODO: Plutot des triolets? + $ "d <~ d> d " + # "drum:2" + # cut 3 + # gain 0.6 + # pan 0.3 + # midiG' "^80" 0 0.9 +d4 + $ g + $ mask "" + $ struct " . t(<3 [3 <5 1>]>,[8 <8!3 1>])" + $ arp "up!3 >" + $ note (chordsMin - 24) + # "bassWarsaw" + # crushbus 41 (range 14 8 "^53") + # pan 0.3 + # room 0.2 + # gain 0.6 + # midiG' "^81" 0 1.1 +d5 $ g + $ note (chords - 24) + # "FMRhodes1" + # att 1 # rel 2 + # modIndex (range 0 2 "^54") + # room 0.8 + # dry 1 + # sz 0.2 + # gain 0.7 + # pan 0.68 + # midiG' "^82" 0 1.2 +d6 -- Fantomatic break loop + $ g + $ mask ",8)!3 t([5 8],8)>" + $ ply ("1 <1!3 2>") + $ iter "1 <4!3 1>" + $ slice 16 (run 16) + $ loopAt 2 + $ "break" + -- # gain 0.45 + # midiG' "^84" 0 1 diff --git a/live/hip/lofi/sete_et_match.tidal b/live/hip/lofi/sete_et_match.tidal index 1d1f9f0..5dffb5f 100644 --- a/live/hip/lofi/sete_et_match.tidal +++ b/live/hip/lofi/sete_et_match.tidal @@ -1,4 +1,3 @@ -resetCycles -- Soleil de Sete - LoFi avec accompagnement @@ -6,10 +5,11 @@ resetCycles -- Add lead - or use it to improvise? <3 -- Add wind noises at transition points - or equivalent spacey sounds do +-- resetCycles setcps (90/60/4) let chords = "<[a,c,e,g6,b6,d6] [d,fs,a6,c6] [f,a,c6,e6] [c,e,g6,b6]>" let chordsMin = "< [f] [c]>" -- TODO confirm/finish/validate -let gFilter = whenmod 32 24 (# djf (slow 8 (range 0.5 0.05 saw))) +let gFilter = whenmod 32 24 (# djf (slow 8 (range 0.05 0.5 saw))) let gFilter2 = whenmod 32 24 (# djf (slow 8 (range 0.45 0.75 saw))) let g = gFilter let g2 = gFilter2 @@ -53,7 +53,7 @@ d4 $ g2 $ whenmod 4 3 (rarely (off "h" (arp "up" . mask "f f t? t"))) $ superimpose ((|* gain "0 0.79") . (|+ note 12)) -- Depth $ whenmod 16 12 (someCyclesBy "0 1" rev) - $ note (chords + $ note ("[0,<~ [~!7 0*<1!3 2>] ~ ~>]" + chords - 24 ) # "FMRhodes1" diff --git a/live/midi/nova/ambient/drone_aveugle.tidal b/live/midi/nova/ambient/drone_aveugle.tidal new file mode 100644 index 0000000..5370ee4 --- /dev/null +++ b/live/midi/nova/ambient/drone_aveugle.tidal @@ -0,0 +1,72 @@ +do +let slide x = acceleratebus 01 (2**(x/12)) +let g = (# djfbus 1 (range 0.05 0.95 "^49")) +let g2 = (# djfbus 2 (range 0.05 0.95 "^29")) +d1 $ g + $ midiOn "^41" (<| "k k k [k <~!3 k>]") + $ midiOff "^41" (<| "k . ~ ~ ~ ") + $ "[909,jazz]" + # room 0 # sz 0 # dry 1 + # midiG' "^78" 0 0.75 +d2 $ g + $ fix (|* gain 0.58) ("sn") + $ fix (|* gain 0.8) ("snare") + $ "~!7 <~!3 sn:27> . [glitch:5,snare:28]" + # midiG' "^79" 0 1 +d3 $ g + $ midiOn "^44" (fast "4!3 <8 [<4 8> <4!3 8>]>") + $ "hh(3,8)" + # midiG' "^80" 0 1 +d4 + $ g2 + $ superimpose (|+ note (cat [ + 2,2,2,3, + 3,3,4,5, + 4,5,4,5, + 5,6,7,8 + ])) + $ note ("d" - 12) + # "superfm" + -- # slide "0 12 3" + # crushbus 41 (range 16 0.95 "^53") + # lesliebus 42 (slow 64 $ range 0 4 perlin) + # lsizebus 44 (range 0.2 2 "^17") + # lratebus 43 "^33" + # midiG' "^81" 0 (0.59 - 0.1 * "^17") +d5 $ g2 + $ midiOff "^58" (slow 8) + $ arp "up" + $ n (scale "aeolian" + "<0 <2 [<2 0> . ~ <~ 2> 4 2]>>" + -- "" + - 24) + # s "superchip" + # voicebus 51 (range 0.05 0.35 "^34") + # crushbus 52 (range 16 1.85 "^54") + # midiG' "^82" 0 0.7 + # room 0.4 + # dry 1.02 + # sz 0.8 +d6 $ g2 + $ midiOn "^91" ( + slice 4 (mask "t" $ fast 8 $ run "<4!3 [4|2]*8>")) + $ midiOff "^59" (slow 8) + $ n ( + scale "aeolian" "[0 <[<5 6> <4 5>]>]/2" + - 36) + -- $ n "" + # "supersiren" + # acceleratebus 61 (range "-12" 12 "^35") + # crushbus 62 (range 10 2.5 "^55") + # 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 + $ slice 4 "0 1 <2 [2|1]> <1 2 3 7*<1 <2 4>>>" + $ loopAt 2 + $ "break:15" + # gain 0.9 + # speed (range 0.1 1.9 "^56") + # midiG' "^84" 0 1.1 + # cut 7 + # pan 0.1 diff --git a/live/midi/nova/breaks/break_90s.tidal b/live/midi/nova/breaks/break_90s.tidal index 63e7c25..a927e2a 100644 --- a/live/midi/nova/breaks/break_90s.tidal +++ b/live/midi/nova/breaks/break_90s.tidal @@ -10,11 +10,13 @@ once "dr" -- Break90s∷ :) do -- let gF = (whenmod 32 28 (# djf (slow 4 $ range 0 0.5 sine))) -let gDJF = (# djfbus 1 (range 0.15 0.85 "^49")) -let g = (gDJF) +let gDJF1 = (# djfbus 1 (range 0.15 0.85 "^49")) +let gDJF2 = (# djfbus 2 (range 0.15 0.85 "^29")) +let g1 = (gDJF1) +let g2 = (gDJF2) setcps (80/60/4) d1 - $ g + $ g1 $ midiOn "^41" (superimpose ((# "kick:5") . (|* gain 0.7)) . (<| "k k k k k k k [ ]") @@ -32,7 +34,7 @@ d1 # room 0.5 # sz 0.2 # dry 0.99 # midiG' "^78" 0 1.4 d2 - $ g + $ g1 $ midiOn "^75" (ply 2) $ midiOn "^43" (slice 4 "0 1*<1 1 2 4>") $ midiOff "^43" ( @@ -47,7 +49,7 @@ d2 # cut 2 d3 -- Bassline $ (# lpf (range 10000 500 "^53")) - $ g + $ g1 $ midiOn "^89" (off "h" ( mask "t(<8 16> ,16)" . ply 2 @@ -71,7 +73,7 @@ d3 -- Bassline # crushbus 31 (range 16 4 "^53") # pan 0.2 # midiG' ("^81" + 0.125*"^53") 0 1.8 -d5 $ g -- Piano base +d5 $ g2 -- Piano base $ midiOn "^58" (superimpose ( (0.5 ~>) . degradeBy (1 - "^54") @@ -91,7 +93,7 @@ d5 $ g -- Piano base # orbit 5 # midiG' "^82" 0.3 1.7 d4 -- Skank organ - $ g + $ g2 -- $ superimpose (const $ g -- $ whenmod 8 4 (iter "1 4") -- $ segment 8 $ "fmono:9" @@ -112,7 +114,7 @@ d4 -- Skank organ # crushbus 41 (range 16 4 "^55") # midiG' "^83" 0.2 1 d8 -- Tom roll - $ g + $ g2 $ midiOn "^76" (fast 2) $ midiOn "^44" (<| "~ h ~ h") $ midiOff "^44" (<| "h(<4 5 8 [8 16]>,8)") @@ -130,4 +132,4 @@ d9 -- Finger claps $ "clap" # speed (range 0.75 1.25 "^56") # release "<0.25!3 0.125 0.25!4 0.125!4>" - # midiG' "^84" 0 1.7 + # midiG' "^84" 0 1.4 diff --git a/live/midi/nova/breaks/nova_bossa.tidal b/live/midi/nova/breaks/nova_bossa.tidal new file mode 100644 index 0000000..6aeffac --- /dev/null +++ b/live/midi/nova/breaks/nova_bossa.tidal @@ -0,0 +1,90 @@ +resetCycles + + +-- LA NOVA BOSSERA +-- breakbeat X bossa nova <3 + +d10 $ "drum:2*8" # gain 0.9 + +once $ "dr" + +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 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")) +let g1 = gDJFManuel1 +let g2 = gDJFManuel2 +let modIndex = pF "modIndex" +let m = mBreak +setcps (60/60/4) +d1 $ g1 $ m + -- $ "k(<3!3 5>,8)" + $ midiOn "^41" (fast 2) -- TODO: Comment to Cooldown :') + $ "k . <~ [k . ,8)>]>" # "[808bd:3,cpu2]" + -- $ fast 2 $ "k k k k]>" # "[909,jazz]" -- TECHNOOOO + # midiG' "^78" 0 1.4 +d2 $ g1 $ m + $ fast 2 + $ "~ . <~!4 s!4> ~ ~" + # "[snare:20,clap]" + # note "<0!7 <0 -3>>" + # midiG' "^79" 0 1.4 +d3 + $ mask "" + $ g2 $ m + $ midiOn "^76" (iter "4 8") + $ midiOn "^44" (slice 4 (run "<8!3 <16 32>>")) + $ loopAt 2 + $ chop 8 + $ "break" + # cut 3 + # speed (range "0" 2 "^52") + # midiG' "^80" 0 1.1 +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 + # midiG' "^81" 0 1 +d5 $ g2 + $ note (arp "" "*4" + + "[0,12]" + - 24 + ) + # room 0.4 # dry 1 # sz 0.9 + # modIndex (range 0 35 ("^54")) + # crushbus 5 (range 12 3.5 ("^34")) + # "FMRhodes1" + # release 4 + # lpf 2000 + # midiG' "^82" 0 1.3 +d8 $ g2 -- Clave de l'été pitchable + $ midiOn "^59" (fast 2) + $ midiOn ("^91") (scramble 4 . fast 2) + $ (|* gain "0.75 1 1 1 0.75 1 1 1") + $ "d ~ ~ d d ~ d <~!3 d>" + # "[h2ogmhh:13]" + # speed (range 0.5 1.5 "^55") + # midiG' "^83" 0 1.5 +d9 + $ g2 + $ midiOn "^92" (ply "2 4") + $ midiOn "^60" (ply 8) + $ note ( + "" + + "[0,12]" + - 12 + ) + # "superhammond" + # att (range 0.5 1.5 saw) + # rel 4 + # crushbus 9 (range 10 3.5 (sine)) + # midiG' "^84" 0 1 + # pan 0.8 diff --git a/live/midi/nova/breaks/solar.tidal b/live/midi/nova/breaks/solar.tidal index ac11293..57e57bb 100644 --- a/live/midi/nova/breaks/solar.tidal +++ b/live/midi/nova/breaks/solar.tidal @@ -17,7 +17,7 @@ d1 $ g1 $ m -- $ fix (# cut 1) ("808bd") $ midiOn "^42" (<| "k k k k]>") $ midiOff "^42" (<| "k . ~ k*<1!3 2 2 2 1 2> <~ ~ k >") - $ "[jazz,<808bd:2!6 <808bd:2 808bd:1> 808bd:1>,hh:5]" + $ "[jazz,<808bd:2!6 808bd:1!2>,hh:5]" # midiG' "^78" 0 1.3 d3 $ g1 $ m -- Snare $ mask "" @@ -36,7 +36,7 @@ d2 $ g1 $ m -- BREAK $ slice 8 (run 8) $ "break:11" # hpf 500 - # octerbus 20 (range 0 0.25 "^52") + # octerbus 20 (range 0 0.5 "^52") # octersubbus 21 (range 0 1.2 "^52") # octersubsubbus 22 (range 0 1.2 "^52") # midiG' "^80" 0 1 @@ -65,7 +65,7 @@ d5 $ g2 # modIndex (range 0 128 "^34") # crushbus 51 (range 16 4.6 "^54") # midiG' "^82" 0 1.5 -d8 $ g2 +d8 $ g2 -- FIXME REMOVE OR SAVE $ whenmod 8 4 (rarely (striate 2)) $ whenmod 16 8 (sometimesBy "0 1" rev) $ midiOn "^59" ( diff --git a/live/midi/nova/breaks/spanish_thingy.tidal b/live/midi/nova/breaks/spanish_thingy.tidal new file mode 100644 index 0000000..2a8e557 --- /dev/null +++ b/live/midi/nova/breaks/spanish_thingy.tidal @@ -0,0 +1,43 @@ +do +setcps (115/60/4) +let g = (# djfbus 1 (range 0.05 0.95 "^49")) +d1 $ g + $ mask "" -- Break + $ fix (|* gain 0.85) ("kick") -- Layering :) + $ "k k k k]>>" + # "[jazz,909,kick:5]" + # lpf 2000 + # gain 0.99 + # sz 0.4 + # room 0.2 + # dry 1 +d2 $ g + $ mask "" -- Break + $ "~ cp" + # lpf 1500 + # gain 0.81 +d3 $ g + $ someCyclesBy "<0!3 0.25>" (ply 2) + $ someCyclesBy 0.2 (ply 2) + $ fast "<1 <2 4>>" + $ "hh*4" + # gain 0.85 +d4 + $ slice 32 (3 + "<0 4 8 12>" + (run "<1 2>")) + -- $ "g/4" + $ "latin" + # cut 3 +d5 $ g + $ note "" + # "bassWarsaw" + # gain 0.75 + # lpf 4000 + # crush 7.5 + # cut 5 +d6 $ g + $ whenmod 8 7 (# speed 0.25) + $ loopAt 2 + $ slice 4 (run 8) + $ "breaks165" + # room 0.82 # sz 0.9 # dry 1 + # gain 0.85 diff --git a/live/midi/nova/computer_riddim.tidal b/live/midi/nova/computer_riddim.tidal index 2152bc6..1088e0e 100644 --- a/live/midi/nova/computer_riddim.tidal +++ b/live/midi/nova/computer_riddim.tidal @@ -4,8 +4,6 @@ -- Skipped: Chap 21 (Too complex, rather live synth) -- TODO: Chap 22 - From reggae to dub - - do -- region Nova Utils let gFactor = 2 @@ -19,7 +17,7 @@ let gDJF = (# djfbus 1 (range 0.05 0.95 "^49")) let gRoom = ((|+ room (range 0 0.5 "^29")) . (# dry 0.99)) let gSize = (|+ size (min 0 (range "-0.5" 0.5 "^29"))) -- let gDelay = (gDelayD . gDelayFB . (# delayt 0.25) . (# orbit 2)) -let g = (gDJF . gRoom) +let g = (gDJF . gRoom) -- TODO djf2 separate instruments let chords = "<[a5,c5,e5] [e4,g4,b4]>" let gDelay = id let gDelayD = id diff --git a/live/midi/nova/dnb/meurice.tidal b/live/midi/nova/dnb/meurice.tidal index 7340536..c1ccd97 100644 --- a/live/midi/nova/dnb/meurice.tidal +++ b/live/midi/nova/dnb/meurice.tidal @@ -10,8 +10,9 @@ let g = (gDJF) d1 $ g $ (|* gain "1!7 0.95") - $ midiOn "^41" (<| "k k k ") - $ midiOff "^41" (<| "b . ~ b ~ <~!3 b>") + $ midiOn ("^41"-"^42") (<| "k k k ") + $ midiOff ("^41"-"^42") (<| "b . ~ b ~ <~!3 b>") + $ midiOn "^42" (<| "k*2") $ "[jazz,bd:2,kick:5]" # release 0.8 # midiG' "^78" 0 1.2 @@ -42,7 +43,7 @@ d4 -- Resolute Bass $ g $ jux ((# cut 41) . (|+ crush (range 0.5 1 perlin))) $ midiOn "^57" ( -- Glitch vary end - whenmod 32 8 (slice 8 + whenmod 32 0 (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]]>" )) $ loopAt 4 @@ -90,14 +91,15 @@ d8 -- Clave de l'été pitchable # midiG' "^83" 0 1.5 d9 $ g -- CLAPS! $ midiOff "^60" (mask "") - $ midiOn "^92" (fast 4) $ "~ cp" # midiG' "^84" 0 1.5 d10 -- Nappes crushées indépendantes + $ midiOn "^92" (ply 4) $ juxBy 0.9 (# cut 101) - $ note ("") + $ note (euclid "<5 3 6>" 6 $ " >") # "moog" # cut 10 + # rel 1 # djfbus 2 (range 0.05 0.95 "^29") # crushbus 10 (range 16 1.5 "^36") # midiG' "^56" 0.2 1 diff --git a/live/midi/nova/dub/skunky.tidal b/live/midi/nova/dub/skunky.tidal new file mode 100644 index 0000000..4771aa8 --- /dev/null +++ b/live/midi/nova/dub/skunky.tidal @@ -0,0 +1,88 @@ +-- TODO WAVES :) +once $ "dr" + +do +setcps (85/60/4) +let g1 = (# djfbus 1 (range 0.05 0.95 "^49")) +let g2 = (# djfbus 2 (range 0.05 0.95 "^29")) +let harmonic = pF "harmonic" +let gate = pF "gate" +d1 + $ g1 + $ midiOn "^41" q(fast 2) -- TODO: Comment to Cooldown :') + $ superimpose ((|* gain 0.5) . (# "kick:5")) + $ midiOn "^42" (<| "k . k ") -- Jump? + $ midiOn ("^43" - "^42") (<| "k k k ]!16 ~!3 k ~!3 k k!3 ~ k!3 ~> k]>") -- RUN! + $ "jazz" + # legato 2 + # lpf 4000 + # room 0.85 + # dry 1 + # sz 0.8 + # midiG' "^78" 0 1.5 +d2 $ g1 -- Snare cloc fantome + $ whenmod 32 8 (fast 2) + -- $ fix ((# rel "<0.18!7 0.45>") . (|* gain "<0.7!7 0.5>")) ("glitch") + $ fix ((|* gain 0.8)) ("snare") + $ "~ sn" # "[808lc,cpu:8,tech:5,snare:5]" -- ,glitch:2 + # room ("<0.25!3 0.5>" + (slow 4 $ range 0 0.25 perlin)) + # dry 0.98 + # sz 0.9 + # midiG' "^79" 0 1.5 +d3 $ g2 + $ someCyclesBy 0.2 (ply 2) + $ midiOff "^44" (slow "<2!3 <1 2>>") + $ ply "2 <2!3 [2|4|8]*4>" + $ "h h h h*<1 2>" + # "hh" + # pan "<0.4 0.4 [0.4|0.6] <0.6 0.8>>" + # midiG' "^80" 0 (range 0 2 "^32") +d7 $ g2 -- BREAKBEAT <3 + $ loopAt 2 + $ midiOn "^76" (mask "t(<3<5 8>>,8) t(<1 2>, 4) t?" . iter 4 . splice 8 (run 32) . (|> "breaks165")) + $ midiOn "^44" (slice 8 (run 8)) + $ midiOff "^44" (slice 8 (run 4)) + $ "break" # n "<21!32 22!8>" + # midiG' "^80" 0 (range 0 2 "^16") + # speed (range 0 2 "^52") +d4 $ g2 + $ note "[c3(<3!3 <1 5>>,8),[~!7 < b3 b3 ~ ~ ~ b3>]] " + # "ikedaBass" + # legato 2 + # att 0.1 # rel 2 + # room "<0.25!3 0>" + # sz 0.8 + # midiG' "^81" 0 1.2 + # crushbus 41 (range 14 2 "^53") + # panbus 42 (range 0.4 0.2 saw) + # harmonic (range "-25" 25 (fast 8 saw)) + # cut 4 +d5 $ g2 + $ note " ~ ~ bf2 c3 bf2 g2@2]>" + # "bassWarsaw" + # legato 2 + # lfobus 50 (fast 4 sine) + # midiG' "^82" 0 1.5 + # crushbus 51 (range 16 3.5 "^54") + # octerbus 52 (range 0 "<0.4 0.5 0.9 1.2>" (fast "<4!3 8>" sine)) + # octersubbus 53 (range 0 8 ("^34" + 0.5 * (fast 16 cosine))) + # panbus 54 (range 0.6 0.8 saw) + # room 0.5 # sz 0.8 + # cut 5 +d6 $ g2 -- Skank organ + $ midiOn "^59" ( + superimpose (arp "" + . (|+ note "0*<2 <2 4> 4 8>")) + ) + $ note ("~ 0*<2 2 1 2> ~ 0*<2!3 <1 2>>" + + ", bf4]!2>*2" + + "[0,12]" + - 24 + ) + # "[<~!3 organTonewheel2>,organTonewheel3]" + # pan (0.7 + 0.2 * perlin) + # midiG' "^83" 0 1.3 + # sustain 0.35 + # room 0.85 + # sz 0.8 + # dry 1 diff --git a/live/midi/nova/lofi/soleil_de_sete.tidal b/live/midi/nova/lofi/soleil_de_sete.tidal index 19cc0bb..5712c5a 100644 --- a/live/midi/nova/lofi/soleil_de_sete.tidal +++ b/live/midi/nova/lofi/soleil_de_sete.tidal @@ -6,7 +6,6 @@ once $ "dr" # gain 0.9 -- TODO: -d1 $ "bd dr" do setcps (90/60/4) @@ -20,8 +19,6 @@ let gDJF1 = (# djfbus 1 (range 0.05 0.95 "^49")) let g = gDJF1 -- . gFilter let g2 = gDJF2 -- . gFilter2 d1 $ g - $ midiOn ("^44" - "^76") (ply 2) - $ midiOn "^76" (striate 4) -- $ mask "" -- First break -- $ mask "" -- Post-filter break -- $ mask "" -- Intro mask @@ -32,6 +29,8 @@ d1 $ g # att 0.1 # rel 0.8 d2 $ g -- Aerian snare + $ midiOn ("^44" - "^76") (ply 2) + $ midiOn "^76" (striate 4) -- $ mask "" -- First break -- $ mask "" -- Snare mask $ n "~ <~!3 [~!3 <10 10?>]>. 9" -- libgit2 0.27.0