LEG随机验证码范本之四m2插件版：
function 设置命令回调()
设置命令(1, "传送到挂机地图", 0)设置命令(3, "包满在线回收", 0)
设置命令(5, "NPC框随机验证",0)
end
function NPC框随机验证()
local file
local aa
local k1
--file=io.open("6.txt","r")
--if file~=nil then
-- aa=file:read("*all")
-- --输出信息(aa)
-- file:close()
--end
aa=NPC对话框内容()
local passcode
local s1
passcode=""
--输出信息(passcode)
local mosuzi={}
mosuzi[0]="BAAABABBBAABBBAABBBAABBBAABBBAABBBABAAAB"
mosuzi[1]="BBABBBAABBBBABBBBABBBBABBBBABBBBABBBAAAB"
mosuzi[2]="BAAABABBBAABBBABBBABBBABBBABBBABBBBAAAAA"
mosuzi[3]="BAAABABBBABBBBABBAABBBBBABBBBAABBBABAAAB"
mosuzi[4]="BBBABBBAABBABABBABABABBABBAAAABBBABBBBAA"
mosuzi[5]="AAAAAABBBBABBBBAAAABBBBBABBBBAABBBABAAAB"
mosuzi[6]="BAAABABBABABBBBAAAABABBBAABBBAABBBABAAAB"
mosuzi[7]="AAAAAABBABBBBABBBABBBBABBBBABBBBABBBBABB"
mosuzi[8]="BAAABABBBAABBBABAAABABBBAABBBAABBBABAAAB"
mosuzi[9]="BAAABABBBAABBBAABBBABAAAABBBBABABBABAAAB"
local i
k1=string.find(aa,"发送验证",1,true)
if k1~=nil then
--进行替换
for i=48,57 do
aa=string.gsub(aa,string.char(i),"A")
end
for i=65,90 do
aa=string.gsub(aa,string.char(i),"A")
end
for i=97,122 do
aa=string.gsub(aa,string.char(i),"A")
end
aa=string.gsub(aa,"","BB")
aa=string.gsub(aa,"","BB")
local hanzi
for i=1,300 do
hanzi=匹配内容(aa,[[([\u4e00-\u9fa5]{1})]])
if hanzi~="error.Null" then
aa=string.gsub(aa,hanzi,"AA")
end
end
aa=string.gsub(aa,"AA","A")
aa=string.gsub(aa,"BB","B")
--输出信息(aa)
---替换结束
local kk
local i
local abstring={}
for i=1,8 do
kk=匹配内容(aa,[[([A-B]{24})]])
if kk~=nil then
abstring[i]=kk
aa=string.gsub(aa,kk,"",1)
--输出信息(abstring[i])
end
end
if abstring[8]~="error.Null" then
--输出信息(abstring[8])
local j
local k
local pass
pass=""
passcode=""
for j=1,20 do
for i=1,8 do
pass=table.concat{pass,string.sub(abstring[i],j,j+4)}
end
--输出信息(pass)
for k=0,9 do
if pass==mosuzi[k] then
--输出信息(tostring(k))
passcode=table.concat{passcode,tostring(k)}
end
end
pass=""
end
输出信息(passcode)
发言(passcode)
end
if abstring[8]=="error.Null" then
--输出信息(abstring[8])
for i=1,8 do
kk=匹配内容(aa,[[([A-B]{18})]])
if kk~=nil then
abstring[i]=kk
aa=string.gsub(aa,kk,"",1)
--输出信息(abstring[i])
end
end
local j
local k
local pass
pass=""
passcode=""
for j=1,14 do
for i=1,8 do
pass=table.concat{pass,string.sub(abstring[i],j,j+4)}
end
--输出信息(pass)
for k=0,9 do
if pass==mosuzi[k] then
--输出信息(tostring(k))
passcode=table.concat{passcode,tostring(k)}
end
end
pass=""
end
输出信息(passcode)
发言(passcode)
if passcode~="" then
发言("2222")
发言(passcode)
end
end
end
passcode=""
end
function 传送到挂机地图()
获取远程仓库ID()
等待(4000)
local 返回值1
输出日志("进入地图传送")
返回值1 = 使用传送物品("盟重传送石")
if 返回值1 ~= 0 then
设置运行错误(1, 返回值1)
return 1
end
设置对话框状态(1)
移动到(332,335,-1)
等待(2000)
保存当前角色坐标()
对话NPC("免费泡点")
等待(1500)
选择("@点击进入2")
等待(1500)
返回值1 = 等待地图切换(10000, ".")
if 返回值1 ~= 0 then
设置运行错误(2, 返回值1)
return 3
end
return 0
end
function 包满在线回收()
local 返回值1
返回值1 = 对话NPC("[永久回收*]")
if 返回值1 ~= 0 then
return 1
end
等待(1500)
选择("[0]")
等待(700)
选择("[1]")
等待(700)
选择("[2]")
等待(700)
选择("[3]")
等待(700)
选择("[4]")
等待(700)
选择("[5]")
等待(700)
选择("[6]")
等待(700)
选择("[7]")
等待(700)
选择("[7]")
等待(1500)
选择("[0]")
等待(700)
选择("[1]")
等待(700)
选择("[2]")
等待(700)
选择("[3]")
等待(700)
等待(1500)
关闭对话NPC()
返回值1=读取英雄捡取物品到背包()
等待(3000)
local 返回值1
返回值1 = 对话NPC("[永久回收*]")
if 返回值1 ~= 0 then
return 1
end
等待(1500)
选择("[0]")
等待(700)
选择("[1]")
等待(700)
选择("[2]")
等待(700)
选择("[3]")
等待(700)
选择("[4]")
等待(700)
选择("[5]")
等待(700)
选择("[6]")
等待(700)
选择("[7]")
等待(700)
选择("[7]")
等待(1500)
选择("[0]")
等待(700)
选择("[1]")
等待(700)
选择("[2]")
等待(700)
选择("[3]")
等待(700)
等待(1500)
关闭对话NPC()
end
function 主体函数()
local 返回值1
设置命令回调()
设置挂机地图("PK泡点区")
while( 1 ) do
返回值1 = 边打边走(9,25, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(20,32, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(30,22, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(21,14, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
--要添加，就依次列推
end
return 0
end