/<
lastmsg=""
function 过验证()
local str=获取NPC对话内容()
if str==lastmsg then return end
lastmsg = str
if str:match("防[挂脱]*机") then
local n={www};local cs={www};local csc={www}
for a in str:gmatch("/(@[^>]+)>") do
if n[a]
then n[a]=n[a]+1
else n[a]=1
end
if cs[#a]
then cs[#a]=cs[#a]+1;csc[#a]=a
else cs[#a]=1;csc[#a]=a
end
end
local s=nil;local ybt=false;
for a,b in pairs(n) do
if b==1 then if a~="@EXIT" then s=a end
else ybt = true end
end
if not ybt then
for a,b in pairs(cs) do
if b==1 then s=csc[a]
else ybt = true end
end end
if s and ybt then
选择(s)
end
end
end
过验证() -- 回收验证保留此行，删除下面一行
设置用户检测("过验证",2000) -- 脱机验证保留此行，删除上面一行
/>
