-- Chill hop beat?
setcps 0.5

once $ s "birds:1"

d3
$ whenmod 16 12 (# gain 0.8)
$ whenmod 16 8 (# gain 0.6)
$ chop 4 $ s "lighter:1*4"
# pan (0.25 + sine / 2)

d1
$ often (off 0.25 id)
$ rarely (off 0.125 id)
$ sometimes rev
$ s "<dr dr*2> <hh:0 <hh:0 ~>>"

d2
-- $ every 2 ()
-- $ every' 2 1 (# gain 0)
$ every 2 (off 0.125 id)
-- $ degrade
-- $ euclid "<1 3>" 8
$ s "bass3"
# note (choose [0,1,2])
# gain 0.8

d2
-- $ whenmod 8 7 (# gain 0)
-- $ whenmod 8 6 rev
-- $ whenmod 8 4 (off 0 (rev))
-- $ always (off 0.125 (# up 4)) -- complementaire ?tierce?
$ always (
  off 0.125 (# up 1)
) -- notes graves à mi mesure
$ always (off 0.25 (# up (-7)))
-- $ s "bass3(<1 3>,4)" # note "1 3 6 1"
$ s "[bass3*2 ~] . [bass3*2] . ~"
# note "0"
# gain 0.7

d1
$ rarely (# n 2) -- parfois cuivre
$ every 8 (# s "hh:0")
$ every 2 (off 0.125 id)
$ every 4 (off 0.5 id)
$ euclid 1 2
$ s "dr" # n 0

-- sometimes dr:4 funky orchestra hit

d2
$ euclid "<2 <1 4>>" 4
$ s "808bd"
# n 2

d5
$ slow 2
$ every 4 (# gain 0.8)
$ n "<0 3>"
# s "toys"
# gain 0
