刀_联队战_只打乱难度

--需要使用1.9.9版本的KCA才可以运行
--联队脚本，仅针对 国服[2018.05.17]联队活动 测试通过。

--[[此版本只会打乱难度，请注意安全。]]

--[[设置区域]]

--总的出击次数
countBattle = 65535

--是否补充手型
autoShouXing = 是

--[[活动ID，国服如果是多活动同时进行，则可能需要修改，
如果是第1个，则保持100即可
如果是第2个，则改为102即可 ]]
eventId = 100 

--难度（1-4）
mapId = 4

--出击的队伍
teamId = 1

--战斗后休息（分钟）
waitMin = 0

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

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

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



--[[以下为程序逻辑, 无把握请勿修改]]
function IsE4Luan()
	local jp = Base.ImageHashContrast(Base.ImageHash(470,331,30,30),"00103C3C7C3D3700") < 10;
	local cn = Base.ImageHashContrast(Base.ImageHash(717,213,20,20),"FFEBDB83DB8BAA89") < 10;
	return jp or cn;
end

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);
	
	while not IsE4Luan() do
		Base.Print("出阵：不在乱难度, 执行切换");
		for i = 0, 4 do
			Base.Click(492, 376);
			Base.Sleep(math.random(350, 550));
		end
		Base.Sleep(3000, true);
	end
	Base.Print("出阵：已切换到乱难度");
end

Base.MinVer(199);
Base.SetConfig("Sleep+",1500);
if autoShouXing then 
	Base.SetValue("AutoShouXing", "1");
else
	Base.SetValue("AutoShouXing", "0");
end
Base.SetConfig("ChangeToTeam2", changeToTeam2);
Base.SetConfig("ChangeToTeam3", changeToTeam3);
Base.SetConfig("ChangeToTeam4", changeToTeam4);
Base.SetValue("FunReWriteClickMap", "SelectMapDelegate");

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