【框架设计】宠物遗传：子代宠物的属性遗传框架

-- 宠物遗传：属性计算
local player = class(actor)
local HERIT_RATE = 0.6
local MUTATE_RATE = 10
local function calcChildStat(maleVal, femaleVal)
    local base = math.floor((maleVal + femaleVal) / 2 * HERIT_RATE)
    if math.random(1, 100) <= MUTATE_RATE then
        base = math.floor(base * 1.3)
    end
    return base
end

-- 繁育结算：子代与冷却
local player = class(actor)
local function breedPets(player, maleId, femaleId)
    local maleCd = tonumber(getplayvar(player, "HUMAN", "BreedCd_" .. maleId) or 0)
    if os.time() < maleCd then
        sendmsg(player, 1, 0, "父母宠物处于繁育冷却，还差 " ..
            math.ceil((maleCd - os.time()) / 86400) .. " 天。")
        return
    end
    local atk = calcChildStat(
        tonumber(getplayvar(player, "HUMAN", "PetAtk_" .. maleId) or 0),
        tonumber(getplayvar(player, "HUMAN", "PetAtk_" .. femaleId) or 0))
    local eggId = "Egg_" .. os.time()
    setplayvar(player, "HUMAN", "PetAtk_" .. eggId, atk, true)
    setplayvar(player, "HUMAN", "BreedCd_" .. maleId, os.time() + 604800, true)
    giveitem(player, "宠物蛋", 1)
    sendmsg(player, 1, 0, "繁育成功，子代攻击资质 " .. atk .. "，七天后孵化。")
end