# Hi-hat: ruido blanco filtrado en pasa-altos con envolvente percusiva.
node g1 = trig(period=0.5, duration=0.01)
node ne = adsr(a=0.001, d=0.06, s=0.0, r=0.04, gate=g1)
node n1 = noise()
node hp = filter(hp, in=n1, cutoff=4000, q=1.0)

out <- hp * ne