Skip to content

T
Tidal
Unverified Commit 9bf6bed8 by PLN
Options

live: Perce-neige

parent daae34bc
Showing with 178 additions and 33 deletions
.gitignore
# Heavy files
*.flac
*.mp3
*.so
*.a
*.hi
*.dyn_hi
backlog.md
# Study
- [MathMusic](https://amath.colorado.edu/pub/matlab/music/MathMusic.pdf)
# Coop
-- Nina(s) with Raph
-- Stupefaction with Raph
......@@ -24,7 +27,7 @@
- Break90s: break sec + organ, monosynth + impro dx7
-- Afternoon: Chill breakbeat evening sunset PWM
---- Excellent accompagnement deux mains:
---- Bon accompagnement deux mains:
-- Gauche si+mi/sol+re/la+fa/si+sol
-- Droite whatever autour ;)
......@@ -125,12 +128,13 @@ La voix de l'Ordre: Monotonal drone <> breakbeat
### Live 27/03
-- Intro TopHats
-- Afternoon? Pourquoi pas mais avec clavier - DX7?
-- Intermission Flowers: Jazz Techno MIDI Impro
-- Break 90s?
-- Avant final: Invoque l'été
--- Final Slower:)
## LIVE XXX
......
live/midi/nova/FFF/mad_fonk.tidal
......@@ -98,7 +98,6 @@ do
) . (# n 11))
$ "fguitar"
# crush (range 10 5.5 "^54") -- CRUSH THIS
-- # crush 5.5 -- TODO CRUSH THIS! 12 - 4 - 5
# cut 8
# gM' 0.3 1.5 "^82"
# pan 0.3
......
live/midi/nova/breaks/slower.tidal
......@@ -2,7 +2,7 @@ import Sound.Tidal.ParVagues.Control
setcps (80/60/4)
-- Merci :)
resetCycles
do
let gF = (whenmod 16 12 (# djf (slow 4 $ range 0 0.5 sine)))
......
live/midi/nova/dnb/lucy_rode.tidal 0 → 100644
import Sound.Tidal.ParVagues.Control
resetCycles
setcps (80/60/4)
-- Lucy Rode
do
let g = id
let chord = "ds3'major7'6"
let chorus = pF "chorus"
let mix = pF "mix"
let modIndex = pF "modIndex" -- 0.2
let gDJF = midiDJF "^49" 100 9900 0 1500
let g = gDJF
d1 $ g -- Beat
$ midiOn "^41" (<| fast 2 "k k k k")
$ midiOn "^41" (<| fast 2 "k k k k")
$ midiNo "^41" "^42" (<| fast 2 "<k <k*2 k(3,8)>>")
$ "jazz" # midiG' "^78" 0 1.5
d2 $ g -- Break
$ loopAt 1
$ midiOn "^75" (struct "t*[8 16]")
$ slice 4 (run 4)
$ "fbreak80:4"
# midiG' "^79" 0 2
# cut 2
d3 $ g -- Drumroll
$ midiOn "^41" (
(# room 0.4)
. (# dry (slow 64 $ range 0.5 1.5 perlin))
)
$ juxBy 0.6 rev
$ whenmod 4 3 (fast "<2 4 [4 8] 8>")
$ fast "4 8"
$ "drum:2"
# midiG' "^80" 0 1.8
d6 $ g --Rhodes arps
$ juxBy 0.8 (
(# modIndex 15)
. (# cut 61)
)
$ note (scale "aeolian" (
(arp "up" chord)
+| "0*<2 4 4 2> 7(3,8)"
))
# "FMRhodes1"
# cut 6
# midiG' "^82" 0 1.8
# room 0.2 # dry 2 # sz 0.8
# crush (range 10 3.7 "^54")
# modIndex (range 0 4.19 "^34")
d4 $ g -- Bassline pompée
$ note (scale "aeolian" (
"0*8"
|+ (fast 4 $ arp "up"
"<ds3'major7'4!2 <ds3'major7'4 [ds3'major7'4|ds3'major7'6]> ds3'major7'8>")
))
# "bassWarsaw"
# midiG' "^81" 0 1.2
# crush (range 10 2 "^53")
# room 0.4
# pan 0.2
d2
$ mask "<f!8 t!24>"
$ "~ s ~ s*<1 2 1 1>"
# "[snare:21,snare:22,snare:3]"
# note "<0!16 -4!16>"
d3 -- Drumroll
$ mask "<f!16 t!16>"
$ mask "<t(4,8)!8 t!8>"
$ "drum:2*[8 <8 16 32> 8 16]"
# pan 0.75
# room 0.4
# gain "<0.75 0.8!15>" * 1.4
d5 -- Rhodes base + chords
$ mask "<f!3 [f t] f!3 t t!24 t!32>"
$ someCyclesBy "<0!16 1!16>" ( -- ARPS <3
(|+ note 12)
. sometimesBy "0 0.5!7" rev
. fast "1 2"
. arp "pinkyup"
. (|+ pan 0.1)
. (|* gain 1.2)
)
$ note ((
"<0 ~> 0"
+ prog
+ "0 -12"
- "12" -- Octave
))
# "FMRhodes1"
# modIndex "[0,5,10]"
# pan 0.6
# crush "<16!40 [<4 4 5 6>]!24>"
-- # gain 0.95
d6 -- Bonus bouton nassim deuxième drop
$ mask "<f!32 f!8 t!24>"
$ slice 8 (run "<8!4 4!4>")
$ (loopAt 1)
$ "breaks165"
# gain 0.95
live/midi/nova/dnb/frankenbass.tidal → live/midi/nova/dnb/perceneige.tidal
resetCycles
import Sound.Tidal.ParVagues.Control
setcps (159/60/4)
-- ..... 8 Intro -> 8 Hello DNB -> 16 Arps
-- Kick RushDrop
-- S -- HELLO SNARE -- LOWER SNARE
-- B
-- Perce-neige Printanier
-- ..... 0 Intro -> 8 Drop DNB -> 16 Var1 -- 32 Montee - 40 Drop2
-- Kick . . . ...... . . . . . . . . . . . . . . . ..... . . . .
-- S -- HELLO SNARE -- SNARE2
-- Drumroll Lent - - -
-- C
do
let g = id
let mel = "c"
......@@ -31,17 +30,22 @@ do
$ mask "<f!16 t!16>"
$ mask "<t(4,8)!8 t!8>"
$ "drum:2*[8 <8 16 32> 8 16]"
# pan 0.75
# room 0.4
# gain "<0.75 0.8!15>" * 1.4
d4 -- Bassline pompée
$ mask "<t!8 f!4 t t f f f!4 t t f f t!3 f t t f [t f] t!8>"
$ note ((
"<0 ~> 0*<1 2 4 2>"
+ prog
+ "0 7"
- "24" -- Octave
))
# "bassWarsaw"
# gain 0.87
# room 0.4
# gain "<0.75 0.8!15>" * 1.35
-- d3 $ g -- BASSLINE
-- $ novaOn "^41" (mask "<f!8 t!120>")
-- $ loopAt 2
-- $ note (scale "aeolian" $ mel)
-- # "bassWarsaw"
-- # pan 0.2
-- # octave 2
-- # cut 3
d4 -- Rhodes base + chords
# pan 0.2
d5 -- Rhodes base + chords
$ mask "<f!3 [f t] f!3 t t!24 t!32>"
$ someCyclesBy "<0!16 1!16>" ( -- ARPS <3
(|+ note 12)
......@@ -60,16 +64,29 @@ do
# "FMRhodes1"
# modIndex "[0,5,10]"
# pan 0.6
# crush (range 10 4 "^54") --TODO Drop2
# gain 0.85
d5
$ mask "<f!32 t!32>"
# crush "<16!40 [<4 4 5 6>]!24>"
-- # gain 0.95
d6 -- Bonus bouton nassim deuxième drop
$ mask "<f!32 f!8 t!24>"
$ slice 8 (run "<8!4 4!4>")
$ (loopAt 1)
$ "breaks165"
# gain 0.95
once
$ "methbass"
# speed 0.20
# gain 0.65
# cut 21
once $ "macron:10" # gain 1.5
d9
$ struct "t . ~ t ~ ~"
$ "wind"
# speed 0.1
# cut 1 # gain 1
-- # gM' 0 1 "^80"
live/midi/nova/lounge/invoque_ete.tidal
......@@ -12,16 +12,20 @@ let gM' l h a = (gG (range l h a)) -- gain Modéré
let gM a = (gM' 0.2 0.8 a) -- gain Modéré doux
let gLPF = (# lpf (min 10000 ((range 200 20000 ("^49")))))
let gHPF = (# hpf (max 0 (min 7500 ((range "-7500" 7500 ("^49"))))))
let gFreqL = (# lpq (range 0 0.25 "^29"))
let gFreqH = (# hpq (range 0 0.25 "^30"))
let gFreqs = (gFreqH . gFreqL)
let gDJF = (gLPF . gHPF)
let g = gDJF
let g = gDJF . gFreqs
d1 $ g
$ midiOn "^42" (slow 4)
$ midiOn "^41" (<| "k k k <k!3 k*2>")
$ midiOn ("^42" - "^41") (slow 4)
$ midiOn "^41" (<| "k k k <k k k*2 [~ k]>")
$ midiOff "^41" (<| "k*2")
$ "[jazz,808bd:1]"
# gM' 0 1.2 "^78"
d2 $ g -- Clave de l'été
$ midiOn "^75" (fast 2)
$ midiOn "^43" (fast 2)
$ midiOn ("^75"-"^43") (fast 2)
$ (|* gain "0.75 1 1 1 0.75 1 1 1")
$ "d ~ ~ d d ~ d <~!3 d>"
# "snare:22" # gM' 0 1.4 "^79"
......@@ -35,7 +39,7 @@ d4 $ g
-- $ slice 8 "0 1 <2!3 0> <3!3 1 4 5 6 7>" "0 1 <2!3 0> <3!3 1>"
$ chop 8
$ loopAt 2 $ "breaks125:3"
# gM' 0 1.5 "^80"
# gM' 0 1.2 "^80"
# cut 4
d5 $ g
$ loopAt 2
......@@ -82,14 +86,14 @@ d8 $ g
struct "t(5,8)"
. arp "[down,up]"
. (|+ note 12)
. (|* gain 1.1)
. (|* gain 1.2)
. (|- pan 0.1)
))
$ note "<a3'maj g3'maj a3'min d3'maj>"
# octave 4
# room 0.4
# "moogBass"
# midiG' "^84" 0 1.8
# midiG' "^84" 0.3 1.4
d9 $ g
$ degradeBy (slow 16 $ range 0.8 0.2 saw)
$ struct "t(3,8) [<t!3 [~ t]> <t ~> <t t*2> <t*2 t t*2 t*2>]"
......
live/mood/tired/afternoon.tidal
......@@ -18,8 +18,9 @@ let gFreqs = (gFreqH . gFreqL)
let g = (gDJF . gFreqs)
d1 $ g -- BEAT
$ fast 2
$ "k . ~ k ~ ~ "
# "[jazz,cpu2,hh27:6]"
$ midiOn "^41" (<| "k k k <k [<~ k> k]>")
$ midiOff "^41" (<| "k . ~ k ~ ~ ")
$ "[jazz,cpu2,hh27:6]"
# release "<0.7!3 1>"
# midiG' "^78" 0 1.8
d3 $ g -- Snare contretemps rushé
......
notes.md
......@@ -228,6 +228,18 @@
-- 12: tok métal etouffé
-- hh27
once $ "hh27:1" -- Ho lo
once $ "hh27:7" -- Ho hi
once $ "hh27:10" -- Ho hi soft
once $ "hh27:2" -- Maracas fermées
once $ "hh27:9" -- Maracas fermées lo
once $ "hh27:3" -- Maracas ouvertes / balai
once $ "hh27:8" -- Same plus aigu
once $ "hh27:4" -- Clochettes
once $ "hh27:5" -- Kick neige
once $ "hh27:6" -- Kick sec
once $ "hh27:12" -- Snare lo
once $ "hh27:11" -- Snare hi
-- glitch
-- 0 noise kick sec
......
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