[Pokemon] Servidor Gabrieltxu e suas Versões

[lSainty 81]

 

 

um player morreu e fikou assim, essa fumacinha azul, pq aconteceu isso?

 

-EDIT-

alguem sabe algum script pra upar fishing mais rapido? dps do 15 praticamente trava o fishing ><

 

@All

 

só no meu ot q quando por exemplo um Charmander chega ao level 16 ele não evolui? ! e pq quando o player usa um move q o poke nao tem aparece o move como uma msg enviada pelo player ou inves de por exemplo Your Pokémon don't reconize this move.

 

 

 

me ajudem ai sobre isso =/

Editado Fevereiro 22, 2013 por ElderZard

[JoaoVitor333 0]

me passa o link so do cliete pf ?

[GodSnow 3]

Gabriel na hora que vou abri o cliente ele nao abre disendo que falta a " warsbar.dll " Teria como vc disponibilisar esta dll para download pois nao acho ela para baixar

 

Boa Noite.

[Gabrieltxu 737]

Amigo baixe a DLL do 3.1 não da 3.1.1 mais tipo só pega a DLL

[lSainty 81]

 

 

um player morreu e fikou assim, essa fumacinha azul, pq aconteceu isso?

 

-EDIT-

alguem sabe algum script pra upar fishing mais rapido? dps do 15 praticamente trava o fishing ><

 

@All

 

só no meu ot q quando por exemplo um Charmander chega ao level 16 ele não evolui? ! e pq quando o player usa um move q o poke nao tem aparece o move como uma msg enviada pelo player ou inves de por exemplo Your Pokémon don't reconize this move.

 

 

 

me ajudem ai sobre isso =/²

[BrunooMaciell 83]

 

 

um player morreu e fikou assim, essa fumacinha azul, pq aconteceu isso?

 

-EDIT-

alguem sabe algum script pra upar fishing mais rapido? dps do 15 praticamente trava o fishing ><

 

@All

 

só no meu ot q quando por exemplo um Charmander chega ao level 16 ele não evolui? ! e pq quando o player usa um move q o poke nao tem aparece o move como uma msg enviada pelo player ou inves de por exemplo Your Pokémon don't reconize this move.

 

 

 

me ajudem ai sobre isso =/²

Cara na moral para de flooda --'

[Wilamy 7]

Muito bom o server parabens!

Vc nao pretende colocar inco system?

[sirjoao2 0]

@Gabrieltxu, eu queria saber se voce vai colocar esse sistema de senha do dp..

Editado Fevereiro 23, 2013 por sirjoao2

[Gabrieltxu 737]

Sim vo Colocar Sim o Senha com DP E talves Sim o Look System mais o Icon System acho que não Pk demora Muito e Não temos todas as Sprites de Icons para o Poketibia!!!

 

 

@OFF

 

Estou criando um Outro Servidor Com Sources Esta ficando 100%

Server Unico Que eu Estou fazendo não é base PDA Nem Centurion nem Erondino etc... é Base Unica e esse Promete muitas coisas!

[sirjoao2 0]

Já coloquei o sistema de senha no locker.. Tentei editar meu Teleport para nao falar com a nurse, e está dando isso no distro :

 

 

[23/02/2013 09:56:08] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

[23/02/2013 09:56:08] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/tele.lua)

[23/02/2013 09:56:08] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

[23/02/2013 09:56:08] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

[23/02/2013 09:56:08] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/tele.lua)

[23/02/2013 09:56:08] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

[23/02/2013 09:56:08] [Error - LuaScriptInterface::loadFile] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

[23/02/2013 09:56:08] [Warning - Event::loadScript] Cannot load script (data/talkactions/scripts/tele.lua)

[23/02/2013 09:56:08] data/talkactions/scripts/tele.lua:158: '<eof>' expected near 'end'

 

 

 

Ta ai o Script:

 

 

local poke = {'Abra', 'Kadabra', 'Alakazam', 'Drowzee', 'Hypno', 'Mr. Mime', 'Porygon', 'Porygon2', "Shiny Abra",

"Shiny Alakazam", "Shiny Hypno"}

local etele = 9499

local cdtele = 1800

 

local config = {

premium = true, -- se precisa ser premium account (true or false)

battle = true -- se precisa estar sem battle (true). Se colocar false, poderá usar teleport no meio de batalhas

}

 

local places = {

[1] = {name = "Saffron", id = 1, sto = 897530},

[2] = {name = "Cerulean", id = 2, sto = 897531},

[3] = {name = "Lavender", id = 3, sto = 897532},

[4] = {name = "Fuchsia", id = 4, sto = 897533},

[5] = {name = "Celadon", id = 5, sto = 897534},

[6] = {name = "Viridian", id = 6, sto = 897535}, --alterado v2.7 sistema q precisa flar com a nurse do lugar pra poder da TP pra la...

[7] = {name = "Vermilion", id = 7, sto = 897536},

[8] = {name = "Pewter", id = 8, sto = 897537},

[9] = {name = "Pallet", id = 9},

[10] = {name = "Cinnabar", id = 10, sto = 897538},

[11] = {name = "Snow", id = 11, sto = 897539},

[12] = {name = "Golden", id = 14, sto = 897540},

}

 

function onSay(cid, words, param)

 

if #getCreatureSummons(cid) == 0 then

doPlayerSendCancel(cid, "You need a pokemon to use teleport.")

return true

end

 

if not isInArray(poke, getCreatureName(getCreatureSummons(cid)[1])) then

return 0

end

 

if getPlayerStorageValue(cid, 22545) == 1 then --golden arena

doPlayerSendCancel(cid, "You can't do that while the golden arena!")

return true

end

 

if getPlayerStorageValue(cid, 212124) >= 1 then --alterado v2.6

return doPlayerSendCancel(cid, "You can't do it with a pokemon with mind controlled!")

end

 

if getPlayerStorageValue(cid, 52480) >= 1 then

return doPlayerSendCancel(cid, "You can't do it while a duel!") --alterado v2.6

end

 

if getPlayerStorageValue(cid, 6598754) == 1 or getPlayerStorageValue(cid, 6598755) == 1 then

return doPlayerSendCancel(cid, "You can't do it while in the PVP Zone!") --alterado v2.7

end

 

if exhaustion.get(cid, etele) and exhaustion.get(cid, etele) > 0 then

local tempo = tonumber(exhaustion.get(cid, etele)) or 0

local min = math.floor(tempo)

doPlayerSendCancel(cid, "Your pokemon is tired, wait "..getStringmytempo(tempo).." to teleport again.")

return true

end

 

if config.premium and not isPremium(cid) then

doPlayerSendCancel(cid, "Only premium members are allowed to use teleport.")

return true

end

 

if config.battle and getCreatureCondition(cid, CONDITION_INFIGHT) then

doPlayerSendCancel(cid, "Your pokemon can't concentrate during battles.")

return true

end

 

if (param == '') then

local str = ""

str = str .. "Places to go :\n\nHouse\n"

for a = 1, #places do

str = str..""..places[a].name.."\n"

end

doShowTextDialog(cid, 7416, str)

return true

end

 

local item = getPlayerSlotItem(cid, 8)

local nome = getPokeballName(item.uid)

local summon = getCreatureSummons(cid)[1]

local lastppos = getThingPos(cid)

local lastspos = getThingPos(summon)

local telepos = {}

local myplace = ""

local townid = 0

local citySto = 0 --alterado v2.7

 

if string.lower(param) == "house" then

 

if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

return true

end

 

telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

myplace = "our home"

 

else

 

for x = 1, #places do

if string.find(string.lower(places[x].name), string.lower(param)) then

townid = places[x].id

myplace = places[x].name

citySto = places[x].sto or -1 --alterado v2.7

end

end

 

if myplace == "" then

doPlayerSendCancel(cid, "That place doesn't exist.")

return true

end

 

end

 

if myplace ~= "" and townid > 0 then

telepos = getTownTemplePosition(townid)

end

 

if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

doPlayerSendCancel(cid, "You are too near to the place you want to go!")

return true

end

 

doSendMagicEffect(getThingPos(summon), 29)

doSendMagicEffect(getThingPos(cid), 29)

 

doTeleportThing(cid, telepos, false)

 

local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

 

doTeleportThing(summon, pos2, false)

 

doSendMagicEffect(getThingPos(cid), 29)

 

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

 

doCreatureSetLookDir(cid, SOUTH)

doCreatureSetLookDir(summon, SOUTH)

 

doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

exhaustion.set(cid, etele, cdtele)

 

return true

end

 

str = str .. "Places to go :\n\nHouse\n"

for a = 1, #places do

str = str..""..places[a].name.."\n"

end

doShowTextDialog(cid, 7416, str)

return true

end

 

local item = getPlayerSlotItem(cid, 8)

local nome = getPokeballName(item.uid)

local summon = getCreatureSummons(cid)[1]

local lastppos = getThingPos(cid)

local lastspos = getThingPos(summon)

local telepos = {}

local myplace = ""

local townid = 0

local citySto = 0 --alterado v2.7

 

if string.lower(param) == "house" then

 

if not getHouseByPlayerGUID(getPlayerGUID(cid)) then

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You don't own a house.")

return true

end

 

telepos = getHouseEntry(getHouseByPlayerGUID(getPlayerGUID(cid)))

myplace = "our home"

 

else

 

for x = 1, #places do

if string.find(string.lower(places[x].name), string.lower(param)) then

townid = places[x].id

myplace = places[x].name

citySto = places[x].sto or -1 --alterado v2.7

end

end

 

if myplace == "" then

doPlayerSendCancel(cid, "That place doesn't exist.")

return true

end

 

end

 

if myplace ~= "" and townid > 0 then

telepos = getTownTemplePosition(townid)

end

 

if string.lower(param) ~= "house" and citySto ~= -1 and getPlayerStorageValue(cid, citySto) <= -1 then --alterado v2.7

doPlayerSendCancel(cid, "You have to talk with nurse in this place, before you can teleport for there!")

return true

end

 

if getDistanceBetween(getThingPos(cid), telepos) <= 15 then

doPlayerSendCancel(cid, "You are too near to the place you want to go!")

return true

end

 

doSendMagicEffect(getThingPos(summon), 29)

doSendMagicEffect(getThingPos(cid), 29)

 

doTeleportThing(cid, telepos, false)

 

local pos2 = getClosestFreeTile(cid, getPosByDir(getThingPos(cid), SOUTH))

 

doTeleportThing(summon, pos2, false)

 

doSendMagicEffect(getThingPos(cid), 29)

 

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1)

doCreatureSay(cid, ""..nome..", teleport to "..myplace.."!", 1, false, 0, lastppos)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER)

doCreatureSay(summon, "TELEPORT!", TALKTYPE_MONSTER, false, 0, lastspos)

 

doCreatureSetLookDir(cid, SOUTH)

doCreatureSetLookDir(summon, SOUTH)

 

doSendMagicEffect(getThingPos(summon), CONST_ME_TELEPORT)

exhaustion.set(cid, etele, cdtele)

 

return true

end

 

 

 

Se Puder Ajudar, Agradeço!!

 

Se puder Sugerir algumas coisas para eu colocar no server.. Tbm Agradeço ^^

[guidark21 18]

/\ tu colocou teleprot pra house no mesmo scrip do teleport normal pq tem que ser outro teleport esse é oerro

[sirjoao2 0]

pode postar um que corrija?

[josegremista 2]

Sim vo Colocar Sim o Senha com DP E talves Sim o Look System mais o Icon System acho que não Pk demora Muito e Não temos todas as Sprites de Icons para o Poketibia!!!

 

 

@OFF

 

Estou criando um Outro Servidor Com Sources Esta ficando 100%

Server Unico Que eu Estou fazendo não é base PDA Nem Centurion nem Erondino etc... é Base Unica e esse Promete muitas coisas!

Ae Stylo eu disponibilizeu para download todos os icones da 1° a 2°Geração em idc ta no topico do servidor do smix o pokeXtreme o novo. vê na penultima pagina que tu os links para download

[luangomess 0]

Sis Poedem Me ajudar qnd eu mato o shiny rayquaza ele vira uma placa de food , o zorua a ball n vai , fikaria mt grato.....

[franzinho 0]

ei no servidor tem um evento de loteria de 3 em 3hrs, onde eu edito ele?