p8bass 526 B

12345678910111213141516171819202122232425
  1. # -*- mode: snippet -*-
  2. # name: p8bass
  3. # group: pistonlp
  4. # key: p8bass
  5. # expand-env: (yas-indent-line fixed)
  6. # --
  7. -- @p8bass
  8. d'misc $ stack [
  9. {- -- (1)
  10. -- (p5bass)
  11. every 2 (density 2) $ whenmod 3 2 (density 1.6) $
  12. chop 16 $ bassP $ s "[~ ${1:dubb}]"
  13. # n (slow 4 "0 1")
  14. # cut 1
  15. # speed (scale 0.75 1.25 $ slow 1.3 sine1),
  16. (0.75 ~>) $
  17. -- -}
  18. -- (p4bass w/ o=id)
  19. whenmod 5 3 (density (3/2) . brak) $
  20. bassP $
  21. rev $ (0.5 ~>) $ slow 2 . chop 8 $ n "[0 1]/2" # s "$1"
  22. # speed 0.5
  23. # cut 1
  24. # end 0.5
  25. ]