소스 검색

add megalet

not really significant enought to mention in readme, mind
Aneurin Barker Snook 9 년 전
부모
커밋
f98b76227d
1개의 변경된 파일13개의 추가작업 그리고 0개의 파일을 삭제
  1. 13 0
      pigs-nose.megalet.tidal

+ 13 - 0
pigs-nose.megalet.tidal

@@ -0,0 +1,13 @@
+{-
+anny fm: pig's nose ep megalet
+see pigs-nose.tidal for full composition
+-}
+
+let cf = slow 2
+    pn'hointro = s "[~ [~ ho] ~ ho ~ ~ ho ~]/2"
+    pn'sn = s "[~ [~ sn:1] ~ sn:1 ~ ~ sn:1 ~]/2"
+    pn'bd = s "[bd [~ ~ ~ bd] bd*2 ~]/2"
+    pn'hh = s "[hh*8 [hh*4 ho]]/2"
+    pn'qs sl = slow sl . striate 4 $ s "qspace"
+    pn'bass4 = s "bass*2 bass*2 bass*3 bass*3"
+    pn'bass5 = s "bass*2 bass*2 bass*3 bass*3 ~"