vlw aew amigo...gostei dos scripts...bem legal
vo faze uma quest dessas no meu ot
abraços
Por mrsliim, 02 de jul. de 2008 em NPCs, monsters e raids
info
Grupo: Campones
Registrado: 03/04/08
Posts: 39
Reputação: 0
Char no Tibia: Aevi Lavok (grimera)

vlw aew amigo...gostei dos scripts...bem legal
vo faze uma quest dessas no meu ot
abraços
Editado Julho 2 por CaioLimarj
Legal seu script, muito massa, o único problema é que o npc fala inglês.
Ta ai o traduzido:
local focus = 0
local talk_start = 0
local target = 0
local following = false
local attacking = false
local itemid = 5000 -- Item ID que o NPC vai querer
local itemtype = 1 -- Quantidade de quantos items NPC vai querer
local itemname = 'Nome do ITEM ID que o NPC vai querer' -- Não tire as aspas simples
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Tchau 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)
msg = string.lower(msg)
if (msgcontains(msg, 'hi') and focus == 0) and getDistanceToCreature(cid) < 4 then
selfSay('Olá ' .. creatureGetName(cid) .. '! Eu Vendo VIPs for '.. itemtype ..' '.. itemname ..'.')
focus = cid
talk_start = os.clock()
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Descupe, ' .. creatureGetName(cid) .. '! Por favor espere um minuto .')
elseif focus == cid then
talk_start = os.clock()
if msgcontains(msg, 'vip') then
vip = getPlayerStorageValue(cid,13540)
if vip == -1 then
if doPlayerRemoveItem(cid,itemid,itemtype) then
setPlayerStorageValue(cid, 13540, 1)
selfSay('Obrigado por ter comprar vip.')
else
selfSay('Desculpe, mas você tem que trazer o item.')
end
else
selfSay('Você já é um jogador vip.')
end
elseif msgcontains(msg, 'bye') 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('Próximo, por favor...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) > 5 then
selfSay('Tchau, tchau..')
focus = 0
end
end
end
info
Grupo: Marquês
Registrado: 01/03/06
Posts: 1k
Reputação: +38
Gênero: Masculino

Ficou boa sua quest, obrigado por colocar os créditos ![]()
info
Grupo: Artesão
Registrado: 03/05/08
Posts: 102
Reputação: 0
Char no Tibia: Nenhum

Acho que os npc não podem ter acentuação em suas falas.
info
Grupo: Campones
Registrado: 06/08/07
Posts: 43
Reputação: 0
Char no Tibia: Nao jogo mais
ATUALIZAÇAO, CLIQUE NO SPOIL PARA VER O ANTIGO!
SE FOR COPIAR PARA OUTRO SITE, FAVOR AVISAR
Esse npc so funciona para quem tem o VIP System feito pelo Noobinhu (clique aqui para ver topico), ele so troca a vip por um certo "Diploma" ou outro item a sua escolha.
A minha ideia seria a seguinte:
uma quest onde ganha um certo item que pode ser trocado por VIP.
aqui esta os passos para fazer a quest e colocar o NPC em seu OTserver:
1º Passo:
abra a pasta data\npc copie qualquer arquivo renomeie para Npc VIP e coloque o seguinte conteudo, substituindo tudo o que tem la...
2º Passo:
abra a pasta data\npc\scripts e repita o mesmo processo do passo anterior, renomeando para vipI e colocando o seguinte Code:
Obs: Modificar Parte em azul
3º Passo: Fazendo sua quest
Abra a pasta: data\actions\scripts localise o arquivo chest se nessesario, coloque abrir com bloco de notas
insira esse code la dentro (pode ser no começo)
Legenda:
Vermelho: ID Que vc colocara no Chest em seu map editor.
Laranja: Mensagem que o player vera quando abrir o bau.
Azul: ID do item que o player Ganhará.
4º Passo:
Abra seu map editor, escolha o local onde sera feita sua quest, ou coloque seu Chest em uma quest ja pronta, como POI Anihillator...
depois de pronta a quest, voce deverá colocar uma bau (chest) no final, indo em propriedades conforme a ScreenShot:
se quiser ainda, pode adicionar seu npc no mapa, fazendo o seguinte:
4.1º Passo (adicionando npc no map)
Abra a pasta de seu map editor, localise o arquivo "Creatures" aperte ctrl+f e digite NPC
assim que localizar, cole logo acima o seguinte:
Salve e Feche.
Pronto, npc adicionado.
agora basta selecionar o local onde ele ficará.
5º passo, salve tudo e feche, agora é so reiniciar o seu Server.
Em caso de duvidas, me mande PM.
Creditos
60% Noobinhu -- Fez os Scripts
40% Sliim -- Fez o Topico, e o pedido dos scripts.
ATUALIZAÇAO!
agora nao precisa do NPC!
1º passo:
Abra data/actions/scripts/chest.lua e EDITE o antigo ---vale-vip quest substituindo por esse:
pode excuir o NPC, e so ficar com a quest, muito mais simples nao?
mas atençao! ESSE SISTEMA SO FUNCIONA PARA O SISTEMA VIP DO YUNIE~
Duvidas, reclamaçoes, sujestoes... me mandem PM (Private Message).
Sliim~
imagem.bmp
Editado Julho 11 por sliim