1234567891011121314151617181920212223 |
- -- megalet for something-to-say.tidal
- let msil = mapM_ ($ silence)
- cf = slow 2
- iter' n p = slowcat $ map (\i -> ((fromIntegral i)%(fromIntegral n)) ~> p) [0 .. n]
- ss'stab = s "stab"
-
-
- ss'kurt = s "kurt"
-
-
-
- ss'perc = s "{[bd ~ ~ bd] msg, hh*2}"
- ss'perc' = s "{[rm ~ ~ rm] msg, hh*2}"
- ss'verse = s "sitw"
-
- ss'chorus = s "sitwc"
-
- d'drum = d1
- d'bass = d2
- d'gt = d3 -- guitar [stab]
- d'kurt = d4
- d'moog = d5
- d'voc = d9 -- vocal
|