From 340b8a4af3bca9f91ffcc1915f81b901698ab55a Mon Sep 17 00:00:00 2001
From: Paul-Louis NECH <pln@algolia.com>
Date: Sun, 1 Mar 2020 00:36:27 +0100
Subject: [PATCH] DNB Dansante et joli apresmidi

---
 blocks/drums.tidal                | 10 +++++++++-
 copycat/resistance.tidal          | 15 +++++++++++++--
 live/chill/bad_bad_guy.tidal      |  7 +++++--
 live/chill/cloudy_afternoon.tidal | 64 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 live/dnb/dansant.tidal            | 93 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 notes.md                          | 25 +++++++++++++++++++++++++
 output/Minuit_DNB.mp3             | Bin 0 -> 18461402 bytes
 7 files changed, 209 insertions(+), 5 deletions(-)
 create mode 100644 live/chill/cloudy_afternoon.tidal
 create mode 100644 live/dnb/dansant.tidal
 create mode 100644 output/Minuit_DNB.mp3

diff --git a/blocks/drums.tidal b/blocks/drums.tidal
index 0994596..687ff7e 100644
--- a/blocks/drums.tidal
+++ b/blocks/drums.tidal
@@ -5,11 +5,19 @@ once $ s "bogdan:11"
 # cut 1
 
 
+d1
+$ someCycles (0.25 ~>)
+$ fix (# s "sn:2") (s "t")
+$ fix (# s "kick:8") (s "p")
+
+-- $ s "p ~ <t <t t?>> ~ ~ p t <~ <~ t?>>" -- reggaeton
+# gain 0.7
+
 -- helico?
 d1
 $ s "[a*4 ~] a*8"
-# note "-15 .. 15"
 # s "armora"
+# note "-15 .. 15"
 
 -- DNB
 d1
diff --git a/copycat/resistance.tidal b/copycat/resistance.tidal
index 7f30f3c..6a50fe8 100644
--- a/copycat/resistance.tidal
+++ b/copycat/resistance.tidal
@@ -1,4 +1,15 @@
+-- Dooz Kawa - la resistance
+
+setcps 1.05
+
 d1
-$ fast 2
-$ s "b . ~ <b ~ ~> . b . <b ~ ~> ~"
+-- $ euclid 2 4 $ s "b"
+$ s "~ <b> . b . <b> ~ . b"
 # s "kick:8"
+# gain 0.5
+
+d2
+$ s "~ <b> . b . <b> ~ . b"
+# n "[0,1]"
+# s "dr"
+# gain 0.6
diff --git a/live/chill/bad_bad_guy.tidal b/live/chill/bad_bad_guy.tidal
index 2363b53..da286c6 100644
--- a/live/chill/bad_bad_guy.tidal
+++ b/live/chill/bad_bad_guy.tidal
@@ -1,8 +1,11 @@
 setcps 0.5
 
 d1
-$ fast 2 -- faster!
-$ euclid "<1 1 1 1 2 2 2 2>" 2
+$ every 16 (0.25 ~>)
+$ every 8 (0.125 ~>)
+-- $ fast 4 -- faster!
+$ fast 2 -- fast!
+-- $ euclid "<1 1 1 1 2 2 2 2>" 2
 $ s "jazz:0"
 
 d2 -- drums, someroll
diff --git a/live/chill/cloudy_afternoon.tidal b/live/chill/cloudy_afternoon.tidal
new file mode 100644
index 0000000..a0c00e3
--- /dev/null
+++ b/live/chill/cloudy_afternoon.tidal
@@ -0,0 +1,64 @@
+setcps 1
+
+d1 -- Kick régulo-varié
+$ someCycles (degradeBy 0.2)
+$ whenmod 32 24 (# silence) -- stop periodique
+$ every 4 ( -- 4eme temps, decalage plus echo
+  someCyclesBy 0.25 ((0.25 ~>) . (stut 2 0.5 0.25))
+)
+$ s "kick:11*2"
+# pan (slow 16 $ sine)
+# gain 0.8
+
+d2 -- hh la résistance danse
+$ s "~ <b> . b . <b> ~ . b"
+# s "bshihat" # n "0|1"
+# gain (slow 64 $ sine * 0.7 + 0.6)
+# room (slow 64 $ 0.205 - sine * 0.2) # size 0.8
+# gain (slow 16 $ sine * 0.5 + 0.4)
+# dry 0
+
+d3 -- cloches basses
+$ whenmod 8 4 (someCyclesBy 0.8 (|- note 3))
+$ someCycles (superimpose (hurry 0.5))
+$ n "<0 [0|1]>"
+# s "bsperc"
+# gain 0.65
+
+d4 $ silence
+
+d4
+$ every 4 (someCycles (rev))
+$ superimpose ((|+ note "<5 7 5 5 0 7 <0 5> <0 5>>"))
+$ superimpose (rev . (|- note 12))
+$ note (scale "major" "0 1 2 7")
+# s "bassWarsaw"
+-- # release (0.9)
+# release (slow 16 $ sine * 0.8 + 0.2)
+-- # attack (0.75 + rand / 4)
+|- note 24
+# gain 0.9
+
+d5 -- piano spatial
+$ whenmod 24 22 (|+ note 7)
+$ whenmod 24 19 (|- note 5)
+$ whenmod 24 16 (|- note 2)
+$ off 0.25 (|+ note 5)
+$ superimpose (|- note 12)
+$ s "bsperc:2(3,8)"
+# note (scale "major" ("<5 [5|5|5|3] [3|3|5|5] 5>") - 24)
+# lpf (slow 8 $ sine * 800 + 200)
+# room 0.2 # size (slow 8 $ sine * 0.2 + 0.5)
+# gain 0.6
+
+d5 -- Carillons
+$ someCycles (0.5 ~>)
+$ s "hh?(<4 4 4 2>,4) ~" # n "8 8 8 <8 8 8 9> 3"
+# gain (slow 16 $ sine * 0.5 + 0.4)
+
+
+d7 --
+$ whenmod 32 16 (# gain 0.8)
+$ s "[~ bsvocals]/4"
+# n "<2? 2? <3 3 3 [3|12]>? 2>"
+# gain 0
diff --git a/live/dnb/dansant.tidal b/live/dnb/dansant.tidal
new file mode 100644
index 0000000..4f304a9
--- /dev/null
+++ b/live/dnb/dansant.tidal
@@ -0,0 +1,93 @@
+-- DNB Dansante!
+
+setcps 0.75
+
+d1
+$ someCyclesBy 0.05 (# silence)
+$ someCycles (fix (# s "snare:8") (s "sn:2"))
+$ fix (# s "sn:2") (s "sn:1")
+$ fix (# s "[bskick,kicklinn]") (s "bd")
+$ s "bd? ~ sn:1 ~ ~ bd sn:1 <~ <~ <~ sn:1>>>"
+# gain 0.9
+
+d3 -- synthe fou
+$ degradeBy 0.2
+$ whenmod 16 8 (|+ note 7)
+$ superimpose ((|+ note 5) . (# gain 0.7))
+$ superimpose (|+ note 12)
+$ note (scale "aeolian" "[0|12]*8")
+|- note 24
+# s "defaultB"
+# gain (slow 64 $ cosine * 0.7 + 0.2)
+
+d4 -- drumroll
+$ rarely (off (1/16) (|+ 0))
+$ sometimesBy 0.05 (# n 1)
+$ s "dr*8"
+# gain (slow 16 $ sine * 0.3 + 0.5)
+
+d7 -- dark background
+$ s "arp(<1 1 3 3>,8)"
+# gain 0.7
+
+d6 -- lead
+$ degradeBy 0.8
+$ whenmod 4 2 (off 0.125 (|- "[12, 8]"))
+$ superimpose (|+ note 5)
+$ off 0.25 ((degrade) . (|- note 12))
+$ note (scale "aeolian" "0 <~ ~ ~ 7> <7 ~> 5")
+# s "superpiano"
+# gain 0.8
+# velocity (0.5 + rand / 4)
+
+d7 -- guitar second
+$ s "bsguitar:4/8"
+# begin 0 # end 0.2
+# cut 1
+# gain 0.85
+
+d5 -- continuous laser
+$ someCyclesBy 0.6 (# silence)
+$ whenmod 16 8 rev
+$ (
+  chop "<1 1 1 1 <2 4 [8|32] [2|32]>>"
+$ s "bd" >| speed (segment 50 $ range 60 5 (saw))
+) # pan sine
+# gain 0.65
+
+once $ s "bsgu"
+
+d7 -- musical forks
+$ degradeBy "<0 0.2 0.6 <0.8 0.2>>"
+$ jux rev
+$ off 0.125 ((|+ 5))
+$ off 0.25 ((# room 0.5) . (|- 12))
+$ superimpose ((0.25 ~>) . (|+ "<5 12>"))
+$ superimpose (|+ note "< 5 3 2 0>")
+$ s "f f f <f <f*2 ~>>"
+# s "superfork"
+# gain 0.65
+# room 0.2
+# size 0.6
+
+d8 -- vibration montante!
+$ superimpose (|+ note 5)
+$ every' 4 "<0 1 2 3>" (someCycles rev)
+$ sound "bd"
+# note "<42 42 42 36>"
+-- # note "<<28 21 14 7 0> <7 14 21 28 35 42 49 56 63 70>>"
+>| speed (
+  segment (wchoose [(50,0.1), (250,0.9)])
+  $ range 1 3 saw
+  )
+# gain 0.5
+# legato 2
+
+d9 -- basse
+$ whenmod 8 4 (|- note 2)
+-- $ off 0.125 (degrade . (# room 0.2) . (# size 0.8))
+$ superimpose ((# s "bass3:2") . (|+ note 7))
+$ note "0 ~ <~ [0 0?]> ~"
+|- note 14
+# attack (0.5 + rand / 2)
+# s "bassWarsaw"
diff --git a/notes.md b/notes.md
index f9e1c17..b289845 100644
--- a/notes.md
+++ b/notes.md
@@ -71,6 +71,31 @@
 --- 1 bruit minitel
 --- 2 bruit minitel
 
+-- battles Explosions
+--- 0 courte
+--- 0 longue
+
+-- BS SAMPLES
+
+
+-- bskick
+-- bshihat
+-- bskick
+-- bsnoise
+
+-- bsperc
+--- 0 Percu ronde plastique rebond
+--- 1 Same, mais triple
+--- 3 Bip hopital
+--- 4 Bass noisy
+--- 5 Tac sec
+--- 6 Tac leger
+
+
+
+-- bssnare
+-- bsvocals
+
 -- blip: 8bit notes
 
 -- ade Vibration genre post-gong
diff --git a/output/Minuit_DNB.mp3 b/output/Minuit_DNB.mp3
new file mode 100644
index 0000000..8676c35
Binary files /dev/null and b/output/Minuit_DNB.mp3 differ
--
libgit2 0.27.0