Ir para conteúdo
  • Cadastre-se

erro data/actions/scripts/Basic/goback.lua:140


Posts Recomendados

[14/10/2017 23:37:49] [Error - TalkAction Interface] 
[14/10/2017 23:37:49] data/talkactions/scripts/move1.lua:onSay
[14/10/2017 23:37:49] Description: 
[14/10/2017 23:37:49] (luaDoItemSetAttribute) Item not found

 

galera tambem tem esse erro e ele acontece sempre na mega evo se algu poder me ajuda ganha meu rep nos dois erro


[14/10/2017 23:29:58] [Error - Action Interface] 
[14/10/2017 23:29:58] data/actions/scripts/Basic/goback.lua:onUse
[14/10/2017 23:29:58] Description: 
[14/10/2017 23:29:58] data/actions/scripts/Basic/goback.lua:140: attempt to perform arithmetic on a nil value
[14/10/2017 23:29:58] stack traceback:
[14/10/2017 23:29:58]     data/actions/scripts/Basic/goback.lua:140: in function <data/actions/scripts/Basic/goback.lua:15>

 

 

 

e tambem como trocar os items iniciais

Editado por Luis077 (veja o histórico de edições)
Link para o post
Compartilhar em outros sites

Este tópico foi movido para a área correta. Esta é uma mensagem automática!
Pedimos que leia as regras do fórum!

Spoiler

This topic has been moved to the correct area. This is an automated message!
Please read the forum rules.

 

                                                              ezgif-1-98aab239f3.gif.1a897c9c3225228909e7b356a5cfb8e4.gif

Link para o post
Compartilhar em outros sites
23 minutos atrás, Holloway disse:

Poderia me mandar o goback? depois arrumo sua mevo evolução e itens iniciais.

opa mano claro oque vc quer so goback ta ae 

goback.lua

 

 

Editado por Luis077 (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Spoiler

local EFFECTS = {
	--[OutfitID] = {Effect}
	["Magmar"] = 35,   
	["Shiny Magmar"] = 35,
    ["Shiny Magmortar"] = 35,
    ["Shiny Electivire"] = 48,
    ["Magmortar"] = 35,
    ["Electivire"] = 48,	
	["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 isRiderOrFlyOrSurf(cid) then return true end

if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 
or getPlayerStorageValue(cid, 75846) >= 1   then    --alterado v1.9 <<
doPlayerSendCancel(cid, "You cant use ur poke while riding")
   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 and #getCreatureSummons(cid) > 0 then                           
	local summon = getCreatureSummons(cid)[1]
	if getPlayerStorageValue(summon, 9658783) == 1 and isInArray({"Aggron", "Sudowoodo", "Mega Aggron"}, getCreatureName(summon)) then
	   doKillWildPoke(getCreatureSummons(cid)[1], getCreatureSummons(cid)[1])
	   doPlayerSendCancel(cid, "This pokemon is fainted.")
	   if isInDuel(cid) then
	      doRemoveCountPokemon(cid)
	   end
	   return true
	end

	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, 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, "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
	
	if isInDuel(cid) then
	   doRemoveCountPokemon(cid)
	end
	
	checkGiveUp(cid)
	
	doReturnPokemon(cid, z, item, effect)
	doPlayerSendCancel(cid, '12//,hide') --alterado v1.7
	doSendPlayerExtendedOpcode(cid, opcodes.OPCODE_DITTO_MEMORY, "sair") -- ditto memory system
	

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

	    if #getCreatureSummons(cid) >= 1  then
       doPlayerSendCancel(cid, "You can't do that.")
	   BackTeam(cid) 
       return true     --alterado v1.5
    end
	if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then
		doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")
	return TRUE
	end

	-- rever a seguranca do pokemon ser sumanado com 0 de hp

	local pokemon = getItemAttribute(item.uid, "poke")
	
	if not pokes[pokemon] then
	return true
	end

----------------------- Sistema de nao poder carregar mais que 3 pokes lvl baixo e + q 1 poke de lvl medio/alto ---------------------------------
if not isInArray({5, 6}, getPlayerGroupId(cid)) then
   local balls = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
   local low = {}
   local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}
   if #balls >= 1 then
      for _, uid in ipairs(balls) do
          local nome = getItemAttribute(uid, "poke")
          if not isInArray(lowPokes, pokemon) and nome == pokemon and not isGod(cid) then
             return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry two pokemons equals!")
          else
             if nome == pokemon then
                table.insert(low, nome)
             end
          end
      end
   end
if #low >= 3 then
   return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry more than three pokemons equals of low level!")
end   
end
---------------------------------------------------------------------------------------------------------------------------------------------------

	local x = pokes[pokemon]
	local boost = getItemAttribute(item.uid, "boost") or 0
	local levelpoke = getItemAttribute(item.uid, "level")*2 or 1
	
	
	if getPlayerLevel(cid) < 220 and (levelpoke >=160 and levelpoke <=178) then 
	doPlayerSendCancel(cid, "You need level (220) to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < 250 and (levelpoke >=180) then 
	doPlayerSendCancel(cid, "You need level (250) to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < levelpoke then
	doPlayerSendCancel(cid, "You need level ("..levelpoke..") to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < (x.level+boost) and getPlayerLevel(cid) < levelpoke * 2 then
	   doPlayerSendCancel(cid, "You need higher level to use this pokemon.")
	   return true
	end
	
	---------------------------- Sistema pokes de clan --------------------------------------
	local 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) < 4 then  --alterado v1.9 \/
	   if getPlayerClanNum(cid) ~= shinysClan[pokemon][1] then
	      doPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")
	      return true   
       elseif getPlayerClanRank(cid) < 3 then
          doPlayerSendCancel(cid, "You need be atleast rank 3 to use this pokemon!")
	      return true
       end
    end
    --------------------------------------------------------------------------------------
	local isNicked, nick, pokemonRealName = false, pokemon, pokemon
	local pokeSourceCode = "sim"
	
	if getItemAttribute(item.uid, "copyName") then -- ditto system
        pokemon = getItemAttribute(item.uid, "copyName")
		pokemonRealName = getItemAttribute(item.uid, "poke")
    end
	
	if getItemAttribute(item.uid, "level") then -- level system
        levelin = getItemAttribute(item.uid, "level")
    end
	
	
	if getItemAttribute(item.uid, "nick") and getItemAttribute(item.uid, "nick") ~= "" then
		isNicked = true nick = getItemAttribute(item.uid, "nick")
		pokeSourceCode = doCreateMonsterNick(cid, pokemon, ""..getItemAttribute(item.uid, "nick").."["..levelin.."]", getThingPos(cid), true)
	else 
	    pokeSourceCode = doCreateMonsterNick(cid, pokemon, ""..retireShinyName(pokemonRealName).."["..levelin.."]", getThingPos(cid), true) -- chama o pokemon com nome verdadeiro, mas se for shiny ja tera seu nome alterado
	end
	
	
	
	if pokeSourceCode == "Nao" then
	   doSendMsg(cid, "Não há espaço para seu pokemon.")
	   return true 
    end	   
	

	local pk = getCreatureSummons(cid)[1]
	
		  setMoveSummon(cid, true)
	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
    --------------------------------------------------------------------------      

	doCreatureSetLookDir(pk, 2)
	

	adjustStatus(pk, item.uid, true, true, true)
	doRegenerateWithY(getCreatureMaster(pk), pk)
	doCureWithY(getCreatureMaster(pk), pk)

	doTransformItem(item.uid,  pokeballs[btype].use)


	local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", (isNicked and nick or retireShinyName(pokemon)))
	doCreatureSay(cid, mgo, TALKTYPE_ORANGE_1)
    
	doSendMagicEffect(getCreaturePosition(pk), effect)
	doSendParticleAura(pk, 81)
	doPlayerSendCancel(cid, '12//,show')
	doSendPlayerExtendedOpcode(cid, opcodes.OPCODE_BATTLE_POKEMON, tostring(pk))
	setPokemonGhost(pk)
		
    
else

    doPlayerSendCancel(cid, "This pokemon is fainted.")

end
	
	-- otclient life
		doSendLifePokeToOTC(cid)
		doUpdateMoves(cid)
	-- otclient life
	
return true
end

 

 

 

Te ajudei ?? Que tal fazer uma contribuição ?

Doar

Link para o post
Compartilhar em outros sites
Em 17/10/2017 em 11:38, DboExplorer disse:
  Mostrar conteúdo oculto


local EFFECTS = {
	--[OutfitID] = {Effect}
	["Magmar"] = 35,   
	["Shiny Magmar"] = 35,
    ["Shiny Magmortar"] = 35,
    ["Shiny Electivire"] = 48,
    ["Magmortar"] = 35,
    ["Electivire"] = 48,	
	["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 isRiderOrFlyOrSurf(cid) then return true end

if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 
or getPlayerStorageValue(cid, 75846) >= 1   then    --alterado v1.9 <<
doPlayerSendCancel(cid, "You cant use ur poke while riding")
   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 and #getCreatureSummons(cid) > 0 then                           
	local summon = getCreatureSummons(cid)[1]
	if getPlayerStorageValue(summon, 9658783) == 1 and isInArray({"Aggron", "Sudowoodo", "Mega Aggron"}, getCreatureName(summon)) then
	   doKillWildPoke(getCreatureSummons(cid)[1], getCreatureSummons(cid)[1])
	   doPlayerSendCancel(cid, "This pokemon is fainted.")
	   if isInDuel(cid) then
	      doRemoveCountPokemon(cid)
	   end
	   return true
	end

	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, 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, "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
	
	if isInDuel(cid) then
	   doRemoveCountPokemon(cid)
	end
	
	checkGiveUp(cid)
	
	doReturnPokemon(cid, z, item, effect)
	doPlayerSendCancel(cid, '12//,hide') --alterado v1.7
	doSendPlayerExtendedOpcode(cid, opcodes.OPCODE_DITTO_MEMORY, "sair") -- ditto memory system
	

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

	    if #getCreatureSummons(cid) >= 1  then
       doPlayerSendCancel(cid, "You can't do that.")
	   BackTeam(cid) 
       return true     --alterado v1.5
    end
	if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then
		doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")
	return TRUE
	end

	-- rever a seguranca do pokemon ser sumanado com 0 de hp

	local pokemon = getItemAttribute(item.uid, "poke")
	
	if not pokes[pokemon] then
	return true
	end

----------------------- Sistema de nao poder carregar mais que 3 pokes lvl baixo e + q 1 poke de lvl medio/alto ---------------------------------
if not isInArray({5, 6}, getPlayerGroupId(cid)) then
   local balls = getPokeballsInContainer(getPlayerSlotItem(cid, 3).uid)
   local low = {}
   local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}
   if #balls >= 1 then
      for _, uid in ipairs(balls) do
          local nome = getItemAttribute(uid, "poke")
          if not isInArray(lowPokes, pokemon) and nome == pokemon and not isGod(cid) then
             return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry two pokemons equals!")
          else
             if nome == pokemon then
                table.insert(low, nome)
             end
          end
      end
   end
if #low >= 3 then
   return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry more than three pokemons equals of low level!")
end   
end
---------------------------------------------------------------------------------------------------------------------------------------------------

	local x = pokes[pokemon]
	local boost = getItemAttribute(item.uid, "boost") or 0
	local levelpoke = getItemAttribute(item.uid, "level")*2 or 1
	
	
	if getPlayerLevel(cid) < 220 and (levelpoke >=160 and levelpoke <=178) then 
	doPlayerSendCancel(cid, "You need level (220) to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < 250 and (levelpoke >=180) then 
	doPlayerSendCancel(cid, "You need level (250) to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < levelpoke then
	doPlayerSendCancel(cid, "You need level ("..levelpoke..") to use this pokemon.")
	   return true
	end
	
	if getPlayerLevel(cid) < (x.level+boost) and getPlayerLevel(cid) < levelpoke * 2 then
	   doPlayerSendCancel(cid, "You need higher level to use this pokemon.")
	   return true
	end
	
	---------------------------- Sistema pokes de clan --------------------------------------
	local 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) < 4 then  --alterado v1.9 \/
	   if getPlayerClanNum(cid) ~= shinysClan[pokemon][1] then
	      doPlayerSendCancel(cid, "You need be a member of the clan "..shinysClan[pokemon][2].." to use this pokemon!")
	      return true   
       elseif getPlayerClanRank(cid) < 3 then
          doPlayerSendCancel(cid, "You need be atleast rank 3 to use this pokemon!")
	      return true
       end
    end
    --------------------------------------------------------------------------------------
	local isNicked, nick, pokemonRealName = false, pokemon, pokemon
	local pokeSourceCode = "sim"
	
	if getItemAttribute(item.uid, "copyName") then -- ditto system
        pokemon = getItemAttribute(item.uid, "copyName")
		pokemonRealName = getItemAttribute(item.uid, "poke")
    end
	
	if getItemAttribute(item.uid, "level") then -- level system
        levelin = getItemAttribute(item.uid, "level")
    end
	
	
	if getItemAttribute(item.uid, "nick") and getItemAttribute(item.uid, "nick") ~= "" then
		isNicked = true nick = getItemAttribute(item.uid, "nick")
		pokeSourceCode = doCreateMonsterNick(cid, pokemon, ""..getItemAttribute(item.uid, "nick").."["..levelin.."]", getThingPos(cid), true)
	else 
	    pokeSourceCode = doCreateMonsterNick(cid, pokemon, ""..retireShinyName(pokemonRealName).."["..levelin.."]", getThingPos(cid), true) -- chama o pokemon com nome verdadeiro, mas se for shiny ja tera seu nome alterado
	end
	
	
	
	if pokeSourceCode == "Nao" then
	   doSendMsg(cid, "Não há espaço para seu pokemon.")
	   return true 
    end	   
	

	local pk = getCreatureSummons(cid)[1]
	
		  setMoveSummon(cid, true)
	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
    --------------------------------------------------------------------------      

	doCreatureSetLookDir(pk, 2)
	

	adjustStatus(pk, item.uid, true, true, true)
	doRegenerateWithY(getCreatureMaster(pk), pk)
	doCureWithY(getCreatureMaster(pk), pk)

	doTransformItem(item.uid,  pokeballs[btype].use)


	local mgo = gobackmsgs[math.random(1, #gobackmsgs)].go:gsub("doka", (isNicked and nick or retireShinyName(pokemon)))
	doCreatureSay(cid, mgo, TALKTYPE_ORANGE_1)
    
	doSendMagicEffect(getCreaturePosition(pk), effect)
	doSendParticleAura(pk, 81)
	doPlayerSendCancel(cid, '12//,show')
	doSendPlayerExtendedOpcode(cid, opcodes.OPCODE_BATTLE_POKEMON, tostring(pk))
	setPokemonGhost(pk)
		
    
else

    doPlayerSendCancel(cid, "This pokemon is fainted.")

end
	
	-- otclient life
		doSendLifePokeToOTC(cid)
		doUpdateMoves(cid)
	-- otclient life
	
return true
end

 

 

opa um ja foi agora me ajuda com o move1 ou troca os items iniciais vlw DboExplorerHolloway

 

Editado por Luis077 (veja o histórico de edições)
Link para o post
Compartilhar em outros sites

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

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo