get("#388") -- rect functions

get("#428") -- findContents

get("#430") -- makeIcon

get("#433") -- iconDiff

-- fw/fh: 8/17

cursor_unfocused = [[

RRRRRRRRRR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RAAAAAAAAR

RRRRRRRRRR]]

cursor_focused = "AAAAAAAAAA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.IRRRRRRRRA.ERRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.ARRRRRRRRA.AAAAAAAAAA"

cursor_unfocused = cursor_unfocused:gsub("\n", ".")

return function()

  problem = findContents()

  if problem then return problem end

  print("Searching cursor in "..contents_x1..", "..contents_y1..", "..contents_x2..", "..contents_y2)

  fw, fh = 8, 17 -- font width/height

  tw = math.floor((contents_x2-contents_x1)/fw+0.5)

  th = math.floor((contents_y2-contents_y1)/fh+0.5)

  tolerance = 0.01

  local function recog(x, y)

    xx, yy = contents_x1+x*fw, contents_y1+y*fh-1

    cropped = {width=fw+2, height=fh+2,

      getInt = function(x, y) return img.getInt(xx+x, yy+y) end}

    icon = makeIcon(cropped)

    diff = iconDiffWithLimit(icon, cursor_unfocused, tolerance, fw+2, fh+2)

    if diff ~= nil and diff <= tolerance then

      print("Cursor diff:", diff)

      lastCurX, lastCurY = x, y

      return "Cursor: "..xx..", "..yy..", "..

        xx+cropped.width..", "..yy+cropped.height..

        ". Cursor position: "..(x+1).."/"..(y+1)..

        ". Window not focused."

    end

    diff2 = iconDiffWithLimit(icon, cursor_focused, tolerance, fw+2, fh+2)

    --[[if y == 23 then

      print(x, y, diff, diff2)

      if x == 37 or x == 38 then

        print(icon)

      end

    end]]

    if diff2 ~= nil and diff2 <= tolerance then

      print("Cursor diff (focused):", diff2)

      lastCurX, lastCurY = x, y

      return "Cursor: "..xx..", "..yy..", "..xx+cropped.width..", "..yy+cropped.height..". Cursor position: "..(x+1).."/"..(y+1)..". Window focused."

    end

  end

  print("lastCur:", lastCurX, lastCurY)

  if lastCurX then

    local r = recog(lastCurX, lastCurY)

    if r then

      print("Cached cursor found!")

      return r

    end

    -- try whole line

    for x = 0, tw-1 do

      local r = recog(x, lastCurY)

      if r then return r end

    end

  end

  -- not found on cached line, try whole screen

  for y = 0, th-1 do

    if y ~= lastCurY then

      for x = 0, tw-1 do

        local r = recog(x, y)

        if r then return r end

      end

    end

  end

  return "Cursor not found"

end