Add looptober-12.hs

looptober-12.hs

@@ -0,0 +1,13 @@
+d1 $ sometimes ( echoWith 2 (1/2) (# krush ( slow 2 sine * 0.2 )) )
+   $ n ( "[d3,d4](5,8,<3!3 4>)" |+ (sine * 0.1) )
+   # s "superfm" # legato 2
+   # amp 0.2
+
+d2 $ n (scale "dorian" "[~ <~!4 4!3 2!2 0!2 ~!4 <~ 1> ~!2>]!4" + "d5")
+   # s "superfm" # sus 0.7 # legato 1.5
+
+d3 $ stack [
+  s "[akailinnbd*2 ~]*2" # lpf "[<1000 800> ~]*2",
+  s "akailinnsd*2" # lpf 2000,
+  mask "t f" $ s "linndrumhh:1(3,8)" # lpf (range 500 700 $ slow 4 cosine)
+  ]