#37 of my 100-Patterns-with-TidalCycles exercise.

037-2021-06-21.tidal

-- Pattern #37 from 100
-- 037-2021-06-21.tidal

d1
  $ every 2 (# triode 24)
  $ hpf (segment "<8 4 2>" $ range 50 3000 sine)
  # n "<c4'minor7'iii c4'minor7'ii c4'minor7'iiii>"
  # s "superfm(<9 11>,16)"
  # gain 0.575
  # legato 0.75
  # phaserdepth 0.75
  # phaserrate 2
  # room 0.85
  # size 0.75
  # orbit 2
  # octer (choose [0.5, 0.75, 1, 1.25])
  # octersub 0.25

d2 $ n "1 1 1 [1 ~ ~ 1]" # s "kicklinn"

d3 $ density 1
  $ stack [
  s "[~ hh]*4" # gain 1.5
  , every 4 (rev) $ s "cp(3,8)?" # gain 0.8
  , n "[5 4 5 [4 4 4 4]?]" # s "glitch2"
  # gain (range 0.75 1 rand)
  # room 0.75 # size 0.5 # orbit 3 # up "<0 2 7 9>"
          ]

d4 $ slow 2 $ n "f3 ~ f3 ~ [~ c4] ~  [~ bf3] [~ c4]"
  # s "superfm"
  # legato "1 1 0.5 0.5"