source: examples/aubiotrack.c @ 1b25a70

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

examples/: move parse_args to parse_args.h, clean up, remove lash and old frames_delay

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