judu 351 B

123456789101112131415
  1. # -*- mode: snippet -*-
  2. # name: judu
  3. # group: juliese
  4. # key: judu
  5. # expand-env: (yas-indent-line fixed)
  6. # --
  7. -- @judu
  8. d'udu $
  9. -- (every' 5 3 $ brak) $ -- (3)
  10. -- (every' 3 2 . sometimesBy 0.5 $ density (4/3)) $ -- (1)
  11. -- (whenmod 7 5 $ trunc (5/6)) $ -- (2)
  12. slow 4 . chop 128 $
  13. sound (samples "udu" (slow 4 $ irand 4))
  14. # gain 0.8
  15. # cut 6