2015-07-11 15:34 来源:永恒狂刀官网
function 设置命令回调()
设置命令(1, "传送到挂机地图", 0)
设置命令(3, "包满在线回收", 0)
设置命令(6, "提示框验证", 0)
end
function 传送到挂机地图()
local 返回值1
输出日志("进入地图传送")
返回值1 = 使用传送物品("盟重传送石")
if 返回值1 ~= 0 then
设置运行错误(1, 返回值1)
return 1
end
设置对话框状态(1)
移动到(330,339,0)
等待(2000)
保存当前角色坐标()
对话NPC("初级地图*")
等待(1500)
选择("免费进入龙源*")
等待(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)
等待(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)
等待(1500)
关闭对话NPC()
end
function 主体函数()
local 返回值1
设置命令回调() --如何您不需要循环打怪只需要去掉以下代码到下处红字提示处
设置挂机地图("龙源血*")
while( 1 ) do
返回值1 = 边打边走(82,93, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(71,147, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(121,138, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
返回值1 = 边打边走(102,306, 10) --注意，，坐标未填写的
if 返回值1 ~= 0 then
设置运行错误(5, 返回值1)
return 3
end
--要添加，就依次列推
end --如何您不需要循环打怪只需要去掉以上代码到上处红字提示处
return 0
end
function 提示框验证()
local aa, bb
输出信息("进入验证...")
aa = 提示对话框内容()
local k1
k1=string.find(aa, "防脱机验证",1,true)
if k1~=nil then
输出信息(aa)
输出信息("发现验证码")
关闭提示框(3000)
bb = 获取角色名称()
输出信息(bb)
local passcode
local pass1
local pass2
pass1=匹配内容(bb,[[\d{1,2}]])
if pass1~=nil then
bb=string.gsub(bb,pass1,"",1)
pass2=匹配内容(bb,[[\d{1,2}]])
end
pass3=匹配内容(bb,[[-]])
if pass3~=nil then
passcode=tonumber(pass1)-tonumber(pass2)
else
passcode=tonumber(pass1)+tonumber(pass2)
end
输出信息(pass1)
输出信息(pass2)
输出信息(tostring(passcode))
关闭提示框(3000)
发言("@验证")
等待(1000)
回答(passcode)
关闭提示框(3000)
return 1
end
end
