Commit cef10bdf by PLN (Algolia)

Sessions: Repeat 1 FDLM24

parent 663c33ff
......@@ -41,18 +41,21 @@ soir noir
## `24Facons` to love music
### January Cold Love
-- Cafe Tiede
-- Disparition Elmo
-- Trois Cafes :)
-- Disparition Elmo 🇬🇵
-- Infiltrations </3
-- Froid de Minuit ❄️❄️❄️
-- Infusion Basse 🍵
-- Qui sait ? 🌇
## Nouvelle Epoque 23
### **December Celebrations**
-- Salut Nu (Verite Nue)
-- Salut Nu
-- Nu dans la Boue
### November Rains
-- Ambient Chaos <3
-- _Ambient Chaos_ <3 TODO: Add more leads :D
-- JeuDrill
### Beatober and other seasonal activities
- Oct4: Glitch Sauvages Techno recorded once, peaufine :)
......@@ -70,7 +73,7 @@ soir noir
- Punk Teng with raph!
- The Good Bass!
- Tour du ciel
- _Prestance_: Ambient wip
- _Prestance_: Ambient wip needs adjustment :)
-- **Sel Marin**: Nuit noire dans la mer noire, TODO varier bass
-- **_Bain bouillant_**: sub bass and jungle breaks :)
......@@ -765,7 +768,7 @@ Clameur? Brouillon?
...............................................................................
...............................................................................
## SOLSTICE 23
## TOPLAP SOLSTICE 23
-- Permanence 🫶🫶🫶🫶
-- Bain Bouillant 🤿 🤿
-- Haunted House 👻 👻
......@@ -779,3 +782,31 @@ Clameur? Brouillon?
-- _Cafe chaud_
-- _Cafe tiede_
-- Salut Nu <3
## TOPLAP 20 YEARS 🍪🎂🍪
- **Café Tiède** ☕☕☕
- **Force motrice** 💪💪💪
- **Café Glaçé** 🥃🥃🥃
- Nuit agitée 🌃🌃🌃
## Algolia FDLM2024
# 2022 throwback 🕵️
- Contre Visite
- Empreinte du numerique?
- Nightly Repair ? 🌆
- Invoque l'Été 🌇
# 2024 new thingies
- Venons Ensemble 🧑‍🧑‍🧒
- JeuDrill 🌠
- PERMANENCE ♾️♾️ (ajouter elements?)
- Force motrice 🌬️🌬️🌬️🌬️
- Café Tiède ☕🥃☕
- Café Bouillant ☕☕☕
- Café Glaçé 🥃🥃🥃
- Salut Nu 👋💛🧡💛👋
- Nuit agitée 🌃🌃🌃🌃🌃🌃
- MauerPark 🎻🌄🌇🌇🌇🌄🥨
do
setcps (93/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let rootD = "[d3'maj'3]"
let rootA = "[a3,cs4,e4]"
let rootE = "[e3,gs3,b3]"
let rootFm = "[e3,gs3,b3]"
let verse = [rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm]
let preChorus = [rootA, rootD]
let chorus = [rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD]
let song = [rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootD, rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD, rootD, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootFm, rootA, rootD, rootD, rootFm, rootD, rootFm, rootD, rootD, rootD, rootD]
let verseOff = [rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD]
let preChorusOff = [rootE, rootE]
let chorusOff = [rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE]
let songOff = [rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootD, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE, rootE]
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k k*2 k <~ [~ k]>>")
$ midiOff "^42" (<| "k . ~ <~ k*<1 2 2 4>>")
$ "[clubkick:2,jazz,808bd:4]"
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ cp")
$ midiOff "^43" (<| "~ cp")
$ "clap:2"
# hpf 5000
d3 $ gF1 $ gM1
$ sometimesBy "0 . 0.1 <0.25 0.5 0.7 0.9>" (ply 2)
$ "hh*8" |* gain (range 0.6 0.9 perlin)
d4 $ gF2 $ gM3 -- BASSLINE COMPAGNONNE
$ struct "t(<2 [1|3|3|5]>,8) t(<3!3 5>,8,<0!3 1>)"
$ note (arp "<up!8 down!6 down <down downup updown up>>" $ cat song) -- Intro
# "bassWarsaw"
# octerbus 41 (range 0 1.5 "^53")
# room 0.2
d5 $ gF2 $ gM3
$ note (cat song) -- Main song
# "FMRhodes1"
# pan 0.3
d7 $ gF2 $ gM3
$ struct "t(1,2,1)" -- TODO Better structure
$ note (cat songOff + 12) -- Offbeat
# "FMRhodes2"
# pan 0.8
d8 $ gM1 $ gF1
$ midiOn "^60" (mask "t(<4 8>,<8 8 16 16>)")
$ midiOn "^92" (ply 2)
$ chop 16
$ loopAt 2
$ "jungle_breaks" # n "<42!3 41>"
# gain 0.8
# cut 8
once $ note "[a3,cs4,e4]" # "FMRhodes1" # orbit 3
once $ note "[e3,gs3,b3]" # "FMRhodes1" # orbit 3
once $ note "[fs3,a3,cs4]" # "FMRhodes1" # orbit 3
# Live: ParVagues @ Bazurto
> Tignes | Hiver 2023
⠀⠀⢀⣤⣾⣿⣿⣿⣿⣿⣶⣤⡀⢀⣤⣶⣿⣿⣿⣿⣿⣷⣤⡀⠀⠀
⠀⣰⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣆⠀
⢠⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡄
⢸⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡇
⠀⣿⣿⣿⣿⣿⣿ ParVagues ⣿⣿⣿⣿⣿⣿⠀
⠀⠘⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⠃⠀
⠀⠀⠈⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠁⠀⠀
⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠙⢿⣿⣿⣿⣿⣿⣿⡿⠋⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠉⠻⣿⣿⠟⠉⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠈⠁⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
resetCycles
do
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF1
$ midiOn "^42" (<| "k k k k*<1!3 2>")
$ midiOff "^42" (<| "k . <~!8 k!8 k(<3!3 [3 5]>,8)!16>")
$ "kick:5"
d2 $ gM1 $ gF1
$ fix (# lpf 2500) "h2ogmsn"
$ midiOff "^43" (slow 2)
$ "~ s ~ <s!3 s*[<4 4 2 4> <2!3 4>]>"
# "[db:11,h2ogmsn:12]"
# "[dr55:3]"
d3 $ gM2 $ gF1
$ midiOn "^76" (ply "2 <2 4>")
$ someCyclesBy "<0 0.4>" (jux $ swing 2)
$ "<hh(<3!3 [3 5]>,8)!3 [hh(3,8) hh(<3!3 5>,8)]>"
# "rampleA4:6" # gain 0.5
# room 0.2
# size 0.9
# dry 0.9
# pan (range 0.2 0.8 (slow 4 perlin))
d4 $ gM3 $ gF2
$ midiOn "^57" (>| note ("<d d <d g> <a d d a>>" - 2 - 12))
$ note ("d" - 2 - 12)
# "90s_synatm:2"
# crushbus 41 (range 12 1.4 "^53")
# octerbus 42 (range 0 1.4 "^33")
# cut 4
# room 0.4
# pan (slow 32 $ range 0.98 0.7 saw)
# gain 0.7
d5 $ gM3 $ gF2
$ fix (|* gain 0.7) (n 10)
$ note "<<d!16 g!16> <d!16 g!16> d g [a@3 <~ bf>]>"
# n "<5!24 10!8>" # "cbow"
# crushbus 51 (range 12 2.4 "^54")
# cut 5
# gain 0.6
d7 $ gM3 $ gF3 -- Keys of Paradise
$ midiOn "^91" (ply 2 . (# freeze 0.2))
$ slice 4 "<[0 1] [2 3*<1 4>] [0 1] [2 1(<1 3>,8)]>"
$ "nujazz_keys120:25/2"
# octersub (slow 32 $ range 0.2 1.2 (saw+perlin/2))
# cut 7
d8 $ gF1 $ gM1 -- Train break train wreck
$ chop 16
$ midiOff "^36" (loopAt 2)
$ midiOff "^56" (loopAt 2)
$ midiOn "^60" (loopAt 0.5)
$ midiOn "^92" (ply "2 1 4 <2 1>")
$ chop 4
$ loopAt 4
$ "jungle_breaks:45"
# cut 8
d10 $ gM3 $ gF3
$ note "<g3!3 a3>" # "90s_weird:1"
# cut 10 # gain 0.8
# pan (slow 4 "<0.2 0.42 0.68 0.8>")
d11 $ gF3 $ gM3
$ note ("0(3,8)" + "<g4!3 a4 g4!3 a4 d4!3 d4s d4!3 a4s>")
# "90s_synatm:13"
# cut 11
# gain 0.8
# pan (slow 4 (1-"<0.2 0.42 0.68 0.8>"))
# att 0.1
# rel 2
d9 $ gF3 $ gM3 -- Submarine electric wave
$ someCyclesBy "<0!6 0.5 1>" (# silence)
$ note ("<g4!3 a4 g4!3 a4 d4!3 d4s d4!3 a4s>")
# "90s_synatm:14"
# cut 9
# gain 0.8
# crushbus 91 (slow 16 $ range 16 4.5 (perlin - (slow 8 saw)))
# pan (slow 4 (1-"<0.2 0.42 0.68 0.8>"))
......@@ -17,9 +17,10 @@ setcps (140/60/4)
d1 $ gF1 $ gMute2
$ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")
$ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
$ "[kick:5]"
$ "[kick:5,clubkick]"
# room 0.2 # dry 1.1
# cut 1
# gain 1.5
d2 $ gF1 $ gM1
$ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
$ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
......@@ -27,14 +28,17 @@ d2 $ gF1 $ gM1
# gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>"
d3 $ gF1 $ gM1 $ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
# drumFrom "rolandtr909" "hh" # cut 3 # gain 0.6 # legato 0.25
d9 $ mask "<f!3 t>"
-- $ (0.1 ~>)
$ "bogdan_grime:3"
# end "<0.42!3 0.66>"
# delay "<0!3 0.7>"
d9 -- Bogdan the Grime sample provider
$ whenmod 16 12 ( -- I'm from Cardiff!
(# "bogdan_grime:1") . (# begin "<0!3 0.25>") . (# end "<0.5!3 0.25>")
)
$ whenmod 16 8 ((# begin 0.66) . (# end 1)) -- Pints <3
$ end "<~ <0.42 <0.66 1>>>"
# "bogdan_grime:3"
# delay "<0 <0.7 0>>"
# delayt "h"
# delayfb 0
# speed 0.85
# speed 0.92
# room 0.4
# gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks!
......@@ -47,7 +51,7 @@ d8 $ gF1 $ gM1 -- Come on breaks!
$ loopAt 2
$ "jungle_breaks:26"
# cut 8
# gain 0.6
# gain 0.9
d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
$ slow 2 $ note (
-- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
......@@ -78,10 +82,10 @@ d5 $ gM3 $ gF3
# gain 2
# room 0.3
d10 $ gF2 -- Menace
$ note "<b3 ~ ~ [~!7 c4]>"
$ note "<b3 ~ ~ [~!7 c4]>" -- Todo: longer sequence on 8/8?
# "90s_synatm:10"
# room 0.3 # sz 0.8
# gain 0.65
# gain 0.95
# att 0.10
# rel 10
# legato 2
......
......@@ -67,7 +67,7 @@ d8 $ gF1 $ gM1
$ chop 8
$ loopAt 2
$ midiOn "^20" (loopAt 4)
$ midiOn "^92" (ply "<2!3 [4!3 8]>")
$ midiOn "^92" (ply "<2!3 [4!3 2]>")
$ midiOn "^36" (# "jungle_breaks:55")
$ midiOn "^56" (# "jungle_breaks:45")
$ "jungle_breaks:1"
......
......@@ -39,6 +39,7 @@ d4 $ gF2 -- Baleine sur la défensive
-- TODO: seconde voix
# "[bassWarsaw,supersaw]"
# midiG' "^81" 0 0.8
# octerbus 41 (range 0 0.85 "^53")
# crushbus 41 (range 16 3.5 "^53")
# room 0.3 # sz 0.4 # dry 1.1
# pan 0.4
......
......@@ -21,7 +21,7 @@ d1
$ fix ((# hpf 500) . (|* gain 0.7)) "kick:5"
$ "[jazz,kick:5]"
-- # room 0
-- # midiG' "^78" 0 1.3
# gain 1.3
d2 $ f1 $ gMute
$ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
$ midiOff "^75" maskLoops
......@@ -91,7 +91,7 @@ d7 $ f3 -- High lead: Winds of truth
))
$ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2")
# "90s_synatm:18"
# room 0.4 # sz 0.8
-- # room 0.4 # sz 0.8
# dry 0.1
# cut 7
# crushbus 62 (range 16 2.25 "^55")
......
......@@ -7,46 +7,37 @@
-- (__((__((___()()()------------------------' |0111|
-- EMPREINTE DU NUM3R1QU3
do
let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw)))
let gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw)))
let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF)
let gPont1 = (whenmod 32 24 gLPF)
let g = (# djfbus 1 (range 0.05 0.95 "^49"))
-- let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw)))
-- let gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw)))
-- let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF)
-- let gPont1 = (whenmod 32 24 gLPF)
let modIndex = pF "modIndex"
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gM = gMask . gMute
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
setcps (110/60/4)
d1 $ g $ gMute -- Kick
d1 $ gF1 $ gM2 $ gMute -- Kick
$ midiOn "^42" (<| "k k k <k k*2>")
$ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~")
$ "[jazz,808bd:6]"
# midiG' "^78" 0 1.5
d2 $ g $ gM --
# gain 1.5
d2 $ gF1 $ gM1 --
$ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>")
$ "~ s" # "[sn:40,snare:20]"
# note "<-2!3 -4>"
# midiG' "^79" 0 1.8
d3 $ g $ gMute
$ "~ s" # "[db:12]"
-- # note "<-2!3 -4>"
# gain 1.4
d3 $ gF1 $ gMute
$ midiOn "^76" (fast 2)
$ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>")
$ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0"
# room 0.3
# dry 0.95
# midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>")
d6 -- Break bonus banane
$ g
$ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
$ midiOn "^60" ( -- Aerial mask
mask "t <f t> <f f t f> <t t f t> f <f t> <f!3 t> t"
)
-- $ sometimesBy ("0 1!7" * "^56") (iter "<4!3 8>")
$ chop 16
$ loopAt 2
$ "break:3"
# cut 6
# midiG' "^84" 0 1.6
d4 $ g $ gPont2 -- BASSLINE BoomRang!
|* gain "1.2 1!6 <1 1 1.1 <1.2 1>>"
d4 $ gF2 $ gM3 -- BASSLINE BoomRang!
$ midiOn "^57" (# n "50")
$ midiOn "^89" (ply "2 4" . chop "2 <2 4>")
-- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw)))
......@@ -61,7 +52,17 @@ d4 $ g $ gPont2 -- BASSLINE BoomRang!
# pan 0.3
# crushbus 53 (range 10 1.61 "^53")
# midiG' "^81" 0 1.4
d7 $ g -- Back solar mandoline
d8 $ gF1 $ gM1 -- Break bonus banane
$ midiOn "^92" (ply "2!3 1 2!3 <2 4>")
$ midiOn "^60" ( -- Aerial mask
mask "t <f t> <f f t f> <t t f t> f <f t> <f!3 t> t"
)
-- $ sometimesBy ("0 1!7" * "^56") (iter "<4!3 8>")
$ chop 16
$ loopAt 2
$ "break:3"
# cut 6
d7 $ gF3 $ gM3 -- Back solar mandoline
$ midiOn "^59" (off "s" (|+ note "<7 9 5 <7 12>>"))
$ midiOn "^91" (off "e" (|+ note 12))
$ superimpose (|+| note "<[0 12 0]!3 [0 12 0 12]>")
......@@ -71,8 +72,7 @@ d7 $ g -- Back solar mandoline
# room (range 0 0.3 "^55")
# crushbus 71 (range 10 3.61 "^55")
# midiG' "^83" 0 1.5
d6 -- RHODES FOLIE <33
$ g
d5 $ gF2 $ gM3 -- RHODES FOLIE <33
$ midiOn "^58" (off "e" id)
$ midiOn "^90" (jux rev)
$ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)"
......@@ -83,4 +83,3 @@ d6 -- RHODES FOLIE <33
# pan 0.7
# crushbus 61 (range 10 4.4 "^54")
# modIndex (range "-0.1" 100 "^34")
# midiG' "^82" 0 1.3
......@@ -65,18 +65,19 @@ d5 $ gM3 $ gF2 -- ACID bassline
$ midiOn "^90" ( -- Echoes of future
superimpose ((# cut 51) . superimpose ((# cut 52) . (|+ note 12))
. (|+ note "[12,<~!8 24!8>]")
. (|* gain 0.9) . (# room 0.2) . (# sz 0.9)))
. (|* gain 0.9) . (# room 0.2) . (# sz 0.9)) . (# cut 51))
$ midiOn "^58" (# freezebus 51 0.1)
$ note ( "f@2 f <gs!2 gf!2>@2 <gs!2 g!2> <g!2 gs <gs gs5>>@2"
- 12
)
# distortbus 51 (range 0 2.5 "^54")
# distortbus 52 (range 0 2.5 "^54")
# "90s_matrix:4"
# pan "<0.2!32 0.8!32>"
-- # octave 3
-- # cut 5
# cut 5
-- # midiG' "^82" 0 1.9
d7 $ gF3 $ gM3
$ midiOn "^91" (|- note "c'maj'2")
$ note (
(slow 8 $ "<[<f4 as5>]!2 [<ef3!2 [ef4!3 f4] f4>]!2>")
+ "0([3 <3!3 5>],8) . 0(<3!7 [3 5]>,8)"
......
resetCycles
do
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k*<1 1 1 2>")
$ midiOff "^42" ((<| "<k(3,8) [k k k k ~]>") . superimpose (# "kick:5"))
$ "[jazz,house]"
# gain 1.2
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^76" (ply 2)
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
# "[rampleS57:2]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4
$ loopAt 2
$ midiOn "^33" (chop 2)
$ midiOn "^89" (chop 8)
$ midiOn "^57" (slice 4 "4 3 2 1")
$ chop 8
$ "nujazz_bass120:18"
# crushbus 41 (range 16 4.5 "^53")
# room 0.3
# cut 4
# octer 0.9
# octersub 0.5
d5 $ n "<10 10 11 10 10 12 11 12 11 12 12 11 11 12 12 13>" # "nujazz_guitar120" # cut 5
# crushbus 51 (range 16 4.5 "^54")
# hpfbus 51 (range 0 1500 "^54")
d7
$ slice 4 "0 [~ 1] 2 <2 3>"
$ chop 16
$ loopAt 2
$ "jungle_breaks:19" # cut 7
d8 $ gF1 $ gM1 -- BREAK THIS FLOOR
$ midiOn "^60" (slice 8 $ run 16)
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:6"))
$ midiOn "^56" (loopAt 0.5 . (# "jungle_breaks:45")) -- ORLEANAISE
$ loopAt 4
$ "nujazz_beats120:2"
# pan "0.2 0.8 0.2 0.8"
-- FIXME GRAVEYARDDD
......@@ -54,7 +54,7 @@ d4 $ gO $ gF2 $ gM3 -- SUBSUB INFRABASS
d5 $ gO $ gM3 $ gF2 -- Basse appel important
$ note "<fs3 [fs3@7 b3] [fs3@7 g3] [fs3@5 g3 fs3 d2] [b2@7 d2] [b2@7 d2] [b2@7 gs2] [b2 . b2 d3 <fs3 g3>]>"
# "giorgio_syn:0"
# pan 0.35
# pan 0.351
# lpfbus 52 (range 400 4000 "^34")
# distortbus 51 (range 0 1.2 "^54")
# cut 7
......
......@@ -40,10 +40,10 @@ d6 $ gF1 $ gM1
# room 0.4 # dry 1.1 # sz 0.5
# lpf 2000
# gain 1.1
d4 $ gF2 $ gM3
d4 $ gF2 $ gMute3
$ midiOn "^89" (slow "<4!12 8!4>" . striate "<4!12 8!4>")
$ midiOn "^57" (slow "<1!12 [1 2]!3 [2 4]>" . mask "<t!6 [<t f> [<t f> f]] [t f]>" . (stut "<4!12 2 2 4 8>" 0.7 "<e!12 e e s s>") . mask "t(2,16)")
$ midiOn "^17" (mask "t(4,16)")
-- $ midiOn "^17" (mask "t(4,16)")
$ loopAt 8
$ chop 64
$ "bass_commodore:7"
......@@ -73,6 +73,7 @@ d5 $ gF3 $ gM3
# modIndex 0.3
# legato 2
# gain 1.2
d7 $ silence -- FIXME add d7, maybe arps/moog?
d9 $ gF2 $ gM3 -- Essouflement amoureux
$ arp "up"
$ note (
......@@ -92,7 +93,7 @@ d10 $ gF3 -- Angels of constance
# "moogBass"
# room 0.2
# pan 0.7
d11 $ gF3 $ gM3
d11 $ gF3 $ gMute3
$ note ("<d d e cs d d e cs f f g e f f g a>"
+ "0(<3!3 [3 <5 6>]>,8)"
+ 12
......
-- euphorie solitaire
do
-- resetCycles
setcps (140/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 -- Kick premier`
$ gF1 $ gM2
-- $ midiOn "^42" (off "e" (# "jazz:0"))
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^42" (<| "k k k <k <[~ k] k*2>>")
-- $ fix ((# att 0.5) . (# legato 0.5) . (|- note 6)) ("tek_kick:3")
$ "[kick:4]"
# room 0.2 # sz 0.8 # dry 1.1
d2 $ gM1 $ gF1 -- Snare second
-- $ fix (# lpf 4000) "snare"
$ midiOff "^43" (mask "<t!16 f!16>")
$ fix ((|* gain 1.1) . (|- note 2)) ("ab:11")
$ "~ s ~ s*<1!3 2>"
# "[<ab:10!3 ab:11>]"
d3 $ gM1 $ gF1
$ midiOn "^76" (ply 2)
-- $ midiOn "^44" (mask "t([16 <16 [32 64]>],64)" . chop 16 . ply 4)
$ "dr*[8 [<8 <16 [16 <8 32> 16]>>]]"
# "dr"
# gain (fast 8 $ range 0.85 0.95 perlin)
d4 $ gF2 $ gM3
$ midiOn "^89" (ply "8 <4 16>")
$ slice 8 "<7 6>"
$ "meth_bass:0"
# cut 4
# octersubbus 41 (range 0 2 "^33")
# crushbus 42 (range 16 0.85 "^53")
|- note 0.5
# gain 0.6
# room 0.3 # sz 0.5 # dry 0.9
d5 -- Melancolie solitaire
$ midiOn "^58" ( superimpose (
(+ note "12")
. stut 4 0.9 "<e!12 q!4>"
. (# pan 0.3)
. (|* gain 0.8)
. mask "t(1,8) t(1,8) t(1,8) t(1,8)")
)
$ slow 2
$ note (
-- Montee: "<a5 g5 f5 e5 f5 e5 d5 a4>"
-- Descente: "<d5 e5 f5 g5 d5 e5 g5 a5>"
(fast 4
"<a5 g5 f5 e5 f5 e5 d5 a4 a5 g5 f5 e5 f5 e5 d5 a4 d5 e5 f5 g5 d5 e5 g5 a5 d5 e5 f5 g5 d5 e5 g5 a5>" - 12
)
+| "0(3,8) 0(3,8,<0!7 1>) 0(3,8) <0(3,8) 0>")
# "FMRhodes1"
# pan 0.7
# modIndex (range 0 5 "^54")
d6 $ gF2 $ gM3
-- $ slice 4 "0 1 2 3"
$ whenmod 4 3 (|- note "0 <4 6>")
$ slice 4 "2 <3!1 <1 1>>"
$ "meth_bass:0"
# cut 6
# pan 0.8
|* gain "0.85 1.1"
# room 0.2
# gain 0.5
# octersubbus 61 (range 0 1 "^30")
d7 $ gF3 $ gM3
$ note ("<d g f a>" + "[0,7]" - 12)
# "moogBass"
# pan 0.3
# room 0.2
d8 $ gF1 $ gM1 -- BREAK THAT SHIT
$ midiOn "^60" (slice 8 $ run 16)
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 8
$ midiOn "^36" (loopAt 1 . (# "jungle_breaks:72")) -- Sables mouvants
$ midiOn "^56" (loopAt 1 . (# "jungle_breaks:19")) -- Break sable noir
$ loopAt 2
$ "jungle_breaks:22" -- Sable blanc
# lpf 4000
......@@ -36,7 +36,7 @@ d4 $ gM3 $ gF2 $ chop 16 $ loopAt 4
# dry 1.3
# pan 0.3
# sz (slow 8 $ range 0.7 0.1 sine)
d5 $ gM3 $ gF2
d5 $ gM3 $ gF2
$ midiOn "^58" (off 0.125 id . rev)
$ note ("[g@2 ~!4 <f ~ as5 c6>]" - 24)
# crushbus 51 (range 16 2.5 "^54")
......
do
setcps (110/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF $ gMute
d1 $ gF1 $ gMute2
$ midiOn "^42" (<| "k k k <k [<~ k?> k]>")
$ midiOff "^42" (<| "k . ~ k ~ <~!7 k>")
$ "[techno:0,808bd:2,909,kick:4]"
# gain 0.9
d2 $ gF $ gM -- Snare FOU
d2 $ gF1 $ gM1 -- Snare FOU
$ superimpose (# lpf 5300) -- Double bass
$ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>")
$ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>")
......@@ -23,7 +23,7 @@ d2 $ gF $ gM -- Snare FOU
$ "[sn:25,gretsch:4]"
# note (range "-4" 4 "^51")
# gain 0.7
d3 $ gF $ gM
d3 $ gF1 $ gM1
$ midiOn "^44" (ply "1 2 1 <2 <1 4>>")
$ midiOn "^76" (ply 2)
$ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>"
......@@ -31,7 +31,7 @@ d3 $ gF $ gM
# gain 0.8
-- # midiG' "^80" 0 1.2
# pan (0.3 - 0.2 * perlin)
d4 $ gF2 $ gMask
d4 $ gF2 $ gM3
$ midiOff "^57" (midiOn "^89" (ply "<4!3 [4 8]>"))
-- $ midiOn "^57" (midiOn "^89" (slice 4 (run 8)) . chop 8)
-- $ midiOn ("^89" - "^57") (fast "2" . slice 16 ("[0 1 2 3]*<4 8>" + (slow 2 "<0 4 8 12>")))
......@@ -43,7 +43,7 @@ d4 $ gF2 $ gMask
$ "bass_gameboy"
# cut 4
# gain 0.9
d5 $ gF3 $ gMask -- La pluie d'étoiles
d5 $ gF3 $ gM3 -- La pluie d'étoiles
$ whenmod 64 32 (off "q" ((|+ note 12) . (# pan 0.8)))
$ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1)))
$ whenmod 16 8 (off "h" ((|+ note 12) . (# pan 0.8)))
......@@ -52,16 +52,15 @@ d5 $ gF3 $ gMask -- La pluie d'étoiles
$ "synth_gameboy:5"
# pan 0.2
# hpfbus 51 (range 0 8000 "^34")
# midiG' "^82" 0 0.9
d6 $ gF3 $ gMask -- La corne de l'espoir
# gain 0.9
d6 $ gF3 $ gM3 -- La corne de l'espoir
$ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61)))
$ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>")
$ loopAt 2
$ "synth_atari:5"
# cut 6
# gain 0.8
# midiG' "^83" 0 0.9
d7
d7 $ gF2 $ gM3
$ superimpose (|+ note "[0,7]")
$ note "<fs3 b4 a4 cs5 fs4 e4 d4 cs5 fs3 b4 a4 cs5 fs4 b5 a5 cs6>"
# "moogBass"
......@@ -69,7 +68,7 @@ d7
# octerbus 72 (range 0 1 "^35")
# roombus 71 (range 0.3 1.2 "^55") # dry 1.8 # sz 0.7
# gain 0.8
d8 $ gF $ gMask
d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11"))
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38"))
-- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
......@@ -81,4 +80,4 @@ d8 $ gF $ gMask
$ "breaks165"
# cut 4
# pan 0.7
# midiG' "^84" 0 1.2
# gain 1.2
......@@ -11,7 +11,7 @@ let gM = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2 -- Kick variable
$ midiOn "^75" (fast 2)
$ midiOn "^76" (fast 2)
$ midiOn "^42" (struct "t t t <t!3 t*2 t!3 t*2>") -- COME FOR THE KICK
-- $ midiOff "^42" (struct "~ <t!3 ~>") -- L'attente
$ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~")
......@@ -19,7 +19,7 @@ d1 $ gF1 $ gMute2 -- Kick variable
$ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
-- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
-- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
-- # midiG' "^78" 0 1
# gain 1.3
d2 $ gF1 $ gMute $ fast 2 -- Snare dnb assorti
$ midiOn "^42" ( -- STAY FOR THE SNARE
(<| "~ cp ~ cp*<1!3 2 1 2 1 2 1 2 2 2 1 2 1 2 2 2 1 2>")
......
do
-- resetCycles
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (struct "t t t <t!3 t*2 t t [~ t] t>")
$ "jazz"
d2 $ gF1 $ gM1 $ "~ clap:1"
# room 0.8 # dry 1.1 # sz 0.1
# hpf 5000
d3 $ gF1 $ gM1
$ midiOn "^44" (fast 2)
$ "hh(<3!3 5>,8,<0!6 1 2>)"
d4 $ gF2 $ gM3 -- Basse Fantome
$ note ("<[a3@2 e4@3] [b3@2 d4@3] [c4@2 e4@3] [<b3 f4>@7 g3]>" + "[12,24]")
# "wobble"
# room 0.4 # sz 0.8
# pan 0.3
# gain 1.4
# crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3 -- LASER SALVATEUR
$ midiOn "^90" (slice 4 (run "<4!3 8>. <4 8> <4 8 8 16>"))
$ chop 4
$ "synth_atari/4"
# n "<23!0 <24 25 24 23>!16>"
# n 23
# cut 4
# room 0.5
# dry 1.5
# sz 0.6
# pan 0.8
# octersubbus 51 (range 0 2 "^34")
# octersubsubbus 52 (range 0 1.2 "^34")
# crushbus 53 (range 16 2 "^54")
# att 0.2 # rel 3.2
d8 $ gF1 $ gM1
$ midiOn "^56" (loopAt 2)
$ midiOn "^92" (ply "2 <2 4 4 [16 . 8 4]>")
$ chop 8
$ loopAt 2
$ "jungle_breaks:45"
# gain 0.8
d9
$ chop 8
$ "90s_synatm:0/4"
# room (slow 16 $ range 0.2 0.8 sine) # sz 0.5
# crush (segment 8 $ range 14 5.2 (slow 8 perlin))
# att 2
# rel 10
# cut 9
d10
$ gF3 $ gM3
$ someCyclesBy "<0!32 1!32>" (>| note ("<c5 b4 a4 e4>" - "g"))
$ someCyclesBy "<1!32 0!32>" (>| note ("<c4(<1!8 <3!3 [3 <5 8>]>!24>,8) <d4!4 f4!4> e4 <c4 f4 c4 a4>>" - "g"))
$ "90s_synatm:5"
# cut 10
# room 0.4
resetCycles
do
setcps(125/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let prog = "<c g f c>"
d1 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
$ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:5,tech:5,jazz]"
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ fix ((|* gain 0.8) . (# room 0)) "cp"
$ "[cp]" # room 0.4 # sz 0.5 # dry 1.2
# gain 0.7
-- # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
$ midiOn "^76" (ply 2)
$ "drum:2*[<6!3 12> <6 [8 <12 24>]>]"
# "h2ogmsn:12"
# cut 3
# legato (range 0.48 1 sine)
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# room 0.14 # sz 0.4 # dry 1
# pan "<0.7!16 0.3!16>"
-- # pan 0.8
d4 $ gM3 $ gF2
$ midiOn "^57" (superimpose ( -- Arp up!
struct "t*<4 8>" .
(|+| note (arp "down" "[0,<5 7>,9, 12]")) . (# cut 41))
)
$ midiOn "^89" (ply "2 <4 8>")
-- $ chop 8
$ loopAt 4
$ note (prog - 36 + "0(3,8) 0(<3 5>,8,<0!6 2!2>)")
# "bassWarsaw"
# cut 4
# legato 4
# pan 0.35
# room 0.3
# crushbus 41 (range 12 4.5 "^53")
d5 $ gM3 $ gF3
$ someCyclesBy (slow 8 $ range 0.1 1 saw) (degradeBy "0 1!6 0.5")
$ swingBy ("<1!3 <2 1>>"/3) 4
$ note (prog - 12 + arp "pinkyup" "c'min'4")
# "FMRhodes2"
# cut 4
# legato 4
# pan 0.35
# room 0.3
# modIndex (range 0 50 "^54")
d7 $ gF3 -- Anges du Minitel
$ midiOn "^91" (chop 8)
$ swingBy ("<1!3 2>"/3) 4
$ stut (slow 16 "<0 1 2 3>") 0.75 "e"
$ note ((slow 4 prog) + arp "up" "<c'min'3!3 c>@3 ~")
# pan 0.2
# room 0.4
# "moogBass"
# gain 0.8
d10 $ gF3 $ gM3 -- Anges du Minitel
$ note ((slow 4 prog) + arp "up" "c'min'3(<3 3 <5 3> 5>,8) ~")
# "moogBass"
d8 $ gM1 $ gF1
-- Transforms over samples
$ midiOn "^60" (iter "1 4") -- Split
$ midiOn "^92" (fast 2) -- Multi
$ chop 16
$ loopAt 2
-- Sample selection
$ midiOn "^36" (# n 33)
$ midiOn "^56" (loopAt 1 . (# "break:7"))
$ "jungle_breaks:20"
# cut 8
# pan "<0.3!16 0.7!16>"
# gain 0.78
d5 $ gM3 $ gF3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<56 56 57 56 58!4 59 59 56 59>"
# cut 5
# pan 0.6
d7 $ gM3 $ gF3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<66!4 67!4>"
# cut 7
# octerbus 71 (range 0 0.5 "^55")
# pan 0.1
d12 $ gM3 $ gF3
$ slice 4 "<<[0 1 2 3] [0 1 0 1 2 3 2 3]> [0 1 2 3]>"
$ chop 8
$ loopAt 2 $ "nujazz_keys125:44"
# cut 5
# gain 0.8
# pan 0.7
# room 0.2
d11 $ gM3 $ gF3
-- $ (0.5 <~)
$ loopAt 2
$ "nujazz_keys125"
# n "<4!3 5>"
# cut 5
# roombus 110 (slow 16 $ range 0 0.9 saw)
# lpfbus 112 (slow 32 $ range 12000 500 sine)
# att 0.02
# rel 7
# gain 0.9
d10 $ gM3 $ gF3
$ superimpose (
mask "<f!16 t!16>"
. arp "<up [up down]>"
. (|+ note "c'maj'4") . (|* gain 0.75))
$ note ("<c5 g4 <ef4!2 bf4!2> <c4 f4>>" + "0(3,8) 0(3,8)"
-- - 12
)
# "[FMRhodes1]"
# modIndex 1
# room 0.2
# pan 0.45
# gain 1.2
......@@ -48,13 +48,15 @@ d4 $ gF2 $ gM3
# roombus 42 (range 0 0.4 "^33")
# "bassWarsaw"
d5 $ gF3 $ gM3 -- Piano guide premier
$ midiOn "^58" (slice 4 "<2 ~> <1 <2 [2 1]>>" . (# n 60))
-- $ midiOn "^90" (slice 4 "<2 ~> <1 2>" . (# n 60))
$ "nujazz_keys120"
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.9
# gain 0.8
d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16
$ loopAt 2
......
resetCycles
do
do
setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
......@@ -51,12 +51,16 @@ d4 $ gF2 $ gM3 -- TODO: Varier basse?
# cut 4
# crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3
$ midiOn "^58" ((# freeze 0.2))
$ midiOn "^90" (chop "4 <2 4 4 8>")
$ chop 8
$ loopAt 4
$ "nujazz_keys120"
# n (slow 4 "<5 6 7 8>")
# gain 1.2
# gain 1.4
# cut 5
# crushbus 51 (range 16 6.4 "^54")
# octerbus 52 (range 0 0.7 "^34")
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16
-- $ chop 16
......
......@@ -38,6 +38,7 @@ d3 $ gF1 $ gM1 -- Highest hats
# pan "<0.7!16 0.3!16>"
-- # pan 0.8
d4 $ gM3 $ gF2
$ midiOn "^57" (slice 4 "<0 1 2 3>*4")
$ midiOn "^89" (ply "2 <4 8>")
$ chop 8 $ loopAt 4
$ "nujazz_bass125:1"
......
resetCycles
do
setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[jazz,house]"
d2 $ gF1 $ gM1 -- Surprise fourth fast snare
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^76" (ply 2)
-- $ "d(<8 10 12 <14 [16 32 [16 <16 32>]]>>,16,1)" -- FIXME IRREGULIER
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
-- # "[h2ogmsn:14]"
# "[rampleS57:2]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4 $ gF2 $ gM3
$ whenmod 32 16 (# legato "<h!4 q!4 e!6 s!2>")
$ midiOn "^89" (off "e" (|+ note 12))
$ note "<[e3@3 b2@2] [a3@3 e3@2] [f3@3 <c3 c4>@2] <[d3@3 b2@2] [b2@3 f3@2]>>"
# "bassWarsaw"
# crushbus 41 (range 16 2 "^53")
# octerbus 42 (range 0 1.92 "^33")
# pan 0.4
# room 0.4 # sz 0.4
-- e b...a e4! f3 c4.. d3 b3
d5 $ gMute3 $ gF3
$ midiOn "^58" (# n "12")
$ midiOn "^90" (superimpose ((# cut 51) . (|* gain 0.8) . ply 8 . chop 8))
$ n "<10!3 11 10!3 11 10!3 11 10!3 11>"
# "nujazz_guitar120"
# cut 5
# pan 0.56
# room 0.9 # sz 0.3
# dry (range 0.1 1.9 "^34")
# crushbus 51 (range 16 2 "^54")
d8 $ gF1 $ gM1
-- $ midiOn "^60" (mask "t(8,16)")
$ chop 16
$ midiOn "^92" (ply "<2!3 [2 4]>")
$ midiOn "^36" (loopAt 0.5 . (# n "50"))
$ midiOn "^56" (loopAt 2 . (# n "<0!3 1 0 0 1 1>"))
$ loopAt 2 $ "jungle_breaks:60"
# gain 0.8
# pan 0.7
d10 $ gM3 $ gF3
$ mask "[t!3 f!2]"
$ superimpose (|+ note 12)
$ arp "<up!3 down>"
$ note (
"<[e3@3 b3@2] [a3@3 e4@2] [f3@3 c4@2] <[d3@3 b3@2] [b2@3 f3@2]>>"
+ "[0 12 <0!2 7 0> <12 24>]*4"
+ 0)
# "moogBass"
# legato 1
# gain 0.5
# room 0.9 # sz 0.8 # dry 0.4
# pan (slow 4 $ range 0.05 0.33 saw)
d11 $ gM3 $ gF3
$ superimpose (|+ note 12)
-- $ arp "<pinkyup>"
$ note (
"<[b3@7 e3] [e4@7 a3] [c4@7 d4] <[b3@7 d3] [f3 b2]>>"
-- + "[0 12 <0!2 7 0> <12 24>]*4"
+ 12)
# "moogBass"
# legato 1
-- # gain 0.5
# room 0.9 # sz 0.8 # dry 0.4
# pan (slow 4 $ range 0.95 0.66 saw)
d3 $ "hh*8"
-- TODO KILL GRAVEYARD
d4 $ gF2 $ gM3
$ note ("e3 <b2!3 <ef3 g3>>" |+| "[0 ~ ~ 0 ~ ~ 0 ~] [0 ~ ~ 0 ~ <~ 0> 0 <~!3 0>]")
# crushbus 41 (range 16 3.4 "^53")
# roombus 42 (range 0 0.4 "^33")
# "bassWarsaw"
d5 $ gF3 $ gM3 -- Piano guide premier
$ "nujazz_keys120"
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.9
d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16
$ loopAt 2
$ "nujazz_bass120"
# n "<33!64 34!64>"
# pan 0.3
# cut 4
# att 0.06 # rel 2
# crushbus 41 (range 16 3 (slow 16 $ perlin))
d10 $ gF3 $ gM3
$ someCyclesBy "<1!32 0!32>" (|+ note "<e g bf b>")
$ someCyclesBy "<0!32 1!32>" (|+ note "<e b bf g>")
$ note (
"[0 12 0(<1!3 <3 [3 1]>>,5)]"
+ "[0,12]"
- 12
)
# cut 10
# "cpluck:4"
d7 $ gF1 $ gM1 -- SECOND BREAK!!?!
$ midiOn "^91" (ply 2)
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
$ midiOn "^59" (slice 8 (run "8 <8!3 16>"))
$ chop 8
$ loopAt 2
$ "jungle_breaks:22"
# pan "0.8 0.2"
d8 $ gF1 $ gM1 -- Le Beat, Nu
$ midiOn "^60" (slice 8 $ run 16)
$ midiOn "^92" (ply "2 <2 <4 [4 8]>>")
$ chop 16
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:6"))
$ midiOn "^56" (# "jungle_breaks:24")
$ loopAt 4
$ n "<10!8 11!8 12!8 10!8>"
# pan "0.2 0.8 0.2 0.8"
# "nujazz_beats120"
-- # pan 0.26
-- # gain 0.9
-- # octersub 1.2
-- # octersubsub 2
# cut 8
# gain 0.9
......@@ -27,7 +27,7 @@ d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# gain 1.2
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
......
-- L'Été a MauerPark
do
setcps (120/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
......@@ -49,7 +47,7 @@ d7 $ gF3 $ gM3 -- High Cello Dauphin
# cut 7
# room 0.2
# pan 0.9
# crushbus 71 (range 16 2.5 "^55")
# crushbus 71 (range 16 2.5 "^55")
-- # midiG' "^83" 0 1.2
# gain 0.7
d3 $ gF $ gMute
......@@ -77,7 +75,7 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
# pan 0.4
# crushbus 41 (range 16 2.5 "^53")
-- # midiG' "^81" 0 1.6
d5 $ gF3 $ gMute2 -- Leads reponse
d5 $ gF3 $ gMute2 -- Leads reponse TODO moins carre?
$ midiOn "^90" (struct "t*<16 32>") -- Basse folle
$ midiOn "^58" (|+ note 12)
-- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
......
......@@ -17,23 +17,20 @@ d1 $ g1 -- Le pouvoir de voler
$ fix (|* gain 1) "808bd"
$ fix ((|* gain 0.8)) "909"
$ "[jazz,909,808bd:4]"
# midiG' "^78" 0 1.4
# gain 1.4
d2 -- Every superhero needs a clap
$ midiOn "^43" (fast 2)
$ g1
$ superimpose (
(# "clap:1")
. (|* gain (slow 16 $ range 0.5 0.8 saw))
)
$ "~ cp"
# note (-2)
# midiG' "^79" 0 1.1
# "h2ogmcp"
-- # note (-2)
# gain 1.1
d3 $ g1 -- Gretsch frappe ton os pour le renforcer
$ midiOn "^44" (fast "1 2")
$ sometimesBy "^52" (ply "1 2 1 2")
$ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch"
$ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]"
# midiG' "^80" 0 1.75
-- # midiG' "^80" 0 1.75
d9 $ g2 -- G0dz1ll4
$ midiOn "^60" (off 1 (
(|+ pan 0.3)
......
# Code nu
> Nu-jazz focus
Invoque l'ete
Cafe chaud
Cafe tiede
**Salut Nu**
Cafe bouillant
Cafe tiede+
Cafe glace
Infusion Basse
Invoque l'ete
Disparition d'Elmo
Nu dans la boue?
Salut Nu
......@@ -4,12 +4,13 @@
Oct4 - **Glitchs sauvages**
Contre Visite
**Nuit agitee** [trop fort]
Bain bouillant
Nouveau soleil
_Permanence_
Haunted house
About time
AtaRight
Empreinte du numerique
Burn this book
## WORK WITH NASS <#
Bain bouillant
Nouveau soleil
Force Motrice [DNB Nassim]
......@@ -103,7 +103,7 @@ s.waitForBoot {
//~dirt.start(57120, 0 ! 12); // start listening on port 57120, create two busses each sending audio to channel 0
~dirt.start(57120, [0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24]); // start listening on port 57120, MULTICHANNEL - ALSO UPDATE NUMOUTPUT
// ~dirt.soundLibrary.addMIDI(\midi, ~midiOut); // Connect `midi` synth to iO4
//~dirt.soundLibrary.addMIDI(\midi, ~midiOut); // Connect `midi` synth to iO4
//~looper = TidalLooper(~dirt); // Start TidalLooper on top :)
// ~looper.linput = 1;
......
......@@ -19,7 +19,7 @@ d3 $ gF1 $ gM1 $ "hh(<3!3 <3 5 7 1>>,8) hh(<3!3 5>,8)"
# gain 0.8
d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline
$ sometimesBy (1 - "^17") (# n "7")
$ midiOn "^89" (ply "2 4")
$ midiOn "^89" (ply "2 <2 2 4 8>")
$ midiOn "^57" ( -- SLICING MACHINE
slice 16 ("<0 4 8 12>"
+ "<[0 1 2 3]!8 [<0 3 1 <3 2>>*8]!8>"))
......@@ -30,10 +30,11 @@ d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline
# pan 0.4
# cut 4
d5 $ gF3 $ gM3 -- Pixelated love
-- $ midiOn "^58" ()
$ swing 16
$ arp "up"
-- Shape of my pixel hearts )
$ whenmod 64 8 (|+| note "0 12 0 <12!8 [12 24 12 0 12]!4 [12 0 12 -12 0]!3 [[12 24]*8]>")
-- Shape of my pixel hearts
$ whenmod 64 8 (|+| note "0 12 0 <12!8 [12 24 12 0 12]!4 [12 0 12 -12 0]!3 [[12 0 12]*8]>")
$ note (
"<g a bf <c6!3 d6>>" -- Gamme
- 12 -- Octave
......@@ -60,7 +61,10 @@ d11 $ gF3 $ gM3
# end 0.05
# gain 0.7
# room 0.8 # sz 0.8 # dry 1.9
d8
$ chop 4
d8 $ gF1 $ gM1 -- Break danse orleanaise
$ chop 16
$ midiOn "^92" (ply "<2 [2!3 <4 8>]>")
$ midiOn "^36" (loopAt 2 . (# n "<44!7 [44 48]>"))
$ midiOn "^56" (loopAt 2 . (# "jungle_breaks:48"))
$ loopAt 2
$ "jungle_breaks:45"
......@@ -17,6 +17,7 @@ $ "electrn:8"
--
-- # crush 4.5
d1 $ "bd"
once $ note "c@2 [c c]@1 ds g" # "giorgio_syn:6" # cut 1
......
study/tidal-worksheets
\ No newline at end of file
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