/<
lastmsg=""
function 过验证()
local str=获取NPC对话内容()
if not str or lastmsg==str then return end
lastmsg = str
local getbuts=function(s)
local bs={www};local bc={www};local bd={www}
for b,c in s:gmatch("<Img:(%d+):[^>]+/(@[^>%d]+%d+)>") do
table.insert(bs,b)
bc[b]=c
end
table.sort(bs)
for k,v in ipairs(bs) do bd[k]=bc[v] end
return bd
end
local bd=getbuts(str)
local num=str:match("{www(%d+)/SCOLOR=%d+} <中所有的")
local e1,e2=str:match("{www(%d+) 和 (%d+)/SCOLOR")
if bd and num and e1 and e2 then
local offset=0
if str:match("@AAS") then offset=1 end
num=num:gsub(e1,"")
num=num:gsub(e2,"")
for i=1,#num do
ii=tonumber(num:sub(i,i))+offset
if ii==0 then ii=10 end
选择(bd[ii])
等待(1000)
end
local cmd=nil
for c in str:gmatch("<Img:%d+:[^/]+/(@[^>]+)>") do cmd=c end
if cmd then
选择(cmd)
等待(1000)
end
end
end
过验证() -- 回收验证保留此行，删除下面一行
设置用户检测("过验证",2000) -- 脱机验证保留此行，删除上面一行
/>
