!7

cmodule VADFromFFT > DynPrintLog {

  new SimpleBaseDrumFinder2 finder;

  double minBPM = 60, maxBPM = 200;

  start {

    dm_requireLiveAudioFFT();

    dm_vmBus_onMessage_q newAudioFrequencyImage(voidfunc(virtual BWImage img) {

      float[] b = bwImageColumnBrightnesses_generic(img);

      L<IntRange> ranges = finder.addFrequencyImageBrightnesses(b);

      int[] gaps = intRangeStartGaps(ranges);

      if (empty(gaps)) ret;

      sort(gaps);

      MultiSet<Int> ms = intArrayAsTreeMultiSet(gaps);

      new Best<Int> best;

      for (int gap : keys(ms))

        if (isBetween_double(

          audio_frequencyImage_pixelsToBPM(gap),

          minBPM, maxBPM))

          best.put(gap, ms.get(gap-1)+ms.get(gap)+ms.get(gap+1));

      Int gap = best!;

      if (gap == null) ret with print("no fitting gaps");

      print(ms);

      double exactGap = weightedAverage_lit(

        gap-1, ms.get(gap-1),

        gap, ms.get(gap),

        gap+1, ms.get(gap+1));

      double bpm = audio_frequencyImage_pixelsToBPM(exactGap);

      printVars_str(+gap, +exactGap, +bpm);

    });

  }

}