Encantar Armas - Actions e Talkactions - xTibia - Sua comunidade de Tibia e OTServ

mixteen

Campones

INFOS

Grupo: Campones

Registrado: 12/11/05

Posts: 20

Char no Tibia: Sir Teku

Postado em fevereiro 06, 2008

eae galera

to trazendo um script pra encantar armas igual rl você da use na joia encantada e a usa na arma nao encantada entao ela se tornara de ice, fire, tera ou holy conforme a joia q foi usada.

primeiro va em data/actions/data e copie 4 arquivos qualquer e os renomeie assim: 1 para fireencanted.lua, 1 para iceencanted.lua, 1 para teraencanted.lua e 1 para holyencanted.lua

depois disso abra o fireencanted.lua e apague o q estiver dentro e add isso:

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

if item2.itemid == 2383 then

doTransformItem(item2.uid,7744)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7383 then

doTransformItem(item2.uid,7745)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7384 then

doTransformItem(item2.uid,7746)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7406 then

doTransformItem(item2.uid,7747)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7402 then

doTransformItem(item2.uid,7748)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2429 then

doTransformItem(item2.uid,7749)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2430 then

doTransformItem(item2.uid,7750)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7389 then

doTransformItem(item2.uid,7751)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7380 then

doTransformItem(item2.uid,7752)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2454 then

doTransformItem(item2.uid,7753)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2423 then

doTransformItem(item2.uid,7754)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2445 then

doTransformItem(item2.uid,7755)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7415 then

doTransformItem(item2.uid,7756)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 7392 then

doTransformItem(item2.uid,7757)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

elseif item2.itemid == 2391 then

doTransformItem(item2.uid,7758)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7760,1)

else

return 0

end

return 1

end

feche e salve

depois disso abra o iceencanted.lua e apague o q estiver dentro e add isso:

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

if item2.itemid == 2383 then

doTransformItem(item2.uid,7763)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7383 then

doTransformItem(item2.uid,7764)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7384 then

doTransformItem(item2.uid,7765)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7406 then

doTransformItem(item2.uid,7766)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7402 then

doTransformItem(item2.uid,7767)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2429 then

doTransformItem(item2.uid,7768)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2430 then

doTransformItem(item2.uid,7769)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7389 then

doTransformItem(item2.uid,7770)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7380 then

doTransformItem(item2.uid,7771)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2454 then

doTransformItem(item2.uid,7772)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2423 then

doTransformItem(item2.uid,7773)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2445 then

doTransformItem(item2.uid,7774)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7415 then

doTransformItem(item2.uid,7775)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 7392 then

doTransformItem(item2.uid,7776)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

elseif item2.itemid == 2391 then

doTransformItem(item2.uid,7777)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7759,1)

else

return 0

end

return 1

end

feche e salve

depois disso abra o teraencanted.lua e apague o q estiver dentro e add isso:

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

if item2.itemid == 2383 then

doTransformItem(item2.uid,7854)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7383 then

doTransformItem(item2.uid,7855)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7384 then

doTransformItem(item2.uid,7856)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7406 then

doTransformItem(item2.uid,7857)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7402 then

doTransformItem(item2.uid,7858)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2429 then

doTransformItem(item2.uid,7859)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2430 then

doTransformItem(item2.uid,7860)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7389 then

doTransformItem(item2.uid,7861)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7380 then

doTransformItem(item2.uid,7862)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2454 then

doTransformItem(item2.uid,7863)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2423 then

doTransformItem(item2.uid,7864)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2445 then

doTransformItem(item2.uid,7865)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7415 then

doTransformItem(item2.uid,7866)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 7392 then

doTransformItem(item2.uid,7867)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

elseif item2.itemid == 2391 then

doTransformItem(item2.uid,7868)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7761,1)

else

return 0

end

return 1

end

feche e salve

depois disso abra o holyencanted.lua e apague o q estiver dentro e add isso:

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

if item2.itemid == 2383 then

doTransformItem(item2.uid,7869)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7383 then

doTransformItem(item2.uid,7870)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7384 then

doTransformItem(item2.uid,7871)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7406 then

doTransformItem(item2.uid,7872)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7402 then

doTransformItem(item2.uid,7873)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2429 then

doTransformItem(item2.uid,7874)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2430 then

doTransformItem(item2.uid,7875)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7389 then

doTransformItem(item2.uid,7876)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7380 then

doTransformItem(item2.uid,7877)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2454 then

doTransformItem(item2.uid,7878)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2423 then

doTransformItem(item2.uid,7879)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2445 then

doTransformItem(item2.uid,7880)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7415 then

doTransformItem(item2.uid,7881)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 7392 then

doTransformItem(item2.uid,7882)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

elseif item2.itemid == 2391 then

doTransformItem(item2.uid,7883)

doDecayItem(item2.uid)

doPlayerRemoveItem(cid,7762,1)

else

return 0

end

return 1

end

feche e salve

depois va em data/actions/actions.xml e add isso:

feche e salve

explicaçao

elseif item2.itemid == aqui vai o id da arma nao encantada then

doTransformItem(item2.uid,aqui vai o id da arma encantada q seja igual a normal e do mesmo elemento do scipt)

doDecayItem(item2.uid) <---- aqui deixe igual pis se mudar ou tirar a arma normal nao sumira

doPlayerRemoveItem(cid,aqui eh o id da joia encantada tem q ser o mesmo id prara todo o scipt,e aqui eh a quantidade q você ira perder para encantar a arma)

creditos:

90% by Tyranic

10% by me

a e quase q ia esquecendo as relics encantadas pioram entao se quiserem q isso nao acontessa abra data/itens/itens.xml e edite o atk e a def dos itens de id 7745, 7764, 7855 e 7870 para mais e se quizer conferir o atk e a def da relic seu id eh 7383

galera se quiser saber como faz os portais pra ir ateh o lugar ond se encanta joia e como se fas para poder encantar as joia olhem este link:

flw

Gostou do meu trabalho, é meu fan entao use:

Sou Fan de:

METAS

Minha assinatura

~~MIXTEEN~~

Visite: http://www.xtibia.com/forum/Pokemon-Online...ame-t79362.html

Pedr1nh0

Artesão

INFOS

Grupo: Artesão

Registrado: 27/02/06

Posts: 122

Char no Tibia: Royal Lendario

Postado em fevereiro 06, 2008

Aeee cara bem rox...me diz uma coisa ce sabe como eu faço pra por atake magico+atake melee nas armas...pq ce eu ponho só magico ce vai mata demon com uma arma de fogo ce nao tira nada...e ce eu ponho só melee fica sem graça!!!

My Fan Bar -- If you liked something I did//If you didn't//\\Use my Fan Bar

NPC Addon que pede items

2-Minhas 4 Primeiras Sprites

3-Dinhero com uma cara diferente

4-Teleport de cada cor pra cada hunt

5-My item pack

6-Armas e balas

7-Mais algumas sprites

8-Aulas de sprite no paint em video

Felipets

Campones

INFOS

Grupo: Campones

Registrado: 13/11/05

Posts: 19

Postado em fevereiro 06, 2008

Aew cara parabens :smile_positivo:

Aki funfa direitinho

e vlw pela dica da relic sword

É meu fan? Use isto \/

Sou fan:

mixteen

Campones

INFOS

Grupo: Campones

Registrado: 12/11/05

Posts: 20

Char no Tibia: Sir Teku

Postado em fevereiro 06, 2008

Aeee cara bem rox...me diz uma coisa ce sabe como eu faço pra por atake magico+atake melee nas armas...pq ce eu ponho só magico ce vai mata demon com uma arma de fogo ce nao tira nada...e ce eu ponho só melee fica sem graça!!!

eu v da uma olhada se descubri eu posto aki ou num novo topico ok

flw

Gostou do meu trabalho, é meu fan entao use:

Sou Fan de:

METAS

Minha assinatura

~~MIXTEEN~~

Visite: http://www.xtibia.com/forum/Pokemon-Online...ame-t79362.html

eumemoss

Campones

INFOS

Grupo: Campones

Registrado: 18/03/07

Posts: 22

Char no Tibia: Ninja Ray

Postado em fevereiro 07, 2008

legal kra !!!

Minhas Frases:

"Existe duas palavras que abrem muitas portas: Puxe e Empurre"

Meu Avatar :

----------------------------------------------------------
Metas:
(X) 5 Posts -- SERVO
(X) 10 Posts -- CAMPONÊS
(X) 20 Posts
(X) 30 Posts
(..) 40 Posts
(..) 50 Posts -- CAVALEIRO
(..) 70 Posts
(..) 100 Posts -- BARONETE
(..) 150 Posts
(..) 300 Posts -- VISCONDE
(..) 500 Posts
(..) 1000 Posts -- REGENTE
(..) 1400 posts -- SÁBIO
(..) 1800 posts -- SACERDOTE
(..) 2500 posts -- PRÍNCIPE

-----------------------------------------------------------
Sou fan de:

-----------------------------------------------------------
Eu gosto de Naruto ! e você ?

Kakashi

por favor eu queria que alguem fizese pra mim 1 fan bar....eu agradeceria !!!

zacarias

Campones

INFOS

Grupo: Campones

Registrado: 30/12/06

Posts: 89

Postado em julho 03, 2008

vlww!!! xDD

Assinatura irregular, consulte as regras

Atenciosamente,

Daniel Oliveira.