I was reading about Bol Processor again after a log while and was inspired to try to break down amencutup samples in the default super dirt pack to something sounding like a vocalisation.
For the moment I am using popular tabla bols, but maybe there is a better way to name these sounds and vocalise these patterns.
let amen = inhabit [
("dha", n "0" # s "amencutup")
, ("dhi", n "1" # s "amencutup")
, ("ta", n "2" # s "amencutup")
, ("ti", n "3" # s "amencutup")
, ("ri", n "4" # s "amencutup")
, ("ki", n "5" # s "amencutup")
, ("na", n "6" # s "amencutup")
, ("ge", n "7" # s "amencutup")
, ("dhin", n "8" # s "amencutup")
, ("ka", n "9" # s "amencutup")
, ("tiri", n "10" # s "amencutup")
, ("tirikit", n "10 22*2" # s "amencutup")
, ("gha", n "11" # s "amencutup")
, ("ghi", n "12" # s "amencutup")
, ("na", n "13" # s "amencutup")
, ("tha", n "14" # s "amencutup")
, ("tin", n "15" # s "amencutup")
, ("thi", n "16" # s "amencutup")
, ("ra", n "17" # s "amencutup")
, ("thin", n "18" # s "amencutup")
, ("thi2", n "19" # s "amencutup")
, ("ta2", n "20" # s "amencutup")
, ("ti2", n "21" # s "amencutup")
, ("te", n "22" # s "amencutup")
, ("dhe", n "23" # s "amencutup")
, ("ga", n "24" # s "amencutup")
, ("tak", n "25" # s "amencutup")
, ("ti3", n "26" # s "amencutup")
, ("khi", n "27" # s "amencutup")
, ("kath", n "31" # s "amencutup")
]
This lets me write interesting odd time amen patterns like
d1
$ stack[
silence
,
whenmod 32 30 (sometimesBy 0.3 (jux (palindrome) . (# speed "-1"))) $
amen "dhi <na tiri ge> dhin ge <tirikit ti ra ga ta>"
,
whenmod 8 2 (# silence) $
sometimesBy 0.3 (jux (palindrome)) $
sometimesBy 0.2 (# speed 2.2) $
sometimes (within (0.75, 1) (fast 2)) $ amen "[ti|ri|ra|thi|tha|tin]*5"
] # cps 1.127
EDIT: Removing my custom aliases