setcps 0.1

solo 2

hush

d1 $ s "<bd:14([3,5],8) <cp bd*2>>"

d2 $ s "<amencutup*8>" # n (run 16)

d1 $ s "dr_few bd(3,5) sn"

d2 $ s "superpiano"

d1 $ s "bd*2 sn bd*2 <cp bd,cp sn,cp cp*2>"

d2 $ s "alphabet*2" # n "24 20"
# shape 0.2 # gain 0.5

d3 $ n "[0 5 <9,16> <5,12>]*2"
# s "superpiano" # sustain 0.3

d1 $ s "~ sn:1 ~ sn:1"

d2 $ s "[808bd*2 [~ bd*2] [~ bd bd ~] ~]"

solo 9

d3 $ n (off 0.125 (|+7) $ off 0 (|+12) "1*2 <3 8> 5 8")
# s "supermandolin"
# gain 0.85

d1 $ s "[<cp>](5,8)"

d2 $ s "[808cy*24]/3 ~" # n "0 .. 23" # gain "1.5"

d2 $ slow 4 $ chop "1" $ s "bev cp*4"

d1 $ jux rev $ n
(
  off 0.125 (|+ 12)
$ off 0.125 (|+ 7)
  "<c*2 a(3,8) f(3,8,2) e*2>")
# s "notes"
# gain 0.5
-- # legato (0.5 + (rand / 2))
hush

setcps 0.5

d1 $ "bd"

d1 $ s "[<bd <bd,cp>> [sn*4] ~ sn]"

d2 $ up (run 10) # s "arpy" # gain 0.7

d3 $ degradeBy 0.25 $ s "kurt*2" # shape 0.9 # gain 0.5 # n (irand 6) # vowel "a i e o u"

d4 $ s "east*4"

solo 4

solo 2

solo 1


hush


-- iter: split and rotate N sections

d1 $ s "<808bd:5 808bd:6 808bd:7 808bd:6>*2" -- loud bass

d2 $ iter 8 $ s "hh*8 ~ hh*4 [cp*2 cp]"

d2 $ s "cp(3, 8)" # n "0 .. 9"
d1 $ s "[808oh(5,8)]*2" # n "0 .. 5"

d5 $ degradeBy 0.2 $ s "arpy(11,16)" # n "[1 3 5]"

d3 $ rev

d6 "<sn, bd:2*4>"

d2 $ sometimes (superimpose (0.125~>)) $ "industrial(13,16)" # n (irand 3)

d1 $ iter 4 $ s "[bd ~ bd <bd [bd bd*2?]>]" # n 2 # shape 0.9

d3 $ s "cp(2,4,1)"

d4 $ s "hh*16?"

d5 $ superimpose (choose [0.125, 0.25] <~) $
degradeBy 0.15 $
s "arpy(<11 13 9 7 15>, 16, <0 .. 9>)" # note "[0,2,5]"

unsolo 5

d1 $ sound "<bd*4>" # gain 4

d1 $ superimpose (# speed 0.5) $ striate' 128 0.125 $ s "kurt*4" # n (irand 6) # vowel "a e i o u" # gain 0.9

d2 $ s "drum*4" # gain 1.3

d1 $ sound "[nd ~ bd ~ bd] [~ bd] bd [~ bd] bd bd ~"

d1 $ sound "bd bd bd ~ bd*2 ~ bd*2 ~ bd ~# "

d2 (sound "arpy:1")

solo 1


d1 $ sound "<[bd*4 sn] bd>"
hush
d2 $

d1 $ up "<[1, 5, 8], [3, 6, 8]>" # sound "arpy" -- todo accord parfait

d1 $ sound "arpy(8,8)" # note "2 .. 10"
d1 $ every 2 (|- note "2") $ sound "arpy*4" |> note "10"
-- $ every 2 (|+ up "5") $ sound "arpy*4" |> note "0 2 4 5"
d1 $ sound "arpy(3,2)"
d2 $ sound "bd*4 <sn:3*2 sn:2>/2"
d1 $ every 4 (fast 2) $ every 4 (rev) $ sound "arpy:1 arpy:2 arpy:3 arpy:4"
d2 $ sound "[808bd:1 <808oh [808oh 808oh]>]"
d2 $ sound "[hh hh <bd:2 bd>]"
d3 $ sound "[bd:2 arpy:4 <arpy:2, arpy:10>]"
hush
d2 $ "[bd bd:2*4]"
solo 2