xTibia

.com
MA
erro

Quando um player vai teleporta

Por Maxwillian, 01 de mai. de 2014 em Archived

9
1.4k
MaxwillianM
01 de maio de 2014 às 10:56

Quando algum player vai teleporta aparece a seguinte mensagem

you have to talk with nurse in this place,before you can teleport for there

Bom não sei o que é mais sei o que seja isso seja isso

o meu teleport e /h

tem a lista de cidades e tudo

Places to go :
House
Saffron
Cerulean
Lavender
Fuchsia
Celadon
Viridian
Vermilion
Pewter
Pallet
Cinnabar
Snow
Golden
Bom quem poder ajudar agradeço desde já
VaginalV
01 de maio de 2014 às 11:06

isso o significado :

você tem que falar com a enfermeira neste lugar, antes que você pode se teleportar para lá

homersapiensH
01 de maio de 2014 às 11:11
Tá usando pda? se sim vai em data>talkactions>scripts e substitui seu tele.lua por 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 = "Cerulean", id = 1, sto = 897530},

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

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

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

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

[6] = {name = "Viridian", id = 6, sto = 897535}, --alterado v1.7

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

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

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

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

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

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

[13] = {name = "Butwal", id = 13, sto = 897541},

[14] = {name = "Shamouti", id = 14, sto = 897542},

[15] = {name = "Murcott", id = 15, sto = 897543},

[16] = {name = "Outland North", id = 16, sto = 897544},

[17] = {name = "Outland East", id = 17, sto = 897545},

[19] = {name = "Outland South", id = 18, sto = 897546},

}



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 v1.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 v1.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 v1.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 v1.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 v1.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



com esse script /\ não vai precisar mais disso...

MaxwillianM
01 de maio de 2014 às 11:25

Tipo pra min colocar pra teleporta sem ser premium no caso eu coloco false certo?

homersapiensH
01 de maio de 2014 às 11:38

sim.

MaxwillianM
01 de maio de 2014 às 11:39

Manow ta tudo trocado saffron ta como cerulean e cerulean esta como saffron asim por diante celadon ta como pewter e pewter ta como celadon poderia ajeitar?

homersapiensH
01 de maio de 2014 às 12:15

Manda seu script antes de substituir.

MaxwillianM
01 de maio de 2014 às 12:37
local poke = {"Shiny Mr. Mime", 'Mew', 'Mewtwo', 'Abra', 'Kadabra', 'Alakazam', 'Drowzee', 'Hypno', 'Mr. Mime', 'Porygon', 'Shiny Abra', 'Shiny Alakazam',

'Shiny Hypno', 'Porygon2'} --alterado v1.9


local etele = 9499

local cdtele = 1800


local config = {

premium = false, -- 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 v1.7

[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, Agatha.stoIni) >= 1 and getPlayerStorageValue(cid, Agatha.stoIni) < 50 then --alterado v1.9

doPlayerSendCancel(cid, "You can't do that here!")

return true

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 v1.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 v1.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 v1.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 v1.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 v1.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 v1.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




Não sei por spoiler

homersapiensH
01 de maio de 2014 às 13:49

tenta agora

 

 

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 v1.7
[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 v1.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 v1.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 v1.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 v1.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 v1.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