Ir para conteúdo

Pedido De Script para (Poketibia)

Por 345sat
em Suporte Tibia OTServer

Featured Replies

Postado
  • Autor

fiz olhar oque da 

 
[25/05/2015 09:43:25] [Error - CreatureScript Interface] 
[25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:onLogout
[25/05/2015 09:43:25] Description: 
[25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:2: attempt to index global 'thisitem' (a nil value)
[25/05/2015 09:43:25] stack traceback:
[25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:2: in function <data/creaturescripts/scripts/goback.lua:1>
  • Citar
  • Mention
    • Respostas 47
    • Visualizações 2.8k
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Most Popular Posts

    • Wakon
      Wakon

      Testei o script que te passei e está funcionando normalmente, tente instalar corretamente: Vá em "Data/creaturescripts/scripts" copie e cole um arquivo.LUA e renomeie para Blockfly.lua, apague tudo e

    Postado

     

    fiz olhar oque da 

     
    [25/05/2015 09:43:25] [Error - CreatureScript Interface] 
    [25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:onLogout
    [25/05/2015 09:43:25] Description: 
    [25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:2: attempt to index global 'thisitem' (a nil value)
    [25/05/2015 09:43:25] stack traceback:
    [25/05/2015 09:43:25] data/creaturescripts/scripts/goback.lua:2: in function <data/creaturescripts/scripts/goback.lua:1>

     

     

    vá na pasta data\creaturescripts\scripts e abra o goback.lua apague tudo e cole isso

    function onLogout(cid)
    if not isCreature(cid) then return true end    
local thisitem = getPlayerSlotItem(cid, 8)
 
if thisitem.uid <= 0 then return true end
 
local ballName = getItemAttribute(thisitem.uid, "poke")
    local btype = getPokeballType(thisitem.itemid)
    
    ---------------------------------------------------------------
    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 getPlayerStorageValue(cid, 52480) >= 1 and getPlayerStorageValue(cid, 52481) >= 0 then 
       doEndDuel(cid)
    end
    --////////////////////////////////////////////////////////////////////////////////////////--
    if #getCreatureSummons(cid) == 2 and getPlayerStorageValue(cid, 212124) >= 1 then
       local cmed2 = getCreatureSummons(cid)[1]
  local poscmed = getThingPos(cmed2)
  local cmeddir = getCreatureLookDir(cmed2)
  local namecmed = getCreatureName(cmed2)
  local hp, maxHp = getCreatureHealth(getCreatureSummons(cid)[1]), getCreatureMaxHealth(getCreatureSummons(cid)[1])
  local gender = getPokemonGender(cmed2) 
       doRemoveCreature(getCreatureSummons(cid)[1])
  local back = doCreateMonster(namecmed, poscmed)
  addEvent(doCreatureSetSkullType, 150, back, gender)
  doCreatureSetLookDir(back, cmeddir)
  addEvent(doCreatureAddHealth, 100, back, hp-maxHp)
                                                                            
       -- pokemon controlador 
       local ball2 = getPlayerSlotItem(cid, 8)
       local mynewpos = getThingPos(getCreatureSummons(cid)[1])
       doRemoveCreature(getCreatureSummons(cid)[1])
       local pk2 = doSummonCreature(getItemAttribute(ball2.uid, "poke"), mynewpos) 
       doConvinceCreature(cid, pk2)
       addEvent(doAdjustWithDelay, 100, cid, pk2, true, true, false)
       setPlayerStorageValue(cid, 888, -1)    
       cleanCMcds(ball2.uid)
       doCreatureSetLookDir(getCreatureSummons(cid)[1], 2)
       registerCreatureEvent(pk2, "SummonDeath")   
    end
    
    ----------------------------------------------------------------------
    local summon = getCreatureSummons(cid)[1]      
      
if #getCreatureSummons(cid) >= 1 and thisitem.uid > 1 then
   if getPlayerStorageValue(cid, 212124) <= 0 then
  doItemSetAttribute(thisitem.uid, "hp", (getCreatureHealth(summon) / getCreatureMaxHealth(summon)))
        end                                                          
        setPlayerStorageValue(cid, 212124, 0)
        doTransformItem(thisitem.uid, pokeballs[btype].on)
doSendMagicEffect(getThingPos(summon), pokeballs[btype].effect)
doRemoveCreature(summon)
end
 
if getCreatureOutfit(cid).lookType == 814 then
doPlayerStopWatching(cid)
end
 
if tonumber(getPlayerStorageValue(cid, 17000)) and getPlayerStorageValue(cid, 17000) >= 1 then  
markFlyingPos(cid, getThingPos(cid))
end
 
if getPlayerStorageValue(cid, 22545) == 1 then     
  setGlobalStorageValue(22550, getGlobalStorageValue(22550)-1)
  if getGlobalStorageValue(22550) <= 0 then
          endGoldenArena()          
       end 
    end
 
return TRUE
end
 
local deathtexts = {"Oh nao! POKENAME, volte!", "Volte, POKENAME!", "Isso e o suficiente, POKENAME!", "Voce fez oque pode, POKENAME!",
   "Voce precisa descansar, POKENAME!", "bom trabalho, POKENAME!", "POKENAME, Voce esta muito ferido!"}
 
function onDeath(cid, deathList)
 
local owner = getCreatureMaster(cid)
 
        if getPlayerStorageValue(cid, 637500) >= 1 then
           doSendMagicEffect(getThingPos(cid), 211)
           doRemoveCreature(cid)
           return true
        end
        
        if getPlayerStorageValue(cid, 212123) >= 1 then
           return true
        end
        
        --////////////////////////////////////////////////////////////////////////////////////////--
        checkDuel(owner)                                                                          
        --////////////////////////////////////////////////////////////////////////////////////////--
        
local thisball = getPlayerSlotItem(owner, 8)
local ballName = getItemAttribute(thisball.uid, "poke")
 
    btype = getPokeballType(thisball.itemid)
 
        if #getCreatureSummons(owner) > 1 then
           BackTeam(owner, getCreatureSummons(owner))      
        end
 
doSendMagicEffect(getThingPos(cid), pokeballs[btype].effect)
        doTransformItem(thisball.uid, pokeballs[btype].off)
 
doPlayerSendTextMessage(owner, 22, "Seu pokemon esta desmaiado.")
 
local say = deathtexts[math.random(#deathtexts)]
say = string.gsub(say, "POKENAME", getCreatureName(cid))
 
if getPlayerStorageValue(cid, 33) <= 0 then
doCreatureSay(owner, say, TALKTYPE_SAY)
end
 
doItemSetAttribute(thisball.uid, "hp", 0)
if ehMonstro(deathList[1]) then
  doItemSetAttribute(thisball.uid, "happy", getPlayerStorageValue(cid, 1008) - happyLostOnDeath)
    end
doItemSetAttribute(thisball.uid, "hunger", getPlayerStorageValue(cid, 1009))
 
    if useOTClient then
       doPlayerSendCancel(owner, '12//,hide')      --alterado v1.7
    end
 
doRemoveCreature(cid)
 
return false
end
  • Citar
  • Mention
    • Postado
    • Autor

    [25/05/2015 09:43:57] data/creaturescripts/scripts/goback.lua:2: in function <data/creaturescripts/scripts/goback.lua:1>

    agora esta dando isso pq sera fiz como vc pediu

    meu godback.lua

    local EFFECTS = {
    --[OutfitID] = {Effect}
    ["Magmar"] = 35,   
    ["Jynx"] = 17,          --alterado v1.5
    ["Shiny Jynx"] = 17,    
    }
     
    function onUse(cid, item, frompos, item2, topos)
     
    if exhaustion.get(cid, 6666) and exhaustion.get(cid, 6666) > 0 then return true end
     
    local owner = getItemAttribute(item.uid, "firstpoke")
     
    if owner and owner ~= getCreatureName(cid) then
    doPlayerSendCancel(cid, "This pokemon belongs to "..owner..", it is his first pokemon. Please, give it back to him.")
    return true
    end
     
    if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 then
    return true
    end
    -------------------------------------------------------
    ballName = getItemAttribute(item.uid, "poke")
                                                   
       btype = getPokeballType(item.itemid)
       usando = pokeballs[btype].use
     
    local effect = pokeballs[btype].effect
    if not effect then
    effect = 21
    end
    ----------------------------------------------------------
    if item.itemid == usando then                           
     
    if getPlayerStorageValue(cid, 990) == 1 then -- GYM
    doPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")
    return true
    end
     
    ---------------------------------------------------------------------------------------
    if #getCreatureSummons(cid) > 1 and getPlayerStorageValue(cid, 637501) >= 1 then   
           BackTeam(cid, getCreatureSummons(cid))       --<<-- Edited Team Slice system
        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, "This pokemon is fainted.")
       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, "You must put your pokeball in the correct place!")
    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, "This pokemon is fainted.")
       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
     
    --------------------------------------------------------------------------------------
    shinysClan = {
    ["Shiny Fearow"] = {4, "Wingeon"},
    ["Shiny Flareon"] = {1, "Volcanic"},
    ["Shiny Vaporeon"] = {2, "Seavel"}, 
    ["Shiny Jolteon"] = {9, "Raibolt"},
    ["Shiny Hypno"] = {7, "Psycraft"},           
    ["Shiny Golem"] = {3, "Orebound"},
    ["Shiny Vileplume"] = {8, "Naturia"},
    ["Shiny Nidoking"] = {5, "Malefic"},
    ["Shiny Hitmontop"] = {6, "Gardestrike"},   --alterado v1.4
    }
     
    if shinysClan[pokemon] and (getPlayerGroupId(cid) < 3 or getPlayerGroupId(cid) > 6) then
      if getPlayerStorageValue(cid, 86228) ~= shinysClan[pokemon][1] then
         doPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")
         return true   
           elseif getPlayerStorageValue(cid, 862281) ~= 5 then
              doPlayerSendCancel(cid, "You need be atleast rank 5 to use this pokemon!")
         return true
           end
        end
        --------------------------------------------------------------------------------------
     
    doSummonMonster(cid, pokemon)
     
    local pk = getCreatureSummons(cid)[1]
    if not isCreature(pk) then return true end
    ------------------------passiva hitmonchan------------------------------
    if isSummon(pk) then
           local nameHIT = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "poke")
           local hands = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "hands")
           if nameHIT == "Shiny Hitmonchan" or nameHIT == "Hitmonchan" then
              if getItemAttribute(getPlayerSlotItem(cid, 8).uid, "hands") then
                 doSetCreatureOutfit(pk, {lookType = hitmonchans[nameHIT][hands].out}, -1)
              else
                  doPlayerSendTextMessage(cid, 27, "Contact a GameMaster! Error in passive system! Attribute \"hands\" missing")  
              end
           end
        end
    -------------------------------------------------------------------------
        ---------movement magmar, jynx-------------
        if EFFECTS[getCreatureName(pk)] then             --edited efeito magmar/jynx
           markPosEff(pk, getThingPos(pk))
           sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk))  --alterado v1.5
        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 = getItemAttribute(item.uid, "nick") or getCreatureName(pk) 
     
    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, 8).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, "This pokemon is fainted.")
     
    end
     
    local pk = getCreatureSummons(cid)[1]
    local pb = getPlayerSlotItem(cid, 8).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
     
    if useKpdoDlls then
    doUpdateMoves(cid)
    end
    return true
    end

    esta  dando + esse error sera pq
    [25/05/2015 09:51:57] [Error - CreatureScript Interface] 
    [25/05/2015 09:51:57] data/creaturescripts/scripts/goback.lua:onLogout
    [25/05/2015 09:51:58] Description: 
    [25/05/2015 09:51:58] data/creaturescripts/scripts/goback.lua:2: attempt to index global 'thisitem' (a nil value)
    [25/05/2015 09:51:58] stack traceback:
    [25/05/2015 09:51:58] data/creaturescripts/scripts/goback.lua:2: in function <data/creaturescripts/scripts/goback.lua:1>

    Editado por 345sat (veja o histórico de edições)

  • Citar
  • Mention

    • Participe da conversa

    Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

    Visitante
    Responder
    Ir para a lista de tópicos

    Quem Está Navegando 0

    • Nenhum usuário registrado visualizando esta página.

    Estatísticas dos Fóruns

    • Tópicos 96.9k
    • Posts 519.6k

    Informação Importante

    Confirmação de Termo

    I accept