舰R百科是靠无数志愿编辑者持续地建设更新完善的。编辑非常简单,无需代码知识,请勇于更新页面!
编辑入门 | 资助百科 | 留言讨论页 | 微博@舰R百科 | 百科编辑讨论Q群:366818861

模块:敌舰2

来自舰R百科
Donnyjie留言 | 贡献2024年9月6日 (五) 19:03的版本
跳转到导航 跳转到搜索

此模块的文档可以在模块:敌舰2/doc创建

local enemyData = mw.loadData("模块:数据库/敌舰")
local eShips = enemyData.eShips
local eFleets = enemyData.eFleets

local speedType = { }
speedType['航母'] = 1
speedType['轻母'] = 1
speedType['战列'] = 1
speedType['航战'] = 1
speedType['战巡'] = 1
speedType['导战'] = 1
speedType['大巡'] = 1
speedType['导巡'] = 1
speedType['防巡'] = 1
speedType['导驱'] = 1
speedType['防驱'] = 1
speedType['要塞'] = 1
speedType['港口'] = 1
speedType['机场'] = 1
speedType['调谐'] = 1
speedType['重巡'] = 2
speedType['雷巡'] = 2
speedType['轻巡'] = 2
speedType['驱逐'] = 2
speedType['补给'] = 2
speedType['潜艇'] = 3
speedType['炮潜'] = 3

local function formatFloat(x)
    if x == 0 then return 0 end
    x = math.floor(x * 100 + 0.5) / 100
    return string.format('%.2f', x)
end

local function formatEnemyShip(ship)
    local colorName = { 'black', 'green', 'blue', 'purple', 'orange', 'red' }

    local ret = '[['
    local len = mw.ustring.len(ship.title)
    if mw.ustring.sub(ship.title, len, len) == '型' and mw.ustring.sub(ship.title, len - 2, len - 2) == '级' then
        ret = ret .. mw.ustring.sub(ship.title, 1, len - 2)
    else
        ret = ret .. ship.title
    end
    return ret .. "|<span style='color:" .. colorName[ship.rarity] .. ";'>" .. ship.title .. "</span>]]"
end

p['阵容'] = function(frame)
    local node = frame.args[1]
    local label = frame.args[2]
    if label == nil or label == '' then label = node:sub(5,5) end
    local shipNum = frame.args[3]
    if shipNum == nil then shipNum = 6 end

    local ret = ''
    local n = 0
    for i, fleet in pairs(eFleets[node]) do
        if i ~= 1 then ret = ret .. '|-\n' end
        ret = ret .. '|' .. fleet.formation
        n = n + 1
        local rec = 0
        local aa = 0
        local lv = 0
        local speed = { 0, 0, 0 }
        local speedCnt = { 0, 0, 0 }
        local m = 0
        for j, shipId in pairs(fleet.eShips) do
            m = m + 1
            local ship = eShips[shipId]
            ret = ret .. '||' .. formatEnemyShip(ship)
            rec = rec + ship.rec
            air = air + ship.air
            lv = lv + ship.lv
            local st = speedType[ship.type]
            speed[st] = speed[st] + ship.speed
            speedCnt[st] = speedCnt[st] + 1
        end
        for j = m + 1, shipNum do
            ret = ret .. '||'
        end

        local s1 = 999
        local s2 = 999
        if speedCnt[1] ~= 0 then s1 = speed[1] / speedCnt[1] end
        if speedCnt[2] ~= 0 then s2 = speed[2] / speedCnt[2] end
        local s = math.min(s1, s2)
        if speedCnt[1] == 0 and speedCnt[2] == 0 then
            s = speed[3] / speedCnt[3]
            rec = '(' .. lv .. ')'
        end
        ret = ret .. '||' .. rec .. '||' .. formatFloat(air) .. '||' .. math.floor(s) .. '\n'
    end
    return '|rowspan=' .. n .. '|' .. label .. '|' .. ret
end

return p