• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Afiliados



    Votar:

    [Actions] AYUDA SERVIDOR POKE 8.54 ERROR AL AGREGAR POKEBALL

    Compartir:

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 1.)

    Invitado

    Anonymous
    Invitado
    [Error - Action Interface]
    data/actions/scripts/goback.lua:onUse
    Description:
    data/actions/scripts/goback.lua:21: attempt to index field '?' (a nil value)
    stack traceback:
    data/actions/scripts/goback.lua:21: in function <data/actions/scripts/goback.lua:10>


    EL ERROR PROVIENE DE AQUI.


    local EFFECTS = {
    --[OutfitID] = {Effect}
    ["Magmar"] = 35,
    ["Jynx"] = 17, --alterado v1.5
    ["Shiny Jynx"] = 17,
    ["Piloswine"] = 205, --alterado v1.8
    ["Swinub"] = 205,
    }

    function onUse(cid, item, frompos, item2, topos)

    if exhaustion.get(cid, 6666) and exhaustion.get(cid, 6666) > 0 then return true end

    if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1
    or getPlayerStorageValue(cid, 75846) >= 1 or getPlayerStorageValue(cid, 5700) >= 1 then --alterado v1.9 <<
    return true
    end

    local ballName = getItemAttribute(item.uid, "poke")
    local btype = getPokeballType(item.itemid)
    local usando = pokeballs[btype].use

    local effect = pokeballs[btype].effect
    if not effect then
    effect = 21
    end

    unLock(item.uid) --alterado v1.8

    if item.itemid == usando then

    if getPlayerStorageValue(cid, 990) == 1 then -- GYM
    doPlayerSendCancel(cid, "Você não pode retornar seu Pokémon durante uma batalha de ginásio.")
    return true
    end
    if #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 212124) <= 0 then --alterado v1.6
    if getPlayerStorageValue(cid, 637501) == -2 or getPlayerStorageValue(cid, 637501) >= 1 then
    BackTeam(cid)
    end
    end
    if #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 then
    doPlayerSendCancel(cid, "You can't do that while is controling a mind")
    return true --alterado v1.5
    end
    if #getCreatureSummons(cid) <= 0 then
    if isInArray(pokeballs[btype].all, item.itemid) then
    doTransformItem(item.uid, pokeballs[btype].off)
    doItemSetAttribute(item.uid, "hp", 0)
    doPlayerSendCancel(cid, "Seu Pokémon desmaiou.")
    return true
    end
    end

    local cd = getCD(item.uid, "blink", 30)
    if cd > 0 then
    setCD(item.uid, "blink", 0)
    end

    local z = getCreatureSummons(cid)[1]

    if getCreatureCondition(z, CONDITION_INVISIBLE) and not isGhostPokemon(z) then
    return true
    end
    doReturnPokemon(cid, z, item, effect)

    elseif item.itemid == pokeballs[btype].on then

    if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then
    doPlayerSendCancel(cid, "Coloque a Pokébola no slot correto!")
    return TRUE
    end

    local thishp = getItemAttribute(item.uid, "hp")

    if thishp <= 0 then
    if isInArray(pokeballs[btype].all, item.itemid) then
    doTransformItem(item.uid, pokeballs[btype].off)
    doItemSetAttribute(item.uid, "hp", 0)
    doPlayerSendCancel(cid, "Seu Pokémon desmaiou.")
    return true
    end
    end

    local pokemon = getItemAttribute(item.uid, "poke")

    if not pokes[pokemon] then
    return true
    end

    local x = pokes[pokemon]
    local boost = getItemAttribute(item.uid, "boost") or 0

    if getPlayerLevel(cid) < (x.level+boost) then
    doPlayerSendCancel(cid, "You need level "..(x.level+boost).." to use this pokemon.")
    return true
    end

    --------------------------------------------------------------------------------------

    doSummonMonster(cid, pokemon)

    local pk = getCreatureSummons(cid)[1]
    if not isCreature(pk) then return true end

    ------------------------passiva hitmonchan------------------------------
    if isSummon(pk) then --alterado v1.8 \/
    if pokemon == "Shiny Hitmonchan" or pokemon == "Hitmonchan" then
    if not getItemAttribute(item.uid, "hands") then
    doSetItemAttribute(item.uid, "hands", 0)
    end
    local hands = getItemAttribute(item.uid, "hands")
    doSetCreatureOutfit(pk, {lookType = hitmonchans[pokemon][hands].out}, -1)
    end
    end
    -------------------------------------------------------------------------
    ---------movement magmar, jynx-------------
    if EFFECTS[getCreatureName(pk)] then
    markPosEff(pk, getThingPos(pk))
    sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk))
    end
    --------------------------------------------------------------------------

    if getCreatureName(pk) == "Ditto" or getCreatureName(pk) == "Shiny Ditto" then --edited

    local left = getItemAttribute(item.uid, "transLeft")
    local name = getItemAttribute(item.uid, "transName")

    if left and left > 0 then
    setPlayerStorageValue(pk, 1010, name)
    doSetCreatureOutfit(pk, {lookType = getItemAttribute(item.uid, "transOutfit")}, -1)
    addEvent(deTransform, left * 1000, pk, getItemAttribute(item.uid, "transTurn"))
    doItemSetAttribute(item.uid, "transBegin", os.clock())
    else
    setPlayerStorageValue(pk, 1010, getCreatureName(pk) == "Ditto" and "Ditto" or "Shiny Ditto") --edited
    end
    end

    if isGhostPokemon(pk) then doTeleportThing(pk, getPosByDir(getThingPos(cid), math.random(0, 7)), false) end

    doCreatureSetLookDir(pk, 2)

    adjustStatus(pk, item.uid, true, true, true)
    doAddPokemonInOwnList(cid, pokemon)

    doTransformItem(item.uid, item.itemid+1)

    local pokename = getPokeName(pk) --alterado v1.7

    local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", pokename)
    doCreatureSay(cid, mgo, TALKTYPE_SAY)

    doSendMagicEffect(getCreaturePosition(pk), effect)
    local pk = getCreatureSummons(cid)[1]
    local pb = getPlayerSlotItem(cid, Cool.uid
    local look = getItemAttribute(pb,"addon")
    if not look then
    doSetItemAttribute(pb,"addon",0)
    return false
    end
    if look > 0 then
    doSetCreatureOutfit(pk, {lookType = look}, -1)
    return true
    end

    else

    doPlayerSendCancel(cid, "Seu Pokémon desmaiou.")

    end

    if useKpdoDlls then
    doUpdateMoves(cid)
    end
    return true
    end

    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 1.)

    Permisos de este foro:
    No puedes responder a temas en este foro.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).