SH
talkaction

[talkaction] Teleport Por Comando !by Esker

Por shadizinho, 01 de out. de 2009 em Actions e Talkactions

otserv
tibia
script
10
2.9k
shadizinhoS
01 de outubro de 2009 às 14:02

ja um um topico sobre esse asunto

http://www.xtibia.com/forum/TalkAction-Tel...do-t121048.html

 

mas o meu script (adaptado)tem varias funçoes

 

pks podem ou n usar

se quiser nessesita estar em local de pz

se estiver em battle n pode usar

apenas vip podem usar (caso seu ot n tiver vip vo colocar para qualq um usar)

 

vamos ao script (com vip sistem)

 

data/talkactions/scripts

copie e cole um arquivo qualquer e renomeio para templo.lua

cole isso dentro

 

function onSay(cid, words, param)

config = {

pid=getPlayerGUID(cid), -- não mecha

skull="no", -- players com white skull podem teleportar? ("yes" or "no").

redskull="no", -- players com red skull podemr teleportar? ("yes" or "no").

prot="no", -- players precisam estar em protection zone pra teleportar? ("yes" or "no").

bat="yes" --players precisam estar sem fight pra teleportar? ("yes" or "no").

}

 

 

if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then

doPlayerSendTextMessage(cid,22,"apenas players sem white skull usar este comando.")

return TRUE

end

 

if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then

doPlayerSendTextMessage(cid,22,"apenas player sem red skull podem usar este comando.")

return TRUE

end

 

if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then

doPlayerSendTextMessage(cid,22,"você precisa estar em protection zone pra poder usar este comando.")

return TRUE

end

 

if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then

doPlayerSendTextMessage(cid,22,"você precisa estar sem battler pra poder usar este comando.")

return TRUE

end

 

timenow = os.time()

quantity = math.floor((getPlayerStorageValue(cid,13540) - timenow)/(3600*24))

if isPlayer(cid) then

if quantity > 0 then

createConditionObject(CONDITION_INFIGHT)

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você ainda tem ".. quantity .." dia(s) restante(s) de VIP.")

doTeleportThing(cid, {x=160, y=51, z=7})

else

dir = getPlayerLookDir(cid)

pos = getCreaturePosition(cid)

 

 

if dir == 0 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 2 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 1 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 3 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

end

 

doTeleportThing(cid, newpos, dir)

doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Somente jogadores VIPs podem usar este comando.")

end

end

end

 

em vermelho vc pode mudas pa yes or no

em roxo vc muda para o id da vip (caso o ot n tenho vip sistem eu vo postar logo abaixo)

em azul vc muda para aonde o player sera teleportado

 

em talkactions.xml

<talkaction words="/teleportar" event="script" value="templo.lua"/>

 

agora o mesmo script so q sem o negocio da vip (qualquer player podera usar)

function onSay(cid, words, param)

config = {

pid=getPlayerGUID(cid), -- não mecha

skull="no", -- players com white skull podem teleportar? ("yes" or "no").

redskull="no", -- players com red skull podem teleportar ("yes" or "no").

prot="no", -- players precisam estar em protection zone pra teleportar ("yes" or "no").

bat="yes" --players precisam estar sem fight pra teleportar ("yes" or "no").

}

 

 

if(config.skull == "no") and (getCreatureSkullType(cid) == 3) then

doPlayerSendTextMessage(cid,22,"apenas players sem white skull usar este comando.")

return TRUE

end

 

if(config.redskull == "no") and (getCreatureSkullType(cid) == 4) then

doPlayerSendTextMessage(cid,22,"apenas player sem red skull podem usar este comando.")

return TRUE

end

 

if(config.prot == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then

doPlayerSendTextMessage(cid,22,"você precisa estar em protection zone pra poder usar este comando.")

return TRUE

end

 

if(config.bat == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then

doPlayerSendTextMessage(cid,22,"você precisa estar sem battler pra poder usar este comando.")

return TRUE

end

 

doTeleportThing(cid, {x=160, y=51, z=7})

end

em azul vc muda po lugar de teleport

 

em talkactions.xml

<talkaction words="/tp" event="script" value="templo.lua"/>

Editado Outubro 1 por shadizinho

rockstar96R
01 de outubro de 2009 às 14:10
if dir == 0 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 2 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 1 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

elseif dir == 3 then

newpos = {x=pos.x, y=pos.y, z=pos.z}

end

pid=getPlayerGUID(cid), -- não mecha

 

Cara que linha inútil

Você pegou a table config do Marcryzius? Ele que colocava protection zone como prot ._.

 

 

Script legal apesar de poder ser reduzido um monte.

Editado Outubro 1 por iRockStar

lucasatakL
01 de outubro de 2009 às 14:13

Script bom , apesar que ele pode ser reduzido como disse o IRockStar , nao intendo muito disso ainda.

 

mais gostei do script.

 

Abraços !

shadizinhoS
01 de outubro de 2009 às 14:14

sim

 

é um scritp adaptado

 

juntei ums 3~~4 scripts ae

Last SeekerL
06 de outubro de 2009 às 18:38

É um script bom, mas que nem disseram, ele pode ser diminuído.

E uma coisa, aquilo ali pra mim ta mais pra roza do que pra roxo.

em vermelho vc pode mudas pa yes or no

em roxo vc muda para o id da vip (caso o ot n tenho vip sistem eu vo postar logo abaixo)em azul vc muda para aonde o player sera teleportado

shadizinhoS
07 de outubro de 2009 às 14:49
É um script bom, mas que nem disseram, ele pode ser diminuído.

E uma coisa, aquilo ali pra mim ta mais pra roza do que pra roxo.

 

 

 

eu so daotinoco ¬¬

2 semanas depois...
sauvadur1S
14 de outubro de 2009 às 21:41

@shadizinho

Daotonico, e cego, voce escreveu daotinoco, nao daotonico.

@Topic

Sistema muito bom, mas da pra dar uma diminuida

\Mattheus ~*\
14 de outubro de 2009 às 21:56

Poderia explicar outras funções não apénas as básicas .

 

Abraços .

2 meses depois...
shadizinhoS
03 de dezembro de 2009 às 18:25

pa quem me pergunto o que é id da vip

 

só para aqueles server que usam vip por storage

07 de dezembro de 2009 às 22:46

pow vlw pelo script ja estou usando no meu server :D