Commit 888df62e by PLN (Algolia)

sessions: boboche+jane+raph explo

parent 72b90091
do
setcps (80/60/4)
-- resetCycles
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" (<| "k*4")
$ midiOff "^42" (<| "k . ~ k")
$ fix (# lpf 500) "kick"
$ "[jazz,kick:5]" # lpf 2000
d2 $ gF1 $ gM1
$ "~ sn . ~ ~ sn*<1!3 2> ~"
# "snare:44"
# lpf 4000
d3 $ gF1 $ gM1
$ "dr*[8 <8 [16 <16 4>]>]"
d4 $ gF2 $ gM3
$ superimpose (
# crushbus 41 (range 15 2.5 "^53")
)
$ note ("<g3 e4 <d4 <g4 [d4 g4]>> <b3!7 e4>>" + "[0,<5 7>(3,8)]")
# "bassWarsaw"
# gain 1.4
d5 $ gF3 $ gM3
-- $ superimpose (
-- # crushbus 41 (range 15 2.5 "^53")
-- )
$ superimpose ((stutWith 3 "s" (|- note "12") ) . (|+ note 24) . (# cut 51))
$ note ("<g3 e4 <d4 <g4 [d4 g4]>> <b3!7 e4>>" + "[0,12]")
# "FMRhodes1"
# gain 1.4
# modIndex (range 0 4 "^54")
d5 $ gF3 $ gM3
-- $ superimpose (
-- # crushbus 41 (range 15 2.5 "^53")
-- )
$ superimpose ((stutWith 3 "s" (|- note "12") ) . (|+ note 24) . (# cut 51))
$ note ("<g3 e4 <d4 <g4 [d4 g4]>> <b3!7 e4>>" + "[0,12]")
# "FMRhodes1"
# gain 1.4
# modIndex (range 0 4 "^54")
d7 $ gF1 $ gM2 $ loopAt 1 $ chop 16 $ "jungle_breaks:100" # cut 7 # gain 1.3
d8 $ gF1 $ gM2
$ midiOff "^60" (mask "t(4,8,f)" . chop 8)
$ chop 8
$ loopAt 1
$ midiOn "^56" (# "jungle_breaks:45")
$ "jungle_breaks:20"
# gain 1.2
scaleList
once $ arp "down " "fs'minPent"
do
setcps (80/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [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 gF4 = (# djfbus 3 (range 0.05 0.95 "^29"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2
$ superimpose (
(# lpf 20)
. (# octer 0.5)
-- . (# smear 0.2)
)
$ "k . ~ k ~ <k k*[4 2]>"
# "[808bd:6]" -- Doux
# gain 1.2
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
# "[snare:70,sn:24]"
# gain 1.4
-- d3 $ gF1 $ gM1 $ "d(3,8) d(3,8)" # "h2ogmsn" # gain 2 # cut 3 -- Drill that Baby
d5 $ gF3 $ gM3
$ midiOn "^90" (ply "<4 2 1 2> <2 [1 8]>")
$ midiOn "^58" (slice 4 "<0 1 2 <3 <2 1>>>*4")
$ gF2 $ gM2 $ n "<0!8 1!3 0 1!3 1*4>"
# "jane_wang"
# cut 5
# pan (slow 16 $ range 0.6 0.45 saw)
# gain 1.5
d4 $ gF2 $ gM3 -- Cello bass
$ midiOn "^89" (|+| note "[0 12 0]")
$ midiOn "^57" (|+| note "0 0 <7 [7 9](3,8) 7 [7 9 12 7]> 0")
$ juxBy 0.6 (|+| note ("7([3 1],8)"))
$ note ("<[fs@7 <~ bf>] [fs@7 <~ cs>] <bf ef> <cs!3 bf>>")
|* gain "<[1@7 0.9] 1 1 1>"
# pan (slow 16 $ range 0.45 0.6 saw)
# "cpluck"
d12 $ gM3 $ gF3
$ note (
"<[~ cs ~ cs] [~ fs ~ fs] [~ bf ~ bf] [~ gs@3 ~ cs@2 [gs fs]]>"
+ "<0 0 0 [0 <0 12>]>" + "<0!14!8 12!8>"
- 24
)
# "moogBass"
# legato 2
# chorus 1.2
# cut 12
-- # tremdp 0.8
-- # tremr "<2 4 4 <8 16>>"
# gain 1.2
d7 $ gF1 $ gM1 -- SCRATCH
$ midiOn "^91" (ply "2 4 <8 8 4 16>")
$ midiOn "^55" (# n 15)
$ midiOn "^59" (# n 15)
$ chop 16
$ loopAt 4
$ "scratch_long:12"
# cut 7
# pan (slow 16 $ range 0.9 0.6 saw)
# gain 1.2
d8 $ gF1 $ gM1
$ midiOn "^92" (ply 4)
$ loopAt 2
$ chop 8
$ midiOn "^56" (>| "jungle_breaks:10")
$ "jungle_breaks:11"
# cut 8
# room 0.4 # dry 1.1
d10 $ gM3 $ gF3
$ fix (# begin 0.25) "movie_statue:36"
$ stack [
-- I'VE GOT YOU SEVERAL TIMES
mask "<f!24 t!8 f!16 t!16>"
$ "movie_wine:15*<1 1 2 4>"
# begin "<0!3 <<0.04 0.1> 0.25>>"
# room 0.2 # sz 0.1
# end "<0.45!8 0.5!8>" # cut 101, -- ON MY MIND
mask "<f!7 t>"
"<[movie_statue:36 movie_statue:7]>"
# gain 0.9, -- Young lady from China
mask "<t!32 f!8 t!8 f!8>" $
mask "<f!3 t f!4>" $
"[movie_dead:0 movie_vitality:4]" # end "<0 0.25>",
-- just a drift --
mask "<t!8 f!8>"
$ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift
"<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL
""
]
-- # rel 2 # att 0.1
# gain 1.3
# cut 101
do
setcps (120/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t [[f <f t>] <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gF4 = (# djfbus 3 (range 0.05 0.95 "^29"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2
$ midiOn "^42" (<| "k <k!6 ~ ~> <k!7 ~> <k k*2>")
$ midiOff "^42" (<| "<k <~ [~!7 k]>>")
$ "[reverbkick,808bd:4]" -- Profond
# gain 1.8
# lpf 400
# octersub 2
# cut 1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s ~ s*<1!3 2>")
$ midiOff "^43" (<| "~ . <~ <s [s*2 . ~ <~ s>]>>")
$ "[snare:70]"
# note "-5"
# gain 1.4
d3 $ gF1 $ gM1 -- Soft drumroll
$ fix (|* gain (slow 16 $ range 1.2 0.6 perlin))
"h2ogmsn:1"
$ "d*[8 <16 12 [16 12] [6 12]> <8!3 <12 16>>]"
# "[h2ogmsn:1,h2ogmhh]"
|* gain (range 1.1 0.95 (slow 4 perlin))
-- d4 $ "wobble" # cut 4
d6 $ gF1 $ gM1
$ "~ cy ~ cy*<<1!4 2!4> <1!4 2!4> 2 2> ~ cy ~ cy*<1!3 2>"
# "h2ogmcy"
# n (slow 4 "<0 1 2 3>") # cut 6
d4 $ gF2 $ gM2 -- BASSLINE SYNTH
$ chop 2
$ superimpose (
(
# crushbus 41 (range 10 4.5 "^53")
) . (# hpf 500) . (# lpf 10000)
)
$ slow 2
$ note ("<<ef [ef@7 <ef gs>]> <fs [fs@7 f]>>"
- 12
)
# "giorgio_syn:0"
# cut 4
# lpf 1500
# gain 1.4
# room 0.4 # sz 0.8
# octersub 2 # octersubsub 1
d5 $ gF3 $ gM3
$ midiOn "^58" (superimpose ( -- Echoes
(# pan 0.8)
. (0.25 ~>)
. (|* gain "<0 1> 0.9 0.8 0.8")
. (chop 4)
. (|+ note 12)
. (# cut 51)))
$ n "<<2!4 3!4 4!6 5 5> ~ ~ ~>"
# "jane_wang"
# cut 5
# pan (slow 16 $ range 0.6 0.45 saw)
# gain 1.5
# room 0.1 # sz 0.4 # dry 1.1
d7
$ note ("<ef ef <fs b5> bf5>" + "0 <7 7 9 12> 0" + 3
-- - 12
)
# "vec1_acid:0"
# lpf 5000
# octersub 1.3
# octerbus 72 (range 0 1.8 "^35")
# squizbus 71 (range 0 2 "^55")
# cut 7
# room 0.4
# dry 1.1
d8 $ gF1 $ gM1
$ midiOn "^92" ( -- BREAK ME
splice 4 "<0!3 [0 1] 0 0 [0 1] [0 1]*2> 1 2 3*<4 <2 8>>")
$ midiOn "^56" (loopAt 0.5 . (# "break:15"))
$ loopAt 2
$ chop 8
$ "jungle_breaks:101"
# gain 1.2
d4 $ gF2 $ gM3 -- Cello bass
$ midiOn "^89" (|+| note "[0 12 0]")
$ midiOn "^57" (|+| note "0 0 <7 [7 9](3,8) 7 [7 9 12 7]> 0")
$ juxBy 0.6 (|+| note ("7([3 1],8)"))
$ note ("<[fs@7 <~ bf>] [fs@7 <~ cs>] <bf ef> <cs!3 bf>>")
|* gain "<[1@7 0.9] 1 1 1>"
# pan (slow 16 $ range 0.45 0.6 saw)
# "cpluck"
d12 $ gM3 $ gF3
$ note (
"<[~ cs ~ cs] [~ fs ~ fs] [~ bf ~ bf] [~ gs@3 ~ cs@2 [gs fs]]>"
+ "<0 0 0 [0 <0 12>]>" + "<0!14!8 12!8>"
- 24
)
# "moogBass"
# legato 2
# chorus 1.2
# cut 12
-- # tremdp 0.8
-- # tremr "<2 4 4 <8 16>>"
# gain 1.2
d7 $ gF1 $ gM1 -- SCRATCH
$ midiOn "^91" (ply "2 4 <8 8 4 16>")
$ midiOn "^55" (# n 15)
$ midiOn "^59" (# n 15)
$ chop 16
$ loopAt 4
$ "scratch_long:12"
# cut 7
# pan (slow 16 $ range 0.9 0.6 saw)
# gain 1.2
d8 $ gF1 $ gM1
$ midiOn "^92" (ply 4)
$ loopAt 2
$ chop 8
$ midiOn "^56" (>| "jungle_breaks:10")
$ "jungle_breaks:11"
# cut 8
# room 0.4 # dry 1.1
d10 $ gM3 $ gF3
$ fix (# begin 0.25) "movie_statue:36"
$ stack [
-- I'VE GOT YOU SEVERAL TIMES
mask "<f!24 t!8 f!16 t!16>"
$ "movie_wine:15*<1 1 2 4>"
# begin "<0!3 <<0.04 0.1> 0.25>>"
# room 0.2 # sz 0.1
# end "<0.45!8 0.5!8>" # cut 101, -- ON MY MIND
mask "<f!7 t>"
"<[movie_statue:36 movie_statue:7]>"
# gain 0.9, -- Young lady from China
mask "<t!32 f!8 t!8 f!8>" $
mask "<f!3 t f!4>" $
"[movie_dead:0 movie_vitality:4]" # end "<0 0.25>",
-- just a drift --
mask "<t!8 f!8>"
$ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift
"<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL
""
]
-- # rel 2 # att 0.1
# gain 1.3
# cut 101
......@@ -18,7 +18,7 @@ d1 $ gF4 $ gMute2
) -- SALE
$ "k k k <k k*2 k [~ k*<1 1 <1 2> <2 4>>]>"
# "[jazz]"
# note ("2") -- Calage
# note ("<2!4 -4!4>") -- Calage
-- # n "<14!3 15 <14 15>>" -- SALE
# gain 1
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
......@@ -37,7 +37,7 @@ d8 $ gF1 $ gM1
$ "jungle_breaks:11"
# cut 8
# room 0.4 # dry 1.1
d4 $ gF2 $ gM3
d4 $ gF2 $ gM3 -- Incroyable melodie mega chargee explosive
$ midiOn "^89" (ply 4)
$ midiOn "^57" (mask "t([<2!4 4!4 8!4 16!4> 2],16)"
. (# room 0.4) . (# dry 0.9))
......@@ -47,7 +47,7 @@ d4 $ gF2 $ gM3
$ slice 4 (slow 4 "<0 1 2 3>")
$ "rhadamanthe_melo:15"
# gain 1.2
d5
d5 -- Descente inexorable
$ note ("0 . 0(3,8)" +
"<[e4 c4 b3 a3] [e4 c4 b3 a3] [f4 d4 c4 b3] [f4 d4 c4 b3]>"
)
......@@ -56,7 +56,7 @@ d5
# modIndex (range 0 4 "^34")
# gain 1.4
# room 0.2
d6 $ gF3 $ gM3
d6 $ gF3 $ gM3 -- Gros effet basse tremolo
-- $ superimpose (# crushbus 51 (range 16 4 "^54"))
$ midiOn "^90" (ply "<2 3>")
$ midiOn "^58" (slice 4 "<0 4 1 2 <3 <4 1>>>*4")
......
......@@ -22,19 +22,20 @@ d1 $ gF1 $ gMute2
# lpf 3000 -- TODO Sound design this kick <3
# cut 1
# gain 1.5
d2
d2 $ gF1 $ gM1
$ "~ sn ~ [sn*<1 2>]"
# "snare:42"
d3 $ whenmod 4 3 (fast 2)
d3 $ gF1 $ gM1
$ whenmod 4 3 (fast 2)
$ "dr*[8 <8 <16 [16 32]>>]" # gain 0.8
d4 $ gM2 $ gF2
$ "giorgio_syn:2/2"
# crushbus 41 (range 16 2.5 "^53")
# cut 4
# gain 0.8
d8 $ $ loopAt 2
d8 $ gF1 $ gM1 $ loopAt 2
$ splice 8 (run "8 <8 16>")
$ midiOn
-- $ midiOn
$ "jungle_breaks:20" # cut 8
......
......@@ -2,22 +2,30 @@ resetCycles
do
setcps (85/60/4)
let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.18 saw)))
d1 $ g
let gF1 = (# djfbus 1 (range 0.1 0.9 "^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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ mask "<f!16 t!48>"
$ "k*<1!4 2 1!3> ~ . ~ k ~ <~ k ~ <~ k>>"
# "reverbkick" # gain 0.86
d2 $ g
$ mask "<f!8 t!54>"
$ whenmod 4 3 (ply "<2!4 2 2 4 <4 8>>")
$ fast "<2 <2!8 [4!3 2]!8>>" $ "~ cp" # "[sn:45,sn:10]"
# "[reverbkick,jazz]"
# gain 0.86
d2 $ gF1 $ gM1
$ "~ s ~ [s*<1 2 1 [4 2]> ~]" # "[snare:1]"
# gain 0.95
d3 $ g
d3 $ gF1 $ gM1
$ mask "<f!4 t!28>"
$ fast "1 <1 <2 [<2 [4 8]> <4 [4 . 16 8]>]>>"
$ "drum:2*8"
# gain 0.8
d4
# gain 1.4
d5 $ gF3 $ gM3
$ whenmod 64 0 ((# legato "<1!8 h!4 q q e s>") . chop "<4 4 16 <4 2>>")
$ whenmod 32 16 (# djfbus 4 (slow 16 $ range 0.5 0.98 saw))
$ n "<0!4 1 0 1 1*2>"
......@@ -28,25 +36,27 @@ d4
# drybus 41 (1.3 + 0.4 * perlin)
# sz 0.49
# cut 4
d5 -- SUB accompagnateurs
$ g
d4 $ note ("<a4 c5 <d5 f5> <e5!3 g5>>" - 24)
# "bassWarsaw"
d6 $ gF1 $ gM1-- SUB accompagnateurs
$ mask "<f!8 f f t t t!50>"
$ note "d*<1!4 2!4> ~!3 . ~!3 <~ <f g>*<1!3 <4 [4 2]>>>"
# "[808bd:1,wobble]"
# lpf 4000
# gain 1.1
-- # gain 1.1
# room 0.5
# sz 0.9
# dry 1
# pan 0.33
d6
d6 $ gF1 $ gM1
$ whenmod 64 32 (
(|* gain (slow 32 $ range 4 1 saw))
. mask "t!3 <t!4 f t f t> . <f t [t f] t> t"
)
$ whenmod 32 16 (|* gain (slow 16 $ range 1.5 4 saw))
$ slice 8 (run "8 <8!3 16>")
-- $ whenmod 32 16 (|* gain (slow 16 $ range 1.5 4 saw))
$ slice 8 (run "8 < 8!3 16>")
$ chop 8
$ loopAt 1
$ "break:11"
# gain 0.2
# gain 0.8
d8 $ gF1 $ gM1 $ loopAt 2 $ chop 8 $ "jungle_breaks:125" # cut 8
......@@ -16,7 +16,7 @@ d1 $ gDJF $ gM2 $ gF1 -- KICK SOUTENANT
$ fix ((# drumFrom "rolandtr909" "bd:3")) "909bd"
$ "[jazz,909bd]"
# midiG' "^78" 0 1.9
d2 $ gDJF $ gF1 $ gM
d2 $ gDJF $ gF1 $ gM -- FIXME Meilleure dialectique kick/snare
$ fix (whenmod 4 3 (ply "4 [4 <1 2>]") . (|* gain 0.8) . (# rel 0.1)) "clap"
$ fix ((# n 2) . (# pan 0.2) . (# note "-24")) "glitch"
$ fix ((|* gain 0.85) . (# note "-2")) "snare"
......@@ -35,12 +35,12 @@ d3 $ gDJF $ gM $ gF1
# midiG' "^80" 0 1.9
|* gain (range 0.85 1 (fast 2 perlin))
d4 $ gF2
$ superimpose (# crushbus 41 (range 16 3 "^53"))
$ note "<d4 e4 a3@2>"
# "90s_matrix:3"
# cut 4
# pan 0.2
# crushbus 51 (range 16 2.5 "^53")
# triodebus 52 (range 0 4 "^33")
# triodebus 42 (range 0 4 "^33")
# midiG' "^81" 0 2
d5 $ gDJF $ gF1
$ whenmod 8 7 (# delay 0.6)
......
......@@ -15,8 +15,9 @@ let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF1 -- KICK SOUTENANT
$ midiOn "^42" (<| "k k k <k!3 [<~ k> k]>")
$ fix ((# lpf 4000) . (# drumFrom "rolandtr909" "bd:4")) "909bd"
$ "[jazz,909bd]"
$ "[hardkick_rha:60,jazz]"
-- # bandf 200
# lpf 1300
d2 $ gM1 $ gF1 -- Snare glitch+perc
$ midiOn "^43" (struct "~ t ~ t*<1!3 2>")
$ midiOff "^43" (struct "~ t")
......@@ -62,7 +63,7 @@ d4 $ gM3 $ gF2 -- MATRIX BASS
# pan "<0.8!32 0.2!32>"
# gain 0.8
d5 $ gM3 $ gF2 -- ACID bassline
$ midiOn "^90" ( -- Echoes of future
$ midiOn "^90" ( -- Echoes of future FIXME SUPERPOSITION NOT REPLACE
superimpose ((# cut 51) . superimpose ((# cut 52) . (|+ note 12))
. (|+ note "[12,<~!8 24!8>]")
. (|* gain 0.9) . (# room 0.2) . (# sz 0.9)) . (# cut 51))
......
do
setcps (80/60/4)
-- resetCycles
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
$ "k(<1 1 3 2> ,8) . ~ <~!8 k!24> ~ [~ <~ k*<1 2>>]"
-- # "[rampleM8:0,rampleM12:0]"
# "[jazz,808bd:3]" -- Doux
# gain 1.4
# room 0.1 # sz 0.5 # dry 0.9
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
# "[snare:70,sn:24]"
# gain 1.4
d3 $ gF1 $ gM1 $ "d(3,8) d(3,8)" # "h2ogmsn" # gain 2 # cut 3 -- Drill that Baby
d4 $ gF2 $ gM2 -- Basse languinante d'un vieux violoncelle
$ midiOn "^89" (off "0.25" id)
$ superimpose ((# crushbus 41 (range 16 2.5 "^53"))
. (|* gain 0.8)
-- . (# hpf 500) . (# lpf 5000)2
)
-- $ note ("<[g2 . <bf2 [bf2@3 ds3]>] <d3 [d3@2 a2*2 bf2]>>")
$ note ("<[g2@7 <f2 <d2 bf2>>] [<ef2!3 d2>]>"
|+| (slow 4 "<0!0 [0 0]!0 [0(3,8) 0(3,8)]>"
)
-- + "[0,12]"
)
# "cbow:1" |+ note 24 # cut 4
-- # room 0.4 # sz 0.4
-- # bandf "<100!3 <150 200>>"
# bandq 1
# gain 1.2
# tremdpbus 42 (range 0 2 "^33")
# tremr 1.4
d8 $ gF1 $ gM1
$ midiOn "^92" (
-- slice 4 "<[0 1 2 3 0 1 2 3]!3 [0 .. 16]>" .
loopAt 0.5
. (# lpf 5000) . (# "breaks165"). (# octersub 2.8)
)
$ midiOff ("^60" + "^92") (mask "t(4,8,1)" . chop 8)
$ chop 8
$ midiOn ("^36" - "^92") (loopAt 2 . (# "rhadamanthe_drum:15"))
$ midiOn "^56" (loopAt 0.5 . (# n "42 <42 <40 [41 <41 42>]>>"))
$ loopAt 2 $ "jungle_breaks:125"
# cut 8
# octersub 0.6
# lpf 5000
# gain 1.4
d6 $ gF3 $ gM3 $ loopAt 4 $ "meth_bass:4" # gain 1.3
d7 $ gF3 -- Choeurs des temps passés
$ midiOn "^59" ((# pan "[0.4 0.6]*8")
. slice 4 (run 4)
. (# att 0.01) . (# rel 0.85)
) -- Pan the chops!
$ midiOn "^91" (ply "4 <4!3 <8 16>>")
$ midiOn "^19" (# freeze "<0.1 0.2 0.4 0.8>")
-- $ ((# distortbus 71 (range 0 2 "^55"))
-- . (# octerbus 72 (range 0 1.5 "^55"))
-- . (# cut 71)
-- )
$ whenmod 64 8 (slice 4 (slow "4" $ "[<0 1 <1 2> <0 0 3 <3 3(3,8)>>>]*2"))
$ someCyclesBy "<1!8 0!56>" (mask "<t f!7>")
$ "medieval:202"
# cut 7
# room 0.3
# dry 0.92
# tremrbus 72 (range 0 20 "^35")
# tremdp 2
# hpf 2000
# gain 2
# pan 0.2
d9 $ gF2 $ gM3 -- Synth questionnant
$ note "<g3 f4 <d4!3 bf3> <c4 [c4@6 <d4 bf3>]>>" # "giorgio_syn:0"
# cut 9
# room 0.68 # sz 0.9
# dry 2
# gain 1.4
# phaserdepth 0.5
# phaserrate 1
# legato 4
# pan 0.8
d10
$ loopAt 8
$ "<risers:5>"
# cut 10
# gain 0.9
# room 0.4 # dry 1.1
d11 $ gM3 $ gF3
$ cat [
"movie_gamble:3" # lpf 2000, "",
"movie_cat:11", "",
"movie_gamble:3" # lpf 1500, "",
"movie_ends:2 movie_ends:6" # lpf 5000 # end "1 0.33", "",
-- "movie_ends:15", "",
"", ""
-- "movie_ends:15"
]
# cut 11 # gain 1.3
......@@ -37,8 +37,10 @@ d1 $ gF1 $ gM2
$ midiOff "^42" (>| n "0 . ~ [~ <~!2 0!2>]")
$ midiOn "^42" (>| n "0 0 0 0*<1 2 1 4 1 2 2 1>")
$ "[rampleK1,jazz]"
d2 $ gF1 $ gM1 $ "~ <s!3 [s s*2 . ~]>"
# "[rampleD4:1]"
d2 $ gF1 $ gM1
$ "~ s ~ s"
-- $ "~ <s!3 [s s*2 . ~]>"
# "[rampleD4:3,snare:30]"
-- # lpf 2000
# gain 1.4
d3 $ gF1 $ gM1
......@@ -86,9 +88,10 @@ d8 $ gF1 $ gM1
$ midiOn "^92" (ply "<2!3 [2 <4 8>]>")
$ midiOff "^60" (mask "f(4,8)" . chop "2")
$ chop 32
$ midiOn "^36" (loopAt 0.25 . (# "jungle_breaks:22"))
-- $ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:22"))
$ midiOn "^36" (loopAt 0.5 . (# "jungle_breaks:24"))
$ midiOn "^56" (loopAt 0.25 . (# n 2))
$ loopAt 8
$ "trance_loops:0"
$ loopAt 4
$ "jungle_breaks:20"
# gain 1.1
# cut 8
......@@ -42,6 +42,9 @@ d3 $ gF1 $ gM1 -- Contretemps
# room 0
# gain 0.9
d4 $ gO $ gF2 $ gMute3 -- SUBSUB INFRABASS
$ superimpose (
# crushbus 41 (range 12 2 "^53")
)
$ midiOn "^57" (struct "t*8 t(<3!3 5>,8)")
$ midiOn "^89" (stut 4 0.9 "e")
-- $ juxBy 0.8 (
......@@ -51,7 +54,7 @@ d4 $ gO $ gF2 $ gMute3 -- SUBSUB INFRABASS
$ note "<g3!4 c3!4>(3,8)"
# "jungbass:3"
# cut 4
# crushbus 41 (range 12 2 "^53")
# att 0.1 # rel 1
# octersubsubbus 42 (range 0 1.2 "^33")
# gain 1
# pan 0.3
......@@ -72,7 +75,7 @@ d7 $ gO $ gF3 -- guitare salvatrice
$ loopAt 2
$ "fguitar:55"
# cut 7
# gain 1.4
# gain 1.1
d6 $ gO $ gM1 $ gF1 -- Rim drums
$ fix ((|* gain (1.2 + 0.1 * perlin))) (n 18)
$ n (stack [
......
......@@ -12,10 +12,11 @@ let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM1 $ gF1
d1 $ gM2 $ gF1
$ midiOn "^42" (<| "k k k <k k k*2 [~ k]>")
$ midiOff "^42" (<| "k*2")
$ "[jazz,kick:5]"
# gain 1.4
d2 $ gM1 $ gF1 -- Clave de l'été
$ midiOn "^43" (fast 2)
$ midiOn ("^75"-"^43") (fast 2)
......@@ -24,7 +25,7 @@ d2 $ gM1 $ gF1 -- Clave de l'été
-- $ "d"
# "[snare:22,sn:4]"
# speed (range 0 2 "^31")
# gain 0.8
# gain 1.4
d3 $ gF1 $ gM1 -- L'inoubliable drumroll
$ fix (
mask "<f!24 t!3 f t t [t f] t>"
......@@ -35,7 +36,7 @@ d3 $ gF1 $ gM1 -- L'inoubliable drumroll
"electro1"
$ "dr*[[8 8 <8 <16 [16 32]>> 8] <8!3 [16 <16 32 [16 8] [16 32]>]>]"
# "[drum:2,electro1:2]"
# gain 0.8
# gain 1.4
d4 $ gF2 $ gM3 -- Bassline variable double piste
$ loopAt 2
$ slice 8 (run "<4!4 8 8 [4 8 4] [8 4 8]>")
......@@ -44,9 +45,10 @@ d4 $ gF2 $ gM3 -- Bassline variable double piste
# pan 0.2
# crushbus 51 (range 16 4.5 "^53")
# roombus 52 (range 0 0.8 "^33") # sz 0.5
# gain 1
# gain 1.2
# cut 4
d5 $ gF3 $ gM3 -- Douce guitare juxée
$ midiOn "^90" (ply "2")
$ chop 16
-- $ whenmod 32 16 (juxBy 0.85 ((# cut 31) . rev . (|* gain 0.93)))
-- $ whenmod 16 12 (rev)
......@@ -59,8 +61,10 @@ d5 $ gF3 $ gM3 -- Douce guitare juxée
# pan 0.8
# room 0.2 # dry 1
# cut 3
# gain 0.9
# gain 1.5
d7 $ gF3 $ gMute3
$ midiOn "^35" (mask "t f" . (chop 4))
$ superimpose ((# cut 71) . (# crushbus 71 (range 16 2.5 "^55")))
$ loopAt 4
$ mask "t(<4 8 12 16>,16)"
$ midiOn "^59" (slice 16 (run "<16!8 32!4 [32 <8 [8 32]>]!4>"))
......@@ -68,15 +72,23 @@ d7 $ gF3 $ gMute3
$ "fpiano:13"
# pan 0.45
# cut 7
# octersub 0.5
# gain 1.4
d8 $ gF1 $ gM1 -- Mecano Course Break
-- $ fast "<<4 2> 4!7 2!4 2 2 4 8>"
$ midiOn "^36" (|> "jungle_breaks:42")
$ midiOn "^60" (slice 16 ("0*<1 2> 1 2 3*<2 1>"))
$ chop 8
$ midiOn "^36" (|> "jungle_breaks:102")
$ midiOn ("^60" - "^92") (slice 16 ("0*<1 2> 1 2 3*<2 1>"))
$ midiOn "^92" (slice 8 (run 16) . chop 16 . (|* speed 2) . (>| "breaks165"))
$ loopAt 2
$ "breaks125:3"
# gain 0.8
# gain 1.8
# cut 8
d11 $ gF2 $ gM2 -- Synth Angel Bassline
$ note ("<a3'maj g3'maj a3'min d3'maj>" + "0*<4 [4 16]>" + 0)
# octave 4
# room 0.24
# "90s_synatm:8"
# pan 0.4
d9 $ gF3 $ gMute3 -- Angels of moogland
$ midiOn "^16" ((|* gain 0.85) .(|+ note 24))
$ midiOn "^17" (
......@@ -86,7 +98,7 @@ d9 $ gF3 $ gMute3 -- Angels of moogland
. (|+ note 12)
. (|- pan 0.1)
))
$ note "<a3'maj g3'maj a3'min d3'maj>"
$ note ("<a3'maj g3'maj a3'min d3'maj>" + "0*<4 [4 16]>" + 0)
# octave 4
# room 0.24
# "moogBass"
......
......@@ -20,12 +20,12 @@ d1 $ gF1 $ gM2
-- $ fix (|* gain 0.85) "rampleS57"
$ "house:0" -- TODO: Meilleur kick?
-- # cut 1
# gain 1
# gain 1.1
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c*<1!3 <1 <2 4>>>")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[cp:1,rampleM1:10]"
# gain 0.9
# gain 1.3
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
......@@ -47,6 +47,7 @@ d4 $ gF2 $ gM3
# crushbus 41 (range 16 3.4 "^53")
# roombus 42 (range 0 0.4 "^33")
# "bassWarsaw"
# gain 1.4
d5 $ gF3 $ gM3 -- Piano guide premier
$ midiOn "^58" (slice 4 "<2 ~> <1 <2 [2 1]>>" . (# n 60))
$ midiOn "^90" (slice 4 "2(3,8,<0!3 1>) 1(<0 1 3 [3 5]>,8)" . (# n 60))
......@@ -56,7 +57,7 @@ d5 $ gF3 $ gM3 -- Piano guide premier
# roombus 51 (range 0.1 0.94 "^54")
# lpfbus 52 (range 10000 400 "^54")
# cut 5
# gain 0.8
# gain 1.3
d11 $ gF2 $ gM3 -- Plucked doubts
$ chop 16
$ loopAt 2
......@@ -99,4 +100,4 @@ d8 $ gF1 $ gM1 -- Le Beat, Nu
-- # octersub 1.2
-- # octersubsub 2
# cut 8
# gain 0.9
# gain 1.3
......@@ -16,7 +16,7 @@ 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" (<| " show k . ~ k ~ ~")
-- $ midiOff "^42" (<| "k ~ ~ [~ <~ k>]")
-- $ fix (|* gain 0.85) "rampleS57"
$ "[house:0,kick:5]" -- TODO: Meilleur kick?
......@@ -26,7 +26,7 @@ d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c")
$ midiOff "^43" (<| "~ . ~ c*<1!3 <2!3 4>>")
$ "[snare:40,rampleM1:10]"
# gain 0.9
# gain 1.3
# pan 0.6
# room 0.84 # dry 0.95 # sz 0.1
# lpf 4650
......@@ -35,11 +35,12 @@ d3 $ gF1 $ gM1 -- Highest hats
$ arp "up"
$ midiOn "^76" (ply 2)
$ "d([16 <16 [8 <8 32 16 32>]>],32,0)" -- REGULIER :)
# "[rampleS57:2]"
# "[h2ogmcy:1]"
# note (-12 + "3.5" + "e6")
-- # cut 3
# gain (0.7 * (range 0.85 1.05 (fast 4 perlin)))
# gain (1.3 * (range 0.85 1.05 (fast 4 perlin)))
# pan 0.3
# cut 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>"))
......@@ -78,6 +79,7 @@ d8 $ gF1 $ gM1 -- Break populaire
$ "jungle_breaks:53"
# gain 0.85
# pan "0.68 0.42 0.42 0.68"
# gain 1.2
d7 $ gF1 $ gM1 -- SECOND BREAK!!?!
$ midiOn "^91" (ply 2)
$ midiOn "^55" (loopAt 1 . (|> "jungle_breaks:19"))
......
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