Jump to content
Close
Sign in to follow this  
Ziguirifido

Scripting Spell Dando Error

Recommended Posts

Minha Spell Ta Dando Error Este Error Aqui

 

Spoiler

QI9JaFT.png

 

O Meu Script É Esse

 

Spoiler

local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_HITCOLOR, COLOR_YELLOW)
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 118)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -34.0, 0, -39.0, 0)

local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_HITCOLOR, COLOR_PINK)
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, 121)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -34.0, 0, -39.0, 0)
 
local function onCastSpell1(parameters)
return isCreature(parameters.cid) and doCombat(parameters.cid, parameters.combat1, parameters.var)
end

local function onCastSpell3(parameters)
return isCreature(parameters.cid) and doCombat(parameters.cid, parameters.combat3, parameters.var)
end

function monaka1(cid)
for r = 1, 1 do
    addEvent(function()
        if isCreature(cid) then
            local position1 = {x=getThingPosition(getCreatureTarget(cid)).x+1, y=getThingPosition(getCreatureTarget(cid)).y+1, z=getThingPosition(getCreatureTarget(cid)).z}
            doSendMagicEffect(position1, 542)
        end
    end, 1 + ((r-1) * 250))
end
end
function monaka2(cid)
for r = 1, 1 do
    addEvent(function()
        if isCreature(cid) then
            local position1 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y+2, z=getThingPosition(getCreatureTarget(cid)).z}
            doSendMagicEffect(position1, 407)
        end
    end, 1 + ((r-1) * 250))
end
end

function onCastSpell(cid, var)
local parameters = {cid = cid, var = var, combat1 = combat1, combat3 = combat3}
addEvent(onCastSpell1, 0, parameters)


for k = 1, 3 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(onCastSpell1, 0, parameters)
        end
    end, 1 + ((k-1) * 250))
end
for i = 4, 7 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(onCastSpell3, 0, parameters)
        end
    end, 1 + ((i-1) * 250))
end
for k = 8, 10 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(onCastSpell1, 0, parameters)
        end
    end, 1 + ((k-1) * 250))
end

for l = 1, 3 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(monaka1, 1,cid)
        end
    end, 1 + ((l-1) * 250))
end
for l = 4, 7 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(monaka2, 1,cid)
        end
    end, 1 + ((l-1) * 250))
end
for l = 7, 10 do
    addEvent(function()
        if isCreature(cid) then
            addEvent(monaka1, 1,cid)
        end
    end, 1 + ((l-1) * 250))
end
return true
end

 


Edited by Ziguirifido (see edit history)

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this  

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 Tibia King

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

×
×
  • Create New...