刀h5_联队战_测

--联队脚本,针对日服H5[2019.07.30]联队活动 测试通过。

--[2019.08.01]脚本整体提速了一下

--[[设置区域]]

--总的出击次数
countBattle = 65535

--是否补充手型
autoShouXing =

--难度(1-4)
mapId = 1

--出击的队伍
teamId = 1

--战斗后休息(分钟)
waitMin = 0

--再第几次战斗后切换到队伍2,设置0为不切换
changeToTeam2 = 0

--再第几次战斗后切换到队伍3,设置0为不切换
changeToTeam3 = 0

--再第几次战斗后切换到队伍4,设置0为不切换
changeToTeam4 = 0



--[[以下为程序逻辑, 无把握请勿修改]]

function SelectMapDelegate()
	Base.Print("出阵:选择区域...")
	if mapId == 1 then
		Base.ClickRect(251, 271, 40)
	elseif mapId == 2 then
		Base.ClickRect(494, 268, 40)
	elseif mapId == 3 then
		Base.ClickRect(255, 376, 40)
	elseif mapId == 4 then
		Base.ClickRect(497, 374, 40)
	end
	Base.Sleep(1000)
end

Base.MinVer(236)
Tou.SetToukenH5(true)
Base.SetConfig("Sleep+", 300)
Base.SetConfig("ChangeToTeam2", changeToTeam2)
Base.SetConfig("ChangeToTeam3", changeToTeam3)
Base.SetConfig("ChangeToTeam4", changeToTeam4)
Base.SetValue("FunReWriteClickMap", "SelectMapDelegate")

if autoShouXing then 
	Base.SetValue("AutoShouXing", "1")
else
	Base.SetValue("AutoShouXing", "0")
end

for n = 1, countBattle do
	Tou.Sally(100, mapId)
	Tou.LianDuiBattle(2147483647, teamId)
	Base.Sleep(waitMin * 1000 * 60)
end

Last updated