@Dwarfer,Será que você consegue arrumar esse parar mim ? Agradeço Desde Já.

Spoiler

local config = {

    backToLevel = 8,

    redskull = false, -- need to be without redskull to reset?

    battle = false, -- need to be without battle to reset?

    pz = true, -- need to be in protect zone to reset?

    stages = {

        {resets = 1, level = 1500, reward = 9970, rcount = 20}, -- S? colocar reward e rcount nos proximos como esta aqui

        {resets = 2, level = 1500, reward = 9970, rcount = 20},

        {resets = 3, level = 1500, reward = 9970, rcount = 20},

        {resets = 4, level = 1500, reward = 9970, rcount = 20},

        {resets = 5, level = 1500, reward = 9970, rcount = 20},

        {resets = 6, level = 1500, reward = 9970, rcount = 20},

        {resets = 7, level = 1500, reward = 9970, rcount = 20},

        {resets = 8, level = 1500, reward = 9970, rcount = 20},

        {resets = 9, level = 1500, reward = 9970, rcount = 20},

        {resets = 10, level = 1500, reward = 9970, rcount = 20},

        {resets = 11, level = 1500, reward = 9970, rcount = 20},

        {resets = 12, level = 1500, reward = 9970, rcount = 20},

        {resets = 13, level = 1500, reward = 9970, rcount = 20},

        {resets = 14, level = 1500, reward = 9970, rcount = 20},

        {resets = 15, level = 1500, reward = 9970, rcount = 20},

        {resets = 16, level = 1500, reward = 9970, rcount = 20},

        {resets = 17, level = 1500, reward = 9970, rcount = 20},

        {resets = 18, level = 1500, reward = 9970, rcount = 20},

        {resets = 10, level = 1500, reward = 9970, rcount = 20},

        {resets = 2^1024, level = 1500, reward = 9970, rcount = 20},

    }

}

function onSay(cid, words, param)

    local function getPlayerResets(cid)

        local resets = getPlayerStorageValue(cid, 500)

        return resets < 0 and 0 or resets

    end

    local function doPlayerAddResets(cid, count)

        setPlayerStorageValue(cid, 500, getPlayerResets(cid) + count)

    end

    if config.redskull and getCreatureSkullType(cid) == 4 then

        return doPlayerSendCancel(cid, "You need to be without red skull to reset.")

    elseif config.pz and not getTilePzInfo(getCreaturePosition(cid)) then

        return doPlayerSendCancel(cid, "You need to be in protection zone to reset.")

    elseif config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

        return doPlayerSendCancel(cid, "You need to be without battle to reset.")

    end

    local resetLevel = 0

    for x, y in ipairs(config.stages) do

        if getPlayerResets(cid) <= y.resets then

            resetLevel = isPremium(cid) and y.premium or y.level

            doPlayerAddItem(cid, y.reward, y.rcount)

            break

        end

    end

    if getPlayerLevel(cid) < resetLevel then

        return doPlayerSendCancel(cid, "You need level " .. resetLevel .. " or more to reset.")

    end

    doPlayerAddResets(cid, 1)

    local healthMax, manaMax = getCreatureMaxHealth(cid), getCreatureMaxMana(cid)

    doPlayerAddLevel(cid, -(getPlayerLevel(cid) - config.backToLevel))

    setCreatureMaxHealth(cid, healthMax)

    setCreatureMaxMana(cid, manaMax)

    doSendMagicEffect(getCreaturePosition(cid), CONST_ME_FIREWORK_RED)

    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Now you have " .. getPlayerResets(cid) .. " " .. (getPlayerResets(cid) == 1 and "reset" or "resets") .. ".")

    return true

end

 

@zLockey9 

 

Spoiler

local config = {
    backToLevel = 8,
    redskull = false, -- need to be without redskull to reset?
    battle = false, -- need to be without battle to reset?
    pz = true, -- need to be in protect zone to reset?
    stages = {
        {resets = 1, level = 1500, reward = 9970, rcount = 20}, -- S? colocar reward e rcount nos proximos como esta aqui
        {resets = 2, level = 1500, reward = 9970, rcount = 20},
        {resets = 3, level = 1500, reward = 9970, rcount = 20},
        {resets = 4, level = 1500, reward = 9970, rcount = 20},
        {resets = 5, level = 1500, reward = 9970, rcount = 20},
        {resets = 6, level = 1500, reward = 9970, rcount = 20},
        {resets = 7, level = 1500, reward = 9970, rcount = 20},
        {resets = 8, level = 1500, reward = 9970, rcount = 20},
        {resets = 9, level = 1500, reward = 9970, rcount = 20},
        {resets = 10, level = 1500, reward = 9970, rcount = 20},
        {resets = 11, level = 1500, reward = 9970, rcount = 20},
        {resets = 12, level = 1500, reward = 9970, rcount = 20},
        {resets = 13, level = 1500, reward = 9970, rcount = 20},
        {resets = 14, level = 1500, reward = 9970, rcount = 20},
        {resets = 15, level = 1500, reward = 9970, rcount = 20},
        {resets = 16, level = 1500, reward = 9970, rcount = 20},
        {resets = 17, level = 1500, reward = 9970, rcount = 20},
        {resets = 18, level = 1500, reward = 9970, rcount = 20},
        {resets = 10, level = 1500, reward = 9970, rcount = 20},
        {resets = 2^1024, level = 1500, reward = 9970, rcount = 20},
    }
}

local id = 9970 -- id do item
local count = 20 -- quantidade


function onSay(cid, words, param)
    local function getPlayerResets(cid)
        local resets = getPlayerStorageValue(cid, 500)
        return resets < 0 and 0 or resets
    end
    local function doPlayerAddResets(cid, count)
        setPlayerStorageValue(cid, 500, getPlayerResets(cid) + count)
    end
    if config.redskull and getCreatureSkullType(cid) == 4 then
        return doPlayerSendCancel(cid, "You need to be without red skull to reset.")
    elseif config.pz and not getTilePzInfo(getCreaturePosition(cid)) then
        return doPlayerSendCancel(cid, "You need to be in protection zone to reset.")
    elseif config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then
        return doPlayerSendCancel(cid, "You need to be without battle to reset.")
    end
    local resetLevel = 0
    for x, y in ipairs(config.stages) do
        if getPlayerResets(cid) <= y.resets then
            resetLevel = isPremium(cid) and y.premium or y.level
            doPlayerAddItem(cid, y.reward, y.rcount)
            break
        end
    end
    if getPlayerLevel(cid) < resetLevel then
        return doPlayerSendCancel(cid, "You need level " .. resetLevel .. " or more to reset.")
    end
    doPlayerAddResets(cid, 1)
    doPlayerAddItem(cid, id, count)
    local healthMax, manaMax = getCreatureMaxHealth(cid), getCreatureMaxMana(cid)
    doPlayerAddLevel(cid, -(getPlayerLevel(cid) - config.backToLevel))
    setCreatureMaxHealth(cid, healthMax)
    setCreatureMaxMana(cid, manaMax)
    doSendMagicEffect(getCreaturePosition(cid), CONST_ME_FIREWORK_RED)
    doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Now you have " .. getPlayerResets(cid) .. " " .. (getPlayerResets(cid) == 1 and "reset" or "resets") .. ".")
    return true
end