帮会书院：捐书研读的学识印记

local function donateBook(actor, guild, bookId)
    local shelf = getsysvar("book_" .. bookId
        .. "_" .. guild) or 0
    if shelf >= 5 then
        sendmsg(actor, 1, "该书书架已满 5 本")
        return
    end
    setsysvarex("book_" .. bookId .. "_" .. guild, shelf + 1)
    setplayvar(actor, "merit",
        (getplayvar(actor, "merit") or 0) + 2)
    sendmsg(actor, 1, "捐书入库，功德 +2")
end

local function study(actor, bookId, mins)
    local read = (getplayvar(actor, "read_" .. bookId) or 0)
        + mins
    setplayvar(actor, "read_" .. bookId, read)
    if read >= 60 then
        setplayvar(actor, "learned_" .. bookId, 1)
        sendmsg(actor, 1, "学识点亮：" .. bookId)
    else
        sendmsg(actor, 1, "已研读 " .. read .. "/60 分钟")
    end
end