TetaTricks/code/bipfilter.ck

18 lines
424 B
Plaintext
Raw Normal View History

2021-10-20 04:07:28 +11:00
//--- Just a noisy beep
SqrOsc s => BPF f => Envelope e => dac;
//--- reglage de notre oscillateur
0.8 => s.gain;
440 => s.freq;
//--- reglage de notre enveloppe
100::ms => e.duration;
//--- reglage du filtre passe bande
2 => f.Q;
1337 => f.freq;
2021-10-23 23:25:18 +11:00
fun void beep() {
e.keyOn(); 2::second => now;
e.keyOff(); 1::second => now;
}
() => beep;