lonely_day.tidal 1.05 KB
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 gM = gMask . gMute
let gM2 = gMask . gMute2
setcps (160/60/4)
d1 $ gMute
  -- $ midiOn  "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>")
  -- $ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>")
  $ "k ~ <~ [~ k]>" # "[bd,808bd:3]"
  # midiG' "^78" 0 1.2
d2 $ gMute2 $ gF1
  $ ((|* gain "1 <1!3 [1 0.9 1]>") . (whenmod 4 3 (fix (# "snare:30") "snare:29")))
  $ "~ <s!3 [s [~ s] ~]>"
  # "[snare:29,snare:4]"
  # lpf 5000
  # midiG' "^79" 0 1
d3 $ gF1 $ gMute2
  $ "h h h h <h!3 ~> h*<1!7 2>" |* gain "0.8 1 1.1 1 1 1.1"
  -- # drumFrom "sakatadpm48" "[hh,oh]"
  # "hh"
  -- # n "0!3 <0!3 1>"
  # lpf 4500
  # midiG' "^80" 0 1
d8 $ gF1 $ gMute2
  $ loopAt 2
  $ slice 8 "~ 0 ~ 2 ~ 4 ~ 6"
  $ "break:10"
  -- $ loopAt 2 $ chop 4
  -- $ "jungle_breaks:44"
  # cut 8
  # midiG' "^84" 0 1.2