Ai mais tipo quando eu sei que veiu mais quando eu tento abriri fala que no meu pc ta faltano warsbar.dll no seu computador eai oq ue eu faço ???
- Fórum
- xTibia - Notícias e Suporte
- Soluções
- Archived
- [Pokemon] Servidor Gabrieltxu e suas Versões
[Pokemon] Servidor Gabrieltxu e suas Versões
Por Gabrieltxu, 03 de jan. de 2013 em Archived
info
Grupo: Campones
Registrado: 23/06/12
Posts: 55
Reputação: +3
Char no Tibia: Zeth Aqua

info
Grupo: Campones
Registrado: 01/02/13
Posts: 57
Reputação: 0
Char no Tibia: No Tengo

Editado Fevereiro 18 por sirjoao2
aonde poderia conseguir uma imagem do mapa do server 3.1.1??
info
Grupo: Campones
Registrado: 22/08/12
Posts: 95
Reputação: +18
Char no Tibia: NoNick

Sobre o serve sem level eu vou fazer sim até final de semana ta down aqui, soobre o cleinte so pegua o pokemon nibe do slicer eu que esqueci umas dlls euheue, no fly me passa que eu coloco o vip e o teleport me passa que eu arrumo tambem ;s
ja arumei fly teleport pro vip. problema é que quando pego um pokemon com teleport eu coloco /h teleport <nome da cidade> ai aparece uma mensagem
pra falar com nurse joy. ai do hi nela e tento novamente , e nao teleporta
info
Grupo: Campones
Registrado: 22/08/12
Posts: 95
Reputação: +18
Char no Tibia: NoNick

Tente pega um de versao anterior sem que tem que falar com a nurse, ou me passe seu teleport por aqui.
Editado Fevereiro 18 por guidark21
char deu debug não entra mais so fica carregado e da isso no dst
[18/02/2013 23:31:08] [Error - CreatureScript Interface]
[18/02/2013 23:31:08] data/creaturescripts/scripts/login.lua:onLogin
[18/02/2013 23:31:08] Description:
[18/02/2013 23:31:08] data/lib/cooldown bar.lua:42: attempt to compare number with nil
[18/02/2013 23:31:08] stack traceback:
[18/02/2013 23:31:08] data/lib/cooldown bar.lua:42: in function 'doUpdatePokemonsBar'
[18/02/2013 23:31:08] data/creaturescripts/scripts/login.lua:214: in function <data/creaturescripts/scripts/login.lua:8>
[18/02/2013 23:31:08] Rexinho has logged out.
[18/02/2013 23:31:08] [Error - CreatureScript Interface]
[18/02/2013 23:31:08] In a timer event called from:
[18/02/2013 23:31:08] data/creaturescripts/scripts/login.lua:onLogin
[18/02/2013 23:31:08] Description:
[18/02/2013 23:31:08] (luaGetPlayerSlotItem) Player not found
ja peguei mas nao deu tbm. esse teleport e que ta na pasta do movements
function onStepOut(cid, item, position, fromPosition)
if #getCreatureSummons(cid) >= 1 then
doTeleportThing(getCreatureSummons(cid)[1], getThingPos(cid))
doSendMagicEffect(getThingPos(cid), 21)
end
end
function onStepIn(cid, item, fromPosition, item2, topos)
for x=-1,1 do
for y=-1,1 do
posa = {x=topos.x+x,y=topos.y+y,z=topos.z}
if getTileThingByPos(posa).itemid == 460 then
doRemoveItem(getTileThingByPos(posa).uid, 1)
end
end
end
end
info
Grupo: Campones
Registrado: 22/08/12
Posts: 95
Reputação: +18
Char no Tibia: NoNick

Pior que nao é na pasta movements... va na pasta talk/scripts/tele e me passe esse.
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 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
info
Grupo: Campones
Registrado: 22/08/12
Posts: 95
Reputação: +18
Char no Tibia: NoNick

/\ colocava em spoiler mais blz ,
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
Testa ai
ae cara funciono valeu , só q cada teleport que eu do tem que espera 30 minutos pra usar teleport dnv, se pode me falar em qual linha eu mudo isso?
info
Grupo: Infante
Registrado: 27/08/11
Posts: 1.9k
Reputação: +85
Gênero: Masculino
Char no Tibia: Bruno Maciel

Quando vc for posta o serve sem level faz igual slicer posta so as script em vez do serve todo ^^Sobre o serve sem level eu vou fazer sim até final de semana ta down aqui, soobre o cleinte so pegua o pokemon nibe do slicer eu que esqueci umas dlls euheue, no fly me passa que eu coloco o vip e o teleport me passa que eu arrumo tambem ;s
Creio que as proximas atualizaçao assim ficaria melhor ^^
info
Grupo: Herói
Registrado: 12/06/12
Posts: 2.2k
Reputação: +739
Gênero: Masculino
Char no Tibia: Supreme Player

Sim Bruno vou ver isso com o Gui aki no msn eq ele é o Scripter ele que sabe eu sou tudo menos o Scripter que eu queria ser mais okay Sei fazer muitas coisas e vamos ver se arrumamos mais na Proxima versão com DP Com Senha que eu tenho Aki e Look System nas Pokebolas e Loot que eu tenho Aki xD





info
Grupo: Campones
Registrado: 18/02/13
Posts: 64
Reputação: 0
Char no Tibia: noa
blz eu to usando pokemon q da teleport mas ele manda fala ca nurse primeiro.. outra duvida eu queria deixar fly e teleport para vip. ai baxei serve 2.9 e copiei os arquivo fly e teleport da pasta movements so que nao deu certo tem que copia mas alguma pasta tbm ?