From 84762b17800347cbf4e7e8a2add557607a4051e7 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Sun, 19 Jan 2020 21:44:21 +0100 Subject: [PATCH] feat: Bogdan session --- blocks/voice.tidal | 17 +++++++++++++++++ hello.tidal | 46 ++++++++++++++++++++++++++++++++++++++-------- jazzy.tidal | 2 -- live/bodgan2.tidal | 29 +++++++++++++++++++++++++++++ live/bogdan.tidal | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ live/friday.tidal | 2 ++ live/hiphop.tidal | 6 ++++++ live/pianotrap.tidal | 48 ++++++++++++++++++++++++++++++++++++++++++++++++ live/seb.tidal | 3 ++- live/val.tidal | 25 +++++++++++++++++++++++++ output/Bogdanerie.mp3 | Bin 0 -> 7338191 bytes samples.txt | 2 ++ 12 files changed, 218 insertions(+), 11 deletions(-) create mode 100644 live/bodgan2.tidal create mode 100644 live/bogdan.tidal create mode 100644 live/hiphop.tidal create mode 100644 live/pianotrap.tidal create mode 100644 live/val.tidal create mode 100644 output/Bogdanerie.mp3 diff --git a/blocks/voice.tidal b/blocks/voice.tidal index b15eec5..c0703dd 100644 --- a/blocks/voice.tidal +++ b/blocks/voice.tidal @@ -1,3 +1,20 @@ d1 $ n "8 13 3 4 15 4 13 19" # s "alphabet*8" + +-- Weird singing vocals +d2 +$ whenmod 128 64 (# silence) +$ whenmod 128 48 (hurry "<2 1> <0.5 1 2>") +$ whenmod 32 16 (# release sine) +$ whenmod 32 18 (# gain 0.6) +$ whenmod 32 20 (# gain 0.4) +$ whenmod 32 16 (# gain 0.7) +$ sometimes (# gain (sine - 0.3)) +$ chunk 4 (off 0.625 (|+ 0)) +$ chop 4 +$ s "moan" +# note "[4,8]" +# note "<[0,7] [4,8] [0,9] [<0 4>]>" +-- # note "<0 4>" +-- # note "0 2 4 7 [0,12]" diff --git a/hello.tidal b/hello.tidal index 6339652..d382c63 100644 --- a/hello.tidal +++ b/hello.tidal @@ -104,7 +104,7 @@ -- 12: tok métal etouffé -- glitch --- 0 noisekick sec +-- 0 noise kick sec -- 1 portail qui s'ouvre -- 2 static doux -- 3 static+bip d'oiseau @@ -114,15 +114,45 @@ -- 7 bass drum + static -- 8 tom sec +-- Kicks + +-- popkick +--- 0 sec bruité +--- 1 sec rond métal +--- 2 sec rond +--- 3 sec bruité ulgab +--- 4 sec explosion +--- 5 même avec toy final +--- 6 sec bruité toc +--- 7 rond tuyau +--- 8 aigu souris +--- 9 tuyau sable + +-- clubkick +--- 0 sec métal +--- 1 un peu plus long +--- 2 sec plus grave? +--- 3 sec plus grave? +--- 4 sec plus aigu? + +-- hardkick: +--- 0 bruité +--- 1 +--- 2 +--- 3 +--- 4 +--- 5 +--- 6 +--- 7 +--- 8 +--- 9 + -- Piano notes: --- do -14 -7 0 07 14 21 --- re -13 -6 1 08 15 --- mi -12 -5 2 09 16 --- fa -11 -4 3 10 17 --- sol -10 -3 4 11 18 --- la -09 -2 5 12 19 --- si -08 -1 13 20 + +-- Gammes +-- "0 2 4 5 7 9 11 12" Pentatonique +-- "0 2 3 4 5 6 7 9 10 11 12" -- Blues -- Playground setcps 0.1 diff --git a/jazzy.tidal b/jazzy.tidal index 017c517..a5e391d 100644 --- a/jazzy.tidal +++ b/jazzy.tidal @@ -10,8 +10,6 @@ d1 $ n "" ) # s "superpiano" -d1 $ n "0 2 4 5 7 9 11 12" -- gamme pentatonique -d1 $ n "0 2 3 4 5 6 7 9 10 11 12" -- gamme du blues d1 $ n "[0 3 5 7 12]*2" # s "superpiano" diff --git a/live/bodgan2.tidal b/live/bodgan2.tidal new file mode 100644 index 0000000..51ebb68 --- /dev/null +++ b/live/bodgan2.tidal @@ -0,0 +1,29 @@ +d1 $ s "dr(2,4)" + +d1 $ s "bogdan" + +d2 +$ somecycles (slow 2) +$ s "bogdan:7(1,4,1)" + +d1 +$ whenmod 8 4 (off 0.125 (|+ 0)) +$ s "bogdan(<<1 2> 4>, 2)" +# gain 1.5 + +d2 +$ whenmod 16 8 (# silence) +$ s "hh(<2 4>,4) ~ hh <~ hh>" +# s "bogdan:1" + +d3 +$ fast 2 +$ degradeBy 0.3 +$ superimpose (off (choose [0.25, 0.5]) (|+ 0)) +$ s "bogdan:2" +# note (scale "dorian" (irand 7)) +# gain 0.8 + +d4 +$ s "bogdan(<<1 2> <2 1>>, 4)" +# n "<4 <6 <9 13>>>" diff --git a/live/bogdan.tidal b/live/bogdan.tidal new file mode 100644 index 0000000..5bae8eb --- /dev/null +++ b/live/bogdan.tidal @@ -0,0 +1,49 @@ +-- Bogdanerie (omondi) +unsolo 3 + +d1 $ s "reverbkick(<2 <4 8>>,4):1" +# gain 0.8 +# pan (0.5 + sine / 2) + +d4 -- omondi nigga! +$ whenmod 4 2 (rev . chop 2) +$ somecyclesBy 0.8 (fast 1.5) $ somecycles (slow 2) +$ s "bogdan:12(<1 2>,2)" # cut 2 +# note "0" +# gain 0.8 + +d2 +$ every 4 (fast 2) +$ s "<[dr*2 [~ dr?]] dr*4> hh*2" # pan 1 +# gain 0.8 + +d3 -- piano lead +$ off 0 (|- 7) +$ off 0 (|+ 12) +$ s "~ superpiano superpiano ~" +# scale "major" ( + choose [-7,0,7] + ) +# velocity 0.6 +# sustain "0.3 1 1" + +d5 -- motherfuck +$ whenmod 64 23 (# gain 0) +$ loopAt 0.35 +$ s "bogdan:11(1,4,1)" +# pan (slow 4 $ sine) +# gain 0.8 + +d6 -- cheeky bastard +$ whenmod 8 4 (# crush 5) +$ whenmod 32 16 (# gain sine) +$ s "bogdan:7(<1 <1 2>>,4)" +# gain 0 + +d4 +$ s "arpy:0" +# note 20 + +d2 $ s "supermandolin(<3 5>,8)" +# note (scale "major" "[0,2,4]" + (irand 6)) +-- # gain 0.9 diff --git a/live/friday.tidal b/live/friday.tidal index 19c1c7c..7bd5997 100644 --- a/live/friday.tidal +++ b/live/friday.tidal @@ -20,6 +20,8 @@ $ s "[hh?*4] <~ hh*2>" # note "<3 0> <0 3>" # gain 0.5 +unsolo 2 + d3 $ whenmod 32 28 (# silence) $ whenmod 32 27 (# release 1) diff --git a/live/hiphop.tidal b/live/hiphop.tidal new file mode 100644 index 0000000..23e7b26 --- /dev/null +++ b/live/hiphop.tidal @@ -0,0 +1,6 @@ +setcps 0.5 + +d1 +$ whenmod 32 28 (# silence) +$ whenmod 16 8 (# gain (0.35 + sine)) +$ s "dr dr? ? dr dr dr? dr*2 dr" diff --git a/live/pianotrap.tidal b/live/pianotrap.tidal new file mode 100644 index 0000000..ee155b9 --- /dev/null +++ b/live/pianotrap.tidal @@ -0,0 +1,48 @@ +setcps 0.5 + +d1 +$ whenmod 32 28 (# silence) +$ whenmod 16 8 (# gain (0.35 + sine)) +$ s "dr dr? ? dr dr dr? dr*2 dr" + + +d3 +$ whenmod 128 80 (degrade) +$ whenmod 128 64 (# speed 0.5) +$ whenmod 32 30 (degradeBy 0.8) +$ whenmod 32 28 (# note 12) +$ whenmod 32 24 (# note 19) +$ almostNever (off (4/8) (+ 7)) +$ sometimes (off (1/16) (|+ 12)) +$ sometimes (off (0) (|- 12)) +$ chunk 2 (0.125 ~>) +$ s "[[hh?,hh] hh?]*8" +# s "superpiano" +# pan (0.2 + rand / 2) +# sustain (0.5 + rand / 2) +# velocity cosine +# note (wchoose [ +-- do re mi fa sol la si + (12, 1), (14, 1), (19, 1), + (0, 2), (2, 2), (7, 2), + (-12, 4), (-10, 2), (-7, 1), (-5, 3) +]) + + +d3 $ s "superpiano*8" +# note (scale "aeolian" "0 2 <4 7>") + +d1 +$ s "nass:0" # cut 1 + +d4 +$ whenmod 32 28 (# gain cosine) +$ degradeBy 0.3 +$ off (1/16) (|+ 2) +$ off (1/8) (|+ 0) +$ s "bass3*4" +# note "<[0 5 0 0] [5 5 0 0] [7 5 0 7] [0 5 0 7]>" + +d5 +$ sometimes (# s "hh,cp") +$ s "cp*<2 <2 <2 4>>>" diff --git a/live/seb.tidal b/live/seb.tidal index 508df6f..9d965a7 100644 --- a/live/seb.tidal +++ b/live/seb.tidal @@ -1,3 +1,5 @@ +setcps 1 + d1 $ sometimes (off 0.125 (|+ 0)) $ s "clubkick(<<1 2> 4>,4)" @@ -32,5 +34,4 @@ $ s "bass3(<2 4>, 4)" # note "2 2 2 2 2 2 2 4" # gain 0.7 - # note "0 2 4 5 7 9 11 12" -- gamme pentatonique diff --git a/live/val.tidal b/live/val.tidal new file mode 100644 index 0000000..8a4c6ad --- /dev/null +++ b/live/val.tidal @@ -0,0 +1,25 @@ +setcps 0.6 + +d2 $ s "supermandolin(<3 5>,8)" +# note (scale "major" "[0,2,4]" + (irand 6)) +-- # gain 0.9 + +let a = "maj" + +d2 $ +superimpose (rev . (slow 2) . (|-| note 24)) $ +somecyclesBy 0.8 (fast 2) $ somecycles (slow 2) $ +s "superpiano" # note (scale a (irand 12)) +# velocity (0.5 + rand / 2) +# sustain sine + +d1 +$ somecyclesBy 0.8 (fast 4) +$ somecyclesBy 0.1 (fast 8) +$ somecycles (slow 2) +$ s "dr" + + +d3 +$ off 0.125 (# gain 0.7) +$ s "cp" diff --git a/output/Bogdanerie.mp3 b/output/Bogdanerie.mp3 new file mode 100644 index 0000000..5c03985 Binary files /dev/null and b/output/Bogdanerie.mp3 differ diff --git a/samples.txt b/samples.txt index 5896bee..9190f3e 100644 --- a/samples.txt +++ b/samples.txt @@ -23,3 +23,5 @@ v (6) voodoo (5) wind (10) wobble (1) world (3) xmas (1) yeah (31) + +bogdan (7) nass (3) -- libgit2 0.27.0