Ir para conteúdo

KaboFlow

Visconde
  • Total de itens

    434
  • Registro em

  • Última visita

  • Dias Ganhos

    15

Posts postados por KaboFlow

  1. Em 19/09/2020 em 11:55, Taiger disse:

    >>>>>PokeDG<<<<<

     

    *TEST SERVER*

     

    Site: http://www.pokedg.com.br/
    Fã Page: https://www.facebook.com/pokedg/
    Discord: https://discord.gg/vQtsnwR

    Servidor dedicado 24horas online, host br.

    Base Cyan opensource.

    OtCliente Padrão.
    XP, Drop, Catch Médio/Facil.
    Kit inicial com vip e 500 pontos no site.
    Catch System por sorte + maximo de brokes.
    Icone system.
    Autoloo coletando em pilhas de corpos e com comando !fastloot para coletar ao redor do player e do summon sem precisar clicar no corpo.
    Todos os sistemas basicos+
    1ª-3ª geração.
    Continente Kanto, Johto, custom, vip.
    Pokes Normais, Shinys, Megas e Boss.
    Ditto Memory.
    Smeargle 1 ao 8.
    Held System.
    Daily catch, itens e kill.
    Npcs de task espalhados pelo mapa.
    Shiny Charm.
    Cards.
    Player passando por outros players e sumons.
    Orb System.
    Vault System.
    E muito mais.

    Site: http://www.pokedg.com.br/

     

    52091906_dailytask.png.7a93197c0c90a1d687c3f3b4ce6b7ca8.png

    763346240_dittomemory.png.77c32affda14885266a8b43169f002d9.png

    1437120969_heldsystem.png.567a8efd29ea2a3e7dd3a77749483b44.png

    208838239_iniciodg.png.772166818bf2b715ae44c38581d69786.png

    megas.png.eb6a2e15e83a6c9109ecf33c1b089b92.png

    megas2.png.39152c7e0b957a214263522c3e7d55c9.png

    1608057910_SmeargleSystem.png.81dc2b91fd6fe230f25d9a9441deb0fb.png

     

    op 

    server test down¿¿¿

  2. Em 17/08/2013 em 17:53, Daniel Bighouse disse:

    PokeB

    (Poketibia Base 9.60)

     

    Agora OpenSource!!!

     

     

    O que terá:

    Voar, Montar, Cortar, Teleportar, Quebrar rocha, Nadar, ...

    Captura de Pokémons - sistema de pokebolas.

    Nurse Joy - que cura todos os pokémons da mochila de uma só vez.

    Líderes de Ginásio

    Evoluções (Pedras evolutivas e Nível)

    Treinamento Pokémon (boost machine)

    151 Pokémons - será a base.

    Sistema de Pokedex

    M1 à M12 - ataques dos pokémons.

    entre outras coisas...

    Como falado será a 'base' do poketibia!

     

    Download:

     

    Server: http://www.4shared.com/zip/9FZYhupj/Server_PokeB.html

    Source: http://www.4shared.com/zip/C3HMIt8_/Sources_PokeB.html

    Cliente: http://www.4shared.com/zip/Gmhv34hv/OtClient_PokeB.html

     

    [novo] Server PokeB 1.0: http://www.4shared.com/rar/PauHbetg/Server_PokeB_10.html?

    [novo] Cliente PokeB 1.0: http://www.4shared.com/rar/IokY3r3J/OtClient_PokeB_10.html?

     

    Conta GOD:
    Login: admin

    senha: 123456

     

    SourceForge:

     

    SourceForge: https://sourceforge.net/projects/pokeb/

     

    Server poketibia que pode ajudar:

     

    Poketibia Ricardo:

    Server: http://www.4shared.com/rar/ygFwSXUP/Server_Pokemon_Dash_by_Ricardo.html

    Source: http://www.4shared.com/rar/-OMFGhHg/Sources_Pokemon_Dash_by_Ricard.html

     

    PDA:

    http://www.4shared.com/rar/tSmomesU/Serv_PDA_pro_forum_v_10.html

     

    Erondino:
    http://tibiapoketibia-erondino.weebly.com/

     

    Utilitários:

     

    RME:

    (Windows) http://remeresmapeditor.com/rmedl.php?file=RME-win-2.2.msi

     

    Ot Item Editor:

    http://www.4shared.com/rar/6Y72VWpG/ot_item_editor_960.html

     

    Sprite Editor/ Dat Editor:

    Spr Editor: http://www.xtibia.com/forum/topic/202369-spr-editor-854981-versao-13/

    Storms Editor: http://www.xtibia.com/forum/topic/216960-986-storms-sprite-dat-editor/

    Ultimate Tibia Editor: http://www.xtibia.com/forum/topic/206196-ultimate-tibia-editor/?fromsearch=1

     

    Dev:

    http://www.4shared.com/zip/Ug4cmrtA/The_Forgotten_Dev-Cpp.html

     

    Outros:

     

    SprEx(extrator de sprites): http://knoxstudio.net/jo3bingham/SprEx/SprEx.rar

     

     

    O que foi feito:

     

     

     

    Imagens:

    Embreve!!!

    link¿¿¿

  3. Em 03/12/2016 em 15:52, Josegvb disse:

    Olá geral do xtibia!

    agora a pouco um cara que nao tem oque fazer ficou de expertinho e consegueu accesar numa copia velinha do meu ex-server Pokemon TES

    mts conenheram esse ot pois estaba bem avançado e bem dahora! tristemente pelas limitaçoes do PDA (nao ter sources) fikei limitado enquanto updates alem de ter um bug q nao consegui arrumar q

    crashaba o server (nao esta nessa versao só na mais nova q nao esta liberada)

    entao o cara que consegueu pegar minha base e agora ta tentando deixar igual a original que eu tinha mas tb esta mostrando o meu Trabalho como se for dele e isso é nem é tolerado!

    entao irei deixar por aqui a versao que ele baixou em caso q alguem quizer usar-la pra alguma coisa

     

    • Menu:
    ├ Informações;
     Ediçoes;
    ├ Erros;
     Prints;
    ├ Download;
     Creditos.



    • Informações Basicas 

      Mostrar conteúdo oculto

    Pokémons sem level System
    Clã System
    Boost Stone System

    Pokedex System.

    Smeargle System.

    Held System.

    1 a 4 Geração

    Pokes: Shinys,Megas,DarkMegas,Minis
    Inumeras Quests,incluindo 6 megas e 1 dark mega.
    entre as coisas.


    • Edições / Ajustes •

      Mostrar conteúdo oculto

    Mudou o MAP.
    Colocado  novas quests
    Modificando Todas as Magias
    Adicionamos Novos Pokemons Shiny.
    Eventos automatico

    Area Vip Completa

    Novas Quests

     

    • Erros Do Servidor •

      Mostrar conteúdo oculto

    por algum motivo paresce q nao esta funfando o duel 

    entre outros

     

    • Prints 

      Mostrar conteúdo oculto

    ed6aad20788faa6e2604f75b7ac4b6d1.png

     

    15192551_1916723978562602_43404236780554

     

     

    15349773_1922205338014466_30302873231117  

    15338712_1922205618014438_91953421927561

    15219657_1922210988013901_22458438343700

    15267980_1922211264680540_37079564824021

    15178067_1922212064680460_71042910928603

    15220230_1922213178013682_21932766183180

    15319240_1922213631346970_10781546913548



    • Download •

     

     

    • Creditos •

      Mostrar conteúdo oculto

    Brun123

    Nibelins

    Slicer

    Stigal 

    StyloMaldoso 

    AnnaFeehz

    Josegvb (eu pois adicionei mts coisas, fiz de mapper,spriter etc)

    e tudo mundo que tiver mexido no PDA! nem posso citar tds pois são milhoes.

    Lembrando que é uma versão antiga, e contens alguns erros a mais nova ta cmg.

     

    Para quem quiser os codigos das spells mostradas nas prints adicionar em pokemon moves:

      Mostrar conteúdo oculto
    elseif spell == "Outrage" then    local config = {        outfit = {            --["pokemon_name"] = outfit,            ["Salamence"] = 2043,			["Shiny Salamence"] = 2043,		    ["Super Salamence"] = 2043,        },        AOE = {            times = 2,                                --Quantas vezes o golpe AOE será usado.            interval = 3000,                          --Intervalo de tempo, em milésimos de segundo, entre cada golpe AOE.            combat = DRAGONDAMAGE,                    --Elemento.            spell = {                --Uma tabela deverá ser configurada com a área e efeito da parte com socos, e a outra com a parte do efeito do Draco Meteor.                {area = OutrageArea1, effect = 112},  --{area = área do dano AOE, effect = efeito}                {area = OutrageArea2, effect = 248}            },           }    }        local function doOutrage(cid, times)        if not isCreature(cid) then return true end        for i = 1, #config.AOE.spell do            doMoveInArea2(cid, config.AOE.spell[i].effect, config.AOE.spell[i].area, config.AOE.combat, min, max, spell)        end        times = times - 1        if times <= 0 then            local rounds = math.random(4, 7)            rounds = rounds + math.floor(getPokemonLevel(cid) / 35)            local ret = {}            ret.id = cid            ret.cd = rounds            ret.check = getPlayerStorageValue(cid, conds["Confusion"])            ret.cond = "Confusion"            doCondition2(ret)            return true        end        addEvent(doOutrage, config.AOE.interval, cid, times)    end            local ret = {}    ret.id = cid    ret.cd = config.AOE.interval / 1000 * config.AOE.times    ret.eff = 0    ret.check = 0    ret.buff = spell    ret.first = true    doCondition2(ret)    doSetCreatureOutfit(cid, {lookType = config.outfit[getCreatureName(cid)]}, config.AOE.interval * config.AOE.times)    addEvent(doOutrage, config.AOE.interval, cid, config.AOE.times)	elseif spell == "Vines Grap" then  local ret = {}    ret.id = 0    ret.cd = 40                --Duração do silence, em milesimosdesegundos.    ret.check = 0    ret.eff = 104              --Efeito do silence.    ret.cond = "Silence"doDanoWithProtect(cid, psyDmg, getThingPosWithDebug(cid), selfArea2, min, max, 45)stopNow(cid, 200)           --alterado v1.6    doCreatureSetLookDir(cid, 2)	local effect = 0	local pos = getThingPosWithDebug(cid)	pos.x = pos.x + 1	pos.y = pos.y + 1	    local effect = getSubName(cid, target) == "Mega Tangrowth" and 229 or 229    local effect = getSubName(cid, target) == "Shiny Tangela" and 213 or 229	--alterado v1.6.1	doSendMagicEffect(pos, effect)	doDanoWithProtect(cid, GRASSDAMAGE, getThingPosWithDebug(cid), splash, -min, -max, 0)	elseif spell == "Extrasensory" then             local master = isSummon(cid) and getCreatureMaster(cid) or cidlocal function doFall(cid)for rocks = 1, 42 do    addEvent(fall, rocks*35, cid, master, GRASSDAMAGE, 99, 238)endendfor up = 1, 10 do    addEvent(upEffect, up*75, cid, 99)endaddEvent(doFall, 450, cid)addEvent(doMoveInArea2, 1400, cid, 0, BigArea2, GRASSDAMAGE, min, max, spell)                    	elseif spell == "Stored Power" then    local config = {        outfit = {            --["pokemon_name"] = outfit,            ["Gardevoir"] = 1923,            ["Mega Gardevoir"] = 1710,        },        AOE = {            times = 1,                                --Quantas vezes o golpe AOE será usado.            interval = 3000,                          --Intervalo de tempo, em milésimos de segundo, entre cada golpe AOE.            combat = PSYCHICDAMAGE,                    --Elemento.            spell = {                --Uma tabela deverá ser configurada com a área e efeito da parte com socos, e a outra com a parte do efeito do Draco Meteor.                {area = OutrageArea1, effect = 39},  --{area = área do dano AOE, effect = efeito}                {area = OutrageArea2, effect = 220}            },           }    }        local function doOutrage(cid, times)        if not isCreature(cid) then return true end        for i = 1, #config.AOE.spell do            doMoveInArea2(cid, config.AOE.spell[i].effect, config.AOE.spell[i].area, config.AOE.combat, min, max, spell)        end        times = times - 1        if times <= 0 then            local rounds = math.random(4, 7)            rounds = rounds + math.floor(getPokemonLevel(cid) / 35)            return true        end        addEvent(doOutrage, config.AOE.interval, cid, times)    end            local ret = {}    ret.id = cid    ret.cd = config.AOE.interval / 1000 * config.AOE.times    ret.eff = 0    ret.check = 0    ret.buff = spell    ret.first = true    doCondition2(ret)    doSetCreatureOutfit(cid, {lookType = config.outfit[getCreatureName(cid)]}, config.AOE.interval * config.AOE.times)    addEvent(doOutrage, config.AOE.interval, cid, config.AOE.times)    elseif spell == "Aura Sphere" then   doSendDistanceShoot(getThingPosWithDebug(cid), getThingPosWithDebug(target), 3)   doDanoInTargetWithDelay(cid, target, psyDmg, min, max, 59)  --alterado v1.7   elseif spell == "Brick Break" thenlocal ret = {}ret.id = 0ret.cd = 9                        ret.eff = 88ret.check = 0ret.first = trueret.cond = "Paralyze"local ret2 = {}ret2.id = 0ret2.cd = 9ret2.check = 0ret2.eff = -1ret2.cond = "Silence"local a = isCreature(target) and getCreatureDirectionToTarget(cid, target) or getCreatureLookDir(cid)local p = getThingPosWithDebug(cid)local t = {[0] = {90, {x=p.x+1, y=p.y-1, z=p.z}},[1] = {90, {x=p.x+2, y=p.y+1, z=p.z}},   [2] = {90, {x=p.x+1, y=p.y+2, z=p.z}},[3] = {90, {x=p.x-1, y=p.y+1, z=p.z}},  }doMoveInArea2(cid, 0, BrickBeak, FIGHTINGDAMAGE, min, max, spell, ret)doMoveInArea2(cid, 0, BrickBeak, FIGHTINGDAMAGE, 0, 0, spell, ret2)doSendMagicEffect(t[a][2], t[a][1])elseif spell == "Air Vortex" thenlocal pos = getThingPosWithDebug(cid)local areas = {rock1, rock2, rock3, rock4, rock5}local ret = {}ret.id = 0ret.cd = 10ret.eff = 103ret.check = 0ret.first = trueret.cond = "Paralyze"local ret2 = {}ret2.id = 0ret2.cd = 10ret2.check = 0ret2.eff = 103ret2.cond = "Silence"    local config = {        outfit = 2394,              --Outfit.        time = {10	, 500},           --{Duração da spell, intervalo entre cada "tick" de dano (em milésimos de segundos)},        storage = 93828,        effects = {            pullEffects = {                distance = 223,     --Distance effect do efeito de puxar pokémons.                effect = 255,       --Efeito de tornado.            },            damageEffect = 307,     --Efeito do redemoinho que aplica dano.			damageSangre = 86,        },    }    local time = os.time() + config.time[1]    function Pull(cid, ret)        local pos = getPosfromArea(cid, pullArea)        if pos and #pos > 0 then            for i = 1, #pos do                local c = getTopCreature(pos[i]).uid                if c > 0 then				legendarios = { "",}                    if ehMonstro© and not isInArray(legendarios, getCreatureName©)then                        doTeleportThing(c, getClosestFreeTile(cid, getThingPos(cid)))                        doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret, spell)						                        doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret2, spell)                    elseif isSummon© then                        local master = getCreatureMaster©                        if isSummon(cid) then                            if (getPlayerStorageValue(master, 52480) >= 1 and getPlayerStorageValue(master, 52481) >= 0) then                                local masterCid = getCreatureMaster(cid)                                if isDuelingAgainst(masterCid, master) then                                    doTeleportThing(c, getClosestFreeTile(cid, getThingPos(cid)))                                    doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret, spell)                                    doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret2, spell)                                end                            end                        else                            doTeleportThing(c, getClosestFreeTile(cid, getThingPos(cid)))                            doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret, spell)                            doMoveDano2(cid, c, NORMALDAMAGE, 0, 0, ret2, spell)                        end                    end                 end --            end        end    end    function doSendTornado(cid, pos)        if not isCreature(cid) then return true end        if isWithFear(cid) and getPlayerStorageValue(cid, 3644587) >= 1 then return true end        if isSleeping(cid) and getPlayerStorageValue(cid, 3644587) >= 1 then return true end        doSendDistanceShoot(getThingPos(cid), pos, config.effects.pullEffects.distance)        doSendMagicEffect(pos, config.effects.pullEffects.effect)    end    function vortexDamage(cid)        if not isCreature(cid) then            return true        elseif time - os.time() < 0 then            return true        end        doDanoWithProtect(cid, FLYINGDAMAGE, getThingPos(cid), damageArea, min, max, config.effects.damageEffect)        addEvent(vortexDamage, config.time[2], cid)    end    for b = 1, 3 do        for a = 1, 20 do            local pos = {x = getThingPos(cid).x + math.random(-4, 4), y = getThingPos(cid).y + math.random(-3, 3), z = getThingPos(cid).z}            addEvent(doSendTornado, a * 75, cid, pos)        end    end    Pull(cid, ret)    vortexDamage(cid)    doCreatureSetNoMove(cid, true)    doChangeSpeed(cid, -getCreatureSpeed(cid))    doSetCreatureOutfit(cid, {lookType = config.outfit}, config.time[1] * 1000)    setPlayerStorageValue(cid, config.storage, time)    addEvent(function()        if isCreature(cid) then            doCreatureSetNoMove(cid, false)            doRegainSpeed(cid)        end    end, config.time[1] * 1000)

     

     

    link=¿0000¿¿

  4. Em 06/04/2021 em 22:43, Yan18 disse:

    Quando esse erro acontece? Ao puxar o pokémon quando está realizando a cura?

     

     

    [01/05/2021 11:27:33] [Error - Action Interface] 
    [01/05/2021 11:27:33] data/actions/scripts/potion.lua:onUse
    [01/05/2021 11:27:33] Description: 
    [01/05/2021 11:27:33] data/actions/scripts/potion.lua:30: attempt to call global 'getThingFromPosWithProtect' (a nil value)
    [01/05/2021 11:27:33] stack traceback:
    [01/05/2021 11:27:33]     data/actions/scripts/potion.lua:30: in function <data/actions/scripts/potion.lua:29>

     

     

    ache outra mais tenhe error...

     

     

    Spoiler

    function doHealOverTime(cid, heal, turn, effect)                     --alterado v1.6 peguem o script todo!!
    if not isCreature(cid) then return true end

    if turn <= 0 or (getCreatureHealth(cid) == getCreatureMaxHealth(cid)) or getPlayerStorageValue(cid, 173) <= 0 then
       setPlayerStorageValue(cid, 173, -1)
       return onPokeHealthChange(getCreatureMaster(cid))
    elseif getCreatureHealth(cid) + heal/10 >= getCreatureMaxHealth(cid) then
       doSendAnimatedText(getThingPos(cid), "+"..getCreatureMaxHealth(cid) - getCreatureHealth(cid), 65)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid) - getCreatureHealth(cid))
       doSendMagicEffect(getThingPos(cid), 12)
       return onPokeHealthChange(getCreatureMaster(cid))
    end

    doSendAnimatedText(getThingPos(cid), "+"..heal/10, 65)
    doCreatureAddHealth(cid, heal/10)
    doSendMagicEffect(getThingPos(cid), 12)
    onPokeHealthChange(getCreatureMaster(cid))
    addEvent(doHealOverTime, 1000, cid, heal, turn - 1, effect)
    end

    local potions = {
    [2272] = {health = 400, animate = "SMALL POT", collor = 140},
    [2274] = {health = 1500, animate = "GREAT POT", collor = 140},       
    [2271] = {health = 4000, animate = "ULTRA POT", collor = 140},
    [2270] = {health = 10000, animate = "HYPER POT", collor = 140},
    [7588] = {health = 30000, animate = "ULTIMATE POT", collor = 140},
    }

    function onUse(cid, item, frompos, item2, topos)
    local pid = getThingFromPosWithProtect(topos)

    if not isSummon(pid) or getCreatureMaster(pid) ~= cid then
    return doPlayerSendCancel(cid, "You can only use potions on your own Pokemons!")
    end

    if getCreatureHealth(pid) == getCreatureMaxHealth(pid) then
    return doPlayerSendCancel(cid, "This pokemon is already at full health.")
    end

    if getPlayerStorageValue(pid, 173) >= 1 then
    return doPlayerSendCancel(cid, "This pokemon is already under effects of potions.")
    end

    if getPlayerStorageValue(cid, 52481) >= 1 then
    return doPlayerSendCancel(cid, "You can't do that while a duel.")
    end
     
    doCreatureSay(cid, "".. getCreatureName(pid)..", take this potion!", TALKTYPE_SAY)
    doSendAnimatedText(getThingPos(pid), potions[item.itemid].animate, potions[item.itemid].collor)
    setPlayerStorageValue(pid, 173, 1)
    doRemoveItem(item.uid, 1)

    doHealOverTime(pid, potions[item.itemid].health, 10, 12)

    return true
    end

     

  5. 18 minutos atrás, Yan18 disse:

    Eu tinha baixado essa base em 2019, mas o arquivo do revive está bem diferente do que eu tenho aqui. Poste novamente o arquivo revive.lua, mas poste tudo, pois esse que colocou na criação do tópicos parece que faltou partes. Edita lá mesmo e coloca lá. Ai eu dou uma olhada melhor.

    é que consegui um revive de outro servidor que está por nível mas não tem tempo em 10 minutos

     

     

    Spoiler

    local level = 100
    function onUse(cid, item, frompos, item2, topos)
        if (item2.itemid == 13860 or item2.itemid == 13810) and (getPlayerGroupId(cid) < 1 or getPlayerGroupId(cid) > 6) then
            doRemoveItem(item2.uid)
            return true
        end
        if getPlayerStorageValue(cid, 990) >= 1 then
            doPlayerSendCancel(cid, "Você não pode usar reviver durante as batalhas de ginasio.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
            return true
        elseif getPlayerStorageValue(cid, 52481) >= 1 then
            doPlayerSendCancel(cid, "Você não pode fazer isso enquanto um duelo.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n") --alterado v1.6
            return true
        elseif isPlayer(item2.uid) then
            doPlayerSendCancel(cid, "Por favor, use revive apenas em pokemons dentro de suas pokebolas!.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
            return true
        elseif getPlayerLevel(cid) > level then
            return doPlayerSendCancel(cid, "Você ultrapassou o level limite para usar este Revive.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
        end
        if item2.uid ~= getPlayerSlotItem(cid, 8).uid then
            return true
        end
        if item2.uid ~= getPlayerSlotItem(cid, 8).uid and not isInArray(getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid), item2.uid) then 
            return true 
        end
        for a, b in pairs (pokeballs) do
            if not item2.itemid == b.on or not item2.itemid == b.off then
                doPlayerSendCancel(cid, "Por favor, use revive apenas em pokémons dentro de suas pokebolas!.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
                return true
            end
        end
     
        local pokeball = getPlayerSlotItem(cid, ?
        for a, b in pairs (pokeballs) do
            if item2.itemid == b.on or item2.itemid == b.off then --edited deixei igual ao do PXG
                doTransformItem(item2.uid, b.on)
                doSetItemAttribute(item2.uid, "hp", 1)
                for c = 1, 15 do
                    local str = "move"..c
                    setCD(item2.uid, str, 0)
                end
                setCD(item2.uid, "control", 0)
                setCD(item2.uid, "blink", 0) --alterado v1.6
                doSendMagicEffect(getThingPos(cid), 13)
                doRemoveItem(item.uid, 1)
                setPlayerStorageValue(cid, 1008, 100)
                doCureBallStatus(getPlayerSlotItem(cid, 8).uid, "all")
                doCureStatus(cid, "all", true)
                cleanBuffs2(item2.uid) --alterado v1.5
     
                --[[if getPlayerStorageValue(cid, storage) > 0 then
                    setPlayerStorageValue(cid, storage, getPlayerStorageValue(cid, storage)-1)
                end--]]
                return true
            end
        end
        return true
    end

     

  6. 26 minutos atrás, Yan18 disse:

    Troque o código por esse:

     

    
    local level = 200 -- LEVEL MÍNIMO PARA USAR O REVIVE
    local storage_time = 68789 -- STORAGE PARA VERIFICAR O TEMPO PARA USAR O REVIVE
    local minutes = 10 -- MINUTOS PARA USAR O REVIVE
    local message_color = MESSAGE_STATUS_CONSOLE_BLUE -- COR DO TEXTO
    
    --------------- CÓDIGO ---------------
    
    function onUse(cid, item, frompos, item2, topos)
    	if getPlayerLevel(cid) < level then
    		doPlayerSendCancel(cid, "You need to be at least level " .. level .. " to use this revive.")
    	return doPlayerSendTextMessage(cid, message_color, "You need to be at least level " .. level .. " to use this revive.")
    		
    	else
    		if getPlayerStorageValue(cid, storage_time) <= os.time() then
    			setPlayerStorageValue(cid, 8422, 0) 
    			setPlayerStorageValue(cid, 23254, 50)
    					
    			if isCreature(item2.uid) then
    				return doPlayerSendCancel(cid, "You can only use revive in pokeballs!")
    			end
    			
    			if isPlayer(item2.uid) then
    				return doPlayerSendCancel(cid, "You cant use potions on wild pokemons.")
    			end
    			
    			local x = pokeballs[getPokeballType(item2.itemid)]
    		
    			if not x or isInArray(x.use, item2.itemid) then 
    				return doPlayerSendCancel(cid, "Sorry, is not possible.") 
    			end
    			
    			if x.on or x.off then
    				doSendMagicEffect(getThingPos(cid), 14)
    				doRemoveItem(item.uid, 1)
    				maxh = tonumber(getItemAttribute(item2.uid, "poke"):match("/(.+)]"))
    				doItemSetAttribute(item2.uid, "poke", getItemAttribute(item2.uid, "poke"):sub(1, findLetter(getItemAttribute(item2.uid, "poke"), "[")) .. maxh .. getItemAttribute(item2.uid, "poke"):sub(findLetter(getItemAttribute(item2.uid, "poke"), "/")))
    				btype = getPokeballType(item2.itemid)
    				ons = pokeballs[btype].on
    				doTransformItem(item2.uid, ons)
    				doCureAllStatus(item2.uid)
    				setPlayerStorageValue(cid, storage_time, os.time() + (60 * minutes))
    			return true	
    			
    			else
    				doPlayerSendCancel(cid, "Sorry, is not possible.")
    			return true
    			end 
    			
    		else
    			doPlayerSendCancel(cid, "You need to wait " .. minutes .. " minutes to use this revive.")
    		return doPlayerSendTextMessage(cid, message_color, "You need to wait " .. minutes .. " minutes to use this revive.")
    		end	
    	end	
    end	

     

     

     

    [08/04/2021 15:39:00] [Error - Action Interface] 
    [08/04/2021 15:39:00] data/actions/scripts/potion/Nightmare Revive.lua:onUse
    [08/04/2021 15:39:00] Description: 
    [08/04/2021 15:39:00] data/actions/scripts/potion/Nightmare Revive.lua:35: attempt to index a nil value
    [08/04/2021 15:39:00] stack traceback:
    [08/04/2021 15:39:00]     data/actions/scripts/potion/Nightmare Revive.lua:35: in function <data/actions/scripts/potion/Nightmare Revive.lua:8>

     

     

    Posso usar o revive com o Pokémon fora ..
    e posso usá-lo sem tempo.

    revive.png.cacd6c5e32c4f2dfec0dadb97cb411a9.png

     

     

     

     

  7. 4 horas atrás, Yan18 disse:

    Sem spam, aguarde ser respondido.

     

    Quando for postar um código, poste ele inteiro, pois o que você colocou estava faltando parte (ou estava errado rsrs).

     

    Troque o código por esse:

     

    
    local level = 200 -- LEVEL MÍNIMO PARA USAR O REVIVE
    local storage_time = 68789 -- STORAGE PARA VERIFICAR O TEMPO PARA USAR O REVIVE
    local minutes = 10 -- MINUTOS PARA USAR O REVIVE
    local message_color = MESSAGE_STATUS_CONSOLE_BLUE -- COR DO TEXTO
    
    --------------- CÓDIGO ---------------
    
    function onUse(cid, item, frompos, item2, topos)
    	if getPlayerLevel(cid) < level then
    		doPlayerSendCancel(cid, "You need to be at least level " .. level .. " to use this revive.")
    	return doPlayerSendTextMessage(cid, message_color, "You need to be at least level " .. level .. " to use this revive.")
    		
    	else
    		if getPlayerStorageValue(cid, storage_time) <= os.time() then
    			setPlayerStorageValue(cid, 8422, 0) 
    			setPlayerStorageValue(cid, 23254, 50)
    					
    			if isCreature(item2.uid) then
    				return doPlayerSendCancel(cid, "You can only use revive in pokeballs!")
    			end
    			
    			if isPlayer(item2.uid) then
    				return doPlayerSendCancel(cid, "You cant use potions on wild pokemons.")
    			end
    			
    			local x = pokeballs[getPokeballType(item2.itemid)]
    		
    			if not x or isInArray(x.use, item2.itemid) then return doPlayerSendCancel(cid, "Sorry, is not possible.") end
    				if x.on or x.off then
    					doSendMagicEffect(getThingPos(cid), 14)
    					doRemoveItem(item.uid, 1)
    					maxh = tonumber(getItemAttribute(item2.uid, "poke"):match("/(.+)]"))
    					doItemSetAttribute(item2.uid, "poke", getItemAttribute(item2.uid, "poke"):sub(1, findLetter(getItemAttribute(item2.uid, "poke"), "[")) .. maxh .. getItemAttribute(item2.uid, "poke"):sub(findLetter(getItemAttribute(item2.uid, "poke"), "/")))
    					btype = getPokeballType(item2.itemid)
    					ons = pokeballs[btype].on
    					doTransformItem(item2.uid, ons)
    					doCureAllStatus(item2.uid)
    					setPlayerStorageValue(cid, storage_time, os.time() + (60 * minutes))
    				return true	
    				
    				else
    					doPlayerSendCancel(cid, "Sorry, is not possible.")
    				return true
    				end 
    
    			else
    				return true
    			end
    			
    		else
    			doPlayerSendCancel(cid, "You need to wait " .. minutes .. " minutes to use this revive.")
    		return doPlayerSendTextMessage(cid, message_color, "You need to wait " .. minutes .. " minutes to use this revive.")
    		end	
    	end	
    end	

     

     

    [08/04/2021 14:09:29] [Error - LuaScriptInterface::loadFile] data/actions/scripts/Nightmare Revive.lua:50: 'end' expected (to close 'if' at line 9) near 'else'
    [08/04/2021 14:09:29] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/Nightmare Revive.lua)
    [08/04/2021 14:09:29] data/actions/scripts/Nightmare Revive.lua:50: 'end' expected (to close 'if' at line 9) near 'else'

  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...