-- :'(

-- SPACE BEAT
do
setcps (120/60/4)
d1
  -- $ fast 4
  $ "[jazz,kick:9]"
  # gain 0.75
  # djf (slow 64 $ range 0.25 0.75 sine)
d2
  $ every' 8 7 (ply 2) $ "~ cp" # note (-2) # lpf 2000
d4
  $ slow 3
  $ sometimesBy "0!7 [0.2 0]" (# "ho")
  $ "hh*<8!3 <[8 16 8] 16 [16 8] [8 16 8 16]>>"
  # gain 0.7
d3 $ "wind(<3 5>,8)" # note ("c3 g3") # cut 3 # gain 0.7
d5 -- bourrasque
  $ every 2 (often ("h" ~>))
  $ s "space:3"
  # speed (0.25 + perlin/4)
  # gain 0.8
  # lpf (slow 16 $ range 0.45 0.55 perlin)

-- BREAK SPACIAL
do
setcps (100/60/4)
d2
  $ whenmod 16 8 (degradeBy "0.1 <0.8 0.25> <0.2 0.8>")
  $ scramble (slow 4 "<1 2 4>")
  $ "fbreak100"
  # gain (slow 8 $ range 0.85 0.5 saw) # cut 2
d3
  $ fix (
    (# djf (slow 64 $ sine)) .
    superimpose ((# "reverbkick") . (# lpf 1000))
    . (|* gain 0.85)
    ) (n 1)
  $ fix (
    (jux (rev . (|- gain 0.1))) .
    (# room 0.75) . (# sz 0.15) . (# dry 0.98)
    . (|* gain 0.65)
    . (|+ pan 0.1)
    ) (n 0)
  $ fix (|+ note "[0,<12!7 9>]") (n 6)
  $ fix (
    (fast "[0.25 <0.25 0.5>]!16 [<0.5!3 1> <1 [1 0.5 1]>]!16 1!32")
    . (|* gain (slow 16 $ range 0.75 1.1 cosine))
    ) (n "[4,5,6]")
  $ n (stack [
  "1 ~ ~ <~!3 1> ~ 1 <~ 1?0.9> ~",
  "0(<3!3 5>,8,<0!3 4>)",
  "<[4 5]!7 6>*[8 <8!8 16!8> <8!12 16>]"
  ]
  )
  # "gretsch"
  # gain 0.6
  # pan (slow 16 $ range 0.2 0.8 sine)



d6
  $ slow 4
  $ ply "<2!3 8> <2 4>"
  $ note (scramble 6 $ run 12)
  # "superhex"
  # octave 3
  # rate (slow (slow 32 $ "<32 16 8 4>") $ range 0.05 50 sine)
  # cut 2
  # legato 4
  # gain 0.45