# Arpegio: Am7 ascendente y descendente sobre 8 pasos.
# clk y mel comparten rate (8 pasos/seg) por lo que arrancan en fase desde t=0.
node clk = trig(period=0.125, duration=0.06)
node mel = seq(rate=8, steps=[220.0, 261.63, 329.63, 392.0, 523.25, 392.0, 329.63, 261.63])

node o1 = osc(saw, freq=mel)
node env = adsr(a=0.005, d=0.08, s=0.3, r=0.08, gate=clk)
node lp = filter(lp, in=o1, cutoff=300 + env*3000, q=3.0)

out <- lp * env * 0.5