[hot³]npc Teleporter

leofera23
em NPCs, monsters e raids

leofera23

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 14/04/08Posts: 16Char no Tibia: leofera23

Fla gente! ta tudo maisoumenos? :smile_positivo:

 

Bem...vamos ao oq interessa...o NPC Teleporter

Vai ate\data\npc

copie um qualqer e cole...

abra o copiado...delete tudo que tem dentro, renomeie para Teleporter e cole isso:

 

<?xml version="1.0"?>

 

<npc name="Teleporter" script="data/npc/scripts/Teleporter.lua" access="3" lookdir="1" autowalk="200" speed="50">

<health now="1" max="1"/>

<look type="128" head="86" body="99" legs="22" feet="91" addon="1" know="1"/>

</npc>

 

Pronto!

Agora dentro de scripts novamente copie e cole qualquer 1 e renomeie para Teleporter...apague tudo que tem dentro e poe:

 

-- NPC Teleporter

-- By Léo

 

local focus = 0

local talk_start = 0

local target = 0

local following = false

local attacking = false

 

function onThingMove(creature, thing, oldpos, oldstackpos)

 

end

 

 

function onCreatureAppear(creature)

 

end

 

 

function onCreatureDisappear(cid, pos)

if focus == cid then

selfSay('Tchau.')

focus = 0

talk_start = 0

end

end

 

 

function onCreatureTurn(creature)

 

end

 

 

function msgcontains(txt, str)

return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))

end

 

 

function onCreatureSay(cid, type, msg)

local msg = string.lower(msg)

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) < 4 then

selfSay('Olá ' .. creatureGetName(cid) .. '! Eu posso te levar até o NPC de "premium", o de "runas", o de "flexas", o "comprador" ou os "outros".')

focus = cid

talk_start = os.clock()

 

elseif msgcontains(msg, 'hi') and focus ~= cid and getDistanceToCreature(cid) < 4 then

selfSay('Calma ai, ' .. creatureGetName(cid) .. '! Jaja falo com você.')

 

elseif focus == cid then

talk_start = os.clock()

 

if msgcontains(msg, 'runas') then

selfSay('Então vamos!')

travel(cid, x, y, z)

focus = 0

talk_start = 0

 

elseif msgcontains(msg, 'premium') then

selfSay('Então vamos!')

travel(cid, x, y, z)

focus = 0

talk_start = 0

 

elseif msgcontains(msg, 'outros') then

selfSay('então vamos!')

travel(cid, x, y, z )

focus = 0

talk_start = 0

 

elseif msgcontains(msg, 'flechas') then

selfSay('então vamos!')

travel(cid, x, y, z)

focus = 0

talk_start = 0

 

elseif msgcontains(msg, 'comprador') then --caso queira continuar somente copie e cole esse ultimo comando

selfSay('então vamos!')

travel(cid, x, y, z)

focus = 0

talk_start = 0

 

elseif string.find(msg, '(%a*)bye(%a*)') and getDistanceToCreature(cid) < 4 then

selfSay('Tchau, ' .. creatureGetName(cid) .. '!')

focus = 0

talk_start = 0

end

end

end

 

function onCreatureChangeOutfit(creature)

 

end

 

 

function onThink()

if (os.clock() - talk_start) > 30 then

if focus > 0 then

selfSay('Proximo...')

end

focus = 0

end

if focus ~= 0 then

if getDistanceToCreature(focus) > 5 then

selfSay('Tchau.')

focus = 0

end

end

end

 

Pronto! seu NPC Teleporter está pronto!

NPC by Léo

VLw! espero ter ajudado!

 

Sou:

100%--Scripter

50%--mapper

 

trabalhos:

furiavr

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 27/04/08Posts: 156Char no Tibia: Retired!

Poo responsa mano, parebéns ai!

Johnnn

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/10/07Posts: 70

muito bom

_______
Johnnn

Mazer

.:: Designer ::.
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 03/10/07Posts: 95

Muito Bom, estou usando ele em meu servidor !

Atenciosamente,
Mazer



Crie, poste e comente: Blogs Xtibia!

Nunca nenhum outro portal de tibia e otserv
ofereceu um sistema gratuito desses para você usuário.

Imtheman

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 07/11/07Posts: 27Char no Tibia: xxx

Bom demais pros noob que não conheçem nada ;]

 

1178fd15474734b67bf7a8f9434375fc0.1.gif

 

1bd6f93656b7b4ff387432c694b8ea8c3.1.gif

 

1817ff5be6f3f45b58e60302e7ba40113.1.gif

SooXMan

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 03/05/08Posts: 8Char no Tibia: Knighter'of lost

Boaa mann..

Tava procurandoo issooww...

Brigadaoo msm..

Os lek enxe mtu o sacow perguntando..

 

Abraço



É meu fan? Te ajudei? Use:


~>[X]<~

gustavocordeiro

Sei Lah
avatar
Artesão
Artesão

INFOS

Grupo: ArtesãoRegistrado: 24/09/07Posts: 103Char no Tibia: Kirack Tyril

Que Rox o Npc vai ajudar mta gente :smile_positivo:



OoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOo

~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º

Se eu lutar, lute ao meu lado
Se eu morrer, morra junto a mim
Se eu correr, corra que fudeu tudo...

~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º ~º

OoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOoOo





~>ExORi OT SeRv =D

gto222

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 23/05/08Posts: 68

muito bom veio



Wufer Outfit

me use na sua fake[/img]

Metas
[X]1....Post....SERVO............
[X]10...Posts...CAMPONÊS.....
[X]25...Posts...CAÇADOR......
[X]50...Posts...CAVALEIRO....
[_]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.....


-------------------------------------------------------------------------

te ajudei???gosta de mim??? use minha fanbar


Sou Fan


Users

djludio

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 21/02/08Posts: 20Char no Tibia: Misterious'Palladin

Aprovadíssimo

 

Concerteza vai ajudar muitas pessoas.

Meu primeiro Banner aqui no XTibia ~



._.

Te ajudei? Gostou de mim? Coloque minha FanBar. :)



Enquanto isso em Jamera...

20:29 Nathas Rhyn [8]: BUY DUARVWEN SHIELD