//TONALIDADES FIUSHAS

(
~un=Pdef(\triada1,
Pbind(
\octave, 5,
\degree, Pseq([0, 3, 5, 3, 0], inf),
\dur, Pseq([0.5, 0.1], inf)
)
).play
)

(
~do=Pdef(\triada2,
Pbind(
\octave, 4,
\degree, Pseq([0, 3, 5, 3, 0], inf),
\amp, Pseq([0.05], inf),
\dur, Pseq([0.1], inf)
)
).play
)

(
~tr=Pdef(\triada3,
Pbind(
\octave, 3,
\degree, Pseq([0, 4, 7, 4, 0], inf),
\amp, Pseq([0.25], inf),
\dur, Pseq([1, 1, 2, 3, 4, 5], inf)
)
).play
)

(
~un.stop;
~do.stop;
~tr.stop
)