Ir para conteúdo
TK News
  • Cadastre-se

9 squares Arma Ajuda!

XirupitasFarm

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

XirupitasFarm

XirupitasFarm 0

Postado
Postado

Olá Precisa De Uma Ajuda , Nao Sei Se Estou Postando No Lugar Certo Mais Vamos Lá

 

Queria Criar Uma Arma Com Multiplos Tipos De Dano Exemplo (ENERGY,FIRE,EARTH,ICE) e Com Multiplas Animaçoes Pode Me Ajudar Ja Tenho Uma Script Da "AGGROX SWORD" conseguir modificar ela mais botei assim

 

post-151664-0-88385300-1425086755_thumb.

 

 

Queria Botar Mais Tipos De Animaçao Por Exemplo (plantattack , iceattack) Em Certos Lugares Alguem Me Ajuda? Alem Desse Gelo Alguem Me Ajuda?

 

 

http://imgur.com/Y4TvmLr

 

Em Breve Um Servidor Bem Editado Mais Com XP A Pedido Do Povo

 

mapname-Baldora's Map

MapAuthor-Mohab

XP-???

Link para o post
Compartilhar em outros sites
Danves

Danves 45

Postado
Postado

Seria um atk com vários elementos de uma só vez? Ou seria um random com chance de vir um elemento por vez nesse 1x1?
Poste o script e a modificação que quer



 tumblr_mwfeg45FIV1qk4cb3o4_500.gif

Link para o post
Compartilhar em outros sites
XirupitasFarm

XirupitasFarm 0

Postado
  • Autor
Postado

a Script 

 

 

local combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, 43)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT,ENERGYBALL)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
 
local area = createCombatArea( { {1, 1, 1}, {1, 3, 1}, {1, 1, 1} } )
setCombatArea(combat, area)
 
function onUseWeapon(cid, var)
return doCombat(cid, combat, var)
 
end

 

 

Queria Fazer Assim Quando o Player ataca sai tantos elementos juntos e tantas animaçoes juntas entende.

 

Queria Que O Player Atacasse e Saisse 4 Animaçoes  e 4 Dano Diferente 

http://imgur.com/Y4TvmLr

 

Em Breve Um Servidor Bem Editado Mais Com XP A Pedido Do Povo

 

mapname-Baldora's Map

MapAuthor-Mohab

XP-???

Link para o post
Compartilhar em outros sites
textoy

textoy 7

Postado
Postado (editado)

cara é só pegar esse script que voce ja tem, copiar os parametros,formula e area, e colar mudando o efeito e tipo de dano.
tenta isso ,nao cheguei a testar.


local combat0_Brush = createCombatObject() -- frost
setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)
setCombatParam(combat0_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLICE)
setCombatFormula(combat0_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat0_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat1_Brush = createCombatObject() -- holy
setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_HOLY)
setCombatFormula(combat1_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat1_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat2_Brush = createCombatObject() -- death
setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA)
setCombatParam(combat2_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH)
setCombatFormula(combat2_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat2_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat3_Brush = createCombatObject() -- energy
setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)
setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)
setCombatParam(combat3_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY)
setCombatFormula(combat3_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat3_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat4_Brush = createCombatObject() -- fire
setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)
setCombatParam(combat4_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE)
setCombatFormula(combat4_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat4_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat5_Brush = createCombatObject() -- tera
setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_CARNIPHILA)
setCombatParam(combat5_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_EARTH)
setCombatFormula(combat5_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat5_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onUseWeapon(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat0_Brush,cid,var)
addEvent(RunPart,100,combat1_Brush,cid,var)
addEvent(RunPart,200,combat2_Brush,cid,var)
addEvent(RunPart,300,combat3_Brush,cid,var)
addEvent(RunPart,400,combat4_Brush,cid,var)
addEvent(RunPart,500,combat5_Brush,cid,var)
return true
end


Caso voce não queira algum desses tipos de dano é só remover, mas lembra de remover no final tb o addEvent

Editado por textoy (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
XirupitasFarm

XirupitasFarm 0

Postado
  • Autor
Postado

cara é só pegar esse script que voce ja tem, copiar os parametros,formula e area, e colar mudando o efeito e tipo de dano.

tenta isso ,nao cheguei a testar.

local combat0_Brush = createCombatObject() -- frost

setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)

setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)

setCombatParam(combat0_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLICE)

setCombatFormula(combat0_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat0_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local combat1_Brush = createCombatObject() -- holy

setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)

setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)

setCombatParam(combat1_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_HOLY)

setCombatFormula(combat1_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat1_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local combat2_Brush = createCombatObject() -- death

setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)

setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA)

setCombatParam(combat2_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH)

setCombatFormula(combat2_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat2_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local combat3_Brush = createCombatObject() -- energy

setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)

setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)

setCombatParam(combat3_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY)

setCombatFormula(combat3_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat3_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local combat4_Brush = createCombatObject() -- fire

setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)

setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)

setCombatParam(combat4_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE)

setCombatFormula(combat4_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat4_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local combat5_Brush = createCombatObject() -- tera

setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)

setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_CARNIPHILA)

setCombatParam(combat5_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_EARTH)

setCombatFormula(combat5_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)

setCombatArea(combat5_Brush,createCombatArea({{1, 1, 1},

{1, 3, 1},

{1, 1, 1}}))

local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part

if (isCreature(cid)) then

doCombat(cid, c, var)

if (dirList ~= nil) then -- Emit distance effects

local i = 2;

while (i < #dirList) do

doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])

i = i + 2

end

end

end

end

function onUseWeapon(cid, var)

local startPos = getCreaturePosition(cid)

RunPart(combat0_Brush,cid,var)

addEvent(RunPart,100,combat1_Brush,cid,var)

addEvent(RunPart,200,combat2_Brush,cid,var)

addEvent(RunPart,300,combat3_Brush,cid,var)

addEvent(RunPart,400,combat4_Brush,cid,var)

addEvent(RunPart,500,combat5_Brush,cid,var)

return true

end

Caso voce não queira algum desses tipos de dano é só remover, mas lembra de remover no final tb o addEvent

Kra Muito Obrigado Mesmo Isso Que eu Queria Mais Nao Sabia Fazer REP + Para Vocess ,Mais Ai Pode me dizer como Eu Diminuo o Dano Desse Troço Ficou Muito Forte. 

Abraços!

http://imgur.com/Y4TvmLr

 

Em Breve Um Servidor Bem Editado Mais Com XP A Pedido Do Povo

 

mapname-Baldora's Map

MapAuthor-Mohab

XP-???

Link para o post
Compartilhar em outros sites
textoy

textoy 7

Postado
Postado

Kra Muito Obrigado Mesmo Isso Que eu Queria Mais Nao Sabia Fazer REP + Para Vocess ,Mais Ai Pode me dizer como Eu Diminuo o Dano Desse Troço Ficou Muito Forte. 

Abraços!

 De boas bro, faz oque o cara disse, só não recomendo por uma arma de kina com dano baseado em ML ! :))

Link para o post
Compartilhar em outros sites
Caronte

Caronte 718

Postado
Postado

 De boas bro, faz oque o cara disse, só não recomendo por uma arma de kina com dano baseado em ML ! :))

 

Kkkkk, 

com certeza...

Se quiser sua dúvida tirada, mande PM com os links, e não com a dúvida (outros podem ter a mesma dúvida, e o fórum serve para ser usado).

 

Tópicos:

 

yNlhRVC.png

 

55px-Judo_yellow_belt.svg.png

Link para o post
Compartilhar em outros sites
XirupitasFarm

XirupitasFarm 0

Postado
  • Autor
Postado

Mais 1 Ajudinha essa script

 

 

local combat0_Brush = createCombatObject() -- frost
setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)
setCombatParam(combat0_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLICE)
setCombatFormula(combat0_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat0_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat1_Brush = createCombatObject() -- holy
setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_HOLY)
setCombatFormula(combat1_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat1_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat2_Brush = createCombatObject() -- death
setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA)
setCombatParam(combat2_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SUDDENDEATH)
setCombatFormula(combat2_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat2_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat3_Brush = createCombatObject() -- energy
setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)
setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)
setCombatParam(combat3_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_ENERGY)
setCombatFormula(combat3_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat3_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat4_Brush = createCombatObject() -- fire
setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)
setCombatParam(combat4_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE)
setCombatFormula(combat4_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat4_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat5_Brush = createCombatObject() -- tera
setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_CARNIPHILA)
setCombatParam(combat5_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_EARTH)
setCombatFormula(combat5_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat5_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList,y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onUseWeapon(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat0_Brush,cid,var)
addEvent(RunPart,100,combat1_Brush,cid,var)
addEvent(RunPart,200,combat2_Brush,cid,var)
addEvent(RunPart,300,combat3_Brush,cid,var)
addEvent(RunPart,400,combat4_Brush,cid,var)
addEvent(RunPart,500,combat5_Brush,cid,var)
return true
end

 

Quando Voce Ataca a animaçao que ela faz é de uma spear queria modificar !

 

OBG

http://imgur.com/Y4TvmLr

 

Em Breve Um Servidor Bem Editado Mais Com XP A Pedido Do Povo

 

mapname-Baldora's Map

MapAuthor-Mohab

XP-???

Link para o post
Compartilhar em outros sites
Danves

Danves 45

Postado
Postado 
local combat0_Brush = createCombatObject() -- frost
setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)
setCombatParam(combat0_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat0_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat0_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat1_Brush = createCombatObject() -- holy
setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat1_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat1_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat2_Brush = createCombatObject() -- death
setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA)
setCombatParam(combat2_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat2_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat2_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat3_Brush = createCombatObject() -- energy
setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)
setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)
setCombatParam(combat3_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat3_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat3_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat4_Brush = createCombatObject() -- fire
setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)
setCombatParam(combat4_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat4_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat4_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat5_Brush = createCombatObject() -- tera
setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_CARNIPHILA)
setCombatParam(combat5_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat5_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat5_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList[i],y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onUseWeapon(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat0_Brush,cid,var)
addEvent(RunPart,100,combat1_Brush,cid,var)
addEvent(RunPart,200,combat2_Brush,cid,var)
addEvent(RunPart,300,combat3_Brush,cid,var)
addEvent(RunPart,400,combat4_Brush,cid,var)
addEvent(RunPart,500,combat5_Brush,cid,var)
return true
end

Assim?



 tumblr_mwfeg45FIV1qk4cb3o4_500.gif

Link para o post
Compartilhar em outros sites
XirupitasFarm

XirupitasFarm 0

Postado
  • Autor
Postado 
local combat0_Brush = createCombatObject() -- frost
setCombatParam(combat0_Brush, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(combat0_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK)
setCombatParam(combat0_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat0_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat0_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat1_Brush = createCombatObject() -- holy
setCombatParam(combat1_Brush, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_EFFECT, CONST_ME_HOLYDAMAGE)
setCombatParam(combat1_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat1_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat1_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat2_Brush = createCombatObject() -- death
setCombatParam(combat2_Brush, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE)
setCombatParam(combat2_Brush, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA)
setCombatParam(combat2_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat2_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat2_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat3_Brush = createCombatObject() -- energy
setCombatParam(combat3_Brush, COMBAT_PARAM_TYPE, COMBAT_ENERGYDAMAGE)
setCombatParam(combat3_Brush, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYHIT)
setCombatParam(combat3_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat3_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat3_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat4_Brush = createCombatObject() -- fire
setCombatParam(combat4_Brush, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat4_Brush, COMBAT_PARAM_EFFECT, CONST_ME_FIREATTACK)
setCombatParam(combat4_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat4_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat4_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local combat5_Brush = createCombatObject() -- tera
setCombatParam(combat5_Brush, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
setCombatParam(combat5_Brush, COMBAT_PARAM_EFFECT, CONST_ME_CARNIPHILA)
setCombatParam(combat5_Brush, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SPEAR)
setCombatFormula(combat5_Brush, COMBAT_FORMULA_LEVELMAGIC, -50.0, -52, -54.0, -55)
setCombatArea(combat5_Brush,createCombatArea({{1, 1, 1},
{1, 3, 1},
{1, 1, 1}}))

local function RunPart(c,cid,var,dirList,dirEmitPos) -- Part
if (isCreature(cid)) then
doCombat(cid, c, var)
if (dirList ~= nil) then -- Emit distance effects
local i = 2;
while (i < #dirList) do
doSendDistanceShoot(dirEmitPos,{x=dirEmitPos.x-dirList[i],y=dirEmitPos.y-dirList[i+1],z=dirEmitPos.z},dirList[1])
i = i + 2
end
end
end
end

function onUseWeapon(cid, var)
local startPos = getCreaturePosition(cid)
RunPart(combat0_Brush,cid,var)
addEvent(RunPart,100,combat1_Brush,cid,var)
addEvent(RunPart,200,combat2_Brush,cid,var)
addEvent(RunPart,300,combat3_Brush,cid,var)
addEvent(RunPart,400,combat4_Brush,cid,var)
addEvent(RunPart,500,combat5_Brush,cid,var)
return true
end

Assim?

 

Sim Obg

http://imgur.com/Y4TvmLr

 

Em Breve Um Servidor Bem Editado Mais Com XP A Pedido Do Povo

 

mapname-Baldora's Map

MapAuthor-Mohab

XP-???

Link para o post
Compartilhar em outros sites
Danihcv

Danihcv 607

Postado
Postado

O tópico foi movido para a área correta, preste mais atenção da próxima vez!

Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

Este tópico foi movido:

De: "OTServ → Scripting → Geral"

Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Te ajudei?? REP + e ficamos quites... <ahttp://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'>

Atenciosamente,

Daniel.

Abraços!

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito