Ja, bo ja - Muzyka fraktalna | Текст песни

• Тексты песен
• Ja, bo ja
• Muzyka fraktalna

Pesni.guru - сайт для Гуру

45 + 36 => int n0;
n0 + 3 => int n1;
0.25 => float tm;

SinOsc vib1 => SawOsc viol1 => ADSR env1 => Gain g => dac;
SinOsc vib2 => SawOsc viol2 => ADSR env2 => g;
0.05 => g.gain;
2 => viol1.sync;
2 => viol2.sync;
6.0 => vib1.freq;
6.0 => vib2.freq;
3.0 => vib1.gain;
3.0 => vib2.gain;

fun void noteViol(int n, dur t)
{
tm *=> t;

( 83.33::ms, 55.56::ms, 0.4, 83.33::ms ) => env1.set;
Std.mtof(n) => viol1.freq;

1 => env1.keyOn;
t => now;
1 => env1.keyOff;

viol1 @=> SawOsc hlpOsc;
viol2 @=> viol1;
hlpOsc @=> viol2;
env1 @=> ADSR hlpEnv;
env2 @=> env1;
hlpEnv @=> env2;
}

fun void sekwencja(int offset) {
noteViol(n0+offset, 250::ms);
noteViol(n0+offset, 250::ms);
noteViol(n1+offset, 250::ms);
noteViol(n1+offset, 250::ms);
for(0 => int i; i<3; i++) {
noteViol(n0+offset, 500::ms);
noteViol(n1+offset, 500::ms);
}
}

fun void nadsekwencja(int offset, int depth) {
depth--;
if(depth <= 0)
sekwencja(offset);
else {
nadsekwencja(1+offset, depth);
nadsekwencja(-1+offset, depth);
nadsekwencja(4+offset, depth);
nadsekwencja(-3+offset, depth);
}
}

nadsekwencja(-12, 4);
nadsekwencja(-24, 4);
nadsekwencja(-6, 4);
nadsekwencja(0, 4);
noteViol(n0, 1000::ms / tm);