ambiance.tidal 1.48 KB
resetCycles

do
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 gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let gMaskEnd16 = mask "<t!7 [<t f> <f t> ]>"
setcps (105/60/4)
do
-- d1 $ gF1 $ gM1 $ "kick:5"
-- d1 $ gF1 $ gM1 $ "kick:5"
d1 $ gF1 $ gM2
  $ midiOn "^42"  (<| "k k k <k [<~ k> k*<1 4>]>")
  -- $ midiOn "^42" (<| "k k(<3 [3 5]>,8)")
  $ "kick:5"
d2 $ gF1 $ gM1
  $ "~ cp"
  # "rampleP5:15"
d3 $ gF1 $ gM1
  $ "hh(5,8)"
  # "rampleP5:16"
  # cut 3
d4 $ gF2 $ gM1
  $ "90s_synatm:9"
  # cut 4
d5 $ gF3 $ gM1 -- Semi-basse
  $ superimpose (("h" ~>)
  . (|+ note 12)
  . (# cut 51))
  $ note ("<gs4!0 f4 f4 gs4 f4 f4 f4 ef4 f4>")
  #  "90s_synatm:3"
  # cut 5
  # gain 0.65
  # pan 0.3
-- 0 4 0 1 0 2 0 3
d10 $ gF3 $ note "f/4" -- Anges des intertubes
  # "90s_glassatm:2"
  -- # crushbus 101 (range 16 2.5 (perlin))
  # roombus  102 (slow 4 $ range 0.4 0.65 (perlin)) # sz 0.8
  # legato 2
  # pan 0.7
  # cut 10


d4 $ gF2 $ gM1  -- Bass electrique
  $ note (scale "aeolian" (
    "3"
    + "<~!16 0!16> <4 1 <2 5> <3 6>>"
    ))
  # "90s_synatm:9"
  # att 0.2
  # rel 2
  # room 0.4 # dry 1.2 # sz 0.5
  # octersubbus 42 (range 0 4 "^33")
  # crushbus 41 (range 16 2.3 "^53")
  # cut 4