oparoles.tidal 3.86 KB
resetCycles

once $ "paroles:2" # gain 1.2 # cut 2 # lpf 2000

do
-- resetCycles
setcps (115/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
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 modIndex = pF "modIndex"
d1 $ gMute2 $ gF1 -- Kick solide
  $ fix ((|* gain 0.9) . (# lpf 1000)) "ja  zz"
  $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
  $ midiOn "^42" (struct "t t t t*<1!6 2 2>")
  $ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
  $ "[jazz,kick:4]"
  # gain 1.2
d2 $ gMute1 $ gF1 -- snare contretemps variable
  $ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
  $ midiOn "^43" (<| "~ cp ~ cp*<1 1 2 <1 2>>")
  $ midiOff "^43" (<| "~ [cp*<1!3 <2 <4 [4 2]>>> ~]")
  $ "[cp,snare:30]"
  # pan 0.65
  # legato 0.22
d3 $ gM1 $ gF1
  $ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
  # "snare:34"
  # hpf 7000
d4 $ gF2 $ gMute3
  $ midiOn "^57" (slice 16 "[0 ~]*<4!3 8>")
  $ midiOn "^89" (ply 8)
  $ note "<b2 <<as2 [as2@3 [~ <fs2 b2>]]>!6 cs3 [cs3@3 [~ ef3]]> gs2@2>"
  # "bassWarsaw"
  # gain 1.4 # cut 4
  # crushbus 41 (range 16 4.5 "^53")
  # octerbus 42 (range 0 0.04 "^33")
  # octersubbus 43 (range 0 1.2 "^33")
  # octersubsubbus 44 (range 0 1.2 "^33")
d5 $ gF3 $ gM3 -- Baba hums
  $ midiOff "^58" (mask "f")
  $ midiOn "^90" ((# begin 0.5))
  $ someCyclesBy "<t!16 f!16>" (>| n "<1@2 1@2 2@4>") -- Better usage!
  $ n "<1@2 2@2 3@2 4@2>" -- Live v1
  -- $ n "<3 ~>"
  -- $ n "<[1@2]!8 [2@4]!8 [<<1@2 3@2> <1@2 4@2> 2@4>]!8>" -- Final Orchestration <3
-- # att 0.8
  # begin 0.02
  -- # rel 4
  # "paroles" # cut 5
  # tremrbus 51 (range 0 8 "^54")
  # tremdp 0.8
  -- # lpf 3000
  # hpf 400 -- Needed to remove kick in the background :'(
  # pan 0.8
  # att 0.02
  # sustain 4
  # rel 4
  # room 0.5 # dry 0.8 # sz 0.8
  # legato 2
d6 $ gF2 $ gM2
  $ whenmod 32 16 (slice 8 "<[~ 0 ~ 1 ~ 2 ~ 3]!3 [0 1 2 3]*<2 [2 4]>>")
  $ note ("<b bf gs@2>" - "f")
  # "meth_bass:3"
  # lpf 4000
  # lpq 0.2
  # cut 6
  # pan 0.4
  # room 0.1 # dry 0.9 # sz (slow 16 $ range 0.2 0.9 saw)
d7 $ gM3 $ gF3 -- Paroles!
  $ midiOn "^91" (mask "<t f!3>" . (# begin 0.79) . (# end 1))
  $ "paroles:6/2"
  -- 0-0.09  0.103-0.20 0.22-0.29 0.33-43 0.44-53 535-64 65-78
  # begin "<0    0.103 0.22 0.33 0.44 0.535 0.65 0.65>"
  # end "  <0.09 0.2   0.29 0.43 0.53 0.64 0.78 0.78>"
  # pan 0.3
  # cut 7
  # hpf 300
d8 $ gF1 $ gM1
  $ midiOn ("^60" - "^92") (ply "1!2 <1!3 <2 1 1 2>>!2" . mask "f(4,8)")
  $ midiOn ("^56" - "^92") ((loopAt 1) . (# hpf 1500) . (# "jungle_breaks:30")) -- Clochettes?
  $ midiOn ("^92") ( -- Bouton Nassim <3
    slice 16 "[0 .. 7] . <[0 .. 7]!7 [0 1 . [2 3]]>"
    . loopAt 0.5 . (# "breaks165") . (# octersub 2)
  )
  $ chop 16
  $ loopAt 2
  $ "jungle_breaks:74"
  # room 0
  # gain 1.2
d9 $ gF3 -- Bonsoir, merci les basses <3
  $ fix ((# "jerome:0")
  . slice 4 "<<0!3 <2 3> 0!3 <2 3> 3 3 3*2 2 3 3 3*<1 <2 4>> 2*2 <[2 3]>!16> ~>"
  ) "bonsoir"
  $ "[bonsoir]"  # cut 9 # room 0.4 # dry 1 # gain 1.1
  # octersub 0.8 # octersubsub 0.5
d10 $ gF3 -- F: Chaque annee Jerome, Baissez, Aucune Parole, Qu'une parole
  $ slow 2
  $ ply "<<1 2> 1!7>"
  $ "jerome:6"
  # begin "<0!3    0.15 0.15!3 0.41 0.57!3 0.8 0.9!4>"
  # end   "<0.15!3 0.27 0.35!3 0.62 0.85!3 1.0 1.0!4>"
  -- $ "<jerome:4 ~>" # end "<0.5 <0.64 1>>"  -- Jerome F ...baissez les basses
  # cut 10 # octersub (slow 16 $ range 0.2 0.8 perlin)
d11 $ gF3 -- M grave tremolo
  $ "jerome:5"
  # begin "<0.3!3 0>"
  # end "<0.5!3 <0.2 1>>"
  # gain 1.2
  # cut 11
  # lpf 4000
d12 $ gF3 -- COLLECTIF
  $ fix (|* gain 0.9) "jerome:9"
  $ "<~ ~ jerome ~>"
  # n "<1 2 2 3 2 9 1 <10 3>>"
  # gain 1.2
  # cut 12 # lpf 4000
-- 5 7 8

once $ "jerome:3" # cut 8