Commit 663c33ff by PLN (Algolia)

Sessions: TroisCafes

parent 47428f65
......@@ -17,7 +17,6 @@ d1 $ gF1 $ gM2 -- Kick solide 4/4 disponible
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
$ "[kick:4]"
# gain 1
d2 $ gF1 $ gM1 -- Snare fantomatique
$ midiOn "^43" (<| "~ s ~ s")
$ midiOff "^43" (<| "~ s")
......
......@@ -16,16 +16,15 @@ d1 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ k ~ ~")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick?
$ "house:0" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[snare:40,rampleM1:10]"
$ "[cp:1,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
......@@ -42,40 +41,39 @@ d3 $ gF1 $ gM1 -- Highest hats
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
d4 $ gF2 $ gM3 -- TODO: Varier basse?
$ midiOn "^89" (ply "2 <2!3 4>")
$ midiOn "^57" (slice 4 (fast "<8!3 16>" "<0 1 2 3>"))
$ midiOff "^57" (slice 4 (fast 1 "<0!3 <1 3>>"))
$ loopAt 4
$ "nujazz_bass120:4"
# cut 4
# crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3
$ chop 8
$ loopAt 4
d4 $ gF2 $ gM3
$ midiOn "^89" (off "e" (|+ note 12))
$ 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 (slow 4 "<5 6 7 8>")
# gain 1.2
# n "<61!24 60!8>"
# pan 0.8
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16
-- $ chop 16
$ loopAt 0.25
$ slice 4 "0 <0!3 1> <0!3 2> 3"
$ "meth_bass" # n "<10!3 [<10 11> 11] 9!24>"
# cut 6
# crush 8
# lpf (slow 32 $ range 4000 400 sine)
# gain 0.6
d8 $ gF1 $ gM1 -- Break populaire
$ midiOn "^92" (ply 2)
$ chop 8
# gain 0.9
d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16
$ loopAt 2
$ midiOn "^36" (loopAt "1 <1 0.5>" . (# "jungle_breaks:6"))
$ midiOn "^56" (# "jungle_breaks:24")
$ "jungle_breaks:53"
# gain 0.5
# pan "0.68 0.42 0.42 0.68"
$ "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"))
......@@ -84,3 +82,19 @@ d7 $ gF1 $ gM1 -- SECOND BREAK!!?!
$ 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
do
-- resetCycles
setcps(125/60/4)
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"))
......@@ -13,90 +14,73 @@ let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
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]"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
$ midiOff "^42" (<| "k . ~ k ~ ~")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ "[cp]"
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[snare:40,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOn "^44" (ply 2)
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^76" (ply 2)
$ "drum:2*[<6!3 12> <6 [8 <12 24>]>]"
# "h2ogmsn:12"
# cut 3
# legato (range 0.48 1 sine)
-- $ "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)))
# room 0.14 # sz 0.4 # dry 1
# pan "<0.7!16 0.3!16>"
-- # pan 0.8
d4 $ gM3 $ gF2
$ midiOn "^89" (ply "2 <4 8>")
$ chop 8 $ loopAt 4
$ "nujazz_bass125:1"
# pan 0.3
d4 $ gF2 $ gM3 -- TODO: Varier basse?
$ midiOn "^89" (ply "2 <2!3 4>")
$ midiOn "^57" (slice 4 (fast "<8!3 16>" "<0 1 2 3>"))
$ midiOff "^57" (slice 4 (fast 1 "<0!3 <1 3>>"))
$ loopAt 4
$ "nujazz_bass120:4"
# cut 4
# pan 0.55
# room 0.3
# crushbus 41 (range 12 4.5 "^53")
d5 $ gM3 $ gF3
# crushbus 41 (range 16 4 "^53")
d5 $ gF3 $ gM3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<56 56 57 56 58!4 59 59 56 59>"
$ loopAt 4
$ "nujazz_keys120"
# n (slow 4 "<5 6 7 8>")
# gain 1.2
# cut 5
# pan 0.6
d7 $ gM3 $ gF3
d6 $ gF1 -- UN GLITCH DANS MON CAFE!!?!
-- $ striate 16
-- $ chop 16
$ loopAt 0.25
$ slice 4 "0 <0!3 1> <0!3 2> 3"
$ "meth_bass" # n "<10!3 [<10 11> 11] 9!24>"
# cut 6
# crush 8
# lpf (slow 32 $ range 4000 400 sine)
# gain 0.86
d8 $ gF1 $ gM1 -- Break populaire
$ midiOn "^92" (ply 2)
$ 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]>"
$ midiOn "^36" (loopAt "1 <1 0.5>" . (# "jungle_breaks:6"))
$ midiOn "^56" (# "jungle_breaks:24")
$ "jungle_breaks:53"
# gain 0.5
# pan "0.68 0.42 0.42 0.68"
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 $ "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
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
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
$ "jungle_breaks:22"
# pan "0.8 0.2"
resetCycles
do
setcps(120/60/4)
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"))
......@@ -14,86 +15,91 @@ let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
d1 $ gF1 $ gM2
$ fix ((# lpf 150) . (|* gain 0.93)) "kick:5"
-- $ midiOn "^42" (<| "k k k <k <k*2 [k k k ~]>>")
$ midiOn "^42" (<| "k k k <k!3 <[~ k*<1!3 2>]!3 k*2>>")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "house:0" -- TODO: Meilleur kick?
-- # cut 1
$ 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>>")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
$ midiOff "^43" (<| "~ . c*<1!3 <2!3 4>> ~")
$ fix ((|* gain 0.8) . (# room 0)) "cp"
$ "[h2ogmsn:5,cp]" # room 0.4 # sz 0.5 # dry 1.2
# gain 1.4
-- # lpf 4650
d3 $ gF1 $ gM1 -- Highest hats
$ midiOff "^44" (slow 2)
$ arp "up"
$ midiOn "^44" (ply 2)
$ 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
$ "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)))
# pan 0.3
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"
d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16
$ loopAt 2
$ "nujazz_bass120"
# n "<33!64 34!64>"
# pan 0.3
# room 0.14 # sz 0.4 # dry 1
# pan "<0.7!16 0.3!16>"
-- # pan 0.8
d4 $ gM3 $ gF2
$ midiOn "^89" (ply "2 <4 8>")
$ chop 8 $ loopAt 4
$ "nujazz_bass125:1"
# cut 4
# att 0.06 # rel 2
# crushbus 41 (range 16 3 (slow 16 $ perlin))
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")
# pan 0.55
# room 0.3
# crushbus 41 (range 12 4.5 "^53")
d5 $ gM3 $ gF3
$ chop 8
$ loopAt 2
$ "nujazz_keys125" # n "<56 56 57 56 58!4 59 59 56 59>"
# cut 5
# gain 0.9
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>"))
# pan 0.6
d7 $ gM3 $ gF3
$ 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]>>")
$ "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
d8 $ gM1 $ gF1
-- Transforms over samples
$ midiOn "^60" (iter "1 4") -- Split
$ midiOn "^92" (fast 2) -- Multi
$ 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
$ loopAt 2
-- Sample selection
$ midiOn "^36" (# n 33)
$ midiOn "^56" (loopAt 1 . (# "break:7"))
$ "jungle_breaks:20"
# cut 8
# gain 0.9
# pan "<0.3!16 0.7!16>"
# gain 0.78
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
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