【后端接口】结婚流程：求婚、答应与仪式的接口链

-- 结婚流程：求婚与申请
local player = class(actor)
local function propose(player, mateName)
    local mateStatus = getplayvar(class(mateName), "HUMAN", "MarryStatus")
    if getplayvar(player, "HUMAN", "MarryStatus") ~= "" or mateStatus ~= "" then
        sendmsg(player, 1, 0, "双方必须都是单身状态。")
        return
    end
    if not checkitemw(player, "求婚戒指", 1) then
        sendmsg(player, 1, 0, "需要一枚求婚戒指。")
        return
    end
    takeitem(player, "求婚戒指", 1)
    setplayvar(player, "HUMAN", "ProposeTo", mateName, true)
    setplayvar(player, "HUMAN", "ProposeExpire", os.time() + 86400, true)
    sendmail("#" .. mateName, 8802, "收到一份求婚",
        "有人向您求婚，请在 24 小时内到比奇教堂回应。", "")
    sendmsg(player, 1, 0, "求婚已送达，等待回应。")
end

-- 结婚流程：仪式与称号
local player = class(actor)
local function holdCeremony(player, mateName)
    if getplayvar(player, "HUMAN", "ProposeTo") ~= mateName then
        sendmsg(player, 1, 0, "婚约状态不匹配，无法举办仪式。")
        return
    end
    if getbaseinfo(player, 10) ~= "0151" then
        sendmsg(player, 1, 0, "请与伴侣一同到比奇教堂举办仪式。")
        return
    end
    local mate = class(mateName)
    setplayvar(player, "HUMAN", "MarryStatus", mateName, true)
    setplayvar(mate, "HUMAN", "MarryStatus", getbaseinfo(player, 3), true)
    setplayvar(player, "HUMAN", "MarryDate", os.date("%Y-%m-%d"), true)
    setplayvar(mate, "HUMAN", "MarryDate", os.date("%Y-%m-%d"), true)
    addskill(player, 77, 1)
    addskill(mate, 77, 1)
    sendcentermsg(player, 255, 0, "恭祝新人结为夫妻，比奇教堂见证二人组的幸福！", 0, 10)
end