source: examples/aubiotrack.c @ aad688e

feature/autosinkfeature/constantqfeature/pitchshiftfeature/pydocstringsfeature/timestretchpitchshiftsamplertimestretchyinfft+
Last change on this file since aad688e was aad688e, checked in by Paul Brossier <piem@piem.org>, 7 years ago

examples/aubiotrack.c: do not mix input in output yet

  • Property mode set to 100644
File size: 2.7 KB
Line 
1/*
2  Copyright (C) 2003-2009 Paul Brossier <piem@aubio.org>
3
4  This file is part of aubio.
5
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.
10
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.
15
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/>.
18
19*/
20
21#include "utils.h"
22
23uint_t pos = 0;    /* frames%dspblocksize */
24aubio_tempo_t * bt = NULL;
25aubio_wavetable_t *wavetable;
26fvec_t * tempo_out = NULL;
27smpl_t istactus = 0;
28smpl_t isonset = 0;
29
30static int aubio_process(smpl_t **input, smpl_t **output, int nframes) {
31  unsigned int j;       /*frames*/
32  for (j=0;j<(unsigned)nframes;j++) {
33    if(usejack) {
34      /* write input to datanew */
35      fvec_write_sample(ibuf, input[0][j], pos);
36      /* put synthnew in output */
37      output[0][j] = fvec_read_sample(obuf, pos);
38    }
39    /*time for fft*/
40    if (pos == overlap_size-1) {
41      /* block loop */
42      aubio_tempo_do (bt,ibuf,tempo_out);
43      istactus = fvec_read_sample (tempo_out, 0);
44      isonset = fvec_read_sample (tempo_out, 1);
45      fvec_zeros (obuf);
46      if (istactus > 0.) {
47        aubio_wavetable_play ( wavetable );
48      } else {
49        aubio_wavetable_stop ( wavetable );
50      }
51      aubio_wavetable_do (wavetable, obuf, obuf);
52      /* end of block loop */
53      pos = -1; /* so it will be zero next j loop */
54    }
55    pos++;
56  }
57  return 1;
58}
59
60static void process_print (void) {
61  if (sink_uri == NULL) {
62    if (istactus) {
63      outmsg("%f\n",((smpl_t)(frames*overlap_size)+(istactus-1.)*overlap_size)/(smpl_t)samplerate);
64    }
65    if (isonset && verbose)
66      outmsg(" \t \t%f\n",(frames)*overlap_size/(float)samplerate);
67  }
68}
69
70int main(int argc, char **argv) {
71 
72  buffer_size = 1024;
73  overlap_size = 512;
74  /* override default settings */
75  examples_common_init(argc,argv);
76
77  tempo_out = new_fvec(2);
78  bt = new_aubio_tempo(onset_mode,buffer_size,overlap_size, samplerate);
79  if (threshold != 0.) aubio_tempo_set_threshold (bt, threshold);
80
81  wavetable = new_aubio_wavetable (samplerate, overlap_size);
82  aubio_wavetable_set_freq ( wavetable, 2450.);
83  //aubio_sampler_load (sampler, "/archives/sounds/woodblock.aiff");
84
85  examples_common_process(aubio_process,process_print);
86
87  del_aubio_tempo(bt);
88  del_aubio_wavetable (wavetable);
89  del_fvec(tempo_out);
90
91  examples_common_del();
92
93  debug("End of program.\n");
94
95  fflush(stderr);
96
97  return 0;
98}
99
Note: See TracBrowser for help on using the repository browser.