Skip to content

T
Tidal
Unverified Commit b4d5d00a by PLN (Algolia)
Options

feat: Mucha techno-funk

parent 74e089ce
Showing with 443 additions and 216 deletions
live/late/romain.tidal
do
setcps 0.5
d1 $ "k k k k*<2!3 1>" # "[jazz,reverbkick]" # gain 0.75
d2 $ fast 4 $ s "~ cp*<1!3 2>" # gain 0.85
d3 $ s "drum*8"
d3
$ slow 4
$ "sax"
# note (scale "major" "<2 4 7 12>")
# gain 0.8
do
let mel = "<c4'maj c4'min e4'maj c4'maj>/4"
d1
$ s "reverbkick(<3 <5!2 7>>,8)" # gain 0.9
......
live/techno/accel.tidal
......@@ -6,10 +6,10 @@ resetCycles
-- region Part 1: setup accel vivant
do
solo 1 -- kick
unsolo 2 -- snare
unsolo 3 -- drumroll
unsolo 4 -- bass
unsolo 5 -- siren
solo 2 -- snare
solo 3 -- drumroll
solo 4 -- bass
solo 5 -- siren
solo 6 -- clap
solo 7 -- synth
-- let mKick = "<1!32 0!15 [0 1] 1!64 0.9!4 0.8!4 0.7!4 0.6!4>"
......
live/techno/funk/bogfunk.tidal 0 → 100644
do
d1 -- Kick
$ whenmod 8 6 (degradeBy "1 0.8!7")
$ "k k k <k!3 k*2>"
# "jazz" # gain 0.75
d2
$ loopAt 4
$ slice 8 ("")
$ "break" # gain 0.75
d3
$ jux rev
$ "d(<3 5 8 10>, 16)"
# "drum:8" # gain 0.65
d4 -- Bogdof
$ whenmod 48 16 (# lpf 200)
$ rarely (# n (irand 16))
$ slice 28 "14 15 16 17"
$ "bogdan:15"
# gain 0.6
# djf (slow 16 $ range 0.4 0.8 sine)
d5
$ whenmod 16 8 (# gain 0.5) "~ clap:1"
# gain 0
d6 -- Basse arpegiée
$ off "e" (|+ note "<7!28 12 7 4 0>")
$ superimpose (arp "downup" . (# crush 7))
$ "bassWarsaw"
# note ("<c3'maj d3'min d3'maj g3'maj>")
# gain 0.75
d4 -- Bassline
$ slice 8
(
"0(2,4)"
)
$ "fbass:8"
# legato 1
# gain (slow 64 $
range 0.57 0.75 sine)
live/techno/funk/funkiano.tidal 0 → 100644
-- Le naufrage : funky piano jumpy hypnotique
-- Tags: Techno, funk, piano
-- Ready: 5/10
-- Intro lead piano
do
solo 1 -- KICK!
solo 2 -- Hats rolling
solo 3 -- LEAD piano
solo 4 -- guitar riff
solo 5 -- Théorie du naufrage
solo 6 -- Glitches
setcps (110/60/4)
d1 -- KICK TODO VARIATIONS
$ superimpose ((# "glitch") . (|* gain 0.9))
$ whenmod 4 2 (fast 2)
$ every 2 (fast 2)
$ fast 2 $ "jazz"
# gain 0.6
d2
$ juxBy "<<0.2 0.8> 0.5>" (rev . (hurry 2))
$ note (stack [
"0(3,8,<0 4>)",
"4(<4!3 8>,8)"]
) # "hh" # gain 0.95
d3 -- Piano lead!
$ whenmod 128 64 (often rev)
$ whenmod 64 48 (# n "<2!7 <4 [4 2]>>")
$ whenmod 16 12
(off "e" (
(|+ note 12)
. (|* gain 0.75)
)
)
$ s "fpiano"
# n (slow 4 $ "<0 1>")
# gain (slow 32 $ range 0.5 0.65 saw)
# legato 1
# room 0.5 # sz 0.8
d4
$ whenmod 4 3 (often (striate 4))
$ slice 2 ("<0!4 1!4>")
$ "fbass:35"
# gain 0.5
# crush (slow 32 $ range 16 4 saw)
# room (slow 32 $ range 0 0.6 sine)
# sz 0.5
# cut 4
d5 -- Macron : le naufrage
$ every 4 (# waveloss 0)
$ ply "<1!4 1 1 2 1 1 2 2 1!5>"
$ whenmod 64 48 (# gain 0.9)
$ ("q" ~>)
$ slice 3 "2"
$ s "macron:8/2"
# begin "<0.1!4 0!4 0.5!3 0.8!5>"
# waveloss (slow 16 $ range 30 50 sine)
# gain 0
# cut 5
d6
$ "glitch:2(5,8)"
# note (
scale "major" "<0 2 4 12>" + (run 4)
) # gain 0.7
once $ s "fbass:35"
# gain 0.75 # cut 42
live/techno/funk/layered_breaks.tidal
......@@ -3,8 +3,6 @@
-- Ready: 4/10 (Répetitif, à équilibrer, à espacer, vocals?)
resetCycles
do
setcps 0.5
solo 1 -- Techno kick
......@@ -21,7 +19,7 @@ do
)
$ "[cpu2,jazz]"
# lpf 5000
# gain 0.6
# gain 1
d2 -- Breakbeat
$ whenmod 8 4 (juxBy 0.5 rev)
$ whenmod 32 16 (
......@@ -35,32 +33,36 @@ do
"~ 2(<<2 1> 4>,4,<0!4 2!4>)",
""]
) "break:8"
# gain ((slow 16 $ range 0.45 0.65 sine) - (slow 2 perlin * 0.2))
# gain (
1
-- (slow 16 $ range 0.45 0.65 sine)
-- - (slow 2 perlin * 0.2)
)
d3 -- Clap degressifs
$ juxBy 0.5 (0.125 ~>)
$ every' 8 7 (off "e" id) "~ cp"
# djf (slow 8 $ range 0.5 0.2 isaw)
# room 0.4 # sz 0.2 # dry 0.95
# gain 0.8
# pan 0.3
# gain 0.9
d4 -- Bassline hypnotique
-- $ slow 2 -- Cut sauf occasionnel par ralentissement
$ whenmod 64 32 (degradeBy "0.8!16 0.5!16")
-- $ whenmod 64 32 (degradeBy "0.8!16 0.5!16")
$ slice 8 (
-- run 8 -- Le classic
-- fastcat [run "<2!3 4>", run "<4!3 2>"] -- Le loop-jump
fastcat [run "<2!3 4>", run "<4!3 2>"] -- Le loop-jump
-- fastcat [run 4, run 4] -- Le loopy
"4*[8 <8!3 16>]" -- GO ON
-- "<4!3 5>*16" -- GO ON
-- "4*2 3 2*[1|2] 1? 7 6 5*<1 2 4 8> 0*<1 4 1 2>" -- reverse jumpy
-- "4*8 . 0 [<5!4 7!4> 6 <7!4 5!4>]@3" -- glitch-funk
-- every' 2 1 (iter "[1 4!2 1]") $ "0*8 1(2,3) 2 <3 5> 4*2" -- Attente vibrée
)
$ "fbass/2"
-- # crush 5 -- ELECTRONIZE
-- # crush 3 -- ELECTRONIZE
-- # n 23
# n "<23!8 7!4>"
# cut 3
# gain 0.8
# gain 1.95
d6 -- Electro-MAD piano
$ whenmod 16 12 (
off "q" ( stut 4 0.5 "e"
......@@ -72,209 +74,17 @@ do
# n (slow 4 $ "<20!4 21!2 22!2>")
-- # note (slow 2 "<-4 0>")
# room 0.6 # sz 0.5
# gain (slow 16 $ "<0.4 0.55 0.7 0.65>" * 0.8)
# gain (slow 16 $ "<0.4 0.55 0.7 0.65>" * 0.85)
d8 -- Guitare conclusive
$ mask "t(<0!4 1!4 2!4 4!4>,4,<3!16 0!16>)" $ chop 8
$ "fguitar/2" # n "<20!3 7>" # gain 0.7
# cut 8
once "fpiano"
-- region Funk samples listing
-- region Bass
0 BassA_110E-01.wav
1 BassA_110E-02.wav
2 BassA_110E-03.wav
3 BassA_110E-04.wav
4 BassA_120G-01.wav
5 BassA_120G-02.wav
6 BassA_120G-03.wav
7 BassA_120G-04.wav
8 BassA_80D-01.wav
9 BassA_80D-02.wav
10 BassA_80D-03.wav
11 BassA_80D-04.wav
12 BassA_90C-01.wav
13 BassA_90C-02.wav
14 BassA_90C-03.wav
15 BassA_90C-04.wav
16 BassB_110C-01.wav
17 BassB_110C-02.wav
18 BassB_110C-03.wav
19 BassB_110C-04.wav
20 BassB_120A-01.wav
21 BassB_120A-02.wav
22 BassB_120A-03.wav
23 BassB_120A-04.wav
24 BassB_80E-01.wav
25 BassB_80E-02.wav
26 BassB_80E-03.wav
27 BassB_80E-04.wav
28 BassB_90B-01.wav
29 BassB_90B-02.wav
30 BassB_90B-03.wav
31 BassB_90B-04.wav
32 BassC_110A-01.wav
33 BassC_110A-02.wav
34 BassC_110A-03.wav
35 BassC_110A-04.wav
36 BassC_120E-01.wav
37 BassC_120E-02.wav
38 BassC_120E-03.wav
39 BassC_120E-04.wav
40 BassC_80C-01.wav
41 BassC_80C-02.wav
42 BassC_80C-03.wav
43 BassC_80C-04.wav
44 BassC_90D-01.wav
45 BassC_90D-02.wav
46 BassC_90D-03.wav
47 BassC_90D-04.wav
48 BassD_110D-01.wav
49 BassD_110D-02.wav
50 BassD_110D-03.wav
51 BassD_110D-04.wav
52 BassD_120G-01.wav
53 BassD_120G-02.wav
54 BassD_120G-03.wav
55 BassD_120G-04.wav
56 BassD_80C-01.wav
57 BassD_80C-02.wav
58 BassD_80C-03.wav
59 BassD_80C-04.wav
60 BassD_90A-01.wav
61 BassD_90A-02.wav
62 BassD_90A-03.wav
63 BassD_90A-04.wav
-- endregion
-- region Guitar
8 GuitarA_80D-01.wav
9 GuitarA_80D-02.wav
10 GuitarA_80D-03.wav
11 GuitarA_80D-04.wav
24 GuitarB_80E-01.wav
25 GuitarB_80E-02.wav
26 GuitarB_80E-03.wav
27 GuitarB_80E-04.wav
40 GuitarC_80C-01.wav
41 GuitarC_80C-02.wav
42 GuitarC_80C-03.wav
43 GuitarC_80C-04.wav
56 GuitarD_80C-01.wav
57 GuitarD_80C-02.wav
58 GuitarD_80C-03.wav
59 GuitarD_80C-04.wav
12 GuitarA_90C-01.wav
13 GuitarA_90C-02.wav
14 GuitarA_90C-03.wav
15 GuitarA_90C-04.wav
28 GuitarB_90B-01.wav
29 GuitarB_90B-02.wav
30 GuitarB_90B-03.wav
31 GuitarB_90B-04.wav
44 GuitarC_90D-01.wav
45 GuitarC_90D-02.wav
46 GuitarC_90D-03.wav
47 GuitarC_90D-04.wav
60 GuitarD_90A-01.wav
61 GuitarD_90A-02.wav
62 GuitarD_90A-03.wav
63 GuitarD_90A-04.wav
0 GuitarA_110E-01.wav
1 GuitarA_110E-02.wav
2 GuitarA_110E-03.wav
3 GuitarA_110E-04.wav
16 GuitarB_110C-01.wav
17 GuitarB_110C-02.wav
18 GuitarB_110C-03.wav
19 GuitarB_110C-04.wav
32 GuitarC_110A-01.wav
33 GuitarC_110A-02.wav
34 GuitarC_110A-03.wav
35 GuitarC_110A-04.wav
48 GuitarD_110D-01.wav
49 GuitarD_110D-02.wav
50 GuitarD_110D-03.wav
51 GuitarD_110D-04.wav
4 GuitarA_120G-01.wav
5 GuitarA_120G-02.wav
6 GuitarA_120G-03.wav
7 GuitarA_120G-04.wav
20 GuitarB_120A-01.wav
21 GuitarB_120A-02.wav
22 GuitarB_120A-03.wav
23 GuitarB_120A-04.wav
36 GuitarC_120E-01.wav
37 GuitarC_120E-02.wav
38 GuitarC_120E-03.wav
39 GuitarC_120E-04.wav
52 GuitarD_120G-01.wav
53 GuitarD_120G-02.wav
54 GuitarD_120G-03.wav
55 GuitarD_120G-04.wav
-- endregion
-- region Guitar
-- endregion
-- region fepiano
8 EPianoB_80E-01.wav
9 EPianoB_80E-02.wav
10 EPianoB_80E-03.wav
11 EPianoB_80E-04.wav
24 EPianoC_80C-01.wav
25 EPianoC_80C-02.wav
26 EPianoC_80C-03.wav
27 EPianoC_80C-04.wav
12 EPianoB_90B-01.wav
13 EPianoB_90B-02.wav
14 EPianoB_90B-03.wav
15 EPianoB_90B-04.wav
28 EPianoC_90D-01.wav
29 EPianoC_90D-02.wav
30 EPianoC_90D-03.wav
31 EPianoC_90D-04.wav
0 EPianoB_110C-01.wav
1 EPianoB_110C-02.wav
2 EPianoB_110C-03.wav
3 EPianoB_110C-04.wav
16 EPianoC_110A-01.wav
17 EPianoC_110A-02.wav
18 EPianoC_110A-03.wav
19 EPianoC_110A-04.wav
4 EPianoB_120A-01.wav
5 EPianoB_120A-02.wav
6 EPianoB_120A-03.wav
7 EPianoB_120A-04.wav
20 EPianoC_120E-01.wav
21 EPianoC_120E-02.wav
22 EPianoC_120E-03.wav
23 EPianoC_120E-04.wav
-- endregion
-- region Piano
-- endregion
-- region
-- endregion
-- region
-- endregion
do
d1 $ fast 4 $ s "jazz"
# gain 0.7
# lpf 200
d2 $ slice 4 "2" $ "fepiano:2" # gain 0.5
d3 $ s "hh(<3!3 5>,8)"
# note "<0!3 -4>"
# gain 0.9
live/techno/funk/mad_fonk.tidal 0 → 100644
-- Mad Funk: joyeuse intro techno-funk, partant run 160bpm
-- Tags: Techno, run, funk
-- Ready: 6/10
-- Intro slow 2 beat
-- Outro masks
do
unsolo 1
solo 2 -- Snare roll/rush
solo 3
solo 4
unsolo 5
unsolo 6
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))
-- )
$ "k k k k k k k? <k [~ k] k*2>"
# "[<reverbkick!3 ~>,kick:5]"
# gain 0.65
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
# "snare:3"
# note ("<0 -1 -2 -3>")
# gain 0.65
# pan (slow 8 $ sine)
d3
-- $ slow 8 -- OUTRO
$ fast (slow 8 "<1 [2 [2|4]] 4 [4 8]>" )
$ ply "2 <4 8>" $ "drum:8"
# gain 0.9
# pan (slow 8 $ range 0.2 0.6 cosine)
d4 -- Bassline
$ slow 2
$ whenmod 16 8 (
-- region reverse cowgirl
sometimesBy "0 1" rev)
$ slice 8
(
-- run 8
-- 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>>*8" -- COME ON CRUSH
)
$ "fbass:8"
# legato 1
-- # crush "10 <10 3>"
# gain (slow 64 $
range 0.75 0.95 sine)
d5 -- Guitare pompe
$ 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"
]) $ 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 "10 6"
# cut 8
# gain (slow 64 $
range 0.7 0.9 cosine)
d6 -- Epiano groovy
$ whenmod 32 16 (whenmod 4 2 rev)
$ slow 2
$ mask "f(1,2,1)"
$ slice 8 (
"0 3 2 1 4 5 6 7*<1 2>"
)
$ s "fepiano"
# n (slow 4 "<24 25>")
# gain 0.75
# cut 6
9 -- ritournelle
10 -- pause fin
11 -- montee finale?
once $ s "fepiano:24" # gain 0.95 # cut 19
notes.md
......@@ -66,7 +66,7 @@
-- 13 DNB Poum tchak poum tchakpoum poum tchak!
--- METHBASS
-- 0 grille pain bruitée
-- 0 grille pain bruité
-- 1 B B . B BB B B (toudoudou background)
-- 2 Metal boum remonte
-- 3 Comete longue metallique noisy
......@@ -261,3 +261,196 @@ m11s m11sharp m13m6 m6by9 m7f5 m7f9 m7flat5 m7flat9 m7s5 m7s9 m7sharp5 m7sharp5f
m9s5 m9sharp5 maj maj11 maj7 maj9 major major7 min min7 minor minor7 msharp5 nine nineSharp5
nineSus4 ninesus4 one plus sevenFlat10 sevenFlat5 sevenFlat9 sevenSharp5 sevenSharp5flat9 sevenSus2
sevenSus4 sharp5 six sixby9 sus2 sus4 thirteen
# Funk SAMPLES
<!-- region Funk samples listing
<!-- region Bass
0 BassA_110E-01.wav
1 BassA_110E-02.wav
2 BassA_110E-03.wav
3 BassA_110E-04.wav
4 BassA_120G-01.wav
5 BassA_120G-02.wav
6 BassA_120G-03.wav
7 BassA_120G-04.wav
8 BassA_80D-01.wav
9 BassA_80D-02.wav
10 BassA_80D-03.wav
11 BassA_80D-04.wav
12 BassA_90C-01.wav
13 BassA_90C-02.wav
14 BassA_90C-03.wav
15 BassA_90C-04.wav
16 BassB_110C-01.wav
17 BassB_110C-02.wav
18 BassB_110C-03.wav
19 BassB_110C-04.wav
20 BassB_120A-01.wav
21 BassB_120A-02.wav
22 BassB_120A-03.wav
23 BassB_120A-04.wav
24 BassB_80E-01.wav
25 BassB_80E-02.wav
26 BassB_80E-03.wav
27 BassB_80E-04.wav
28 BassB_90B-01.wav
29 BassB_90B-02.wav
30 BassB_90B-03.wav
31 BassB_90B-04.wav
32 BassC_110A-01.wav
33 BassC_110A-02.wav
34 BassC_110A-03.wav
35 BassC_110A-04.wav
36 BassC_120E-01.wav
37 BassC_120E-02.wav
38 BassC_120E-03.wav
39 BassC_120E-04.wav
40 BassC_80C-01.wav
41 BassC_80C-02.wav
42 BassC_80C-03.wav
43 BassC_80C-04.wav
44 BassC_90D-01.wav
45 BassC_90D-02.wav
46 BassC_90D-03.wav
47 BassC_90D-04.wav
48 BassD_110D-01.wav
49 BassD_110D-02.wav
50 BassD_110D-03.wav
51 BassD_110D-04.wav
52 BassD_120G-01.wav
53 BassD_120G-02.wav
54 BassD_120G-03.wav
55 BassD_120G-04.wav
56 BassD_80C-01.wav
57 BassD_80C-02.wav
58 BassD_80C-03.wav
59 BassD_80C-04.wav
60 BassD_90A-01.wav
61 BassD_90A-02.wav
62 BassD_90A-03.wav
63 BassD_90A-04.wav
endregion -->
<!-- region Guitar
8 GuitarA_80D-01.wav
9 GuitarA_80D-02.wav
10 GuitarA_80D-03.wav
11 GuitarA_80D-04.wav
24 GuitarB_80E-01.wav
25 GuitarB_80E-02.wav
26 GuitarB_80E-03.wav
27 GuitarB_80E-04.wav
40 GuitarC_80C-01.wav
41 GuitarC_80C-02.wav
42 GuitarC_80C-03.wav
43 GuitarC_80C-04.wav
56 GuitarD_80C-01.wav
57 GuitarD_80C-02.wav
58 GuitarD_80C-03.wav
59 GuitarD_80C-04.wav
12 GuitarA_90C-01.wav
13 GuitarA_90C-02.wav
14 GuitarA_90C-03.wav
15 GuitarA_90C-04.wav
28 GuitarB_90B-01.wav
29 GuitarB_90B-02.wav
30 GuitarB_90B-03.wav
31 GuitarB_90B-04.wav
44 GuitarC_90D-01.wav
45 GuitarC_90D-02.wav
46 GuitarC_90D-03.wav
47 GuitarC_90D-04.wav
60 GuitarD_90A-01.wav
61 GuitarD_90A-02.wav
62 GuitarD_90A-03.wav
63 GuitarD_90A-04.wav
0 GuitarA_110E-01.wav
1 GuitarA_110E-02.wav
2 GuitarA_110E-03.wav
3 GuitarA_110E-04.wav
16 GuitarB_110C-01.wav
17 GuitarB_110C-02.wav
18 GuitarB_110C-03.wav
19 GuitarB_110C-04.wav
32 GuitarC_110A-01.wav
33 GuitarC_110A-02.wav
34 GuitarC_110A-03.wav
35 GuitarC_110A-04.wav
48 GuitarD_110D-01.wav
49 GuitarD_110D-02.wav
50 GuitarD_110D-03.wav
51 GuitarD_110D-04.wav
4 GuitarA_120G-01.wav
5 GuitarA_120G-02.wav
6 GuitarA_120G-03.wav
7 GuitarA_120G-04.wav
20 GuitarB_120A-01.wav
21 GuitarB_120A-02.wav
22 GuitarB_120A-03.wav
23 GuitarB_120A-04.wav
36 GuitarC_120E-01.wav
37 GuitarC_120E-02.wav
38 GuitarC_120E-03.wav
39 GuitarC_120E-04.wav
52 GuitarD_120G-01.wav
53 GuitarD_120G-02.wav
54 GuitarD_120G-03.wav
55 GuitarD_120G-04.wav
endregion
region Guitar
endregion
region fepiano
8 EPianoB_80E-01.wav
9 EPianoB_80E-02.wav
10 EPianoB_80E-03.wav
11 EPianoB_80E-04.wav
24 EPianoC_80C-01.wav
25 EPianoC_80C-02.wav
26 EPianoC_80C-03.wav
27 EPianoC_80C-04.wav
12 EPianoB_90B-01.wav
13 EPianoB_90B-02.wav
14 EPianoB_90B-03.wav
15 EPianoB_90B-04.wav
28 EPianoC_90D-01.wav
29 EPianoC_90D-02.wav
30 EPianoC_90D-03.wav
31 EPianoC_90D-04.wav
0 EPianoB_110C-01.wav
1 EPianoB_110C-02.wav
2 EPianoB_110C-03.wav
3 EPianoB_110C-04.wav
16 EPianoC_110A-01.wav
17 EPianoC_110A-02.wav
18 EPianoC_110A-03.wav
19 EPianoC_110A-04.wav
4 EPianoB_120A-01.wav
5 EPianoB_120A-02.wav
6 EPianoB_120A-03.wav
7 EPianoB_120A-04.wav
20 EPianoC_120E-01.wav
21 EPianoC_120E-02.wav
22 EPianoC_120E-03.wav
23 EPianoC_120E-04.wav
endregion
region Piano
endregion
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment