!7

sclass Analyzer {

  static int baseSize = 1024;

  S word1, word2;

  Rect rect; // in baseSize*baseSize

  float threshold;

  S analyze(BWImage img) {

    Rect r = rescaleRect(rect, baseSize, baseSize, img.getWidth(), img.getHeight());

    double b = clipBWImage(img, r).averageBrightness();

    //print(r + " => " + b);

    ret b >= threshold ? word1 : word2;

  }

}

static LPair<S, BWImage> images = new L;

sS word1 = "yes", word2 = "no";

p-exp {

  L<File> files = audioRecordingsWithSingleClip();

  for (File f : allRecordings()) {

    S word = wordFromAudioFileName(f);

    if (!eqicOneOf(word, word1, word2)) continue;

    images.add(pair(word, bwAutoContrast(audio_clipFromLastEntryPoint(audioFileToFrequencyImage(f)))));

    print(fileName(f));

  }

  showImage(second(random(images)));

  findBestAnalyzer();

}

svoid findBestAnalyzer {

  final new Best<Analyzer> best;

  final new AIStrategy_RandomWithVariation<Analyzer> strategy;

  strategy.random = func -> Analyzer { randomAnalyzer() };

  strategy.submit = func(final Analyzer a) -> double {

    new Scorer scorer;

    for (Pair<S, BWImage> img : images)

      scorer.add(eqic(img.a, a.analyze(img.b)));

    if (best.put(a, scorer!))

      print(scorer + " / " + struct(a)); 

    ret scorer!;

  };

  thread { while licensed { strategy.go(); } }

}

static Analyzer randomAnalyzer() {

  bool flip = tossCoin();

  ret nu(Analyzer,

    word1 := flip ? word1 : word2,

    word2 := flip ? word2 : word1,

    rect := randomRect(Analyzer.baseSize, Analyzer.baseSize),

    threshold := randomFloat());

}