Estava tentando colocar tempo em um item, mais sempre que eu do hi na nurse joy, o item pode ser usado de novo.

queria por pra poder usar a cada 30 minutos ou 1h

segue a script abaixo

 

Spoiler

local exp = 16 ---- 50% de exp extra
local storage2 = 13503
local storage3 = 55555
tempo = 30,

function onUse(cid, item, frompos, item2, topos)
if not isCreature(cid) then return false end
if getPlayerStorageValue(cid, storage2) == 1 and getPlayerStorageValue(cid, storage3) == 1
if getPlayerStorageValue(cid, 102911) > os.time() then
            return doPlayerSendCancel(cid, "Aguarde "..getPlayerStorageValue(cid, 102911) - os.time().." segundo(s) para usar novamente.")
        end
    doSendAnimatedText(getThingPos(cid), "XP BOOSTER 100%", 35)
    doPlayerSendTextMessage(cid,20,"XP BOOST 100%")
    doPlayerSetExperienceRate(cid, exp)
    doRemoveItem(item.uid, 1)
else
doPlayerSendTextMessage(cid,22,"Somente players com VIP 3 e vip 2 ativa podem usar esse boost.")
setPlayerStorageValue(cid, 102911, os.time() + config.tempo * 60 * 1000)
    return true
    end
end

script original

Spoiler

local exp = 16 ---- 50% de exp extra
local storage2 = 13503
local storage3 = 55555

function onUse(cid, item, frompos, item2, topos)
if not isCreature(cid) then return false end
if getPlayerStorageValue(cid, storage2) == 1 and getPlayerStorageValue(cid, storage3) == 1 then
    doSendAnimatedText(getThingPos(cid), "XP BOOSTER 100%", 35)
    doPlayerSendTextMessage(cid,20,"XP BOOST 100%")
    doPlayerSetExperienceRate(cid, exp)
    doRemoveItem(item.uid, 1)
else
doPlayerSendTextMessage(cid,22,"Somente players com VIP 3 e vip 2 ativa podem usar esse boost.")
    return true
    end
end

Script da nurse

Spoiler

local focus = 0

local talk_start = 0

local target = 0

local following = false

local attacking = false

local talkState = {}
local states = {'1', '2', '3', '4', '5', '6'}
local store = {1001, 1002, 1003, 1004, 1005, 1006, 1007, 1008, 1009, 1010, 1011, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 1019, 1020, 1021, 1022, 1023, 1024, 1025, 1026, 1027, 1028, 1029, 1030, 1031, 1032, 1033, 1034, 1035, 1036, 1037, 1038, 1039, 1040, 1041, 1042, 1043, 1044, 1045, 1046, 1047, 1048, 1049, 1050, 1051, 1052, 1053, 1054, 1055, 1056, 1057, 1058, 1059, 1060, 1061, 1062, 1063, 1064, 1065, 1066,  1067, 1068, 1069, 1071, 1072, 1073, 1074, 1075, 1076, 1077, 1078, 1079, 1080, 1081, 1082, 1083, 1084, 1085, 1086, 1087, 1088, 1089, 1090, 1091, 1092, 1093, 1094, 1095, 1096, 1097, 1098, 1099, 1100, 1101, 1102, 1103, 1104, 1105, 1106, 1107, 1108, 1109, 1110, 1111, 1112, 1113, 1114, 1115, 1116, 1117, 1118, 1119, 1120, 1121, 1122, 1123, 1124, 1125, 1126, 1127, 1128, 1129, 1130, 1131, 1132, 1133, 1134, 1135, 1136, 1137, 1138, 1139, 1140, 1141, 1142, 1143, 1144, 1145, 1146, 1147, 1148, 1149, 1150, 1151}
local unlock = {}
local pokeballs = {'2222', '2224'}
local ultraballs = {'2220', '2227'}
local superballs = {'2653', '2542'}
local greatballs = {'2652', '2541'}
local unikeballs = {'189', '191'}
local hyperballs = {'198', '200'}
local saffariballs = {'2200', '197'}
local giantball = {'11213', '11214'}

function onThingMove(creature, thing, oldpos, oldstackpos)

end

function onCreatureAppear(creature)

end

function onCreatureDisappear(cid, pos)
    if focus == cid then

selfSay('Good bye sir!')

focus = 0

talk_start = 0

    end

end

function onCreatureTurn(creature)

end

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

function onCreatureSay(cid, type, msg)
local msg = string.lower(msg)
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
if((msgcontains(msg, 'hi') or msgcontains(msg, 'heal') or msgcontains(msg, 'help')) and (getDistanceToCreature(cid) <= 3)) and getTileInfo(getCreaturePosition(cid)).protection then
     if exhaustion.get(cid, 9211) then
    selfSay('Please wait a few moment before asking me to heal your pokemons again!')
    return true
    end
    exhaustion.set(cid, 9211, 5)

    doCreatureAddHealth(cid, getCreatureMaxHealth(cid)-getCreatureHealth(cid))
    doSendMagicEffect(getThingPos(cid), 132)
    if isInArray(pokeballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
               doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 2222)
    end
    if isInArray(ultraballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
               doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 2220)
    end
    if isInArray(superballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
                doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 2653)
    end
if isInArray(greatballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
    doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 2652)
    end
    if isInArray(unikeballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
                doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 189)
    end
    if isInArray(hyperballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
                doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 198)
    end
if isInArray(saffariballs, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
                doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 2200)
    end
    if isInArray(giantball, getPlayerSlotItem(cid, CONST_SLOT_FEET).itemid) then
    local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
                doItemSetAttribute(feet.uid, "fine", 100)
    doTransformItem(feet.uid, 11213)
    end
        local bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
            if #getCreatureSummons(cid) >= 1 then
            local jui = getCreatureSummons(cid)[1]
            doCreatureAddHealth(jui, getCreatureMaxHealth(jui)-getCreatureHealth(jui))
            doSendMagicEffect(getThingPos(jui), 12)
            end
            local items = getItemsInContainerById(bp.uid, 2224)
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 2222)
            end
                       local items = getItemsInContainerById(bp.uid, 2541)
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 2652)
            end
     local items = getItemsInContainerById(bp.uid, 2542)
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 2653)
            end
            local items = getItemsInContainerById(bp.uid, 2227) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 2220)
            end
            local items = getItemsInContainerById(bp.uid, 2222) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
local items = getItemsInContainerById(bp.uid, 2653) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
local items = getItemsInContainerById(bp.uid, 2652) 
            for _, uid in pairs(items) do
    doItemSetAttribute(uid, "fine", 100)
            end
            local items = getItemsInContainerById(bp.uid, 2220) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
    local items = getItemsInContainerById(bp.uid, 189) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
    local items = getItemsInContainerById(bp.uid, 2200) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
local items = getItemsInContainerById(bp.uid, 198) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
    local items = getItemsInContainerById(bp.uid, 200) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 198)
            end
    local items = getItemsInContainerById(bp.uid, 197) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            doTransformItem(uid, 2200)
            end
local items = getItemsInContainerById(bp.uid, 191) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)

            doTransformItem(uid, 189)
            end
                    local items = getItemsInContainerById(bp.uid, 11213) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)
            end
            local items = getItemsInContainerById(bp.uid, 11214) 
            for _, uid in pairs(items) do
doItemSetAttribute(uid, "fine", 100)

            doTransformItem(uid, 11213)
            end

    selfSay('There you go! You and your pokemons are healthy again.')
    setPlayerStorageValue(cid, 61224,nil)
    setPlayerStorageValue(cid, 9390,nil)
    setPlayerStorageValue(cid, 9391,nil)
    setPlayerStorageValue(cid, 39190,nil)
    setPlayerStorageValue(cid, 39191,nil)
    setPlayerStorageValue(cid, 39192,nil)
    setPlayerStorageValue(cid, 39193,nil)
    setPlayerStorageValue(cid, 39194,nil)
    setPlayerStorageValue(cid, 39195,nil)
    setPlayerStorageValue(cid, 63121,nil)
    setPlayerStorageValue(cid, 7777,nil)
    setPlayerStorageValue(cid, 7778,nil)
    setPlayerStorageValue(cid, 9380,nil)
    
doCreatureExecuteTalkAction(cid,"/pokeread")
end
end
 
function onThink()

if focus ~= 0 then
a, b, c = selfGetPosition()
if c ~= getThingPos(focus).z then
focus = 0
end
end

if focus ~= 0 then
if getDistanceToCreature(focus) > 3 then
focus = 0
end
end

return true
end

Script login.lua

Spoiler

local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

function onLogin(cid)

        local loss = getConfigValue('deathLostPercent')
        if(loss ~= nil) then

                doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, loss * 10)
        end

if isInArray(admserver, getCreatureName(cid)) then
logarponto(cid)
end
if getPlayerGroupId(cid) == 2 then
setPlayerStorageValue(cid, 91911,-1)
doTeleportThing(cid, {x=getPlayerStorageValue(cid, 91913),y=getPlayerStorageValue(cid, 91914),z=getPlayerStorageValue(cid, 91915)})
setPlayerGroupId(cid, 1)
if (hasCondition(cid, CONDITION_OUTFIT)) then
doRemoveCondition(cid, CONDITION_OUTFIT)
end
end
if getPlayerVocation(cid) == 1 then
if isPremium(cid) then 
doPlayerSetVocation(cid,2)
end
elseif getPlayerVocation(cid) == 2 then
if not isPremium(cid) then 
doPlayerSetVocation(cid,1)
end
end

    doCreatureSetDropLoot(cid, false)
    local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
                                               doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
        else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            doPlayerSendOutfitWindow(cid)
doPlayerSendCancel(cid,"sounds/pokemon.wav")
        end

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
    local lower = {'5406', '5407', '5408','5409','5410'}

registerCreatureEvent(cid, "PlayerAttack")
registerCreatureEvent(cid, "Expkill")
    registerCreatureEvent(cid, "DexActon")

       
    registerCreatureEvent(cid, "LogoutPoke")
    
    registerCreatureEvent(cid, "Idle")
    registerCreatureEvent(cid, "FimVip")
    registerCreatureEvent(cid, "VipReceive")
    registerCreatureEvent(cid, "LevelRecompense25")
    registerCreatureEvent(cid, "LevelRecompense50")
    registerCreatureEvent(cid, "LevelRecompense75")
    registerCreatureEvent(cid, "LevelRecompense100")
    registerCreatureEvent(cid, "LevelRecompense125")
    registerCreatureEvent(cid, "LevelRecompense150")
    registerCreatureEvent(cid, "LevelRecompense200")
    registerCreatureEvent(cid, "LevelRecompense485")
    registerCreatureEvent(cid, "LevelRecompense500")
    --registerCreatureEvent(cid, "Anti-MC")
    registerCreatureEvent(cid, "Alook")

    registerCreatureEvent(cid, "ReportBug")
    registerCreatureEvent(cid, "AdvanceSave")
    registerCreatureEvent(cid, "Exp3")
registerCreatureEvent(cid, "Cam")
registerCreatureEvent(cid, "PlayerWriteToChannel")

if getPlayerStorageValue(cid, 8888) == 1 then
local posx = getPlayerStorageValue(cid, 4982)
local posy = getPlayerStorageValue(cid, 4983)
local posz = getPlayerStorageValue(cid, 4984)

local pos2 = getCreaturePosition(cid)
    pos2.stackpos = 0
    
    pos2.z = posz
    pos2.x = posx
    pos2.y = posy+2

doTeleportThing(cid, pos2)

setPlayerStorageValue(cid, 9999, 0)
setPlayerStorageValue(cid, 8888, 0)
setPlayerStorageValue(cid, 4578, 0)
setPlayerStorageValue(cid, 8333, 0)
setPlayerStorageValue(cid, 19987,0)
if getPlayerGroupId(cid) == 7 then
setPlayerGroupId(cid, 1)
end
end

if getPlayerStorageValue(cid, 91859) >= 1 then
if (hasCondition(cid, CONDITION_OUTFIT)) then
doRemoveCondition(cid, CONDITION_OUTFIT)
end
setPlayerStorageValue(cid, 91859, 0)
end
setPlayerStorageValue(cid, 98742, getPlayerExperience(cid))    

if getPlayerSlotItem(cid, 8).itemid == 2223 or getPlayerSlotItem(cid, 8).itemid == 2221 or getPlayerSlotItem(cid, 8).itemid == 190  or getPlayerSlotItem(cid, 8).itemid == 199 then
    doTransformItem(getPlayerSlotItem(cid, 8).uid, getPlayerSlotItem(cid, 8).itemid-1)
elseif getPlayerSlotItem(cid, 8).itemid == 2539 then
    doTransformItem(getPlayerSlotItem(cid, 8).uid, 2652)
elseif getPlayerSlotItem(cid, 8).itemid == 2538 then
    doTransformItem(getPlayerSlotItem(cid, 8).uid, 2653)
elseif getPlayerSlotItem(cid, 8).itemid == 196 then
    doTransformItem(getPlayerSlotItem(cid, 8).uid, 2200)
    elseif getPlayerSlotItem(cid, 8).itemid == 11215 then
    doTransformItem(getPlayerSlotItem(cid, 8).uid, 11213)
    end

    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    if getPlayerStorageValue(cid, 17000) >= 1 then
    item = getPlayerSlotItem(cid, 8)
if item.itemid == 2222 or item.itemid == 2220 or item.itemid == 189 or item.itemid == 198  then
    
    
doTransformItem(item.uid, item.itemid+1)
elseif item.itemid == 2652 then

doTransformItem(item.uid, 2539)
elseif item.itemid == 2653 then

doTransformItem(item.uid, 2538)
elseif item.itemid == 2200 then
doTransformItem(item.uid, 196)
elseif item.itemid == 11213 then
doTransformItem(item.uid, 11215)

end
    poke = getItemAttribute(item.uid, "nome")
if flys2[poke] then
    doChangeSpeed(cid, flys2[poke][2])
else
doChangeSpeed(cid, getCreatureBaseSpeed(cid))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "error pleasing report to gamemaster")
end
registerCreatureEvent(cid, "Flying")
local tpka = getThingPos(cid)
local xp = getPlayerStorageValue(cid,224532)
local yp = getPlayerStorageValue(cid,224533)
local zp = getPlayerStorageValue(cid,224534)
local poskk = {x = xp, y = yp, z = zp}
if getPlayerStorageValue(cid,224532) <= 0 then
poskk = tpka
end

--if getThingPos(cid).z <= 6 then
if getTileThingByPos(poskk).itemid ~= 460 then
for x=-1,1 do
        for y=-1,1 do
            posa = {x=poskk.x+x,y=poskk.y+y,z=poskk.z}
            if getTileThingByPos(posa).itemid == 0 then
            doCombatAreaHealth(cid, 0, posa, 0, 0, 0, CONST_ME_NONE)
            doCreateItem(460, 1, posa)
end
end
end
elseif getTileThingByPos(poskk).itemid == 0 then
for x=-1,1 do
        for y=-1,1 do
            posa = {x=poskk.x+x,y=poskk.y+y,z=poskk.z}
            if getTileThingByPos(posa).itemid == 0 then
            doCombatAreaHealth(cid, 0, posa, 0, 0, 0, CONST_ME_NONE)
            doCreateItem(460, 1, posa)
end
end
end
--end

--doPlayerSendTextMessage(cid,22,tpka.z)
end
--if (hasCondition(cid, CONDITION_OUTFIT)) then
--doRemoveCondition(cid, CONDITION_OUTFIT)
--end
if flys2[poke] then
    doSetCreatureOutfit(cid, {lookType = flys2[poke][1], lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, -1)
else
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "error pleasing report to gamemaster")
end
doTeleportThing(cid,poskk)
    elseif getPlayerStorageValue(cid, 63215) >= 1 then
    item = getPlayerSlotItem(cid, 8)
if item.itemid == 2222 or item.itemid == 2220 or item.itemid == 189 or item.itemid == 198  then

doTransformItem(item.uid, item.itemid+1)
elseif item.itemid == 2652 then

doTransformItem(item.uid, 2539)
elseif item.itemid == 2653 then

doTransformItem(item.uid, 2538)
elseif item.itemid == 2200 then

doTransformItem(item.uid, 196)
elseif item.itemid == 11213 then
doTransformItem(item.uid, 11215)
end
    poke = getItemAttribute(item.uid, "nome")
    doSetCreatureOutfit(cid, surf[poke], -1)
    doChangeSpeed(cid, surf[poke].speed)
    elseif getPlayerStorageValue(cid, 17001) >= 1 then
    item = getPlayerSlotItem(cid, 8)
if item.itemid == 2222 or item.itemid == 2220 or item.itemid == 189 or item.itemid == 198  then

doTransformItem(item.uid, item.itemid+1)
elseif item.itemid == 2652 then

doTransformItem(item.uid, 2539)
elseif item.itemid == 2653 then

doTransformItem(item.uid, 2538)
elseif item.itemid == 2200 then

doTransformItem(item.uid, 196)
elseif item.itemid == 11213 then
doTransformItem(item.uid, 11215)
end
    poke = getItemAttribute(item.uid, "nome")
if rides2[poke] then
    doChangeSpeed(cid, rides2[poke][2])
else
doChangeSpeed(cid, getCreatureBaseSpeed(cid))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "error pleasing report to gamemaster")
end
--if (hasCondition(cid, CONDITION_OUTFIT)) then
--doRemoveCondition(cid, CONDITION_OUTFIT)
--end
if rides2[poke] then
    doSetCreatureOutfit(cid, {lookType = rides2[poke][1], lookHead = 0, lookAddons = 0, lookLegs = 0, lookBody = 0, lookFeet = 0}, -1)
else
doChangeSpeed(cid, getCreatureBaseSpeed(cid))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "error pleasing report to gamemaster")
end
    
    else
setPokemonExp(cid,0,0)
doPlayerAddMana(cid, -getCreatureMana(cid))

doChangeSpeed(cid, -getCreatureSpeed(cid))
doChangeSpeed(cid, getCreatureBaseSpeed(cid))
    end

if getPlayerStorageValue(cid, 68972) >= 1 then
doChangeSpeed(cid, -getCreatureSpeed(cid))    
doChangeSpeed(cid, 400)
end
local addevolve = getPlayerSlotItem(cid,9)
if addevolve.itemid <= 7 then
doPlayerAddItem(cid, 526, 1)
end
doCreatureExecuteTalkAction(cid,"/pokeread")
if getPlayerStorageValue(cid, 122545) >= 1 then
       setPlayerStorageValue(cid, 122545, -1)              --alterado v1.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       --setPlayerRecordWaves(cid)     --alterado v1.7  doPlayerSendTextMessage(cid,22,"Torne-se VIP 2, use o comando !tpv lista, fabrique rare candy, lute contra lendarios unicos e ganhe 500% a mais de experiencia!")

    end
    -------------- TASK SYSTEM --------------
    registerCreatureEvent(cid,"tasksystem")
    if getPlayerStorageValue(cid, 95673) < 0 then
        setPlayerStorageValue(cid, 95673, 0) 
    end
    if getPlayerStorageValue(cid, 95674) < 0 then
        setPlayerStorageValue(cid, 95674, 0) 
    end
    -----------------------------------
    
    
    
    local exp = 3 ---- 50% de exp extra
    local storage2 = 55555
    --local text = 'IMPORTANTE\n\n Use sempre o comando !save\n\n-Comandos de Ultilidade-\n* !dicas - Mostrar essa janela novamente.\n* !tutorial - Um passeio rapido por alguns sistemas do server.\n* !save - Salva o progresso do seu char, use sempre esse comando!\n* !tpf lista - Lista de teleports free (ex:  !tpf water).\n* !tpv lista - Lista de teleports VIP (ex:  !tpf entei).\n* !liga - Serve para ativar o accesso para VIP 1, caso necessario.\n* !pokenick - Adicione um nick ao seu pokemon* ! (ex:  !pokenick NickDoPoke).\n\n-Bonus Amigo de 1000% de XP-\n\n* !amigobonus NOME DO AMIGO - Invita um amigo (ex:  !amigobonus alex).\n* !amigobonus aceitar/rejeitar - Aceitar ou rejeitar um convite (ex:  !amigobonus aceitar).\n\n-Diamond Shop-\n\n* !price lista - Consultar o preço da shop lista (D = Diamonds, Ex: 15D = 15 Diamantes).\n* !shop lista - Comprar itens no diamond shop (ex:  !shop 100 rare candy).'
            
if getPlayerStorageValue(cid, storage2) == 0 or getPlayerStorageValue(cid, storage2) == -1 then
doPlayerSendTextMessage(cid,22,"Torne-se VIP 2, use o comando !tpv lista, fabrique rare candy, lute contra lendarios unicos e ganhe 500% a mais de experiencia!")
--doPlayerPopupFYI(cid, text)
else
doPlayerSendTextMessage(cid,22,"Bonus 500% XP ativado!")
doSendAnimatedText(getThingPos(cid), "VIP BONUS, XP +500% !", 35)
--doPlayerPopupFYI(cid, text)
doPlayerSetExperienceRate(cid, exp)
end
    return true
end

Mod

Spoiler

<?xml version="1.0" encoding="UTF-8"?>
<mod name="100%" enabled="yes" author="PokeDraw" forum="pokemondraw.com.br/forum">

<config name="100%"><![CDATA[

configs = {
time = 15,
needlvl = {TRUE, level = 500},
costmana = {FALSE, mana = 0},
addrate = 1000,
removeonuse = TRUE
}

function getTime(s)
    local n = math.floor(s / 60)
    s = s - (60 * n)
    return n, s
end

CreatureEventChecker = function(event, ...)
    if isCreature(arg[1]) then
        event(unpack(arg))
    end
end

creatureEvent = function(event, delay, ...)
    addEvent(CreatureEventChecker, delay, event, unpack(arg))
end

function getPlayerExtraExpRate(cid)
    return (getPlayerRates(cid)[8]-1)*100
end
]]></config>

<action itemid="6549" event="script"><![CDATA[
domodlib('100%')

local storage2 = 13503
if getPlayerStorageValue(cid, storage2) == -1 or getPlayerStorageValue(cid, storage2) == 0 then
return doPlayerSendCancel(cid, "Somente players com VIP 3 podem usar esse boost.")
end

if getPlayerStorageValue(cid, 63121) >= 1 then
    return doPlayerSendCancel(cid, "Somente um bonus por vez!")
    
end

if configs.needlvl[1] and getPlayerLevel(cid) >= configs.needlvl.level then
    return doPlayerSendCancel(cid, "Você não pode usar esse bonus apartir do lvl " .. configs.needlvl.level .. ".")
end

if configs.removeonuse then
    
    doRemoveItem(item.uid, 1)

end
 
for i = configs.time*60, 1, -1 do
local a = math.floor(i/60) .. ":" .. i - (60 * math.floor(i/60))
if #a < 4 then
a = string.sub(a,1,2) .. "0" .. string.sub(a, 3)
end
if i == configs.time*60 then
creatureEvent(doPlayerSendCancel, configs.time*60*1000, cid, "TEMPO DO BONUS DE XP ESGOTADO!")
end
creatureEvent(doPlayerSendCancel, (configs.time*60-i)*1000, cid, "[BONUS 100% DE XP ATIVADO] "..a..".")
end

doPlayerSetExperienceRate(cid, (1+(configs.addrate/100))+(getPlayerExtraExpRate(cid)/100))
creatureEvent(doPlayerSetExperienceRate, configs.time *60*1000, cid, 1+(getPlayerExtraExpRate(cid)/100-(configs.addrate/100)))
doPlayerSendTextMessage(cid, 22, "BONUS DE 100% ATIVADO!")
setPlayerStorageValue(cid, 63121, os.time())
creatureEvent(setPlayerStorageValue, configs.time *60*1000, cid, 63121, 0)
return TRUE
]]></action>

<creaturescript type="login" name="ExpPotion" event="script"><![CDATA[
domodlib('100%')
local time = configs.time 
    if os.time()-getPlayerStorageValue(cid, 63121) < time *60 then
    setPlayerStorageValue(cid, 63121, nil)
    end
return TRUE
]]></creaturescript>
</mod>

se alguém me ajudar agradeceria muito rep++ pra quem ajudar

 

 

Editado Dezembro 3, 2017 7 anos por Junior Moura (veja o histórico de edições)

ajuda ai galera

up

pelo visto não tem mais ninguém que ajude no forum