【进阶实战】体力互赠：好友赠体的日额度双闸门

local function giftStamina(actor, friendName)
    actor = getplayerbyname(actor)
    local giveKey = "StamGive_" .. os.date("%Y%m%d")
    local gaveCnt = tonumber(getplayvar(actor, "HUMAN", giveKey)) or 0
    if gaveCnt >= 10 then
        sendmsg(actor, 1, "今日赠送已达上限（10 次）。")
        return
    end
    local t = getplayerbyname(friendName)
    if t == nil or t == "" then
        sendmsg(actor, 1, "对方不在线，无法赠送。")
        return
    end
    local recvKey = "StamRecv_" .. os.date("%Y%m%d")
    local recvCnt = tonumber(getplayvar(t, "HUMAN", recvKey)) or 0
    if recvCnt >= 10 then
        sendmsg(actor, 1, "对方今日收取已达上限（10 次）。")
        return
    end
    setplayvar(actor, "HUMAN", giveKey, gaveCnt + 1, 1)
    setplayvar(t, "HUMAN", recvKey, recvCnt + 1, 1)
    giveitem(t, "体力丹", 1, 1)
    sendmsg(actor, 1, "赠送成功，亲密度 +2。")
    sendmsg(t, 1, "好友 " .. tostring(actor) .. " 赠送了 1 颗体力丹。")
end

local function staminaLeft(actor)
    actor = getplayerbyname(actor)
    local today = os.date("%Y%m%d")
    local gaveCnt = tonumber(getplayvar(actor, "HUMAN", "StamGive_" .. today)) or 0
    local recvCnt = tonumber(getplayvar(actor, "HUMAN", "StamRecv_" .. today)) or 0
    sendmsg(actor, 1, "今日可赠 " .. (10 - gaveCnt) .. " 次，可收 " .. (10 - recvCnt) .. " 次。")
end