[Pokemon] Servidor Gabrieltxu e suas Versões

[BrunooMaciell 83]

Outro Bug Como Sempre xD

 

Bug

 

[17/02/2013 00:35:00] [Error - Action Interface]

[17/02/2013 00:35:00] data/actions/scripts/goback.lua:onUse

[17/02/2013 00:35:00] Description:

[17/02/2013 00:35:00] data/lib/catch system.lua:387: attempt to index a boolean value

[17/02/2013 00:35:00] stack traceback:

[17/02/2013 00:35:00] data/lib/catch system.lua:387: in function 'doAddPokemonInOwnList'

[17/02/2013 00:35:01] data/actions/scripts/goback.lua:202: in function <data/actions/scripts/goback.lua:10>

 

 

Script

 

local EFFECTS = {

--[OutfitID] = {Effect}

["Magmar"] = 35,

["Jynx"] = 17, --alterado v2.5

["Shiny Jynx"] = 17,

["Piloswine"] = 205, --alterado v2.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

--alterado v2.6 sistema de firstpoke retirado

if getPlayerStorageValue(cid, 17000) >= 1 or getPlayerStorageValue(cid, 17001) >= 1 or getPlayerStorageValue(cid, 63215) >= 1 then

doPlayerSendTextMessage(cid, 26, "sounds/pokeball.wav")

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

 

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

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

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 --alterado v2.8 \/

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) ~= 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 --alterado v2.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)) --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 = getPokeName(pk) --alterado v2.7

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

doCreatureSay(cid, mgo, TALKTYPE_SAY)

doSendMagicEffect(getCreaturePosition(pk), effect)

 

if useOTClient then

doPlayerSendCancel(cid, '12//,show') --alterado v2.7

end

else

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

end

if useKpdoDlls then

doUpdateMoves(cid)

end

return true

end

 

[TheCaos 7]

Olá! eu compactei tudo num client que da o ip changer, ae eu queria ver se o som funcionava msm, mas n aconteceu nd, o que faço pra ele funcionar, da um exemplo??

 

e achei um bug: eu estava vendo se dava pra sair com poke pra fora, e deu. Depois , quando entrei novamente a pokebola estava como se o poke estivesse morto....

Editado Fevereiro 17, 2013 por TheCaos

[StyloMaldoso 330]

Bruno, como assim o revive não funciona? voce simplismente tenta usa na pokeball e apareçe "Sorry, not possible"?

se for posta a TAG do revive que fica em ACTION.XML aew rçrç.

[DinoAdmin 57]

/\ EU mesmo cometi um grande erro pensei que tinha colocando tudo mais nao coloque o corpos no lib e nem no level table qualquer coisa eu postga aqui como arruma amanha sobre os erros irem ver oq posso fazer(mais fazer oq se tu quer um serve bom faça por tu mesmo:) por isso tme serve bons na net nao somos nos que vmaos fazer tu fica ocm 100+ player em um dia.)

 

Obrigando pro reporta até amanah eu posto aqui como arruma os erros dos lendarios

 

Eu não uso o seu server como base '--'.

eu uso o meu server como base... e posso te garantir não tem bug algum!!!

 

é oque eu falei, se voces colocarão na descrição do server que esta sem erros, que tem pokes ate a 5 geração...

eu acho que precisa realmente ter, se n vira propaganda enganosa.

Tente fazer tudo aquilo que voce falou na descrição que o server possui ou então voce retira.

[BrunooMaciell 83]

Bruno, como assim o revive não funciona? voce simplismente tenta usa na pokeball e apareçe "Sorry, not possible"?

se for posta a TAG do revive que fica em ACTION.XML aew rçrç.

tipo nao aparace nada so que nao vai nao revive o pokemon

 

Mensagem: You Connot use this Obeject

[sirjoao2 0]

'--' Os mesmos erros que tinha antes ainda tem...

 

N tem como criar regice..

não tem como criar rayquaza..

aqueles erros que citei antes todos ainda estão presentes no server.

 

ai voce vem e me fala "esta no client, quer tudo na mão?"

 

Então amigo voce poderia colocar la no conteudo do server

 

"Possui pokemons ate a 5 geração porem só esta no client, pois no server possui varios erros"

 

Fora os erros no distro.

 

Não estou querendo criticar não eu reporto para voce pois quero que voce arrume isso para que seu servidor cresça cada vez mais

fora isso parabens.

/\ EU mesmo cometi um grande erro pensei que tinha colocando tudo mais nao coloque o corpos no lib e nem no level table qualquer coisa eu postga aqui como arruma amanha sobre os erros irem ver oq posso fazer(mais fazer oq se tu quer um serve bom faça por tu mesmo:) por isso tme serve bons na net nao somos nos que vmaos fazer tu fica ocm 100+ player em um dia.)

 

Obrigando pro reporta até amanah eu posto aqui como arruma os erros dos lendarios

Até Quim Fim, Adimitiu que nao Colocou véi, Eu dinha dito isso Logo quando Lançou a 3.1 e os Cara Teimando Comigo véi --'

Tenso sabe..

Tem um Negoço tambem, a Rare Candy ta sem Função, Ajuda?

Editado Fevereiro 17, 2013 por sirjoao2

[BrunooMaciell 83]

Pelo que vi serve cheio de bugs

 

to mi matando aqui com alguns =/

[sirjoao2 0]

Bom, Os dos Lendario ta tranquilo.. Eu sei ageitar e ja ageitei.. Mais so Preciso de algumas coisas.. Ver se consegue arrumar esses bugs que o Bruno Comentou nos Posts de Cima, Porque tbm estou com os mesmos bugs e o do Revive.. e o da Rare candy que ta sem Função..

 

Tem um Negoço do Ditto tbm, ele so se Transforma na 1 Geração.. Como Mudar isso?

 

Bruno, Se conseguir Resolver Alguns, Posta ai como Resolver..

 

Ps: Nao Estou Criticando seu Topico nem seu Server, so Estou Pedindo Ajuda Para Resolver uns Bugs..

Editado Fevereiro 17, 2013 por sirjoao2

[BrunooMaciell 83]

Addons Bugado !!

 

Gabriel sem brinca na moral agora !!

 

Cara seu serve e muito bom tem varias coisas legal sprits systemas e tudo mais que sao bem legal e lokos ^^

 

So que do jeito que ta nao da pra usa esta versao nao e nem a outra cheio de bugs e oque o dino falo ele ta certo sem brincadeira vc fala que no topico ta sem bugo mais quando abaixa e poem on na minha opniao ta ums 80% do serve ate 70% dele tudo bugado =/

 

e serve assim nao da pra por online ve se faz um serve ou um verçao 3.2 com os bugas arrumados assim que ta nao da veio =(

[TheCaos 7]

respond ae pf:

Olá! eu compactei tudo num client que da o ip changer, ae eu queria ver se o som funcionava msm, mas n aconteceu nd, o que faço pra ele funcionar, da um exemplo??

 

e achei um bug: eu estava vendo se dava pra sair com poke pra fora, e deu. Depois , quando entrei novamente a pokebola estava como se o poke estivesse morto....

[guidark21 18]

Galera literalmente seis mexer em alguma cosia revive aqui ta 100%,addons bugando eu so coloquei o o sistema o resto fica por conta sua, erros e erros nunca vi isso acontece aqui ja abri o servidor para uns colegas e nada(aonde seis tiram isso caras ;/), Revive eu vi e funcionou aqui '-, rare candy ´tem quer por use no dat editor e no otitemeditor(todas as versoes do slicer que baixei ta sme use), lendarios ´facil arruma so cola na table so foi uma esquecinda minha qualquer coisa eu coloco aqui como arruma se voces nao consegue,/\ serio mesmo? aqui nao tme como desloga com o poke para fora e nao acontece isso tente rever seu goback no creaturescripts.

 

 

Editando aqui o ditto vai uehue veja a imagem:

Editado Fevereiro 17, 2013 por guidark21

[sirjoao2 0]

Alguem Pode Adc essas Dll no Client que estou Postando Abaixo? Rep+ de Puder ;D

As Dll Estão Junto do Client.. Agradeço de Alguem adicionar pramim e dou Rep+ por 1 semana. (:

 

http://www.mediafire...be497zcjlfbu888

[BrunooMaciell 83]

Gui !!

 

Cara sem quere ofender mais o revive nao ta pegando cara to falando so se seu serve entao for diferente do que postarao ou do gabriel mais se nao fro ele nao ta pegando man !!

 

pq tu nao faz assim uma versao 3.2 sem novas coisas e sim bugs erros corregidos pq tem um que e de pokemons nao sei oque e que postarao arrumado !!

 

Ou Entao Posta Seu serve !!

Editado Fevereiro 17, 2013 por Brunnoo

[guidark21 18]

/\ que por som? so?

 

Editando os bugs que tu falaram nao acontece aqui esse é o problema vou tenta posta aqui o 3.1.1 arrumando o revive e lendarios so vou upload.(lendarios funcionando no cb e nos outros so estao sme catch!)

Editado Fevereiro 17, 2013 por guidark21

[BrunooMaciell 83]

Gui !!

 

Posta Teu serve entao acho que seu serve ta diferente do gabriel !!

 

pq do gabriel ta tudo bugado =/