Agent Detect (AGENT_DETECT)

local agent_detect_found = nil
local agent_detect_count = nil
local agent_detect_status = nil
local agent_detect_code = nil
local agent_detect_x = nil
local agent_detect_y = nil
local agent_detect_left = nil
local agent_detect_top = nil
local agent_detect_right = nil
local agent_detect_bottom = nil
local agent_detect_width = nil
local agent_detect_height = nil
local agent_detect_confidence = nil
local agent_detect_track_id = nil
local agent_detect_reference_id = nil
local agent_detect_label = nil
local agent_detect_visible = nil
local agent_detect_verified = nil

do
 local _adR = Region(0, 0, 540, 960)
 local _adWin = 5000
 local _adGap = math.max(1, math.floor(1000 / 8))
 local _adK = "block:00000000-0000-4000-8000-000000000001"
 __mh_agent_detect_state = __mh_agent_detect_state or {}
 local _adS = __mh_agent_detect_state[_adK] or { acted = {}, order = {}, lastAt = 0, readyAt = 0 }
 __mh_agent_detect_state[_adK] = _adS
 local _adO = {
  stateKey = _adK, label = "guard", profile = "best",
 }
 local function _adCall()
  _adO.syncExcluded = _adO.intent == nil or _adO.intent == "scan"
  local _t0 = System.currentTime()
  local _r
  local _fn = _adR.agentDetect
  if type(_fn) ~= "function" then
   _r = { status = "error", code = "MODEL_UNAVAILABLE", error = "agent_detect_host_unsupported" }
  else
   local _ok, _v = pcall(_fn, _adR, "00000000-0000-4000-8000-000000000002", "00000000-0000-4000-8000-000000000003", _adO)
   if not _ok then
    local _e = tostring(_v)
    for _, _k in ipairs({ "CompatStopException", "Script durduruldu", "BUDGET_", "RATE_LIMIT_" }) do
     if string.find(_e, _k, 1, true) then error(_v, 0) end
    end
    _r = { status = "error", code = "RUNTIME_ERROR", error = "agent_detect_call_failed" }
   elseif type(_v) ~= "table" or (_v.status ~= "found" and _v.status ~= "not_found" and _v.status ~= "error") then
    _r = { status = "error", code = "RUNTIME_ERROR", error = "agent_detect_invalid_result" }
   else
    _r = _v
   end
  end
  local _hint = math.min(1000, math.max(0, tonumber(_r.nextDelayMs) or 0))
  if _r.status == "error" then
   _hint = math.max(250, _hint)
   _r.soft = _r.code == "TIMEOUT" or _r.code == "CAPTURE_UNAVAILABLE"
  end
  _adS.lastAt = _t0
  _adS.readyAt = System.currentTime() + _hint
  return _r
 end
 local function _adPace()
  local _due = math.max(_adS.readyAt, _adS.lastAt + _adGap) - System.currentTime()
  if _due > 0 then wait(math.min(1000, math.ceil(_due))) end
 end
 local function _adPick(_r)
  local _t = _r.status == "found" and type(_r.targets) == "table" and _r.targets[tonumber(_r.selected) or 0] or nil
  return type(_t) == "table" and _t or nil
 end
 local _adT0 = System.currentTime()
 local _adRes, _adMiss
 for _adPoll = 1, math.floor(_adWin / _adGap) + 2 do
  _adPace()
  _adRes = _adCall()
  if _adRes.status == "found" or (_adRes.status == "error" and not _adRes.soft) then break end
  if not _adRes.soft then _adMiss = _adRes end
  if _adWin <= 0 or System.currentTime() - _adT0 >= _adWin then
   break
  end
 end
 if _adRes.soft and _adMiss ~= nil then _adRes = _adMiss end
 local _adOut = _adRes.status
 local _adCode = tostring(_adRes.code or "RUNTIME_ERROR")
 local _adWhy = tostring(_adRes.error or "")
 local _adSel = _adPick(_adRes)
 if _adOut == "found" and _adSel == nil then
  _adOut = "not_found"
  _adCode = "NO_TARGET"
 end
 local _adOk = false
 local _adT = (_adOut == "found" and _adSel) or {}
 agent_detect_found = _adOut == "found"
 agent_detect_count = (_adOut ~= "error" and (tonumber(_adRes.count) or 0)) or 0
 agent_detect_status = _adOut
 agent_detect_code = _adCode
 agent_detect_x = tonumber(_adT.x) or 0
 agent_detect_y = tonumber(_adT.y) or 0
 agent_detect_left = tonumber(_adT.left) or 0
 agent_detect_top = tonumber(_adT.top) or 0
 agent_detect_right = tonumber(_adT.right) or 0
 agent_detect_bottom = tonumber(_adT.bottom) or 0
 agent_detect_width = tonumber(_adT.width) or 0
 agent_detect_height = tonumber(_adT.height) or 0
 agent_detect_confidence = tonumber(_adT.confidence) or 0
 agent_detect_track_id = tonumber(_adT.trackId) or 0
 agent_detect_reference_id = tostring(_adT.referenceId or "")
 agent_detect_label = tostring(_adT.label or "")
 agent_detect_visible = _adT.visible == true
 agent_detect_verified = _adOk
 if _adOut ~= "error" then _adS.lastErr = nil end
 if _adOut == "found" then
  _lastMatch = _adSel.match
 elseif _adOut == "error" then
  _lastMatch = nil
  if _adS.lastErr ~= _adCode then
   _adS.lastErr = _adCode
   System.log("AGENT_DETECT error [AGENT_DETECT]: " .. _adCode .. (_adWhy ~= "" and (" (" .. _adWhy .. ")") or ""))
  end
 else
  _lastMatch = nil
 end
end