bbass.tidal 789 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
do
setcps 0.55
d1
  $ whenmod 32 16 (mask "<f!8 [f|t]!4 t!4>")
  $ juxBy 0.25 rev
  $ slow "<1!4 2 4 8 8>"
  $ "k k k k"
  # "[jazz,techno]"
  # gain 0.6
d2
  $ every' 4 3 (often $ off "e" id)
  $ "~ cp"
  # gain (slow 16 $ range 0.5 0.9 saw)
  # room 0.2
  # dry 0.95
  # lpf 2000
d3
  $ whenmod 32 8 (degradeBy "0 0.5!6 0")
  $ whenmod 32 28 (# djf "<0.4 0.5 0.6 0.8>")
  $ juxBy 0.5 rev
  $ "d(<1!3 [1|2]>,4) d(4,4)"
  # "amencutup" # n "<4!4 5 6 7 4>"
  # gain 0.65
d4
  $ whenmod 128 64 (|* gain (slow 64 $ range 1 0.2 isaw))
  $ slice 4 (cat
    [
      "<0!4 1 2 3 1!4 2!4 3!4 [0 1]!2 [1 2]!2 [2 3]!2 [3 0]!2>(<3 3 2 1>,8)"
    ]
  )
  $ loopAt 4 $ "fbass:42"
  # cut 4
  # gain 0.6
d5
  $ note (scale "phrygian" "<0!4 7 0!3> <~ <3 5>>")
  # n "0"
  # "moog"
  # gain 0.5
  # cut 5