d1 $ s "dr(<2 <8 1>>,4)"
d1 $ s "bogdan"
d1
$ whenmod 8 4 (off 0.125 (|+ 0))
$ s "bogdan(<<1 2> 4>, 2)"
# gain 1.5
d2
$ whenmod 16 8 (# silence)
$ s "hh(<2 4>,4) ~ hh <~ hh>"
# s "bogdan:1"
d3
$ fast 2
$ degradeBy 0.3
$ superimpose (off (choose [0.25, 0.5]) (|+ 0))
$ s "bogdan:2"
# note (scale "dorian" (irand 7))
# gain 0.8
d4
$ s "bogdan(<<1 2> <2 1>>, 4)"
# n "<4 <6 <9 13>>>"