for-mix.tidal 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302
  1. cps (151/60)
  2. d1 $ sound "[k {k, sn}]/2"
  3. d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
  4. d1 silence
  5. d2 silence
  6. d2 $ (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  7. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  8. d2 $ (within (0, 0.125) $ density 2 . chop 4) $
  9. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  10. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  11. d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
  12. d2 silence
  13. d1 $ (overlay $ sound "[[~ hhc ~ hhc] [~ hhp]]/2") $ sound "[k {k, sn}]/2"
  14. d2 $ (within (0, 0.125) $ density 2 . chop 16) $
  15. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  16. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  17. d2 $ (within (0, 0.125) $ density 2 . chop 16) $
  18. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  19. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  20. d3 $ whenmod 16 15 (density 3) $ smash 16 [0.5, 0.25] $ sound "hhp hho"
  21. |+| gain "0.7"
  22. |+| vowel "a"
  23. d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
  24. |+| gain "0.7"
  25. |+| vowel "a"
  26. d2 $ (within (0, 0.125) $ density 2 . chop 4) $
  27. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  28. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  29. |+| shape "0.3"
  30. d2 $ (within (0, 0.125) $ density 2 . chop 4) $
  31. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  32. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  33. |+| shape "0.3"
  34. |+| vowel "[u i o]/2"
  35. d2 $ --(within (0, 0.125) $ density 2 . chop 4) $
  36. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  37. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  38. |+| shape "0.3"
  39. |+| vowel "[u i o]/2"
  40. d2 $ every 4 (stut 4 0.8 0.5) $
  41. (within (0, 0.125) $ density 2 . gap 16) $
  42. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  43. |+| speed ((+1).(/2) <$> density 3.1 saw1)
  44. |+| shape "0.3"
  45. |+| vowel "[u i o]/2"
  46. d2 silence
  47. d3 $ whenmod 16 15 (density 3)
  48. $ smash 16 [0.25, 0.5]
  49. $ sound "hhp hho"
  50. |+| gain "0.7"
  51. |+| vowel "a"
  52. cps (100/60)
  53. cps (150/60)
  54. d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
  55. sound "[[k ~ ~ k] {k*2, sn}]/2"
  56. d3 $ whenmod 16 15 (density 3)
  57. $ smash 16 [0.25, 0.5]
  58. $ sound "hhp hho"
  59. |+| gain "0.7"
  60. |+| vowel "a"
  61. d3 $ whenmod 16 15 (density 3)
  62. $ smash 16 [0.5, 0.25]
  63. $ sound "hhp hho"
  64. |+| gain "0.7"
  65. |+| vowel "a"
  66. d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
  67. sound "[[k ~ ~ k] {k*2, sn}]/2"
  68. d2 $
  69. -- (within (0, 0.5) $ gap 16) $
  70. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  71. d2 silence
  72. d4 $
  73. whenmod 5 3 rev $
  74. smash 32 [4,2,0.5] $ sound "[eg*3]/4"
  75. |+| vowel "e u"
  76. hush
  77. --------- above sux
  78. cps (151/60)
  79. d1 $ sound "[k {k, sn}]/2"
  80. d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
  81. d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
  82. d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
  83. |+| gain "0.7"
  84. |+| vowel "a"
  85. d2 $ sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5"
  86. d2 $
  87. (within (0, 0.5) $ gap 16) $
  88. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  89. d2 $
  90. whenmod 2 1 (density 2) $
  91. (within (0, 0.5) $ gap 16) $
  92. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  93. -- oh shit dog
  94. d2 $
  95. (within (0.5, 1.5) $ rev) $
  96. (within (0, 0.5) $ gap 16) $
  97. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  98. d2 $
  99. (within (0.5, 1.5) $ rev) $
  100. (within (0, 0.5) $ gap 16) $
  101. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  102. d3 $
  103. whenmod 16 15 (density 3) $
  104. smash 16 [0.25, 0.5] $
  105. sound "hhp hho"
  106. |+| gain "0.6"
  107. |+| vowel "a"
  108. cps (100/60)
  109. d1 $ --(overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
  110. sound "[[k ~ ~ k] {k*2, sn}]/2"
  111. d3 silence
  112. d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
  113. sound "[[k ~ ~ k] {k*2, sn}]/2"
  114. d2 $
  115. (within (0.5, 1.5) $ rev) $
  116. (within (0, 0.5) $ gap 16) $
  117. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  118. d2 $
  119. (within (0.5, 1.5) $ rev) $
  120. (within (0, 0.5) $ gap 16) $
  121. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  122. |+| shape ((/3) <$> slow 16 saw1)
  123. |+| vowel "[i o]*2"
  124. d3 $
  125. whenmod 16 15 (density 3) $
  126. smash 16 [0.25, 0.5] $
  127. sound "hhp hho"
  128. |+| gain "0.6"
  129. |+| vowel "a"
  130. |+| shape ((/2) <$> slow 8 saw1)
  131. d4 $
  132. whenmod 5 3 rev $
  133. smash 32 [4,2,0.5] $ sound "[eg*2]/4"
  134. |+| gain "0.7"
  135. d1 $ stack [
  136. sound "[[~ hhc ~ hho] [~ hhp]]/2",
  137. whenmod 6 5 (density 2) $
  138. sound "[[k ~ ~ k] {k*2, sn}]/2"
  139. ]
  140. d4 $
  141. -- gap 4 $ -- fuck about with gap a bit to elongate shit
  142. whenmod 5 3 rev $
  143. smash 32 [4,2,0.5] $ sound "[eg*2]/4"
  144. |+| gain "0.7"
  145. -- i apologise for my limited vocabulary
  146. d4 $
  147. (every 2 $ stut 4 0.8 0.5) $
  148. whenmod 5 3 rev $
  149. smash 32 [4,2,0.5] $ sound "[eg*2]/4"
  150. |+| gain "0.7"
  151. d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
  152. sound "[[k ~ ~ k] {k*2, sn}]/2"
  153. d1 $ sound "[[k ~ ~ k] {k*2, sn}]/2"
  154. d4 silence
  155. d2 silence
  156. d3 silence
  157. d4 $
  158. density 2 $
  159. (every 2 $ stut 4 0.8 0.5) $
  160. whenmod 5 3 rev $
  161. smash 32 [4,2,0.5] $
  162. sound (samples "[eg*2]/4" (slow 4 $ run 5))
  163. |+| gain "0.7"
  164. |+| vowel "u"
  165. d1 $ stack [
  166. whenmod 5 4 rev $
  167. sound "[hhc hho]*2"
  168. |+| gain "[0.8 1]/2",
  169. whenmod 6 5 (density 2) $
  170. sound "[[k ~ ~ k] {k*2, sn}]/2"
  171. ]
  172. d2 $
  173. (within (0.5, 1.5) $ rev) $
  174. (within (0, 0.5) $ gap 16) $
  175. (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
  176. |+| shape ((/3) <$> slow 16 saw1)
  177. |+| vowel "[i o]*2"
  178. d3 silence
  179. d1 $ sound "cy/4"
  180. d1 $ (overlay $ sound "cy/4") $ sound "k"
  181. d3 $
  182. whenmod 16 15 (density 3) $
  183. smash 16 [0.25, 0.5] $
  184. -- smash 16 [0.5, 0.25] $
  185. sound "hhp hho"
  186. |+| gain "0.6"
  187. |+| vowel "a"
  188. |+| shape ((/2) <$> slow 8 saw1)
  189. d1 $ stack [
  190. sound "cy/4",
  191. sound "[[k ~ ~ k] {k*2, sn}]/2"
  192. ]
  193. d4 silence
  194. cps (133/60)
  195. cps (155/60)
  196. d1 $
  197. (overlay $ (1 ~>) $ sound "cy/8") $
  198. -- sound "[k {k, sn}]/2"
  199. sound "[k [sn k] [~ k] sn]/4"
  200. d2 $
  201. whenmod 16 15 (density 3) $
  202. smash 16 [0.25, 0.5] $
  203. -- smash 16 [0.5, 0.25] $
  204. sound "hhp hho"
  205. |+| gain "0.6"
  206. |+| vowel (slow 3.1 "a u i")
  207. |+| shape ((/2) <$> slow 7.5 saw1)
  208. d2 $
  209. hush
  210. -- thanks for sticking around charlie ya ledge
  211. --
  212. |+| shape ((/2) <$> slow 7.5 saw1)