apero time
parent
7a4ae87c0e
commit
3e2fb4a408
@ -0,0 +1,12 @@
|
||||
// Just a better beep
|
||||
SinOsc s => Envelope e => dac;
|
||||
// reglage de notre oscillateur
|
||||
0.5 => s.gain;
|
||||
440 => s.freq;
|
||||
// reglage de notre enveloppe
|
||||
200::ms => e.duration;
|
||||
// hop !
|
||||
e.keyOn();
|
||||
2::second => now;
|
||||
e.keyOff();
|
||||
1::second => now;
|
@ -0,0 +1,16 @@
|
||||
//--- 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;
|
||||
|
||||
//--- hop encore un beep !
|
||||
e.keyOn();
|
||||
2::second => now;
|
||||
e.keyOff();
|
||||
1::second => now;
|
@ -0,0 +1,14 @@
|
||||
SqrOsc s => BPF f => Envelope e => dac;
|
||||
0.8 => s.gain;
|
||||
440 => s.freq;
|
||||
100::ms => e.duration;
|
||||
|
||||
//--- reglage du filtre passe bande
|
||||
2 => f.Q;
|
||||
1337 => f.freq;
|
||||
|
||||
//--- hop encore un beep !
|
||||
e.keyOn();
|
||||
2::second => now;
|
||||
e.keyOff();
|
||||
1::second => now;
|
@ -0,0 +1,33 @@
|
||||
#include <forms.h>
|
||||
|
||||
int main(int argc, char *argv[]) {
|
||||
FL_FORM *form;
|
||||
FL_OBJECT *yes,
|
||||
*no,
|
||||
*but;
|
||||
|
||||
fl_initialize(&argc, argv, "FormDemo", 0, 0);
|
||||
|
||||
form = fl_bgn_form(FL_UP_BOX, 320, 120);
|
||||
fl_add_box(FL_BORDER_BOX, 160, 40, 0, 0, \
|
||||
"Do you want to Quit?");
|
||||
yes = fl_add_button(FL_NORMAL_BUTTON, \
|
||||
40, 70, 80, 30, "Yes");
|
||||
no = fl_add_button(FL_NORMAL_BUTTON, \
|
||||
200, 70, 80, 30, "No");
|
||||
fl_end_form();
|
||||
|
||||
fl_show_form(form, FL_PLACE_MOUSE, FL_TRANSIENT, \
|
||||
"Question");
|
||||
|
||||
while (1) {
|
||||
if (fl_do_forms() == yes {
|
||||
printf("Yes is pushed\n");
|
||||
break;
|
||||
}
|
||||
else printf("No is pushed\n");
|
||||
}
|
||||
|
||||
fl_finish();
|
||||
return 0;
|
||||
}
|
Loading…
Reference in New Issue