hiphop.tidal 123 Bytes
setcps 0.5

d1
$ whenmod 32 28 (# silence)
$ whenmod 16 8 (# gain (0.35 + sine))
$ s "dr dr? <dr*2 dr>? dr dr dr? dr*2 dr"