/<
lastmsg=""
function 过验证()
  local str=获取NPC对话内容()
  if str==lastmsg then return end -- 防止重复过
  lastmsg = str
  local tab={
              {"加","+"},{"减","-"},{"乘","*"},{"除","/"},
              {"＋","+"},{"—","-"},{"×","*"},{"÷","/"},
              {"[","("},{"]",")"},{"【","("},{"】",")"},
              {"{","("},{"}",")"},{"<","("},{">",")"},
            }
  local function maskstr(str)
    for k,v in ipairs(tab) do
      if v[1]==str then return v[2] end
    end
    return str
  end
  if str:find("验证码") then
    delay(1000)
    x,y=获取人物坐标()
    local ns=str:gsub("<([^/]+)/AUTOCOLOR=%d+>","%1")
    local vc=ns:match(":([^=]+)=")
    vc=vc:gsub("坐标一",tostring(x))
    vc=vc:gsub("坐标二",tostring(y))
    local cmd=str:match("/(@@[^>]+)>")
    local bds=""
    if vc and cmd then
      for k in vc:gmatch("([0-9＋%+%-%—÷×%*加减乘除%[%]%(%)【】{}<>]+)") do
        bds=bds..maskstr(k)
      end
      if not bds then return end 
      local sf=load("return "..bds)
      print("计算公式："..bds)
      if sf then
        local r=sf()
        if not r then r="" end
        local content=tostring(r)
        if content and #content>0 then
          content=content:match("(%d+)") -- 过滤小数点
          print("计算结果："..content)
          合成命令(cmd,content)
          等待(1500)
        end
      end
    end
  end
end
设置用户检测("过验证",2000)
/>