1 #include <stdlib.h>
2 #include <stdio.h>
3 #include <time.h>
4 #include "soundpipe.h"
5 
6 typedef struct {
7     sp_osc *osc;
8     sp_ftbl *ft;
9     sp_tenv *tenv;
10     sp_metro *met;
11     sp_randi *rand;
12     SPFLOAT freq;
13 } UserData;
14 
write_osc(sp_data * sp,void * udata)15 void write_osc(sp_data *sp, void *udata) {
16     UserData *ud = udata;
17     SPFLOAT osc = 0, trig = 0, tenv = 0;
18     sp_randi_compute(sp, ud->rand, NULL, &ud->met->freq);
19     sp_metro_compute(sp, ud->met, NULL, &trig);
20     sp_tenv_compute(sp, ud->tenv, &trig, &tenv);
21     sp_osc_compute(sp, ud->osc, NULL, &osc);
22     sp->out[0] = tenv * osc;
23 }
24 
main()25 int main() {
26     UserData ud;
27     SPFLOAT *freqp = &ud.freq;
28     ud.freq = 400;
29     sp_data *sp;
30     sp_create(&sp);
31     sp_srand(sp, 12345);
32 
33     sp_randi_create(&ud.rand);
34     sp_metro_create(&ud.met);
35     sp_tenv_create(&ud.tenv);
36     sp_ftbl_create(sp, &ud.ft, 2048);
37     sp_osc_create(&ud.osc);
38 
39     sp_randi_init(sp, ud.rand);
40     ud.rand->min = 2.0;
41     ud.rand->max= 15.0;
42     sp_metro_init(sp, ud.met);
43     sp_tenv_init(sp, ud.tenv);
44     ud.tenv->atk = 0.005;
45     ud.tenv->hold = 0.01;
46     ud.tenv->rel = 0.003;
47     sp_gen_sine(sp, ud.ft);
48     sp_osc_init(sp, ud.osc, ud.ft, 0);
49     ud.osc->freq = *freqp;
50     sp->len = 44100 * 5;
51     sp_process(sp, &ud, write_osc);
52 
53     sp_randi_destroy(&ud.rand);
54     sp_metro_destroy(&ud.met);
55     sp_ftbl_destroy(&ud.ft);
56     sp_osc_destroy(&ud.osc);
57     sp_tenv_destroy(&ud.tenv);
58     sp_destroy(&sp);
59     return 0;
60 }
61