舰_5-5攻略

--5-5攻略脚本（其实就是通用脚本加了个参考配置...）

--[[
--参考配置 轻松攻略
--1轻母 + 2正航（装母） + 3战舰（高低速均可，推荐武大、长门级、Iowa等）
--空母装备：总制空420以上（其他蓝飞机+1彩云） Boss空优 
--战舰装备：双炮 穿甲弹 飞机
--【炮注意适重，不要全46，命中优先】？什么？不知道什么叫适重，请百度舰娘适重炮
]]
---------------------------------------------------------------------------------
--这里是设置区域 请务必阅读！
--这里是设置区域 请务必阅读！

--如果你要打的地图会超过4个战斗点，请添加自行添加，否则多出的战斗点会按照第1个的设置战斗
--请一定要注意，如果去打1-5你不改这个，就是去送死！
Kan.DelBattleInfo()
Kan.AddBattleInfo(1, 阵型.单纵, false, false) --第1个点 单纵
Kan.AddBattleInfo(2, 阵型.单纵, false, false) --第2个点 单纵
Kan.AddBattleInfo(3, 阵型.单纵, false, false) --第3个点 门神 战鬼
Kan.AddBattleInfo(4, 阵型.单纵, true,  false) --第4个点 Boss

--出击地图2-5，可自行改为其他图
map_id = {5, 5}

--出击次数 
count = 5

--出击的队伍ID（1-4）
team_id = 1

--在每次出击正常结束后等待时间（分钟）
wait_time = 10

--所有修理都是高速修理！
--修理损坏=不到小破的那种掉血，建议高难度的图才开
修理大破 = true; 修理中破 = true; 修理小破 = true; 修理损坏 = false; 

--在打完count次数后进入远征循环后是否修船（不用桶）
repair = false

--在地图中进行几个点的战斗 超过也可以 但是不能少 少了到Boss前就撤退了 
--(不包括资源点和能动点还有漩涡等不战斗的点的数量)
map_battle_count = 10

--是否使用能动点 地图如果不需要使用能动点 就写false 普通图一般不需要
use_way = false

-----------------------------------------------------------------------------
--★远征设置
--1.可自行新建一个远征脚本复制出这几行数据
--2.可输入C.会弹出输入提示，下拉可找到相应远征
k2_conquest = C.北方鼠輸送作戦_ID21
k3_conquest = C.長距離練習航海_ID2
k4_conquest = C.防空射撃演習_ID6

--设置5-10分钟检测收回并放出一次远征 如果需要远征 请取消前面“--”注释
--Kan.EasyConquestInit(60*5, 60*10);
---------------------------------------------------------------------------------
--所有延时随机增加1-100
Base.SetConfig("Sleep+?",100) 

--在执行完一次远征后执行这个函数
function RunRepair()
	if repair == true then
		math.randomseed(os.time())
		if math.random(1,2) == 1 then
			Kan.Repair(2);
		end	
	end
end

function GetRepairID()
	rep_id = 0;
	if 修理大破 == true then
		rep_id = rep_id + 8;
	end
	if 修理中破 == true then
		rep_id = rep_id + 4;
	end
	if 修理小破 == true then
		rep_id = rep_id + 2;
	end
	if 修理损坏 == true then
		rep_id = rep_id + 1;
	end
	return rep_id;
end

s1 = os.time() 

--执行第一次远征
Kan.EasyConquestRun(false)

for n = 1, count do --循环次数
    a = "开始第:%d次"
    Win.Print(a:format(n))

	ret = Kan.SupplyAllT();

    if kan_support_boss_id ~= nil and t[kan_support_boss_id] ~= -3 then
        Kan.Conquest(kan_support_boss_id, 10, 2) --出击Boss支援（暂时没用）
    end

    if kan_support_id ~= nil and t[kan_support_id] ~= -3 then
        Kan.Conquest(kan_support_id, 10, 1) --出击道中支援（暂时没用）
    end

    if ret.kan11>0 or ret.kan12>0 or ret.kan13>0 or 
	   ret.kan14>0 or ret.kan15>0 or ret.kan16>0 then
        Win.Print('船大/中/小破！使用进入修理')
        
        --修理大中小破的船 6次 都使用桶！！
        Kan.RepairEx(6, 16, GetRepairID());
    elseif ret.team1 == -1 then
        Win.Pop('补给不足 脚本停止！',true)
        break
    end

    Kan.Sally(map_id[1], map_id[2]) --出击

    --第一舰队\战斗4次\使用能动点
    if Kan.BattleEx(team_id, map_battle_count , use_way) == false then
        LastBattleCount = Base.GetValue("LastBattleCount")
        Win.Print(LastBattleCount)    
        
        if LastBattleCount ~= nil then
            min = (7 - tonumber(LastBattleCount)) * 3
            Win.Print('战斗结束..等待'..min ..'分钟恢复疲劳再打...')
            Base.Sleep(1000 * 60 *  min) --等待时间
        else
            Win.Print('战斗结束..等待24分钟恢复疲劳再打...')
            Base.Sleep(1000 * 60 *  24) --等待时间
        end
    else
        Win.Print('战斗正常结束..等待' .. wait_time .. '分钟恢复疲劳再打...')
        Base.Sleep(1000 * 60 * wait_time) --等待时间
    end

    Kan.WaitHome(2000)
    Base.Sleep(2000)
end


--进入收发远征循环
Kan.EasyConquestEnterLoop("RunRepair")

Win.Pop('脚本执行完毕！')