!7

sclass PossibleHScrollbar {

  Rect slider;

  int hIdx;

}

p {

  // Find candidates

  RGBImage rgb = shootScreen(); //loadImage(#1006358;

  ocr_explodedView1_init();

  L<Rect> vClips = ocr_wideBlack_vsplit(rgb);

  int iLine = 0;

  new L<PossibleHScrollbar> hCandidates;

  int y = 0;

  for i over vClips: {

    RGBImage line = rgb.clip(vClips.get(i));

    L<Rect> lineClips = ocr_highBlack_hsplit(line);

    //print("Line " + (++iLine) + " (" + r + "): " + struct(lineClips));

    int x = 0;

    for j over lineClips: {

      Rect clip = lineClips.get(j);

      if (clip.w == 1)

        hCandidates.add(nu(PossibleHScrollbar,

          slider := new Rect(x, y, clip.w, clip.h), hIdx := j));

      x += clip.w;

    }

    y += line.h();

  }

  printStruct(+hCandidates);

  // Keep shooting, check candidates for movement

  while licensed {

    sleepSeconds(2);

    print("Shooting & checking for scrollbar movement");  

    rgb = shootScreen(); //loadImage(#1006358;

    vClips = ocr_wideBlack_vsplit(rgb);

    y = 0;

    int iHC = 0;

    for i over vClips: {

      // find candidates for this line

      while (iHC < l(hCandidates) && hCandidates.get(iHC).slider.y < y) ++iHC;

      if (iHC >= l(hCandidates)) break;

      int jHC = iHC;

      while (jHC < l(hCandidates) && hCandidates.get(jHC).slider.y == y) ++jHC;

      if (jHC > iHC) { // any candidates for this line

        L<PossibleHScrollbar> lineCandidates = subList(hCandidates, iHC, jHC);

        RGBImage line = rgb.clip(vClips.get(i));

        L<Rect> lineClips = ocr_highBlack_hsplit(line);

        int x = 0;

        for j over lineClips: {

          Rect clip = lineClips.get(j);

          if (clip.w == 1) {

            PossibleHScrollbar sb = findWhere(lineCandidates, xIdx := x);

            if (sb != null)

              print("Horizontal slider move: " + sb.slider.x + " => " + x);

          }

          x += clip.w;

        }

      }

      y += vClips.get(i).h;

    }

  }

}