diff --git a/live/bdmania.tidal b/live/bdmania.tidal index 09c5494..f6d3e52 100644 --- a/live/bdmania.tidal +++ b/live/bdmania.tidal @@ -1,3 +1,4 @@ + once $ s "bd" d1 -- kick @@ -14,10 +15,6 @@ $ s "bd(5,8)" # note "<50 <55 <60 65>>>" d3 -- vibration montante! -$ every' 16 12 (# gain 0) -$ every' 16 13 (# gain 0) -$ every' 16 14 (# gain 0) -$ every' 16 15 (# gain (0.5 + saw / 2)) $ sometimesBy 0.01 (# crush 4) $ every 4 (rev) $ sound "bd" @@ -26,7 +23,7 @@ $ sound "bd" segment 100 $ range 1 3 saw ) -# gain 0.5 +# gain 0.65 d8 -- helico $ every' 4 3 (off 0.125 id) diff --git a/live/techno/accel.tidal b/live/techno/accel.tidal index 3ce2c8b..71bd52f 100644 --- a/live/techno/accel.tidal +++ b/live/techno/accel.tidal @@ -9,9 +9,9 @@ do solo 2 -- snare solo 3 -- drumroll solo 4 -- bass - solo 5 -- siren - solo 6 -- clap - solo 7 -- synth + unsolo 5 -- siren + unsolo 6 -- clap + unsolo 7 -- synth -- let mKick = "<1!32 0!15 [0 1] 1!64 0.9!4 0.8!4 0.7!4 0.6!4>" let gKick = 0.75 -- /128 On off semi-onon fadeout let gSnare = 0.65 diff --git a/live/techno/funk/funk_n_bass.tidal b/live/techno/funk/funk_n_bass.tidal new file mode 100644 index 0000000..a689125 --- /dev/null +++ b/live/techno/funk/funk_n_bass.tidal @@ -0,0 +1,99 @@ +resetCycles + +do + -- let fGlob = 0.3 -- TODO: Filtre global FIXME: if defined? + let mKick = "" + let mKick = "t" + let mDrum = "" + let mRoll = "" + let mBass = "t" + let mPiano = "t f" + solo 1 -- Kick DNB/TECHNO + solo 2 -- Drums DNB-compatibles + solo 3 -- Drumroll masqué + solo 4 -- Basse électrique + unsolo 5 -- Piano FIXME Too noisy + unsolo 6 -- Comete + unsolo 8 -- Un bon sandwich + setcps (174/60/4) + d1 -- Kick + $ mask mKick + -- region TECHNOOO + -- $ fast 2 + $ whenmod 16 12 (slow 2) + $ "k k k " + # "[kick:5,house]" + -- region DNB + -- $ "k ~ ~ ~ ~ k ~ ~" + -- # "kick" # note "-6" + # gain 0.75 + -- # djf fGlob + d2 + $ mask mDrum + $ "~ s*<1!6 2 [4 2]> . ~ s*<1!3 2 1!2 2!2 3 2 4>" + # "snare" + # n "[11,12]" # note ( + "<0 0 -2!2 -4 -6 -7 -12>" -- snare aggrave + ) + # gain 0.7 + -- # djf fGlob + d3 -- Drumroll masqué + $ mask mRoll + $ fast "8 . <8 8 4 16>" + $ "drum:8" + # gain (slow 8 $ range 0.8 0.95 saw) + -- # djf fGlob + d4 -- Bass electrisée + $ mask mBass + $ whenmod 64 32 (slow 2) + $ off "q" (|+ note 12) + $ whenmod 32 16 rev + $ slice 8 ( + run 8 -- classique + -- (fast 2 $ run 4) -- loop begin + -- "0*2 1*2" + ) + $ "fbass:10" + # gain (slow 16 $ range 0.9 0.8 sine) + -- # crush (slow 16 $ range 9 4 sine) -- TODO Crush + # cut 4 + -- # djf fGlob + d8 -- Sandwich + $ slice 6 ( + "2*<0 <2 1>>" + ) + $ "macron:7" + # waveloss 25 + # cut 5 + # gain 0.7 + # room 0.6 + -- # djf fGlob + d5 + $ whenmod 16 8 (slow 2) + $ slice 8 ( + cat [ + run 8, + "[0,2*8]", -- attente noisée + 7 - run 8, -- rev + "" + ] + ) + $ "fpiano:12" + # pan 1 + # cut 5 + -- # djf fGlob + # gain 0.85 + d6 -- Comete + $ slice 8 "1!7 4" + $ s "methbass:3" # cut 6 + # gain 0.55 + -- # djf fGlob + + +-- region Nass n Bassline +d1 $ "jazz*2" # gain 0.8 + +d3 + $ chop 8 + $ note ("") + # s "trump" # speed (1/12) diff --git a/live/techno/funk/grace.tidal b/live/techno/funk/grace.tidal new file mode 100644 index 0000000..b9476d0 --- /dev/null +++ b/live/techno/funk/grace.tidal @@ -0,0 +1,59 @@ +-- region Touchés par la grace: techno-gospel +-- Tags: Techno, gospel, funk +-- Ready: 6/10 +resetCycles +-- endregion + +do + solo 1 -- Kick chaloupe + solo 3 -- AcceleRoll + solo 4 -- HH + solo 5 -- Lead choir + solo 7 -- Claps + unsolo 8 -- Bourrasque FIXME REWORK + unsolo 9 -- Glitchs FIXME REWORK + setcps (120/60/4) + d1 -- Kick regulier degradé + -- $ whenmod 16 12 (mask "t(1,4)") + $ whenmod 8 6 (# lpf 200) + -- $ sometimesBy "<0!2 0.25 [0.25 0.5]>" (fast 2 . degradeBy 0.2) + $ "k k k " + # "[kick:5,house]" + # note 2 + # gain 0.55 + d7 + $ jux (# lpf 2000) + $ note "<-4!3 -8>" # "clap" + # hpf 2000 + # gain 0.9 + d3 + $ fast "<4!4 8!2 16 [32 4]>" + $ "drum:8" + # pan (slow 16 $ range 0.9 0.4 cosine) + # gain (slow 8 $ range 0.8 0.95 sine) + d4 + $ jux (rev . (hurry "<2!3 0.5>")) + $ degradeBy "0 <0.5!6 0.25!2>!7" $ "ho:1*4 hc:3*4" + # note ("<0!<3 2> -4 -8 <[-8 -4] -12>>") + # room 0.2 # sz 0.4 + # pan (slow 16 $ range 0.8 0.4 sine) + # gain (slow 8 $ range 0.6 0.45 sine) + d5 -- Chopped choir + $ slice 16 "<2!4 1!4>" + -- $ chop "<2!16 4!4 8!8>" FIXME Better chop? + $ every' 4 3 (superimpose (# n 1) . (# begin 0)) + $ "pray" + # cut 3 + # pan "0.3 0.7" + # gain 0.65 + # begin "<0.1 0.5>" + d8 -- bourrasque + $ jux rev + $ every 8 (# gain 0.7) + $ s "space:3" + # speed 0.25 + # gain 0.35 + d9 -- Glitches space cowboy + $ juxBy 0.9 (# waveloss 25) + $ whenmod 8 4 (iter 4) + $ n "7 2*<1 2 4>" # "cosmicg" # gain 0.35 diff --git a/live/techno/funk/mad_fonk.tidal b/live/techno/funk/mad_fonk.tidal index 81f0a4f..9b3b32d 100644 --- a/live/techno/funk/mad_fonk.tidal +++ b/live/techno/funk/mad_fonk.tidal @@ -1,48 +1,51 @@ --- Mad Funk: joyeuse intro techno-funk, partant run 160bpm --- Tags: Techno, run, funk --- Ready: 6/10 +-- region Mad Funk: joyeuse intro techno-funk, partant run 160bpm +-- Tags: Techno, run, funk, crushade +-- Ready: 8/10 -- Intro slow 2 beat -- Outro masks resetCycles +-- endregion do - unsolo 1 -- Kick - unsolo 2 -- Snare roll/rush + solo 1 -- Kick + solo 2 -- Snare roll/rush unsolo 3 -- Drumroll - unsolo 4 -- Bassline - solo 5 -- Guitare intro/pompe + solo 4 -- Bassline + unsolo 5 -- Guitare intro/pompe unsolo 6 -- Epiano groovy setcps (80/60/4) d1 -- $ mask "t(1,8)" $ every' 8 7 (# lpf 200) - -- Pauses Hip-hop - $ whenmod 8 6 (juxBy 0.5 rev) - $ "k*2 . k(<3!3 <5 8>>,8)" - -- INTRO/Run - -- $ slow 2 -- intro - -- $ whenmod 8 6 (# silence) - -- $ whenmod 16 8 ( -- HARDKICK! - -- superimpose ((# "hardkick:4") . (|* gain 0.75)) + -- region Pauses Hip-hop + -- $ whenmod 8 6 (juxBy 0.5 rev) + -- $ "k*<1!4 2!4> . k(<3!3 <5 8>>,8)" + -- region hardkick + -- $ whenmod 16 0 ( -- HARDKICK! + -- superimpose ((# "hardkick:4")) . (|* gain 0.75) -- ) - -- $ "k k k k k k k? " + -- region INTRO/Run + -- $ slow 2 -- intro + $ whenmod 8 6 (# silence) + $ "k k k k k k k? " # "[,kick:5]" # gain 0.75 + # pan 0.45 d2 $ someCycles (hurry 2) $ jux rev -- region Manual snare rush -- $ "~ s*4" - $ "~ s*<1!4 2!4 4!2 8 2 4!4 16 2!3 [4 8] [16 32]>" -- TODO Rework + $ "~ s*<1!4 2!4 4!2 8 2 4!4 16 2!3 [4 8] [16 32]>" -- FIXME Rework # "snare:3" # note ("<0 -1 -2 -3>") # gain 0.65 # pan (slow 8 $ sine) - d3 + d3 -- Drumroll -- $ slow 8 -- OUTRO $ fast (slow 8 "<1 [2 [2|4]] 4 [4 8]>" ) $ ply "2 <4 8>" $ "drum:8" - # gain 0.9 + # gain (slow 4 $ range 0.65 0.95 saw) # pan (slow 8 $ range 0.2 0.6 cosine) d4 -- Bassline $ juxBy 0.5 id @@ -52,55 +55,62 @@ do sometimesBy "0 1" rev) $ slice 8 ( - -- run 8 + run 8 -- Classique: jumpy groovy -- iter (slow 4 "<1 4>") $ - -- "<0!3 1>*2 3*2 <0 1> 4*<2 4 8>" - "<0 4 0 0*2> 4 <0 1 2 3> <0 4!2>" + -- "<0!3 1>*2 3*2 <0 1> 4*<2 4 8>" -- Jumpy rappel + -- "<0 4 0 0*2> 4 <0 1 2 3> <0 4!2>" -- Attente -- "<0!3 <1 2>>*8" -- COME ON CRUSH ) $ "fbass:8" # legato 1 - -- # crush "6 <5 4>" - # gain (slow 64 $ - range 0.75 0.95 sine) + -- # crush (0 + "6 <5 4>") TODO CRUSH THIS + # gain (slow 64 $ range 0.6 0.8 sine) + # pan 0.6 d5 -- Guitare pompe - $ whenmod 64 32 ( - sometimesBy "<0.5!16 0.9!16>" rev - ) + -- $ whenmod 64 32 ( + -- sometimesBy "<0.5!16 0.9!16>" rev + -- ) -- region Guitare pompe $ slice 8 (cat [ "0*4", "0 1 2 3", "0*4 1 3(3,8) 5", - "4 5 6 7" + "4 5 6 7", + "0 7 ~ 7", + "0*4", + "7 <7 6> <3 5> <7 4>", + "4*4 . 4*<8 16>", + "7 0 7 0", + "0*4" ]) $ n 9 -- region INTRO-guitar -- $ slice 8 ( -- Intro -- "0(<1 4>,<1 4 8>) . [1*<1 2 4>, 3(<1 3 5>,8)]" -- ) $ n 11 # "fguitar" - -- # crush "6 5" -- TODO CRUSH THIS! + -- # crush "8 4" -- TODO CRUSH THIS! # cut 8 # gain (slow 64 $ range 0.7 0.9 cosine) + # pan 0.3 d6 -- Epiano groovy $ whenmod 32 16 (whenmod 4 2 rev) $ slow 2 - $ mask "f(1,2,1)" -- TODO INTRO MASK THIS + -- $ mask "f(<1!16 2!16>,2,<1!4 0!4>)" -- TODO INTRO MASK THIS $ slice 8 ( - -- "0 3 2 1!5" -- repeat aigu - "0 3 2 1 4 5 6 7*<1 2>" -- regulier - -- "4!5 5 6 7*<1 2>" -- regulier + -- "0 3 2 1 4 5 6 7*<1 2>" -- regulier + "0 3 2 1!5" -- repeat aigu + -- "4!5 5 6 7*<1 2>" -- repeat end ) $ s "fepiano" # n (slow 4 "<24 25>") - # gain 0.75 + # gain 0.7 # cut 6 - + # pan 0.7 9 -- ritournelle 10 -- pause fin 11 -- montee finale? -once $ s "fepiano:24" # gain 0.95 # cut 19 +once $ s "fepiano:0" # gain 0.95 # cut 19 diff --git a/live/techno/funk/pray.tidal b/live/techno/funk/pray.tidal index 7f6db06..15c71ed 100644 --- a/live/techno/funk/pray.tidal +++ b/live/techno/funk/pray.tidal @@ -1,63 +1,72 @@ - +-- Pray the Funk: choeurs laudatifs +-- Tags: Breakbeat, gospel, funk +-- Ready: 6/10 do -solo 1 -- Kick chaloupe -solo 2 -- Gretsch snares -solo 3 -- AcceleRoll -solo 4 -- Breakbeat -solo 5 -- Lead choir -solo 6 -- Bassline FIXME Rework -solo 7 -- Claps -setcps (60/60/4) -d1 - -- KICK - $ fast 2 $ "k*<1!4 2!4> . k(<1 3 5 5>,8,<0!3 2>)" # "reverbkick" - # gain (slow 16 $ range 0.6 0.8 isaw) -d4 - $ slice 8 ( - -- (fast "<4 8>" $ run 2) -- Repeat! - -- run 8 -- Fulltime! - -- "0 <1 1(<3 5>,8,<0 4>)> 2 3(<3 5>,8)" - "4 5 6 7" - ) - $ loopAt 1 - $ "break:1" - # gain (slow 16 $ range 0.65 0.9 saw) - # cut 4 -d2 -- Snares gretscha - $ someCycles ( - (whenmod 16 8 (# lpf (slow 8 $ range 15000 1000 saw))) - . hurry 2 - . (|* gain 0.9) - ) - $ fast 2 - $ n ("6(<4 <3 5>>,8)") - # "gretsch" # gain (slow 16 $ range 0.6 0.8 saw) -d3 - $ someCycles (fast "1 . 2 4") - $ "gretsch*<8!3 [16 . [16 | 32]]>" # n "[4|5]" # gain 0.75 -d5 -- Lead choir - $ "pray/4" - # n "<0!4 1!8>" - # gain (slow 8 $ range 0.5 0.9 sine) - # cut 5 - # hpf 100 -d7 - $ fast 2 - $ whenmod 4 3 (ply "<2 3 [2 4] [3 2]>") - $ every' 4 0 (off "-0.125" id) - $ s "clap" - # gain 0.85 - # djf (slow 32 $ sine) - # room 0.5 # size 0.4 # dry 0.95 -d6 -- Bassline (FIXME improve sonorite/variations) - $ superimpose ( - arp "" . (# octave 6) + solo 1 -- Kick chaloupe + solo 2 -- Gretsch snares + solo 3 -- AcceleRoll + solo 4 -- Breakbeat + unsolo 5 -- Lead choir + unsolo 6 -- Bassline FIXME Rework + unsolo 7 -- Claps + setcps (60/60/4) + d1 + -- KICK + $ fast 2 $ "k*<1!8 2!8> . k(<0 1 0 1 3 5 5 8>,8,<0!3 2>)" + # "reverbkick" + # lpf 1500 + # gain 0.65 + d4 -- BREAKBEAT + $ slice 8 ( + -- "0 4" -- Intro + -- "0 2 4 <4 <2 6>>" -- Intro + -- run 8 -- Fulltime! + (fast "<4 8>" $ run 2) -- Repeat! TODO Transition grace + -- "0 <1 1(<3 5>,8,<0 4>)> 2 3(<3 5>,8)" -- Laggy + -- "4 5 6 7" + ) + $ loopAt 1 + $ "break:1" + # gain (slow 16 $ range 0.65 0.85 saw) + # cut 4 + d2 -- Snares gretscha + $ someCycles ( + (whenmod 16 8 (# lpf (slow 8 $ range 15000 1000 saw))) + . hurry 2 . (|* gain 0.9) ) - $ note ( - ("[a2 >]!2") + "[0,4,7]" - ) - # "bassWarsaw" - # pan 0.4 - # gain 0.9 + $ fast 2 + $ n ("6(<4 <3 5>>,8)") + # "gretsch" # gain (slow 16 $ range 0.6 0.8 saw) + d3 + $ someCycles (fast "1 . 2 4") + $ "gretsch*<8!3 [16 . [16 | 32]]>" # n "[4|5]" + # note ("<-2 -4 -2 0>") + # gain 0.75 + d5 -- Lead choir + $ "pray/4" + # n "<0!4 1!8>" + # gain (slow 8 $ range 0.5 0.9 sine) + # cut 5 + # hpf 100 + d7 + $ fast 2 + $ whenmod 32 16 (whenmod 4 3 (ply "<2 3 [2 4] [3 2]>")) + $ whenmod 16 8 (every' 4 0 (off "-0.125" id)) + $ s "clap" + # gain 0.85 + # djf (slow 32 $ range 0.5 0.85 sine) + # room 0.5 # size 0.4 # dry 0.95 + + d6 -- Bassline (FIXME improve sonorite/variations) + $ superimpose ( + arp "" . (# octave 6) + . (|* gain 0.9) + ) + $ note ( + ("[a2 >]!2") + "[0,4,7]" + ) + # "bassWarsaw" + # pan 0.4 + # gain 0.9 diff --git a/notes.md b/notes.md index 693a04b..d70925a 100644 --- a/notes.md +++ b/notes.md @@ -266,6 +266,28 @@ sevenSus4 sharp5 six sixby9 sus2 sus4 thirteen