传奇梦回红日幻境七层寻路挂机脚本:
if 是否存在物品("盟重传送石")<1 then --药物小于1开始执行购买
商铺购买("比奇传送石")
等待(1000)
end
if 是否存在物品("随机传送石")<1 then --药物小于1开始执行购买
商铺购买("随机传送石")
等待(1000)
end
if 是否存在物品("修复神水")<1 then --药物小于1开始执行购买
商铺购买("修复神水")
等待(1000)
end
if 检测耐久()==1 then --检测耐久不足40%修复
使用("修复神水") --物品名称自己改
end
if 获取窗口("NPC对话框")==1 then
点击控件("Button_MerchantDlgClose")
end
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
end
if (获取地图名()=="铁匠铺") then
寻路(4,16,0)
end
if (获取地图名()=="幻境七层") then --此地图是打怪地图,如发现地图名字错误请修改
if 取包裹物品数量("强效金创药|超级魔法药")<2 then
if 边走边打(169,171,3)==1 then --寻路到此处开始对话
对话坐标(170,170) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@buy")
等待(500)
NPC买物品("超级金创药")
等待(1000)
NPC买物品("超级魔法药")
等待(1000)
使用物品("随机传送石")
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
end
end --此处为对话NPC结束
return
end
设置挂机点("170,164|146,184|156,65|133,63|121,71|104,96|73,167")
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
else
开始打怪()
end
end
if (获取地图名()=="幻境六层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(83,25,0)==1 then
等待(800)
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="幻境五层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(36,225,0)==1 then
等待(800)
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="幻境四层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(193,124,0)==1 then
等待(800)
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="幻境三层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(88,81,0)==1 then
对话坐标(89,79) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@前往幻境四层")
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
重置坐标()
end
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="幻境二层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(364,229,0)==1 then
等待(800)
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="幻境一层") then --此地图是打怪地图,如发现地图名字错误请修改
if 寻路(10,9,0)==1 then
等待(800)
end
if (角色("死亡")==1) then
小退()
end
if (取背包空位()<2) then --检测包裹内空位少于2格执行回收子程序
使用("盟重传送石")
置标记(1,0)
end
end
if (获取地图名()=="开区等待(庄园)") then --此地图进图,如发现地图名字错误请修改
if 取标记(2)==0 then
if 寻路(71,73,2)==1 then --寻路到此处开始对话
对话坐标(65,66) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@storage")
等待(500)
物品存仓()
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
置标记(2,1)
end
end --此处为对话NPC结束
elseif 取标记(2)==1 then
if 寻路(71,73,2)==1 then --寻路到此处开始对话
对话坐标(67,65)
等待(3800)
置标记(2,0)
置标记(1,0)
end --此处为对话NPC结束
end
end
if (获取地图名()=="盟重省") then --此地图进图,如发现地图名字错误请修改
血量=角色("当前HP")
最大血量=角色("最大HP")
血量百分比=(血量/最大血量)*100
if 检测复活()==1 then --判断可不删除
return
end
if 取包裹物品数量("魔杖|生命项链|裁决|记忆")>0 then
if 寻路(324,324,2)==1 then --寻路到此处开始对话
对话坐标(319,323) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@MOVEb")
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
置标记(2,0)
end
end --此处为对话NPC结束
return
end
if 血量百分比<90 then --血量低于90%不进图
return
end
if 取标记(1)==0 then
if 寻路(329,322,2)==1 then --寻路到此处开始对话
对话坐标(331,320) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@元宝回收")
等待(500)
点击命令("@一键回收Y")
等待(500)
点击命令("@MAIN")
等待(500)
点击命令("@一键回收")
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
置标记(1,1)
end
end --此处为对话NPC结束
elseif 取标记(1)==1 then
if 取包裹物品数量("超级金创药")<6 and 取包裹物品数量("超级魔法药")<6 then
if 寻路(358,335,2)==1 then --寻路到此处开始对话
对话坐标(361,335) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@buy")
等待(500)
if 取包裹物品数量("超级金创药")<6 then
NPC买物品("超级金创药")
等待(1000)
end
if 取包裹物品数量("超级魔法药")<6 then
NPC买物品("超级魔法药")
等待(1000)
end
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
end
end --此处为对话NPC结束
else
置标记(1,2)
end
elseif 取标记(1)==2 then
if 寻路(325,324,2)==1 then --寻路到此处开始对话
对话坐标(319,323) --对话的NPC坐标
等待(800)
if 获取窗口("NPC对话框")==1 then
点击命令("@挑战幻境")
等待(500)
点击命令("@挑战幻境5")
等待(500)
if 获取窗口("提示框")==1 then
点击控件("Button_MsgDlgOk")
等待(500)
end
置标记(1,0)
end
end --此处为对话NPC结束
end
end