Kamii

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Bom galera do TK, vim disponibilizar algumas sprites das Mega Evoluções do anime Pokémon
 
Mega Alakazam
 Mega Ampharos [Novo]
Mega Banete [Novo]
Mega Blastoise
Mega Blaziken
Mega Charizard X
Mega Charizard Y
Mega Gengar
Mega Latias [Novo]
Mega Lucario
Mega Tyranitar
 
Print
 

 
 
DOWNLOAD  
 
4SHARED / MEDIAFIRE
 
Créditos.
 
PokeXGames por ter feito a maioria das sprites;
Eu por ter cortado (Mega Latias, Mega Banete), e postado.
 
Atualizado - 17 de outubro de 2014, 22:20.

Subwat Frost
 8.60 
 

 

 

Informações
Comando /makesay adicionado (Para GODs). 6 Novos Monstros: Ice Demon, Ancient Lord, Coins Demon, Lord of Souls, Mutated Flamingo e Santa Claus. 2 Novas Spells: Explosion Kill e Lightning Storm. Novo Set: Santa Set. Novas Quests: Santa Set Quest. 5 hunts novas. Novo visual no templo. 12 novas casas. Nomes de alguns monstros ajustados para melhor visualização. Muitos bugs no mapa corrigidos. Houses com bug arrumadas. Alguns monstros ajustados. Corrigidos erros na escrita de alguns sistemas. Comandos com bugs corrigidos. Items no templo retirados e adicionada uma sala própria para eles. 100% dos erros do console corrigidos. Sistema VIP.  

Download
http://www.mediafire.com/?pgcg00vl8lltu5h
 
Scan
https://www.virustotal.com/file/c37efd422bbd4315628f50f878ca00e9e4f26afd874e2206e40b3a445b2b1101/analysis/1344465311/
 

Créditos totais à ADM Kamikaze, Subwat, Delaks, s0me0ne.

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

...

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Já tentou dar /m nele? 
Já adicionou ao monsters.xml? Se não segue o mini tutorial ai:
Em "Data/monsters/monsters.xml" adicione essa linha:
<monster name="Quase Boss" file="NomeDoAruivo.xml"/> Se o .xml do monstro estiver dentro de alguma pasta:
<monster name="Quase Boss" file="pasta/NomeDoAruivo.xml"/>

creio que deve tar faltando a tag dele no monster.xml

function onUse(cid, item, frompos, itemEx, topos)   local config = { count = 1, item = 2160, award = 2161, countaward = 1, }   if getPlayerItemCount(cid,config.item) >= count then doPlayerRemoveItem(cid,config.item,config.count) doPlayerAddItem(cid,award,config.countaward) else doPlayerSendCancel(cid,"you need "..config.count.." "..getItemNameById(config.item).." to pick your award." ) end return true end

Tem um problema a ino seu script, só vai funcionar caso o player tenha, EXATAMENTE, o valor do count, vou arrumar isso:

 
function onUse(cid, item, frompos, itemEx, topos) local config = { count = 1, item = 2160, award = 2161, countaward = 1, } if getPlayerItemCount(cid,config.item) >= count then doPlayerRemoveItem(cid,config.item,config.count) doPlayerAddItem(cid,award,config.countaward) else doPlayerSendCancel(cid,"you need "..config.count.." "..config.item.." to pick your award." ) end return true end

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Outro script que vou liberar para agradecer ao TK.
 
Esse script faz com que o dano do target vá se dividindo e espalhando entre os monstros, um chain. 
 
Imagem:



 
Script:



 
Ali em máximo é quantos targets o chain vai pegar antes de parar, porém a contagem aqui é diferente; para cada monstro afetado ele dobra a contagem. Ou seja, 5 monstros é igual a: 1, 2, 4, 6, 12. Lembrando que 5 monstros é 5 de cada lado. 10x10 se preferir.
 
Storage é a storage usada.
 
Min e max são as formulas de dano.
 
Em weapons.xml:
 
TFS 1.0:
 
<melee id="2413" unproperly="1" function="default" script="nome.lua">                               <- É só por essa tag na arma desejada <vocation name="Knight"/> <vocation name="Elite Knight" showInDescription="0"/> </melee>   Outro TFS:   <melee id="2413" unproperly="1" function="default" event="script" value="nome.lua">                               <- É só por essa tag na arma desejada <vocation name="Knight"/> <vocation name="Elite Knight" showInDescription="0"/> </melee>  
 
Modificação e redistribuição é permitida dentro do TK, com meus créditos. Lembrando que o script pode estar mal feito, eu não sabia programar direito na época, por isso conto com a ajuda de todos para melhorar o script. Provavelmente só funciona em TFS 1.0 para cima.

Essa é uma modificação do script do Triple Bolt Crossbow(clique aqui). As diferenças são:
 
Você não precisa de um crossbow especifico para usar,
Só gasta 1 bolt por vez,
Você é capaz de definir quantas vezes ele se multiplica.
 
Imagem:
 



 
Script:
 



 
Em weapons.xml:
 
TFS 1.0:
 
<distance id="15649" unproperly="1" level="40" function="default" script="nomedoarquivo.lua"/>     <- é só botar essa tag no bolt desejado
 
Outro TFS:
 
<distance id="15649" unproperly="1" level="40" function="default" event="script" value="nomedoarquivo.lua"/>     <- é só botar essa tag no bolt desejado
 
Vou indicar uma lista de efeitos para serem utilizados: 
 
http://www.tibiaking.com/forum/topic/32901-lista-completa-de-magic-effects-e-shoot-type/

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Fala TK  beleza? hoje venho aqui compartilhar um Script meio antigo porém funcional "Rainbow Outfit" para quem já jogou OT'S 8.40 sabe o que é isso
Bom vamos lá. Para quem não sabe o que esse Script faz ele fica trocando de cor aleatoriamente assim que o Player ativa o comando como no vídeo abaixo.
 
https://vid.me/O1hJ
 
 
Para fazer a instalação vá em Data/Talkactions/Scripts
Depois copie e cole qualquer arquivo .LUA
Renomeie o arquivo para rainbow copie e cole tudo que está abaixo la dentro.
 


    Agora vá para Data/Talkactions E abra o aquivo Talkactions.XML Depois copie e cole o que está logo abaixo la dentro do Talkactions.XML  

    !rainbow on = Ligar o Rainbow Outfit !rainbow off = Desligar o Rainbow Outfit

Versão do Server: 8.60   O Objetivo é sincronizar as estátuas de seus respectivos elementos para criar um portal. Utilizei Actions para Girar as Estátuas e fazer a verificação das posições e Movements para fazer com que as Estátuas se posicionem de maneira aleatória, para que assim, qualquer jogador tenha uma experiência nova ao fazer a Quest. Cada estátua tem seu elemento. As estátuas da esquerda são o padrão. Você deve ajustar as estátuas da direita de acordo com o padrão estabelecido da esquerda.  
Uma sala é formada por dois grupos de estátuas. 6 na esquerda, 6 na direita. Cada Elemento possui duas estátuas diferentes. Uma do lado esquerdo, outra do lado direito (Notar imagem abaixo). As estátuas do lado esquerdo possui ActionID. Elas não giram. Elas que geram um padrão para posicionar as outras estátuas. O Objetivo é posicionar a estátua do lado direito do elemento fogo, por exemplo, de acordo com a posição da estátua do lado esquerdo com o mesmo elemento.  
  Movements:   Crie um arquivo .lua com nome EPQ em Movements/Script/ e coloque o código abaixo dentro dele. (Configure o local das estátuas) function onStepIn(cid, item, position, fromPosition) local pos_enter = {x = 999, y = 1009, z = 7} local statues = { -- Estátuas que ficam na posição esquerda {x = 997, y = 993, z = 7, stackpos= 1}, {x = 995, y = 994, z = 7, stackpos= 1}, {x = 994, y = 996, z = 7, stackpos= 1}, {x = 994, y = 998, z = 7, stackpos= 1}, {x = 995, y = 1000, z = 7, stackpos= 1}, {x = 997, y = 1001, z = 7, stackpos= 1},   -- Estátuas que ficam na posição direita  {x = 1001, y = 993, z = 7, stackpos= 1}, {x = 1003, y = 994, z = 7, stackpos= 1}, {x = 1004, y = 996, z = 7, stackpos= 1}, {x = 1004, y = 998, z = 7, stackpos= 1}, {x = 1003, y = 1000, z = 7, stackpos= 1}, {x = 1001, y = 1001, z = 7, stackpos= 1}, } doTeleportThing(cid, pos_enter, true) for _, pos in ipairs(statues) do local lv = getThingfromPos(pos).uid doTransformItem(lv, math.random(3705, 3708))   end        return TRUE end Adicione essa tag em Movements.xml
<movevent type="StepIn" actionid="5485" event="script" value="EPQ.lua"/> No piso, coloque ActionID: 5485.       Actions:   Crie um arquivo .lua com nome EPQ em Action/Script/ e coloque o código abaixo dentro dele. function onUse(cid, item, frompos, item2, topos) if (item.actionid ~= 15784) then -- As Estatuas que tenham essa Action não podem ser movidas. if item.itemid == 3705 then doTransformItem(item.uid, 3706) elseif item.itemid == 3706 then doTransformItem(item.uid, 3707) elseif item.itemid == 3707 then doTransformItem(item.uid, 3708) elseif item.itemid == 3708 then doTransformItem(item.uid, 3705) end else doSendMagicEffect(getPlayerPosition(cid), 2) end return TRUE end Em Action.xml adicione essa tag.
<action itemid="3705-3708" event="script" value="EPQ.lua"/> Nas estátuas da esquerda, coloque nelas ActionID: 15784         Crie um arquivo .lua com nome EPQUm em Action/Script/ e coloque o código abaixo dentro dele. (Configurações estão no início do Script)   -- Config. local config = { toPos = {x = 998, y = 985, z = 7}, -- Posição da Sala da recompensa. Pos = {x = 999, y = 994, z = 7},   -- Posição onde será criado o Teleport. tp = {x = 999, y = 994, z = 7}, -- Posição que o Teleport apareceu, para que ele seja removido. tempo = 5, -- Tempo que o Teleport ficará disponível, em segundos } local posA = { -- Estátuas que ficam na posição esquerda {x = 997, y = 993, z = 7, stackpos= 1}, -- Fogo {x = 995, y = 994, z = 7, stackpos= 1}, -- Pedra {x = 994, y = 996, z = 7, stackpos= 1}, -- Dark {x = 994, y = 998, z = 7, stackpos= 1}, -- Terra {x = 995, y = 1000, z = 7, stackpos= 1}, -- Gelo {x = 997, y = 1001, z = 7, stackpos= 1}, -- Poison -- Estátuas que ficam na posição direita {x = 1001, y = 993, z = 7, stackpos= 1}, -- Gelo {x = 1003, y = 994, z = 7, stackpos= 1}, -- Poison {x = 1004, y = 996, z = 7, stackpos= 1}, -- Pedra {x = 1004, y = 998, z = 7, stackpos= 1}, -- Fogo {x = 1003, y = 1000, z = 7, stackpos= 1}, -- Dark {x = 1001, y = 1001, z = 7, stackpos= 1}, -- Terra } -- Fim da Config. function onUse(cid, item, frompos, item2, topos) local posC = { [1] = getThingfromPos(posA[1]), [2] = getThingfromPos(posA[10]), [3] = getThingfromPos(posA[2]), [4] = getThingfromPos(posA[9]), [5] = getThingfromPos(posA[3]), [6] = getThingfromPos(posA[11]), [7] = getThingfromPos(posA[4]), [8] = getThingfromPos(posA[12]), [9] = getThingfromPos(posA[5]), [10] = getThingfromPos(posA[7]), [11] = getThingfromPos(posA[6]), [12] = getThingfromPos(posA[8]), } if getPlayerStorageValue(cid, 10000) == -1 then if posC[1].itemid == posC[2].itemid and posC[3].itemid == posC[4].itemid and posC[5].itemid == posC[6].itemid and posC[7].itemid == posC[8].itemid and posC[9].itemid == posC[10].itemid and posC[11].itemid == posC[12].itemid then doSendMagicEffect(getPlayerPosition(cid), 14) setPlayerStorageValue(cid, 10000, 1) setPlayerStorageValue(cid, 10001, 1) addEvent(CombCerta, 1000, cid) else doSendMagicEffect(getPlayerPosition(cid), 13) setPlayerStorageValue(cid, 10000, 1) addEvent(doSendMagicEffect, 500, posA[11], 17) addEvent(doSendMagicEffect, 500, posA[3], 17) addEvent(doSendMagicEffect, 1500, posA[9], 44)  addEvent(doSendMagicEffect, 1500, posA[2], 44)  addEvent(doSendMagicEffect, 2500, posA[8], 46) addEvent(doSendMagicEffect, 2500, posA[6], 46) addEvent(doSendMagicEffect, 3500, posA[12], 50) addEvent(doSendMagicEffect, 3500, posA[4], 50) addEvent(doSendMagicEffect, 4500, posA[7], 43) addEvent(doSendMagicEffect, 4500, posA[5], 43)  addEvent(doSendMagicEffect, 5500, posA[10], 6) addEvent(doSendMagicEffect, 5500, posA[1], 6) addEvent(doSendMagicEffect, 6500, getPlayerPosition(cid), 13) addEvent(setPlayerStorageValue, 6502, cid, 10000, -1) end else doSendMagicEffect(getThingPos(cid), 2) end return TRUE end function CombCerta(cid) local posC = { [1] = getThingfromPos(posA[1]), [2] = getThingfromPos(posA[10]), [3] = getThingfromPos(posA[2]), [4] = getThingfromPos(posA[9]), [5] = getThingfromPos(posA[3]), [6] = getThingfromPos(posA[11]), [7] = getThingfromPos(posA[4]), [8] = getThingfromPos(posA[12]), [9] = getThingfromPos(posA[5]), [10] = getThingfromPos(posA[7]), [11] = getThingfromPos(posA[6]), [12] = getThingfromPos(posA[8]), } if getPlayerStorageValue(cid, 10001) == 1 then doTransformItem(posC[1].uid, 3705) doSendMagicEffect(posA[1], 14) doTransformItem(posC[10].uid, 3705) doSendMagicEffect(posA[7], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -1) setPlayerStorageValue(cid, 10001, 2) elseif getPlayerStorageValue(cid, 10001) == 2 then doTransformItem(posC[3].uid, 3705) doSendMagicEffect(posA[2], 14) doTransformItem(posC[12].uid, 3705) doSendMagicEffect(posA[8], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -2) setPlayerStorageValue(cid, 10001, 3) elseif getPlayerStorageValue(cid, 10001) == 3 then doTransformItem(posC[5].uid, 3706) doSendMagicEffect(posA[3], 14) doTransformItem(posC[4].uid, 3708) doSendMagicEffect(posA[9], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -3) setPlayerStorageValue(cid, 10001, 4) elseif getPlayerStorageValue(cid, 10001) == 4 then doTransformItem(posC[7].uid, 3706) doSendMagicEffect(posA[4], 14) doTransformItem(posC[2].uid, 3708) doSendMagicEffect(posA[10], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -4) setPlayerStorageValue(cid, 10001, 5) elseif getPlayerStorageValue(cid, 10001) == 5 then doTransformItem(posC[9].uid, 3707) doSendMagicEffect(posA[5], 14) doTransformItem(posC[6].uid, 3707) doSendMagicEffect(posA[11], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -5) setPlayerStorageValue(cid, 10001, 6) elseif getPlayerStorageValue(cid, 10001) == 6 then doTransformItem(posC[11].uid, 3707) doSendMagicEffect(posA[6], 14) doTransformItem(posC[8].uid, 3707) doSendMagicEffect(posA[12], 14) addEvent(CombCerta, 1000, cid) setPlayerStorageValue(cid, 10001, -6) setPlayerStorageValue(cid, 10001, 7) elseif getPlayerStorageValue(cid, 10001) == 7 then for _, pos in ipairs(posA) do doSendDistanceShoot(pos, config.Pos, 35) end doSendMagicEffect(config.Pos, 10) doCreateTeleport(1387, config.toPos, config.Pos) doCreatureSay(cid, "O teleport irá sumir em "..config.tempo.." segundos.", TALKTYPE_ORANGE_1) addEvent(removetp, config.tempo*1000, cid) end end function removetp(cid) for _, ale in ipairs(posA) do local st = getThingfromPos(ale).uid doTransformItem(st, math.random(3705, 3708)) end local t = getTileItemById(config.Pos, 1387) doRemoveItem(t.uid, 1) doSendMagicEffect(config.Pos, CONST_ME_POFF) setPlayerStorageValue(cid, 10000, -1) end Em Action.xml adicione essa tag.
<action actionid="8798" event="script" value="EPQUm.lua" />         As estátuas precisam estar nesse formato circular para que o efeito das animações possam acontecer corretamente.       Vídeo: https://www.youtube.com/watch?v=kBVUf_ejmLs&feature=youtu.be     Download OTServ para demonstração da Quest: CLIQUE AQUI

Fala galera do TK, tirei essa madrugada pra trazer um conteúdo novo a pedido do membro @alanmtd1, trata-se da spell Kamui do Obito só que eu fiz ela um pouquinho diferente; 
Testado em TFS 0.3.6, cliente 8.54;
Descrição pra quem não conhece:
O player fala 'kamui in', se ele tiver com um target vai entrar e o target; do contrário entra ele e todos que estiverem à sua volta;
Feito isso eles serão teleportados para o Kamui, um lugar que você vai criar no seu mapa editor e colocar NO-PVP ZONE, spawn de monstro e NO Logout.
Preste bem atenção nisso porque se você esquecer quaisquer um desses vai dar bug.
Depois de X segundos todos os players/monstros que vc teleportou voltarão para onde estavam (a menos que eles morram no kamui).
Porque isso ocorre? Simples, eu só fui perceber como os caras do Naruto Online fizeram esse script depois de ter terminado a minha versão e eu to com preguiça demais de refazer tudo pra ficar igualzinho à versão deles hahauhauhauh então é importante que o kamui seja um local onde não haja mortes, justamente pra não haverem mensagens de erro tipo essa:
[26/07/2014 04:27:46] [Error - Spell Interface]  [26/07/2014 04:27:46] In a timer event called from:  [26/07/2014 04:27:46] data/spells/scripts/especiais/kamui.lua:onCastSpell [26/07/2014 04:27:47] Description:  [26/07/2014 04:27:47] (luaDoTeleportThing) Thing not found Bom, vamos ao script:


  Agora em spells.xml: <instant name="KAMUI" words="kamui in" lvl="120" mana="200" prem="1" blockwalls="1" exhaustion="1000" needlearn="0" event="script" value="especiais/kamui.lua"> <vocation id="5"/> <vocation id="6"/> <vocation id="7"/> <vocation id="8"/> </instant> Bom, pra configurar vc mexe na parte inicial do script e ja tá tudo explicadinho... quem sabe um dia eu refaça esse script pra ficar igualzinho o deles auhuhea até lá usem essa versão aí que até que está bem caprichadinha. Toda vez que alguém morrer no kamui vai aparecer uma mensagem de erro mas ela não afeta em nada, podem ficar relaxados. O único jeito de remover isso é impedindo as mortes dentro do kamui oque tira toda a graça da coisa, espero que tenham gostado ;]
 

Bom, esse script é um agradecimento ao Tibia King(já que eu não pretendia libera-lo). O TK me ensinou a programar em LUA, o que foi a base para o meu interesse em programação, e hoje estou criando um jogo meu do zero(um sonho que eu tenho).
 
Bom, mas vocês só devem querer o script. O script permite que o jogador atire três bolts, gastando três também, e acerte os inimigos próximos do target, por exemplo:
 
T = Target
E = Enemy
 
E, E, E
E, T, E
E, E, E
 
Ele só vai atirar duas flechas adicionais caso tenha inimigos próximos do target. Eu nunca terminei o script, pois ele precisa de configuração manual. O que acontece é que o script tem de ser posto nas flechas, e não no crossbow, então para cada flecha você tem de alterar o efeito do tiro, contudo a storage pode ser a mesma.
 
Imagem:



 
Script:



 
Em weapons.xml:
 
TFS 1.0:
 
<distance id="15649" unproperly="1" level="40" function="default" script="nomedoarquivo.lua"/>     <- é só botar essa tag no bolt desejado
 
Outro TFS:
 
<distance id="15649" unproperly="1" level="40" function="default" event="script" value="nomedoarquivo.lua"/>     <- é só botar essa tag no bolt desejado
 
Vou indicar uma lista de efeitos para serem utilizados: 
 
http://www.tibiaking.com/forum/topic/32901-lista-completa-de-magic-effects-e-shoot-type/
 
Esse conteúdo é meu, porém deixo-o para todos do TK, qualquer mudança e redistribuição dentro do TK é permitida, claro, com meus créditos, pelo menos. Conto com a ajuda dos programadores para finalizar e melhorar esse script.

@Kamii, haha fico feliz que você tenha gostado e agradeço o elogio mas não posso levar todo o crédito.. a maioria das coisas que eu faço são pedidos de membros que por sua vez pegaram a ideia de outros servidores, a única criatividade minha aí foi de fazer o script de uma forma um pouco diferente das que o pessoal tá acostumado usando um pouquinho mais de matemática.

Você pode conferir os números dos efeitos mágicos e efeitos de distância, nesse tópico:
Lista Completa de Magic Effects e Shoot Types.

Ou, caso prefira, pode visualiza-los pelo programa ObjectBuilder.

Tente adicionando esse script à weapon desejada (data/weapons/scripts):
function onUseWeapon(cid, var)     local hit = {50, 100} -- {min, max}     local effect = {52, 36} -- {magicEffect, shottype/distanceEffect}     local combat = COMBAT_ICEDAMAGE -- combat type     return doSendDistanceShoot(getThingPos(cid), variantToPosition(var), effect[2]) and addEvent(doAreaCombatHealth, 100, cid, combat, variantToPosition(var), 0, -hit[1], -hit[2], effect[1]) end