pedido [Encerrado] Goback

Chapalirous · Novembro 17, 2012

Minha goback esta bugado, não da para mim usar o pokemon Inical que eu pego no bau quando cria a acc

local EFFECTS = {
--[OutfitID] = {Effect}
["Magmar"] = 35,  
["Jynx"] = 17,		  --alterado v2.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
--alterado v2.6 sistema de firstpoke retirado
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, 212124) <= 0 then	 --alterado v2.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 v2.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

----------------------- 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 bp = getPlayerSlotItem(cid, CONST_SLOT_BACKPACK)
local lowPokes = {"Rattata", "Caterpie", "Weedle", "Oddish", "Pidgey", "Paras", "Poliwag", "Bellsprout", "Magikarp", "Hoppip", "Sunkern"}
local low = {}
local lw = 1
for e, f in pairs(pokeballs) do
for times = 1, 3 do
	local items = getItemsInContainerById(bp.uid, pokeballs[e].all[times])
	if #items >= 1 then																 --alterado v2.6
	   for _, uid in pairs(items) do
		   local nome1 = getItemAttribute(uid, "poke")
		   if not isInArray(lowPokes, pokemon) and nome1 == pokemon then
			  return doPlayerSendTextMessage(cid, 27, "Sorry, but you can't carry two pokemons equals!")
		   elseif isInArray(lowPokes, pokemon) then
			  if nome1 == pokemon then
				 table.insert(low, lw, nome1)
				 lw = lw +1
			  end
		   end
	   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 boosts = getItemAttribute(item.uid, "boost") or 0
if getPlayerLevel(cid) + pokemonMaxLevelAbovePlayer < getItemAttribute(item.uid, "level") + boosts then
doPlayerSendCancel(cid, "Your pokemon's level is much higher than yours, you can't use him.")
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 v2.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			
   markPosEff(pk, getThingPos(pk))
   sendMovementEffect(pk, EFFECTS[getCreatureName(pk)], getThingPos(pk)) --alterado v2.5
end
--------------------------------------------------------------------------	
if getCreatureName(pk) == "Ditto" then
 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, "Ditto")
 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, false, 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)
else
doPlayerSendCancel(cid, "This pokemon is fainted.")
end
if useKpdoDlls then
 doUpdateMoves(cid)
end
return true
end

GuhPk · Novembro 17, 2012

Passa o teu starter.lua... (Script dos baus que você pega os pokes inicias)

Ou sei la qual o nome...

Chapalirous · Novembro 17, 2012

local starterpokes = {
["Weedle"] = {x = 1054, y = 1055, z = 10},

["Rattata"] = {x = 1056, y = 1055, z = 10},

["Caterpie"] = {x = 1058, y = 1055, z = 10},

}

local level = 5

local extrastr = 1.5

local btype = "great"

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

if getPlayerLevel(cid) > 5 then --alterado v1.3

return true

end

local pokemon = ""

for a, b in pairs (starterpokes) do

if isPosEqualPos(topos, b) then

pokemon = a

end

end

if pokemon == "" then return true end

local gender = getRandomGenderByName(pokemon)

local happy = 180

doPlayerAddItem(cid, 2392, 10)

doPlayerAddItem(cid, 2152, 5)

doPlayerAddItem(cid, 12222, 25)

doPlayerAddItem(cid, 12347, 10)

doPlayerAddItem(cid, 12344, 3)

doPlayerAddItem(cid, 11638, 1)

local item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", pokemon)

doItemSetAttribute(item, "hp", 1)

doItemSetAttribute(item, "happy", happy)

doItemSetAttribute(item, "gender", gender)

doItemSetAttribute(item, "description", "Contains a "..pokemon..".")

doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")

doItemSetAttribute(item, "firstpoke", getCreatureName(cid))

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, pokeballs[btype].on)

doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")

doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

doSendMagicEffect(getThingPos(cid), 29)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

doSendMagicEffect(getThingPos(cid), 27)

doSendMagicEffect(getThingPos(cid), 29)

return TRUE

end

Covan · Novembro 17, 2012

Não sei se está é o topico certo mas...Meu amigo nessecita de um scripter para um ot de pokemon o email dele está aqui davi.lip.lek@hotmail.com

Muito obrigado

Foquinhaa · Novembro 17, 2012

Não sei se está é o topico certo mas...Meu amigo nessecita de um scripter para um ot de pokemon o email dele está aqui davi.lip.lek@hotmail.com

Muito obrigado

área errada, área certa seria Formação de Equipes , reportado.

**Yan Oliveira** · Novembro 17, 2012

@Chapalirous

Ve se funciona agora o starter.lua:

local starterpokes = {

["Weedle"] = {x = 1054, y = 1055, z = 10},

["Rattata"] = {x = 1056, y = 1055, z = 10},

["Caterpie"] = {x = 1058, y = 1055, z = 10},

}

local btype = "normal"

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

if getPlayerLevel(cid) > 5 then --alterado v1.3

return true

end

local pokemon = ""

for a, b in pairs (starterpokes) do

if isPosEqualPos(topos, b) then

pokemon = a

end

if pokemon == "" then return true end

if getPlayerStorageValue(cid, 9658754) ~= 1 then --alterado v1.7 -opicional-

sendMsgToPlayer(cid, 27, "Talk to the Prof. Robert to choose your beginner city first!")

return true

end

local gender = getRandomGenderByName(pokemon)

local happy = 250

doPlayerAddItem(cid, 2394, 10)

local item = doCreateItemEx(2219)

doItemSetAttribute(item, "poke", pokemon)

doItemSetAttribute(item, "hp", 1)

doItemSetAttribute(item, "happy", happy)

doItemSetAttribute(item, "gender", gender)

doItemSetAttribute(item, "description", "Contains a "..pokemon..".")

doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")

doItemSetAttribute(item, "unique", getCreatureName(cid)) --alterado v1.6

doPlayerAddItemEx(cid, item, true)

doTransformItem(item, pokeballs[btype].on)

doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")

doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

doSendMagicEffect(getThingPos(cid), 29)

doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))

doSendMagicEffect(getThingPos(cid), 27)

doSendMagicEffect(getThingPos(cid), 29)

return TRUE

end

Chapalirous · Novembro 17, 2012

Não deu agora quando eu vou abrir o Bau não tem nada

pedrowarlock · Novembro 18, 2012

Seria melhor você postar o erro no console.

Stigal · Abril 20, 2018

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.

Entrar

pedido [Encerrado] Goback

Posts Recomendados

Chapalirous 4

Link para o comentário

Compartilhar em outros sites

GuhPk 111

Link para o comentário

Compartilhar em outros sites

Chapalirous 4

Link para o comentário

Compartilhar em outros sites

Covan 0

Link para o comentário

Compartilhar em outros sites

Foquinhaa 55

Link para o comentário

Compartilhar em outros sites

Yan Oliveira 211

Link para o comentário

Compartilhar em outros sites

Chapalirous 4

Link para o comentário

Compartilhar em outros sites

pedrowarlock 15

Link para o comentário

Compartilhar em outros sites

Stigal 584

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

DAT E SPR POKEXGAMES (2020/21/22/23)

[PEDIDO] Bug WarSystem

[TFS 0.4/8.60] NPC que aumenta a velocidade de upar todas as skill no trainer em 40% durante 7 dias!

script [PEDIDO] Como utilizar acentuação em Scripts .lua e .php

ajuda [AJUDA] Mudar 3 coisas na distro

Fóruns

Tutoriais

Suporte