setcps 0.8

-- Learning from the best:
-- https://www.youtube.com/watch?v=dIpzU71LAQQ&list=PLybSFICi4UliK17U6rxPneXAyxvmGAe5T&index=3

d1
$ jux (rev . (|*| speed 2))
$ every 3 (rev . chop 8)
$ s "kicklinn(3,8)"
-- # gain 1.2
# cps (slow 64 $ range 0.6 0.65 $ sine)

d2
$ whenmod 16 8 (|- note 7)
$ s "~ feelfx"
# cut 1
# lpf (slow 8 $ sine * 4000 + 200)

d3
-- $ off "<0.25 0.125>" (# crush 3)
-- $ off 0.25 (# speed 2)
$ s "clap:4 clap:3 snare:2*3 ~"
# gain 0.7

d4
$ someCycles
$ someCycles (off 0.25 ((# s "superpiano")))
$ off 0.125 (|+ 7)
$ n "<c7(3,8) f7*2 g7(3,8,2)>"
# s "dsynth"
# legato 1
# gain 0.7

d5 $ chunk 4 (hurry 0.5) $ chop 4 $ s "bogdan:8"

d6
$ whenmod 8 6 (# s "ulgab")
$ iter 4 $ jux rev $ s "gabba(3,8)"
# hpf "<100,100 .. 1000 1000,100 .. 100>"
# speed 2
# gain 0.6