【进阶实战】帮会医师：战地治疗服务的定价封装

local function quotePrice(actor, guildName)
    local maxHp = tonumber(getplayvar(actor, 0, "MaxHP")) or 1000
    local hp = tonumber(getplayvar(actor, 0, "HP")) or 0
    local missing = maxHp - hp
    if missing < 100 then
        return 0
    end
    local price = math.ceil(missing / 100) * 500
    if guildName ~= "" then
        price = math.floor(price * 0.8)
    end
    return math.max(price, 1)
end

local function healService(actor, guildName)
    local price = quotePrice(actor, guildName)
    if price == 0 then
        sendmsg(actor, 1, "伤势轻微，不必治疗。")
        return
    end
    takeitem(actor, "金币", price, 0, "医师治疗")
    local maxHp = tonumber(getplayvar(actor, 0, "MaxHP")) or 1000
    setplayvar(actor, 0, "HP", maxHp, 0)
    sendmsg(actor, 1, "治疗完成，花费 " .. price .. " 金币。")
end