Commit cef10bdf by PLN (Algolia)

Sessions: Repeat 1 FDLM24

parent 663c33ff
...@@ -41,18 +41,21 @@ soir noir ...@@ -41,18 +41,21 @@ soir noir
## `24Facons` to love music ## `24Facons` to love music
### January Cold Love ### January Cold Love
-- Cafe Tiede -- Trois Cafes :)
-- Disparition Elmo -- Disparition Elmo 🇬🇵
-- Infiltrations </3 -- Infiltrations </3
-- Froid de Minuit ❄️❄️❄️
-- Infusion Basse 🍵
-- Qui sait ? 🌇
## Nouvelle Epoque 23 ## Nouvelle Epoque 23
### **December Celebrations** ### **December Celebrations**
-- Salut Nu (Verite Nue) -- Salut Nu
-- Nu dans la Boue -- Nu dans la Boue
### November Rains ### November Rains
-- Ambient Chaos <3 -- _Ambient Chaos_ <3 TODO: Add more leads :D
-- JeuDrill -- JeuDrill
### Beatober and other seasonal activities ### Beatober and other seasonal activities
- Oct4: Glitch Sauvages Techno recorded once, peaufine :) - Oct4: Glitch Sauvages Techno recorded once, peaufine :)
...@@ -70,7 +73,7 @@ soir noir ...@@ -70,7 +73,7 @@ soir noir
- Punk Teng with raph! - Punk Teng with raph!
- The Good Bass! - The Good Bass!
- Tour du ciel - Tour du ciel
- _Prestance_: Ambient wip - _Prestance_: Ambient wip needs adjustment :)
-- **Sel Marin**: Nuit noire dans la mer noire, TODO varier bass -- **Sel Marin**: Nuit noire dans la mer noire, TODO varier bass
-- **_Bain bouillant_**: sub bass and jungle breaks :) -- **_Bain bouillant_**: sub bass and jungle breaks :)
...@@ -765,7 +768,7 @@ Clameur? Brouillon? ...@@ -765,7 +768,7 @@ Clameur? Brouillon?
............................................................................... ...............................................................................
............................................................................... ...............................................................................
## SOLSTICE 23 ## TOPLAP SOLSTICE 23
-- Permanence 🫶🫶🫶🫶 -- Permanence 🫶🫶🫶🫶
-- Bain Bouillant 🤿 🤿 -- Bain Bouillant 🤿 🤿
-- Haunted House 👻 👻 -- Haunted House 👻 👻
...@@ -779,3 +782,31 @@ Clameur? Brouillon? ...@@ -779,3 +782,31 @@ Clameur? Brouillon?
-- _Cafe chaud_ -- _Cafe chaud_
-- _Cafe tiede_ -- _Cafe tiede_
-- Salut Nu <3 -- 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) ...@@ -17,9 +17,10 @@ setcps (140/60/4)
d1 $ gF1 $ gMute2 d1 $ gF1 $ gMute2
$ midiOff "^42" (<| "<k [~!7 k*<1 2>]>") $ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")
$ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>") $ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
$ "[kick:5]" $ "[kick:5,clubkick]"
# room 0.2 # dry 1.1 # room 0.2 # dry 1.1
# cut 1 # cut 1
# gain 1.5
d2 $ gF1 $ gM1 d2 $ gF1 $ gM1
$ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>") $ 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 ~]>]>") $ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
...@@ -27,14 +28,17 @@ d2 $ gF1 $ gM1 ...@@ -27,14 +28,17 @@ d2 $ gF1 $ gM1
# gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>" # 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)" 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 # drumFrom "rolandtr909" "hh" # cut 3 # gain 0.6 # legato 0.25
d9 $ mask "<f!3 t>" d9 -- Bogdan the Grime sample provider
-- $ (0.1 ~>) $ whenmod 16 12 ( -- I'm from Cardiff!
$ "bogdan_grime:3" (# "bogdan_grime:1") . (# begin "<0!3 0.25>") . (# end "<0.5!3 0.25>")
# end "<0.42!3 0.66>" )
# delay "<0!3 0.7>" $ 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" # delayt "h"
# delayfb 0 # delayfb 0
# speed 0.85 # speed 0.92
# room 0.4 # room 0.4
# gain 1.2 # gain 1.2
d8 $ gF1 $ gM1 -- Come on breaks! d8 $ gF1 $ gM1 -- Come on breaks!
...@@ -47,7 +51,7 @@ d8 $ gF1 $ gM1 -- Come on breaks! ...@@ -47,7 +51,7 @@ d8 $ gF1 $ gM1 -- Come on breaks!
$ loopAt 2 $ loopAt 2
$ "jungle_breaks:26" $ "jungle_breaks:26"
# cut 8 # cut 8
# gain 0.6 # gain 0.9
d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
$ slow 2 $ note ( $ slow 2 $ note (
-- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>" -- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
...@@ -78,10 +82,10 @@ d5 $ gM3 $ gF3 ...@@ -78,10 +82,10 @@ d5 $ gM3 $ gF3
# gain 2 # gain 2
# room 0.3 # room 0.3
d10 $ gF2 -- Menace d10 $ gF2 -- Menace
$ note "<b3 ~ ~ [~!7 c4]>" $ note "<b3 ~ ~ [~!7 c4]>" -- Todo: longer sequence on 8/8?
# "90s_synatm:10" # "90s_synatm:10"
# room 0.3 # sz 0.8 # room 0.3 # sz 0.8
# gain 0.65 # gain 0.95
# att 0.10 # att 0.10
# rel 10 # rel 10
# legato 2 # legato 2
......
...@@ -67,7 +67,7 @@ d8 $ gF1 $ gM1 ...@@ -67,7 +67,7 @@ d8 $ gF1 $ gM1
$ chop 8 $ chop 8
$ loopAt 2 $ loopAt 2
$ midiOn "^20" (loopAt 4) $ 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 "^36" (# "jungle_breaks:55")
$ midiOn "^56" (# "jungle_breaks:45") $ midiOn "^56" (# "jungle_breaks:45")
$ "jungle_breaks:1" $ "jungle_breaks:1"
......
...@@ -39,6 +39,7 @@ d4 $ gF2 -- Baleine sur la défensive ...@@ -39,6 +39,7 @@ d4 $ gF2 -- Baleine sur la défensive
-- TODO: seconde voix -- TODO: seconde voix
# "[bassWarsaw,supersaw]" # "[bassWarsaw,supersaw]"
# midiG' "^81" 0 0.8 # midiG' "^81" 0 0.8
# octerbus 41 (range 0 0.85 "^53")
# crushbus 41 (range 16 3.5 "^53") # crushbus 41 (range 16 3.5 "^53")
# room 0.3 # sz 0.4 # dry 1.1 # room 0.3 # sz 0.4 # dry 1.1
# pan 0.4 # pan 0.4
......
...@@ -21,7 +21,7 @@ d1 ...@@ -21,7 +21,7 @@ d1
$ fix ((# hpf 500) . (|* gain 0.7)) "kick:5" $ fix ((# hpf 500) . (|* gain 0.7)) "kick:5"
$ "[jazz,kick:5]" $ "[jazz,kick:5]"
-- # room 0 -- # room 0
-- # midiG' "^78" 0 1.3 # gain 1.3
d2 $ f1 $ gMute d2 $ f1 $ gMute
$ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32 $ mask "<t(<1!3 3>,4)!4 t!28>" -- Intro / break/32
$ midiOff "^75" maskLoops $ midiOff "^75" maskLoops
...@@ -91,7 +91,7 @@ d7 $ f3 -- High lead: Winds of truth ...@@ -91,7 +91,7 @@ d7 $ f3 -- High lead: Winds of truth
)) ))
$ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2") $ note (scale "aeolian" "<0!3 [0@6 <4 -1>@2]> 2")
# "90s_synatm:18" # "90s_synatm:18"
# room 0.4 # sz 0.8 -- # room 0.4 # sz 0.8
# dry 0.1 # dry 0.1
# cut 7 # cut 7
# crushbus 62 (range 16 2.25 "^55") # crushbus 62 (range 16 2.25 "^55")
......
...@@ -7,46 +7,37 @@ ...@@ -7,46 +7,37 @@
-- (__((__((___()()()------------------------' |0111| -- (__((__((___()()()------------------------' |0111|
-- EMPREINTE DU NUM3R1QU3 -- EMPREINTE DU NUM3R1QU3
do do
let gLPF = ((# djfbus 1 (slow 8 $ range 0.2 0.5 saw))) -- 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 gHPF = ((# djfbus 2 (slow 8 $ range 0.5 0.85 saw)))
let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF) -- let gPont2 = (someCyclesBy "<0!32 1!16 0!16>" gHPF)
let gPont1 = (whenmod 32 24 gLPF) -- let gPont1 = (whenmod 32 24 gLPF)
let g = (# djfbus 1 (range 0.05 0.95 "^49"))
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")) let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16")) 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) setcps (110/60/4)
d1 $ g $ gMute -- Kick d1 $ gF1 $ gM2 $ gMute -- Kick
$ midiOn "^42" (<| "k k k <k k*2>") $ midiOn "^42" (<| "k k k <k k*2>")
$ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~") $ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~")
$ "[jazz,808bd:6]" $ "[jazz,808bd:6]"
# midiG' "^78" 0 1.5 # gain 1.5
d2 $ g $ gM -- d2 $ gF1 $ gM1 --
$ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>") $ midiOn "^43" (fast "<1!3 2 2 2 4 <8 [8 4]>>")
$ "~ s" # "[sn:40,snare:20]" $ "~ s" # "[db:12]"
# note "<-2!3 -4>" -- # note "<-2!3 -4>"
# midiG' "^79" 0 1.8 # gain 1.4
d3 $ g $ gMute d3 $ gF1 $ gMute
$ midiOn "^76" (fast 2) $ midiOn "^76" (fast 2)
$ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>") $ midiOff "^44" (slow "2!3 <1 <2 [4 1]>>")
$ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0" $ "d*[8 . 8 <8 [16 <8 16>]>]" # "electro1:0"
# room 0.3 # room 0.3
# dry 0.95 # dry 0.95
# midiG' "^80" 0 (1.6 * "1.2 1!6 <1 1 1.1 <1.2 1>>") |* gain "1.2 1!6 <1 1 1.1 <1.2 1>>"
d6 -- Break bonus banane d4 $ gF2 $ gM3 -- BASSLINE BoomRang!
$ 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!
$ midiOn "^57" (# n "50") $ midiOn "^57" (# n "50")
$ midiOn "^89" (ply "2 4" . chop "2 <2 4>") $ midiOn "^89" (ply "2 4" . chop "2 <2 4>")
-- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw))) -- $ whenmod 64 32 (# crushbus 41 (range 16 2.5 (slow 32 saw)))
...@@ -61,7 +52,17 @@ d4 $ g $ gPont2 -- BASSLINE BoomRang! ...@@ -61,7 +52,17 @@ d4 $ g $ gPont2 -- BASSLINE BoomRang!
# pan 0.3 # pan 0.3
# crushbus 53 (range 10 1.61 "^53") # crushbus 53 (range 10 1.61 "^53")
# midiG' "^81" 0 1.4 # 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 "^59" (off "s" (|+ note "<7 9 5 <7 12>>"))
$ midiOn "^91" (off "e" (|+ note 12)) $ midiOn "^91" (off "e" (|+ note 12))
$ superimpose (|+| note "<[0 12 0]!3 [0 12 0 12]>") $ superimpose (|+| note "<[0 12 0]!3 [0 12 0 12]>")
...@@ -71,8 +72,7 @@ d7 $ g -- Back solar mandoline ...@@ -71,8 +72,7 @@ d7 $ g -- Back solar mandoline
# room (range 0 0.3 "^55") # room (range 0 0.3 "^55")
# crushbus 71 (range 10 3.61 "^55") # crushbus 71 (range 10 3.61 "^55")
# midiG' "^83" 0 1.5 # midiG' "^83" 0 1.5
d6 -- RHODES FOLIE <33 d5 $ gF2 $ gM3 -- RHODES FOLIE <33
$ g
$ midiOn "^58" (off "e" id) $ midiOn "^58" (off "e" id)
$ midiOn "^90" (jux rev) $ midiOn "^90" (jux rev)
$ mask "t(<[12!3 16] [12!3 8] <12 12 8 16> <4!3 [4 <8 16>]>>,16)" $ 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 ...@@ -83,4 +83,3 @@ d6 -- RHODES FOLIE <33
# pan 0.7 # pan 0.7
# crushbus 61 (range 10 4.4 "^54") # crushbus 61 (range 10 4.4 "^54")
# modIndex (range "-0.1" 100 "^34") # modIndex (range "-0.1" 100 "^34")
# midiG' "^82" 0 1.3
...@@ -65,18 +65,19 @@ d5 $ gM3 $ gF2 -- ACID bassline ...@@ -65,18 +65,19 @@ d5 $ gM3 $ gF2 -- ACID bassline
$ midiOn "^90" ( -- Echoes of future $ midiOn "^90" ( -- Echoes of future
superimpose ((# cut 51) . superimpose ((# cut 52) . (|+ note 12)) superimpose ((# cut 51) . superimpose ((# cut 52) . (|+ note 12))
. (|+ note "[12,<~!8 24!8>]") . (|+ 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) $ 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" $ note ( "f@2 f <gs!2 gf!2>@2 <gs!2 g!2> <g!2 gs <gs gs5>>@2"
- 12 - 12
) )
# distortbus 51 (range 0 2.5 "^54") # distortbus 52 (range 0 2.5 "^54")
# "90s_matrix:4" # "90s_matrix:4"
# pan "<0.2!32 0.8!32>" # pan "<0.2!32 0.8!32>"
-- # octave 3 -- # octave 3
-- # cut 5 # cut 5
-- # midiG' "^82" 0 1.9 -- # midiG' "^82" 0 1.9
d7 $ gF3 $ gM3 d7 $ gF3 $ gM3
$ midiOn "^91" (|- note "c'maj'2")
$ note ( $ note (
(slow 8 $ "<[<f4 as5>]!2 [<ef3!2 [ef4!3 f4] f4>]!2>") (slow 8 $ "<[<f4 as5>]!2 [<ef3!2 [ef4!3 f4] f4>]!2>")
+ "0([3 <3!3 5>],8) . 0(<3!7 [3 5]>,8)" + "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 ...@@ -54,7 +54,7 @@ d4 $ gO $ gF2 $ gM3 -- SUBSUB INFRABASS
d5 $ gO $ gM3 $ gF2 -- Basse appel important 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>]>" $ 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" # "giorgio_syn:0"
# pan 0.35 # pan 0.351
# lpfbus 52 (range 400 4000 "^34") # lpfbus 52 (range 400 4000 "^34")
# distortbus 51 (range 0 1.2 "^54") # distortbus 51 (range 0 1.2 "^54")
# cut 7 # cut 7
......
...@@ -40,10 +40,10 @@ d6 $ gF1 $ gM1 ...@@ -40,10 +40,10 @@ d6 $ gF1 $ gM1
# room 0.4 # dry 1.1 # sz 0.5 # room 0.4 # dry 1.1 # sz 0.5
# lpf 2000 # lpf 2000
# gain 1.1 # gain 1.1
d4 $ gF2 $ gM3 d4 $ gF2 $ gMute3
$ midiOn "^89" (slow "<4!12 8!4>" . striate "<4!12 8!4>") $ 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 "^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 $ loopAt 8
$ chop 64 $ chop 64
$ "bass_commodore:7" $ "bass_commodore:7"
...@@ -73,6 +73,7 @@ d5 $ gF3 $ gM3 ...@@ -73,6 +73,7 @@ d5 $ gF3 $ gM3
# modIndex 0.3 # modIndex 0.3
# legato 2 # legato 2
# gain 1.2 # gain 1.2
d7 $ silence -- FIXME add d7, maybe arps/moog?
d9 $ gF2 $ gM3 -- Essouflement amoureux d9 $ gF2 $ gM3 -- Essouflement amoureux
$ arp "up" $ arp "up"
$ note ( $ note (
...@@ -92,7 +93,7 @@ d10 $ gF3 -- Angels of constance ...@@ -92,7 +93,7 @@ d10 $ gF3 -- Angels of constance
# "moogBass" # "moogBass"
# room 0.2 # room 0.2
# pan 0.7 # 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>" $ note ("<d d e cs d d e cs f f g e f f g a>"
+ "0(<3!3 [3 <5 6>]>,8)" + "0(<3!3 [3 <5 6>]>,8)"
+ 12 + 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 ...@@ -36,7 +36,7 @@ d4 $ gM3 $ gF2 $ chop 16 $ loopAt 4
# dry 1.3 # dry 1.3
# pan 0.3 # pan 0.3
# sz (slow 8 $ range 0.7 0.1 sine) # sz (slow 8 $ range 0.7 0.1 sine)
d5 $ gM3 $ gF2 d5 $ gM3 $ gF2
$ midiOn "^58" (off 0.125 id . rev) $ midiOn "^58" (off 0.125 id . rev)
$ note ("[g@2 ~!4 <f ~ as5 c6>]" - 24) $ note ("[g@2 ~!4 <f ~ as5 c6>]" - 24)
# crushbus 51 (range 16 2.5 "^54") # crushbus 51 (range 16 2.5 "^54")
......
do do
setcps (110/60/4) 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 gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51")) 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 gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16")) let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16")) let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16")) let gMute3 = (midiOn "^75" (mask "f*16"))
let gM = gMask . gMute let gM1 = gMask . gMute
let gM2 = gMask . gMute2 let gM2 = gMask . gMute2
let gM3 = gMask . gMute3 let gM3 = gMask . gMute3
d1 $ gF $ gMute d1 $ gF1 $ gMute2
$ midiOn "^42" (<| "k k k <k [<~ k?> k]>") $ midiOn "^42" (<| "k k k <k [<~ k?> k]>")
$ midiOff "^42" (<| "k . ~ k ~ <~!7 k>") $ midiOff "^42" (<| "k . ~ k ~ <~!7 k>")
$ "[techno:0,808bd:2,909,kick:4]" $ "[techno:0,808bd:2,909,kick:4]"
# gain 0.9 # gain 0.9
d2 $ gF $ gM -- Snare FOU d2 $ gF1 $ gM1 -- Snare FOU
$ superimpose (# lpf 5300) -- Double bass $ superimpose (# lpf 5300) -- Double bass
$ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>") $ midiOn "^75" (<| "[<~!3 s> s]*<4!3 8>")
$ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>") $ midiOn ("^43" - "^75") (<| "~ s ~ <s s*<1!7 2> s s*2>")
...@@ -23,7 +23,7 @@ d2 $ gF $ gM -- Snare FOU ...@@ -23,7 +23,7 @@ d2 $ gF $ gM -- Snare FOU
$ "[sn:25,gretsch:4]" $ "[sn:25,gretsch:4]"
# note (range "-4" 4 "^51") # note (range "-4" 4 "^51")
# gain 0.7 # gain 0.7
d3 $ gF $ gM d3 $ gF1 $ gM1
$ midiOn "^44" (ply "1 2 1 <2 <1 4>>") $ midiOn "^44" (ply "1 2 1 <2 <1 4>>")
$ midiOn "^76" (ply 2) $ midiOn "^76" (ply 2)
$ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>" $ ply "1 . 1 <<2 1> [<4 [4 2]> 1]>"
...@@ -31,7 +31,7 @@ d3 $ gF $ gM ...@@ -31,7 +31,7 @@ d3 $ gF $ gM
# gain 0.8 # gain 0.8
-- # midiG' "^80" 0 1.2 -- # midiG' "^80" 0 1.2
# pan (0.3 - 0.2 * perlin) # pan (0.3 - 0.2 * perlin)
d4 $ gF2 $ gMask d4 $ gF2 $ gM3
$ midiOff "^57" (midiOn "^89" (ply "<4!3 [4 8]>")) $ midiOff "^57" (midiOn "^89" (ply "<4!3 [4 8]>"))
-- $ midiOn "^57" (midiOn "^89" (slice 4 (run 8)) . chop 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>"))) -- $ 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 ...@@ -43,7 +43,7 @@ d4 $ gF2 $ gMask
$ "bass_gameboy" $ "bass_gameboy"
# cut 4 # cut 4
# gain 0.9 # 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 64 32 (off "q" ((|+ note 12) . (# pan 0.8)))
$ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1))) $ whenmod 32 16 (off "e" ((|+ note 9) . (|+ pan 0.1)))
$ whenmod 16 8 (off "h" ((|+ note 12) . (# pan 0.8))) $ whenmod 16 8 (off "h" ((|+ note 12) . (# pan 0.8)))
...@@ -52,16 +52,15 @@ d5 $ gF3 $ gMask -- La pluie d'étoiles ...@@ -52,16 +52,15 @@ d5 $ gF3 $ gMask -- La pluie d'étoiles
$ "synth_gameboy:5" $ "synth_gameboy:5"
# pan 0.2 # pan 0.2
# hpfbus 51 (range 0 8000 "^34") # hpfbus 51 (range 0 8000 "^34")
# midiG' "^82" 0 0.9 # gain 0.9
d6 $ gF3 $ gMask -- La corne de l'espoir d6 $ gF3 $ gM3 -- La corne de l'espoir
$ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61))) $ whenmod 8 6 (juxBy 0.8 (rev . (# cut 61)))
$ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>") $ slice 8 ("<0 0 1 <[1 1] [2 <~ 2> 3 <~ 3>]>>")
$ loopAt 2 $ loopAt 2
$ "synth_atari:5" $ "synth_atari:5"
# cut 6 # cut 6
# gain 0.8 # gain 0.8
# midiG' "^83" 0 0.9 d7 $ gF2 $ gM3
d7
$ superimpose (|+ note "[0,7]") $ superimpose (|+ note "[0,7]")
$ note "<fs3 b4 a4 cs5 fs4 e4 d4 cs5 fs3 b4 a4 cs5 fs4 b5 a5 cs6>" $ note "<fs3 b4 a4 cs5 fs4 e4 d4 cs5 fs3 b4 a4 cs5 fs4 b5 a5 cs6>"
# "moogBass" # "moogBass"
...@@ -69,7 +68,7 @@ d7 ...@@ -69,7 +68,7 @@ d7
# octerbus 72 (range 0 1 "^35") # octerbus 72 (range 0 1 "^35")
# roombus 71 (range 0.3 1.2 "^55") # dry 1.8 # sz 0.7 # roombus 71 (range 0.3 1.2 "^55") # dry 1.8 # sz 0.7
# gain 0.8 # gain 0.8
d8 $ gF $ gMask d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11")) $ midiOn "^20" (loopAt 2 . (# "jungle_breaks:11"))
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38")) $ midiOn "^36" (loopAt 2 . (# "jungle_breaks:38"))
-- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41))) -- $ sometimesBy "^56" (off "h" ((|+ pan 0.2) . ply 2 . (# cut 41)))
...@@ -81,4 +80,4 @@ d8 $ gF $ gMask ...@@ -81,4 +80,4 @@ d8 $ gF $ gMask
$ "breaks165" $ "breaks165"
# cut 4 # cut 4
# pan 0.7 # pan 0.7
# midiG' "^84" 0 1.2 # gain 1.2
...@@ -11,7 +11,7 @@ let gM = gMask . gMute ...@@ -11,7 +11,7 @@ let gM = gMask . gMute
let gM2 = gMask . gMute2 let gM2 = gMask . gMute2
let gM3 = gMask . gMute3 let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2 -- Kick variable 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 $ 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" (struct "~ <t!3 ~>") -- L'attente
$ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~") $ midiOff "^42" (fast 2 . struct "t . ~ t ~ ~")
...@@ -19,7 +19,7 @@ d1 $ gF1 $ gMute2 -- Kick variable ...@@ -19,7 +19,7 @@ d1 $ gF1 $ gMute2 -- Kick variable
$ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif! $ "[techno:0,808bd:2,909,kick:4]" -- Kick explosif!
-- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable -- $ "[techno:0,808bd:2,jazz]" -- Kick raisonnable
-- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb -- $ "[techno:0,bskick,jazz,kick:4]" -- Kick dnb
-- # midiG' "^78" 0 1 # gain 1.3
d2 $ gF1 $ gMute $ fast 2 -- Snare dnb assorti d2 $ gF1 $ gMute $ fast 2 -- Snare dnb assorti
$ midiOn "^42" ( -- STAY FOR THE SNARE $ 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>") (<| "~ 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 ...@@ -48,13 +48,15 @@ d4 $ gF2 $ gM3
# roombus 42 (range 0 0.4 "^33") # roombus 42 (range 0 0.4 "^33")
# "bassWarsaw" # "bassWarsaw"
d5 $ gF3 $ gM3 -- Piano guide premier 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" $ "nujazz_keys120"
# n "<61!24 60!8>" # n "<61!24 60!8>"
# pan 0.8 # pan 0.8
# roombus 51 (range 0.1 0.94 "^54") # roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54") # lpfbus 52 (range 10000 400 "^54")
# cut 5 # cut 5
# gain 0.9 # gain 0.8
d11 $ gF2 $ gM3 -- Plucked doubts d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16 $ chop 16
$ loopAt 2 $ loopAt 2
......
resetCycles resetCycles
do do
setcps(120/60/4) setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")) let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16")) let gMute = (midiOn "^73" (mask "f*16"))
...@@ -51,12 +51,16 @@ d4 $ gF2 $ gM3 -- TODO: Varier basse? ...@@ -51,12 +51,16 @@ d4 $ gF2 $ gM3 -- TODO: Varier basse?
# cut 4 # cut 4
# crushbus 41 (range 16 4 "^53") # crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3 d5 $ gF3 $ gM3
$ midiOn "^58" ((# freeze 0.2))
$ midiOn "^90" (chop "4 <2 4 4 8>")
$ chop 8 $ chop 8
$ loopAt 4 $ loopAt 4
$ "nujazz_keys120" $ "nujazz_keys120"
# n (slow 4 "<5 6 7 8>") # n (slow 4 "<5 6 7 8>")
# gain 1.2 # gain 1.4
# cut 5 # cut 5
# crushbus 51 (range 16 6.4 "^54")
# octerbus 52 (range 0 0.7 "^34")
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?! d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16 -- $ striate 16
-- $ chop 16 -- $ chop 16
......
...@@ -38,6 +38,7 @@ d3 $ gF1 $ gM1 -- Highest hats ...@@ -38,6 +38,7 @@ d3 $ gF1 $ gM1 -- Highest hats
# pan "<0.7!16 0.3!16>" # pan "<0.7!16 0.3!16>"
-- # pan 0.8 -- # pan 0.8
d4 $ gM3 $ gF2 d4 $ gM3 $ gF2
$ midiOn "^57" (slice 4 "<0 1 2 3>*4")
$ midiOn "^89" (ply "2 <4 8>") $ midiOn "^89" (ply "2 <4 8>")
$ chop 8 $ loopAt 4 $ chop 8 $ loopAt 4
$ "nujazz_bass125:1" $ "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 ...@@ -27,7 +27,7 @@ d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c") $ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~") $ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp:1,rampleM1:10]" $ "[cp:1,rampleM1:10]"
# gain 0.9 # gain 1.2
# lpf 4650 # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2) $ midiOn "^44" (ply 2)
......
-- L'Été a MauerPark -- L'Été a MauerPark
do do
setcps (120/60/4) setcps (120/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49")) let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
...@@ -49,7 +47,7 @@ d7 $ gF3 $ gM3 -- High Cello Dauphin ...@@ -49,7 +47,7 @@ d7 $ gF3 $ gM3 -- High Cello Dauphin
# cut 7 # cut 7
# room 0.2 # room 0.2
# pan 0.9 # pan 0.9
# crushbus 71 (range 16 2.5 "^55") # crushbus 71 (range 16 2.5 "^55")
-- # midiG' "^83" 0 1.2 -- # midiG' "^83" 0 1.2
# gain 0.7 # gain 0.7
d3 $ gF $ gMute d3 $ gF $ gMute
...@@ -77,7 +75,7 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique ...@@ -77,7 +75,7 @@ d4 $ gF2 $ gM3 $ slow 2 -- Basse Germanique
# pan 0.4 # pan 0.4
# crushbus 41 (range 16 2.5 "^53") # crushbus 41 (range 16 2.5 "^53")
-- # midiG' "^81" 0 1.6 -- # 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 "^90" (struct "t*<16 32>") -- Basse folle
$ midiOn "^58" (|+ note 12) $ midiOn "^58" (|+ note 12)
-- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]") -- $ sometimesBy "^18" (bite 4 "[0, [~ 2]]")
......
...@@ -17,23 +17,20 @@ d1 $ g1 -- Le pouvoir de voler ...@@ -17,23 +17,20 @@ d1 $ g1 -- Le pouvoir de voler
$ fix (|* gain 1) "808bd" $ fix (|* gain 1) "808bd"
$ fix ((|* gain 0.8)) "909" $ fix ((|* gain 0.8)) "909"
$ "[jazz,909,808bd:4]" $ "[jazz,909,808bd:4]"
# midiG' "^78" 0 1.4 # gain 1.4
d2 -- Every superhero needs a clap d2 -- Every superhero needs a clap
$ midiOn "^43" (fast 2) $ midiOn "^43" (fast 2)
$ g1 $ g1
$ superimpose (
(# "clap:1")
. (|* gain (slow 16 $ range 0.5 0.8 saw))
)
$ "~ cp" $ "~ cp"
# note (-2) # "h2ogmcp"
# midiG' "^79" 0 1.1 -- # note (-2)
# gain 1.1
d3 $ g1 -- Gretsch frappe ton os pour le renforcer d3 $ g1 -- Gretsch frappe ton os pour le renforcer
$ midiOn "^44" (fast "1 2") $ midiOn "^44" (fast "1 2")
$ sometimesBy "^52" (ply "1 2 1 2") $ sometimesBy "^52" (ply "1 2 1 2")
$ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch" $ fix ((|* gain 0.86) . (# n "[4|5]")) "gretsch"
$ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]" $ "~ h ~ h ~ h ~ h*<1 2>" # "[hh,gretsch]"
# midiG' "^80" 0 1.75 -- # midiG' "^80" 0 1.75
d9 $ g2 -- G0dz1ll4 d9 $ g2 -- G0dz1ll4
$ midiOn "^60" (off 1 ( $ midiOn "^60" (off 1 (
(|+ pan 0.3) (|+ pan 0.3)
......
# Code nu # Code nu
> Nu-jazz focus > Nu-jazz focus
Invoque l'ete **Salut Nu**
Cafe chaud Cafe bouillant
Cafe tiede Cafe tiede+
Cafe glace Cafe glace
Infusion Basse
Invoque l'ete
Disparition d'Elmo
Nu dans la boue? Nu dans la boue?
Salut Nu
...@@ -4,12 +4,13 @@ ...@@ -4,12 +4,13 @@
Oct4 - **Glitchs sauvages** Oct4 - **Glitchs sauvages**
Contre Visite Contre Visite
**Nuit agitee** [trop fort] **Nuit agitee** [trop fort]
Bain bouillant
Nouveau soleil
_Permanence_ _Permanence_
Haunted house Haunted house
About time About time
AtaRight AtaRight
Empreinte du numerique Empreinte du numerique
Burn this book Burn this book
## WORK WITH NASS <#
Bain bouillant
Nouveau soleil
Force Motrice [DNB Nassim] Force Motrice [DNB Nassim]
...@@ -103,7 +103,7 @@ s.waitForBoot { ...@@ -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 ! 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.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 = TidalLooper(~dirt); // Start TidalLooper on top :)
// ~looper.linput = 1; // ~looper.linput = 1;
......
...@@ -19,7 +19,7 @@ d3 $ gF1 $ gM1 $ "hh(<3!3 <3 5 7 1>>,8) hh(<3!3 5>,8)" ...@@ -19,7 +19,7 @@ d3 $ gF1 $ gM1 $ "hh(<3!3 <3 5 7 1>>,8) hh(<3!3 5>,8)"
# gain 0.8 # gain 0.8
d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline
$ sometimesBy (1 - "^17") (# n "7") $ sometimesBy (1 - "^17") (# n "7")
$ midiOn "^89" (ply "2 4") $ midiOn "^89" (ply "2 <2 2 4 8>")
$ midiOn "^57" ( -- SLICING MACHINE $ midiOn "^57" ( -- SLICING MACHINE
slice 16 ("<0 4 8 12>" slice 16 ("<0 4 8 12>"
+ "<[0 1 2 3]!8 [<0 3 1 <3 2>>*8]!8>")) + "<[0 1 2 3]!8 [<0 3 1 <3 2>>*8]!8>"))
...@@ -30,10 +30,11 @@ d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline ...@@ -30,10 +30,11 @@ d4 $ gF2 $ gM3 -- Blues "Fenbass" bassline
# pan 0.4 # pan 0.4
# cut 4 # cut 4
d5 $ gF3 $ gM3 -- Pixelated love d5 $ gF3 $ gM3 -- Pixelated love
-- $ midiOn "^58" ()
$ swing 16 $ swing 16
$ arp "up" $ arp "up"
-- Shape of my pixel hearts ) -- 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]>") $ 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 ( $ note (
"<g a bf <c6!3 d6>>" -- Gamme "<g a bf <c6!3 d6>>" -- Gamme
- 12 -- Octave - 12 -- Octave
...@@ -60,7 +61,10 @@ d11 $ gF3 $ gM3 ...@@ -60,7 +61,10 @@ d11 $ gF3 $ gM3
# end 0.05 # end 0.05
# gain 0.7 # gain 0.7
# room 0.8 # sz 0.8 # dry 1.9 # room 0.8 # sz 0.8 # dry 1.9
d8 d8 $ gF1 $ gM1 -- Break danse orleanaise
$ chop 4 $ 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 $ loopAt 2
$ "jungle_breaks:45" $ "jungle_breaks:45"
...@@ -17,6 +17,7 @@ $ "electrn:8" ...@@ -17,6 +17,7 @@ $ "electrn:8"
-- --
-- # crush 4.5 -- # crush 4.5
d1 $ "bd"
once $ note "c@2 [c c]@1 ds g" # "giorgio_syn:6" # cut 1 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