刀_简易锻刀
--[[
简易锻刀
用于大批量锻刀
★★使用说明★★
请先进入锻刀界面并进行一次锻刀,目的是为了将锻刀的各种资源值固定
然后停留在锻刀界面运行脚本
注:本脚本只在日服测试通过
]]
--[[---------------------------------设置区域-----------------------------------]]
--是否使用加速 (你不用加速,只能锻4个,有啥意义?????不如自己点咯)
useSpeed = 是
--锻刀次数
runCount = 100
--[[---------------------------------------------------------------------------]]
--[[使用加速]]
function UseSpeed()
Base.Click(465,495);
for i = 1, 10 do
Base.Move(465,495);
Base.Sleep(100)
end
Base.Click(466,516);
end
--[[取得可用的锻造位 1 - 4 ]]
function GetPositionIndex()
for i = 1, 4 do
if Base.IsColor(471,134 + (i - 1) * 120,16777215) then
return i;
end
end
return 0;
end
--[[进入循环]]
for i = 1, runCount do
Base.Print("开始第" .. i .. "次");
index = GetPositionIndex();
Base.Print("使用" .. index .. "号位置");
if index == 0 then
--输出无空位了
Base.Print("输出无空位了");
break;
end
--点击空位
Base.Click(471, 134 + (index - 1) * 80);
Base.Sleep(800);
if useSpeed == true then
Base.Print("使用加速");
UseSpeed();
Base.Sleep(500);
end
Base.Print("点击锻造");
--点击锻造
Base.Click(655, 518);
Base.Print("等待锻造结果...");
--等待锻造结果
while Base.IsColorEx(945,493,604259,8) == false do
Base.Sleep(500);
end
--Next 回到锻刀
Base.Click(863,525);
Base.Sleep(50);
Base.Click(863,525);
Base.Print("等待回到锻刀...");
Base.Click(863,525);
Base.Sleep(2500);
end
Last updated