Lua [Change OTX 0.3.7 to TFS 1.5] Script Global Exhausted

[Forkz]

Hi otlanders,

data/talkactions/lib/talkactions.lua

-- Prevent spamm commands --
function checkExhausted(cid, storage, seconds)
    local v = exhaustion.get(cid, storage)
    if(not v) then
        exhaustion.set(cid, storage, seconds)
    else
        doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Please wait " .. v .. " seconds before trying this command again.")
        return false
    end

    return true
end

Below the onSay function

    if(not checkExhausted(cid, 666, 10)) then
        return false
    end

 

[slaw]

data/lib/core/core.lua

at the end, add:

dofile('data/lib/core/vocation.lua')

data/lib/core/exhaustion.lua

create

exhaustion =
{
    check = function (player, storage)
        if(player:hasFlag(PlayerFlag_HasNoExhaustion)) then
            return false
        end

        return player:getStorageValue(storage) >= os.time()
    end,

    get = function (player, storage)
        if(player:hasFlag(PlayerFlag_HasNoExhaustion)) then
            return false
        end

        local exhaust = player:getStorageValue(storage)
        if(exhaust > 0) then
            local left = exhaust - os.time()
            if(left >= 0) then
                return left
            end
        end

        return false
    end,

    set = function (player, storage, time)
        player:setStorageValue(storage, os.time() + time)
    end,

    make = function (player, storage, time)
        local exhaust = exhaustion.get(player, storage)
        if(not exhaust) then
            exhaustion.set(player, storage, time)
            return true
        end

        return false
    end
}

Usage is almost the same, just instead of "cid" you write "player".

So your function could be:

function checkExhausted(player, storage, seconds)
    local v = exhaustion.get(player, storage)
    if(not v) then
        exhaustion.set(player, storage, seconds)
    else
        player:sendTextMessage(MESSAGE_EVENT_DEFAULT, "Please wait " .. v .. " seconds before trying this command again.")
        return false
    end

    return true
end