简单辅助图形数字3乘52_脚本验证

/<
function 过验证()
  local str = 获取NPC对话内容()
  if str:find("/@@InPut%a+%d+>")~=NULL then
    function maskMsg ( text, set, repl )
      if #text <= 0  then
        return text
      end
      local function maskor ( str )
        return repl or string.rep( "*", #str )
      end
      for k, str in pairs(set) do
        text = text:gsub( str, maskor(str) )
      end
      return text
    end
 
    wordLib  = {www
      "<■/SCOLOR=%d+>"
          }
    wordLib1 = {www
      "　"
          }
 
    key =      {www
      {www"AAAABAABAABAAAA","0"},{www"BBABBABBABBABBA","1"},{www"AAABBAAAAABBAAA","2"},{www"AAABBAAAABBAAAA","3"},
      {www"ABAABAAAABBABBA","4"},{www"AAAABBAAABBAAAA","5"},{www"AAAABBAAAABAAAA","6"},{www"AAABBABBABBABBA","7"},
      {www"AAAABAAAAABAAAA","8"},{www"AAAABAAAABBAAAA","9"}
          }
 
    if str:find("/@@InPut%a+%d+>") then
      msg = maskMsg ( str, wordLib, "A")
      msg = maskMsg ( msg, wordLib1, "B")
      local num1=nil;local num2=nil;local num3=nil;local num4=nil
      local nn=""
      for k in msg:gmatch("┆([AB]+)┆") do
        a,b,c,d = k:match("([AB][AB][AB])B([AB][AB][AB])B([AB][AB][AB])B([AB][AB][AB])")
        print(a,b,c,d)
        if num1 == nil then
          num1 = a;num2 = b;num3 = c;num4 = d
        else
          num1 = num1 .. a;num2 = num2 .. b;num3 = num3 .. c;num4 = num4 .. d
        end       
        nn = num1.." "..num2.." "..num3.." "..num4
        for _,i in ipairs(key) do
          nn = nn:gsub(i[1],i[2]) 
        end   
      end
  nn=nn:gsub(" ","")
      num1 = nil;num2 = nil;num3 = nil;num4 = nil
      if #nn == 4 then
        合成命令(str:match("(@@[^>]+)"),nn)
        等待(1500)
      end   
    end
  end
end
过验证() -- 回收验证保留此行，删除下面一行
设置用户检测("过验证",2000)  -- 脱机验证保留此行，删除上面一行
/>