2 Copyright (C) 2003-2009 Paul Brossier <piem@aubio.org>
4 This file is part of aubio.
6 aubio is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation, either version 3 of the License, or
9 (at your option) any later version.
11 aubio is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with aubio. If not, see <http://www.gnu.org/licenses/>.
23 unsigned int pos = 0; /*frames%dspblocksize*/
26 aubio_wavetable_t *wavetable;
29 static int aubio_process(smpl_t **input, smpl_t **output, int nframes) {
30 unsigned int j; /*frames*/
31 for (j=0;j<(unsigned)nframes;j++) {
33 /* write input to datanew */
34 fvec_write_sample(ibuf, input[0][j], pos);
35 /* put synthnew in output */
36 output[0][j] = fvec_read_sample(obuf, pos);
39 if (pos == overlap_size-1) {
41 aubio_pitch_do (o, ibuf, pitch);
42 smpl_t freq = fvec_read_sample(pitch, 0);
43 aubio_wavetable_set_amp ( wavetable, aubio_level_lin (ibuf) );
45 aubio_wavetable_set_freq ( wavetable, freq );
47 aubio_wavetable_set_freq ( wavetable, 0.0 );
49 aubio_wavetable_do (wavetable, obuf, obuf);
50 /* end of block loop */
51 pos = -1; /* so it will be zero next j loop */
58 static void process_print (void) {
59 if (!verbose && usejack) return;
60 smpl_t pitch_found = fvec_read_sample(pitch, 0);
61 outmsg("%f %f\n",(frames)
62 *overlap_size/(float)samplerate, pitch_found);
65 int main(int argc, char **argv) {
66 examples_common_init(argc,argv);
68 o = new_aubio_pitch (pitch_mode, buffer_size, overlap_size, samplerate);
71 wavetable = new_aubio_wavetable (samplerate, overlap_size);
72 aubio_wavetable_play ( wavetable );
74 examples_common_process(aubio_process,process_print);
77 del_aubio_wavetable (wavetable);
80 examples_common_del();
81 debug("End of program.\n");