p7bassb 345 B

1234567891011121314
  1. # -*- mode: snippet -*-
  2. # name: p7bassb
  3. # group: pistonlp
  4. # key: p7bassb
  5. # expand-env: (yas-indent-line fixed)
  6. # --
  7. -- @p7bassb
  8. let bm f = scale f (0.5 + f) $ density (5/4) sine1
  9. in d'bass $
  10. (# begin (bm 0)) $
  11. (# end (bm 0.05)) $
  12. slow 8 $
  13. slowspread (\c -> rev . chop c) [12, 24] $
  14. bassP $ n "[0 1]/2" # s "${1:dubb}"