get("#388") -- rect functions

get("#348") -- rgb functions

get("#356") -- num2hex

get("#430") -- makeIcon

get("#428") -- findContents

get("#431") -- LXTerminal character reference

get("#433") -- iconDiff

function getIconSize(icon)

  local i = 1

  while string.sub(icon, i, i) ~= '.' do

    i = i+1

  end

  local w = i-1

  -- #icon+1 = (w+1)*h

  -- => h = (#icon+1)/(w+1)

  local h = (#icon+1)/(w+1)

  return w, h

end

local fw_, fh_ = getIconSize(characterReference[1][2])

print("fw/fh", fw_, fh_)

function recognizeChar(icon, verbose)

  local best, min

  if verbose then print("icon", icon) end

  local first = true

  for _, ic in ipairs(characterReference) do

    local c, reficon = unpack(ic)

    local diff

    if min ~= nil then

      if verbose then

        print("iconDiffWithLimit min", min, "fw", fw_, "fh", fh_)

      end

      diff = iconDiffWithLimit(icon, reficon, min, fw_, fh_, verbose and first)

      first = false

    else

      diff = iconDiff(icon, reficon)

    end

    if diff ~= nil and (min == nil or diff < min) then

      best, min = c, diff

    end

    if verbose then

      print("best", best, "min", min, "c", c, "diff", diff, "reficon", reficon)

    end

  end

  return best, min

end

return function()

  --[[local i = 0

  for _, ic in ipairs(characterReference) do

    print(unpack(ic))

    i=i+1

    if i > 4 then goto out end

  end

  ::out::]]

  local cursor = otherresults["#434"] or error("Need result of #434")

  local _, _, cx, cy = cursor:find("Cursor position: (%d+)/(%d+)")

  if cx == nil then print("Cursor not found") return end

  cx, cy = tonumber(cx), tonumber(cy)

  print("Cursor position: "..cx..", "..cy)

  local problem = findContents()

  if problem then return problem end

  print("Contents: "..contents_x1..", "..contents_y1..", "..contents_x2..", "..contents_y2)

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

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

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

  print("Terminal size: "..tw.."*"..th)

  local y = cy-1 -- cursor line

  local line = {}

  for x = 0, tw-1 do

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

    local cropped = {width=fw-1, height=fh-1,

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

    local icon = makeIcon(cropped)

    local c, diff = recognizeChar(icon)

    --print("c: "..tostring(c)..", diff: "..tostring(diff)..", icon: "..icon)

    table.insert(line, c or "?")

  end

  local text = table.concat(line)

  return "Screen text on cursor line:\n"..text

end