[talkaction] Teleport Por Comando !by Esker

shadizinho
em Actions e Talkactions

shadizinho

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 24/09/06Posts: 33

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"/>

rockstar96

Around the world
avatar
Barão
Barão

INFOS

Grupo: BarãoRegistrado: 01/07/09Posts: 216
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.

lucasatak

Egoísmo?... Nunca!
avatar
Artesão
Artesão

INFOS

Grupo: ArtesãoRegistrado: 07/05/08Posts: 120

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

 

mais gostei do script.

 

Abraços !

porco.gif

 

 

voltando aos poucos.

 

 

hsb.gif

 

É CAMPEÃO CARIOCA 2010 PORRA !

shadizinho

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 24/09/06Posts: 33

sim

 

é um scritp adaptado

 

juntei ums 3~~4 scripts ae

Last Seeker

Membro
avatar
Artesão
Artesão

INFOS

Grupo: ArtesãoRegistrado: 29/04/09Posts: 136

É 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

Att,
Last Seeker.




Meus Avatares

shadizinho

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 24/09/06Posts: 33
É 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 ¬¬

sauvadur1

Baronete
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 28/12/08Posts: 41Char no Tibia: Gorden Fuel

@shadizinho

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

@Topic

Sistema muito bom, mas da pra dar uma diminuida

Meus Trabalhos:




Metas:
[X]1 Post (Ronaldo)
[x]5 Posts (Servo)
[x]10 Posts (Camponês)
[x]25 Posts (Caçador)
[x]50 Posts (Cavaleiro)
[x]100 Posts (Baronete)
[ ]200 Posts (Barão)
[ ]300 Posts (Visconde)
[ ]400 Posts (Duque)
[ ]600 Posts (Arqueduque)
[ ]800 Posts (Aristocrata)
[ ]1000 Posts (Regente)
[ ]1400 Posts (Sábio)
[ ]1800 Posts (Sacerdote)
[ ]2500 Posts (Príncipe)
[ ]5000 Posts (Rei)



Clique aqui e me up!So 1 segundo da sua vida :)

\Mattheus ~*

Ex Moderador
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 11/02/09Posts: 559Char no Tibia: Deep Druid

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

 

Abraços .

[/ Construçãao .

shadizinho

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 24/09/06Posts: 33

pa quem me pergunto o que é id da vip

 

só para aqueles server que usam vip por storage

Maximos preto

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 15/09/06Posts: 19

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