action

[Action] Magic Teleport'

Por MarcelloMendes, 16 de jul. de 2010 em Actions e Talkactions

otserv

tibia

script

8.1k

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 08:23

Bom galera, vim trazer pra vcs um script criado POR MIM, (é um dos meus primeiros)...

E reparado por Kydrai... ' :thumbsupsmiley:

Ele e um 'Teleport Magico' , que quando usado, irá teleportar o player para sua 'townId' ou para cidade principal, onde vc colocará as cordenadas...

Então Vamos la:

--[[ SCRIPT BY: MarcelloMkez ]]

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

config = {

ptemp ="no",      --[[ Teleportar para ciade principal  "yes ou no". ]]
townp ="yes",      --[[ Teleportar para Cidade onde o player mora,  "yes ou no". ]]
rmvitem ="yes",      --[[ Remover item quando for usado?  "yes ou no". ]]
vip ="no",             --[[ Precisa ser Premium Account para usar o item?  "yes ou no" ]]
batlle ="yes",            --[[ Precisa estar sem Batlle para usar o item? "yes ou no "]] 
possibilidade = 10 ,         --[[ Possibilidade do player ser teleportado em porcentagem. ]] 
princ = {x=100, y=40, z=7},      --[[ Posição da Cidade Principal. ]]
pz ="yes"                  --[[ Precisa estar em Protection Zone para Usar o Magic Teleport? "yes ou no"]]
}

local p = getPlayerTown(cid)
local townpos = getTownTemplePosition(p)
local cityname = getTownName(p)
local chance = math.random(1, 100)  --[[ de 1 a 100 % de chance, Não mude. ]]

local msgp ="~ "..getPlayerName(cid).." Foi Teleportado para Cidade Principal. ~"  
local msgt ="~ "..getPlayerName(cid).." Foi Teleportado para "..cityname..". ~"   
local fail ="'O Teleport Falhou.'" 

if(config.vip =="yes") and not isPremium(cid) then
doPlayerSendCancel(cid, "Você precisa ser Premium Account Para usar o Teleport Magico.")
return 1

elseif (config.batlle == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
doPlayerSendCancel(cid, "Você precisa estar sem o batlle para usar o Teleport Magico.")
return 1

elseif (config.pz =="yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then
doPlayerSendCancel(cid, "Você precisa estar em Protection Zone para usar o Teleport Magico.")
return 1

elseif (config.ptemp =="yes" and config.townp =="yes") then
doPlayerPopupFYI(cid, "'ERROR': Não é Possivel teleportar para duas cidades ao mesmo tempo.")  return 1
--[[ Menssagem quando o player marcar 'yes' para as duas opçoes de teleport. ]]

elseif chance >= 1 and chance <= config.possibilidade then
doCreatureSay(cid, fail, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)
return 1

elseif(config.ptemp == "yes") then
doTeleportThing(cid, config.princ)
doCreatureSay(cid, msgp, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)
return 1

elseif(config.townp == "yes") then
doTeleportThing(cid, townpos)
doCreatureSay(cid, msgt, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)
return 1
end

if(config.rmvitem =="yes") then
doRemoveItem(item.uid, 1)
end

return TRUE


end

Tag: <action itemid="2349" script="teleportmagico.lua"/>

Vermelho: Id do item quer vc quer usar como Teleport Magico.

Bom como ta explicando ali no script...

Qualquer duivida poste e irei ajuda-los...

Muito Obrigado Galera

Espero que gostem!!!

Editado Agosto 25 por MarcelloMkez

guixapBeyond SkyGCavaleiro

info

Grupo: Cavaleiro

Registrado: 30/09/08

Posts: 174

Reputação: +60

Char no Tibia: Knight do Momento

16 de julho de 2010 às 09:44

Muito Bom Mlke...

A melhor Magic Teleport

Já Postada Aki.

Att.: Beyond Sky

comedinhasssComedinhaCHerói Herói

info

Grupo: Herói

Registrado: 08/08/07

Posts: 520

Reputação: +235

Gênero: Masculino

Char no Tibia: Sir Morths

16 de julho de 2010 às 10:49

Esta legal =D várias opções legais...

Rep+

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 10:55

Obrigado Gente :thumbsupsmiley:

vlww mesmoo \o/

VodkartSumus ValidusVHerói Herói

info

Grupo: Herói

Registrado: 20/05/10

Posts: 3.4k

Reputação: +1.5k

Gênero: Masculino

16 de julho de 2010 às 11:26

Parabens pelo script ficou bem foda

e vejo que você tem futuro nessa area

Rep+

abraços

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 12:29

Poxaa vlww mesmo Vodkart..

Brigadoo pelo incentivo.

Abraçãao cara!

Editado Julho 16 por MarcelloMkez

DobolMATHEUSP.COM.BRDBarão Barão

info

Grupo: Barão

Registrado: 18/10/09

Posts: 246

Reputação: +26

Gênero: Masculino

Char no Tibia: Aran Than

16 de julho de 2010 às 13:59

Simplesmente... Perfeito...

Coloque mais uma opção...

Exemplo, "Usado apenas em Protection Zone "yes or no".

Pois eu quero esses itens para vip, e toda area hunt teria tipo um tapete com PZ, sendo que era só eles pisarem e usarem...

Se conseguir eu agradeço, valeu...

-- Fail → Não entendi a parte da possibilidade, se eu colocar 2, o que acontece?

+1 Rep :thumbsupsmiley:

Editado Julho 16 por TheSleeper

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 14:08

--[[ SCRIPT BY: MarcelloMkez ]]

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

config = {

ptemp ="no",      --[[ Teleportar para ciade principal  "yes ou no". ]]
townp ="yes",      --[[ Teleportar para Cidade onde o player mora,  "yes ou no". ]]
rmvitem ="yes",      --[[ Remover item quando for usado?  "yes ou no". ]]
vip ="no",             --[[ Precisa ser Premium Account para usar o item?  "yes ou no" ]]
batlle ="yes",            --[[ Precisa estar sem Batlle para usar o item? "yes ou no "]] 
possibilidade = 1 ,          --[[ Possibilidade do player ser teleportado em porcentagem. ]] 
princ = {x=100, y=40, z=7},      --[[ Posição da Cidade Principal. ]]
pz ="yes"                 --[[ Precisa estar em Protectiopn Zone para ser teleportado? ]]
} 

local p = getPlayerTown(cid)
local townpos = getTownTemplePosition(p)
local cityname = getTownName(p)
local chance = math.random(1, 5)  --[[ de 1 a 5 % de chance, Não mude. ]]

local msgp ="~ "..getPlayerName(cid).." Foi Teleportado para Cidade Principal. ~"  
local msgt ="~ "..getPlayerName(cid).." Foi Teleportado para "..cityname..". ~"   
local fail ="'O Teleport Falhou.'" 

if(config.vip =="yes") and not isPremium(cid) then
doPlayerSendCancel(cid, "Você precisa ser Premium Account Para usar o Teleport Magico.")

elseif (config.batlle == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
doPlayerSendCancel(cid, "Você precisa estar sem o batlle para usar o Teleport Magico.")

elseif (config.ptemp =="yes" and config.townp =="yes") then
doPlayerPopupFYI(cid, "'ERROR', Não é Possivel teleportar para duas cidades ao mesmo tempo.")  --[[ Menssagem quando o player marcar 'yes' para as duas opçoes de teleport. ]]

elseif (config.pz =="yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then
doPlayerSendCancel(cid, "você precisa estar em Protection Zone pra ser Teleportado.")

elseif chance >= 1 and chance <= config.possibilidade then
doCreatureSay(cid, fail, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)


elseif(config.ptemp == "yes") then
doTeleportThing(cid, config.princ)
doCreatureSay(cid, msgp, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

elseif(config.townp == "yes") then
doTeleportThing(cid, townpos)
doCreatureSay(cid, msgt, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

end

if(config.rmvitem =="yes") then
doRemoveItem(item.uid, 1)
end

return TRUE


end

Tenta assim e me fala se funcionou...

Editado Julho 16 por MarcelloMkez

DobolMATHEUSP.COM.BRDBarão Barão

info

Grupo: Barão

Registrado: 18/10/09

Posts: 246

Reputação: +26

Gênero: Masculino

Char no Tibia: Aran Than

16 de julho de 2010 às 15:07

Obrigado, irei testar aqui e edito...

[16/07/2010 15:12:17] [Error - LuaScriptInterface::loadFile] data/actions/scripts/tpscroll.lua:14: '}' expected (to close '{' at line 5) near 'pz'
[16/07/2010 15:12:17] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/tpscroll.lua)

[16/07/2010 15:12:17] data/actions/scripts/tpscroll.lua:14: '}' expected (to close '{' at line 5) near 'pz'

:confused:

Editado Julho 16 por TheSleeper

VodkartSumus ValidusVHerói Herói

info

Grupo: Herói

Registrado: 20/05/10

Posts: 3.4k

Reputação: +1.5k

Gênero: Masculino

16 de julho de 2010 às 15:19

só falto uma virgula rs

--[[ SCRIPT BY: MarcelloMkez ]]

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

config = {

ptemp ="no", --[[ Teleportar para ciade principal "yes ou no". ]]
townp ="yes", --[[ Teleportar para Cidade onde o player mora, "yes ou no". ]]
rmvitem ="yes", --[[ Remover item quando for usado? "yes ou no". ]]
vip ="no", --[[ Precisa ser Premium Account para usar o item? "yes ou no" ]]
batlle ="yes", --[[ Precisa estar sem Batlle para usar o item? "yes ou no "]] 
possibilidade = 1 , --[[ Possibilidade do player ser teleportado em porcentagem. ]] 
princ = {x=100, y=40, z=7}, --[[ Posição da Cidade Principal. ]]
pz ="yes" --[[ Precisa estar em Protectiopn Zone para ser teleportado? ]]
} 

local p = getPlayerTown(cid)
local townpos = getTownTemplePosition(p)
local cityname = getTownName(p)
local chance = math.random(1, 5) --[[ de 1 a 5 % de chance, Não mude. ]]

local msgp ="~ "..getPlayerName(cid).." Foi Teleportado para Cidade Principal. ~" 
local msgt ="~ "..getPlayerName(cid).." Foi Teleportado para "..cityname..". ~" 
local fail ="'O Teleport Falhou.'" 

if(config.vip =="yes") and not isPremium(cid) then
doPlayerSendCancel(cid, "Você precisa ser Premium Account Para usar o Teleport Magico.")

elseif (config.batlle == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
doPlayerSendCancel(cid, "Você precisa estar sem o batlle para usar o Teleport Magico.")

elseif (config.ptemp =="yes" and config.townp =="yes") then
doPlayerPopupFYI(cid, "'ERROR', Não é Possivel teleportar para duas cidades ao mesmo tempo.") --[[ Menssagem quando o player marcar 'yes' para as duas opçoes de teleport. ]]

elseif (config.pz =="yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then
doPlayerSendCancel(cid, "você precisa estar em Protection Zone pra ser Teleportado.")

elseif chance >= 1 and chance <= config.possibilidade then
doCreatureSay(cid, fail, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)


elseif(config.ptemp == "yes") then
doTeleportThing(cid, config.princ)
doCreatureSay(cid, msgp, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

elseif(config.townp == "yes") then
doTeleportThing(cid, townpos)
doCreatureSay(cid, msgt, TALKTYPE_ORANGE_1)
doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

end

if(config.rmvitem =="yes") then
doRemoveItem(item.uid, 1)
end

return TRUE


end

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 17:26

@Vodkart

isso vodkart vlww caraa sdkaokodsakodsads

eu sempre esqueco dessa virgula ;x

abraço

___________________________________________________

@TheSleeper

-- Fail → Não entendi a parte da possibilidade, se eu colocar 2, o que acontece?

possibilidade = 1 ,

possibilidade = a porcentagem, ou seja, o numero de chance que tem do teleport fuincionar, de 1 a 5 % igual ta aki :

local chance = math.random(1, 5) --[[ de 1 a 5 % de chance, Não mude. ]]

Ou seja, o teleport tem Umaa chance de funcionar , de 1 a 5% ...

Editado Julho 16 por MarcelloMkez

Kydrai"Keep Your Mind Wide Open"KVisconde

info

Grupo: Visconde

Registrado: 20/08/06

Posts: 250

Reputação: +146

16 de julho de 2010 às 18:14

Boa, mas aconselho a deixar a possibilidade como estava antes.

A possibilidade em porcentagem e o math.random de 1 a 100.

MarcelloMendesAgain...MCampones

info

Grupo: Campones

Registrado: 09/06/10

Posts: 80

Reputação: +78

Char no Tibia: Dardnyti Elfresso

16 de julho de 2010 às 18:32

Ok Vlw pelo concelho Kydrai

éee noooiis =D

1 mês depois...

MarcelloMendez MCampones

info

Grupo: Campones

Registrado: 27/05/10

Posts: 1

Reputação: 0

Char no Tibia: Lendary

06 de agosto de 2010 às 10:58

Ótimo sistema marcello, ja estou usando ele no meu servidor.

parabéns

REP ++

1 mês depois...

MagonHoster, GameMaster e Um Bom AmigoMCampones

info

Grupo: Campones

Registrado: 21/07/10

Posts: 9

Reputação: +2

Char no Tibia: Magon Arien

11 de setembro de 2010 às 19:29

Correçao pra vc :

--[[ SCRIPT BY: MarcelloMkez ]]

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

config = {

ptemp ="no", --[[ Teleportar para ciade principal "yes ou no". ]]

townp ="yes", --[[ Teleportar para Cidade onde o player mora, "yes ou no". ]]

rmvitem ="yes", --[[ Remover item quando for usado? "yes ou no". ]]

vip ="no", --[[ Precisa ser Premium Account para usar o item? "yes ou no" ]]

batlle ="yes", --[[ Precisa estar sem Batlle para usar o item? "yes ou no "]]

possibilidade = 1 , --[[ Possibilidade do player ser teleportado em porcentagem. Exemplo:1 = Certeza de Teleport! ]]

princ = {x=100, y=40, z=7}, --[[ Posição da Cidade Principal. ]]

pz ="yes" --[[ Precisa estar em Protectiopn Zone para ser teleportado? ]]

}

local p = getPlayerTown(cid)

local townpos = getTownTemplePosition(p)

local cityname = getTownName(p)

local chance = math.random(1, 5) --[[ de 1 a 5 % de chance, Não mude. ]]

local msgp ="~ "..getPlayerName(cid).." Foi Teleportado para Cidade Principal. ~"

local msgt ="~ "..getPlayerName(cid).." Foi Teleportado para "..cityname..". ~"

local fail ="'O Teleport Falhou.'"

if(config.vip =="yes") and not isPremium(cid) then

doPlayerSendCancel(cid, "Você precisa ser Premium Account Para usar o Teleport Magico.")

elseif (config.batlle == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then

doPlayerSendCancel(cid, "Você precisa estar sem o batlle para usar o Teleport Magico.")

elseif (config.ptemp =="yes" and config.townp =="yes") then

doPlayerPopupFYI(cid, "'ERROR', Não é Possivel teleportar para duas cidades ao mesmo tempo.") --[[ Menssagem quando o player marcar 'yes' para as duas opçoes de teleport. ]]

elseif (config.pz =="yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then

doPlayerSendCancel(cid, "você precisa estar em Protection Zone pra ser Teleportado.")

elseif chance >= 1 and chance <= config.possibilidade then

doCreatureSay(cid, fail, TALKTYPE_ORANGE_1)

doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF)

elseif(config.ptemp == "yes") then

doTeleportThing(cid, config.princ)

doCreatureSay(cid, msgp, TALKTYPE_ORANGE_1)

doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

elseif(config.townp == "yes") then

doTeleportThing(cid, townpos)

doCreatureSay(cid, msgt, TALKTYPE_ORANGE_1)

doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED)

end

if(config.rmvitem =="yes") then

doRemoveItem(item.uid, 1)

end

return TRUE

end

Espero ter Ajudado!