Spell Volatile Spiderling

kamilwxx · Dec 28, 2013

Volatile Spiderling
forgottenserver 1.0

Summons a spider that remains on the field for up to 5 seconds. At the end of its duration or when dying the spider will explode, dealing poison damage to nearby enemies and poisoning them.

data/creaturescripts/creaturescripts.xml

Code:

    <event type="death" name="VolatileSpiderling" script="volatilespiderling.lua"/>

data/creaturescripts/scripts/volatilespiderling.lua

Code:

local combat = Combat()
combat:setParameter(COMBAT_PARAM_TYPE, COMBAT_POISONDAMAGE)
combat:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
combat:setFormula(COMBAT_FORMULA_LEVELMAGIC, -0.4, 0, -0.5, 0)
combat:setArea(createCombatArea(AREA_CROSS1X1))

local condition = Condition(CONDITION_POISON)
condition:setParameter(condition, CONDITION_PARAM_DELAYED, 1)

local damageTable = {
    {4, -3},
    {9, -2},
    {20, -1}
}
for i = 1, #damageTable do
    local t = damageTable[i]
    condition:addDamage(t[1], 4000, t[2])
end

combat:setCondition(condition)


function onDeath(cid, ...)
    local creature = Creature(cid)
    combat:execute(creature, numberToVariant(cid))
    return true
end

data/spells/spells.xml

Code:

        <instant group="attack" spellid="9" name="Volatile Spiderling" words="utevo res tera" lvl="40" mana="0" selftarget="1" prem="1" exhaustion="2000" groupcooldown="2000" needlearn="0" script="attack/volatile spiderling.lua">
                <vocation name="Paladin"/>
                <vocation name="Royal Paladin"/>
        </instant>

data/spells/scripts/attack/volatile spiderling.lua

Code:

local combat = Combat()
combat:setParameter(COMBAT_PARAM_TYPE, COMBAT_POISONDAMAGE)
combat:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
combat:setFormula(COMBAT_FORMULA_LEVELMAGIC, -0.4, 0, -0.5, 0)
combat:setArea(createCombatArea(AREA_CROSS1X1))

local condition = Condition(CONDITION_POISON)
condition:setParameter(condition, CONDITION_PARAM_DELAYED, 1)

local damageTable = {
    {4, -3},
    {9, -2},
    {20, -1}
}
for i = 1, #damageTable do
    local t = damageTable[i]
    condition:addDamage(t[1], 4000, t[2])
end

combat:setCondition(condition)


function onCastSpell(cid, var)
    local player = Player(cid)
    if player == nil then
        return false
    end

    local playerPos = player:getPosition()
    if player:getMana() < 20 then
        player:sendCancelMessage(RETURNVALUE_NOTENOUGHMANA)
        playerPos:sendMagicEffect(CONST_ME_POFF)
        return false
    end

    if #player:getSummons() >= 2 then
        player:sendCancelMessage("You cannot summon more creatures.")
        playerPos:sendMagicEffect(CONST_ME_POFF)
        return false
    end

    local creatureId = doSummonCreature("Spider", playerPos)
    if creatureId == false then
        player:sendCancelMessage(RET_NOTENOUGHROOM)
        playerPos:sendMagicEffect(CONST_ME_POFF)
        return false
    end

    local monster = Monster(creatureId)
    monster:setMaster(player)
    monster:registerEvent("VolatileSpiderling")

    addEvent(function(cid)
        local creature = Creature(cid)
        if creature ~= nil then
            combat:execute(creature, numberToVariant(cid))
            creature:getPosition():sendMagicEffect(CONST_ME_HITBYPOISON)
            creature:remove()
        end
    end, 5000, creatureId)

    player:addMana(-20)
    player:addManaSpent(20)

    monster:getPosition():sendMagicEffect(CONST_ME_TELEPORT)
    playerPos:sendMagicEffect(CONST_ME_MAGIC_BLUE)
    return true
end

totolol123 · Dec 28, 2013

Really creative spell.
Great work!

PS: I have a question.
For what it's for?

Code:

local damageTable = {
{4, -3},
{9, -2},
{20, -1}
}
for i = 1, #damageTable do
local t = damageTable[i]
condition:addDamage(t[1], 4000, t[2])
end

kamilwxx · Dec 29, 2013

It adds poison to the condition. Poison damage starts at 3 HP for 4 turns, followed by 9 turns with 2 HP and 20 turns with 1 HP each, which adds up to 50 HP over a period of 2 minutes and 12 seconds (text copied from this article).

Printer · Dec 29, 2013

Really nice bro

as always

wafuboe · Jan 2, 2014

elise lol xD

Codinablack · Jan 7, 2014

Thats awesome dude

Wasbo · Mar 20, 2014

Does this work for 0.3.6?

kamilwxx · Mar 30, 2014

Wasbo said:
Does this work for 0.3.6?

It works only for forgottenserver 1.0.

hodleo · Feb 20, 2015

Would be funnier if the spider chased the target to explode instead (and I developed a similar function for a spell before)

EagerBeaver · Jul 22, 2015

This work on 1.1/1.2

?

trayron1 · Aug 1, 2015

How to make a spider not gain experience too?
thanks

Snizzle Snap · Aug 1, 2015

Discussion in 'GlobalEvents, Spells & CreatureEvents' started by kamilwxx, Dec 28, 2013.

Wot. o.o

trayron1 · Aug 1, 2015

How to make a spider not gain experience too?
Thanks
Sorry for double post :/

trayron1 · Aug 10, 2015

can help me please?+

Vladimir Glebov · Jan 10, 2017

any can says, how to make like 3 spiders in one time for cast?

andu · Jan 10, 2017

Vladimir Glebov · Jan 10, 2017

any can says, how to make like 3 spiders in one time for cast? what edit?

Leo32 · Jan 20, 2020

I quite like this spell, but I want the player to be the damager rather than the spider (for loot/pvp/console damage reasons etc).
Plus I wanted the damage to scale based on magic level like every other.

spells\scripts\volatile spiderling.lua

Lua:

local combat = Combat()
combat:setParameter(COMBAT_PARAM_TYPE, COMBAT_POISONDAMAGE)
combat:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
combat:setArea(createCombatArea(AREA_CIRCLE3X3))

local condition = Condition(CONDITION_POISON)
condition:setParameter(CONDITION_PARAM_DELAYED, 1)

local damageTable = {
    {3, -15},
    {4, -10},
    {5, -5},
    {5, -3},
    {5, -2},
    {5, -1}
}

for i = 1, #damageTable do
    local t = damageTable[i]
    condition:addDamage(t[1], 4000, t[2])
end

combat:setCondition(condition)


function onCastSpell(cid, var)
    local player = Player(cid)
    if player == nil then
        return false
    end
 
    local level = player:getLevel()
    local maglevel = player:getMagicLevel()
    local min = (level / 5) + (maglevel * 1.8) + 25
    local max = (level / 5) + (maglevel * 2.85) + 45
    combat:setFormula(COMBAT_FORMULA_DAMAGE, -min, 0, -max, 0)
 
    local playerPos = player:getPosition()
    if #player:getSummons() >= 2 then
        player:sendCancelMessage("You cannot summon more creatures.")
        playerPos:sendMagicEffect(CONST_ME_POFF)
        return false
    end

    local creatureId = doSummonCreature("Spider", playerPos)
    if creatureId == false then
        player:sendCancelMessage(RET_NOTENOUGHROOM)
        playerPos:sendMagicEffect(CONST_ME_POFF)
        return false
    end

    local monster = Monster(creatureId)
    monster:setMaster(player)
    monster:registerEvent("VolatileSpiderling")

    addEvent(function(cid)
        local creature = Creature(cid)
        if creature ~= nil then
            local player = creature:getMaster()
            if player then
                combat:execute(player, numberToVariant(cid))
            else
                combat:execute(creature, numberToVariant(cid))
            end
            creature:getPosition():sendMagicEffect(CONST_ME_HITBYPOISON)
            creature:remove()
        end
    end, 5000, creatureId)

    monster:getPosition():sendMagicEffect(CONST_ME_TELEPORT)
    playerPos:sendMagicEffect(CONST_ME_MAGIC_BLUE)
    return true
end

creaturescripts\scripts\volatilespiderling.lua

Lua:

local combat = Combat()
combat:setParameter(COMBAT_PARAM_TYPE, COMBAT_POISONDAMAGE)
combat:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_POISONAREA)
combat:setArea(createCombatArea(AREA_CIRCLE3X3))

local condition = Condition(CONDITION_POISON)
condition:setParameter(CONDITION_PARAM_DELAYED, 1)

local damageTable = {
    {3, -15},
    {4, -10},
    {5, -5},
    {5, -3},
    {5, -2},
    {5, -1}
}

for i = 1, #damageTable do
    local t = damageTable[i]
    condition:addDamage(t[1], 4000, t[2])
end

combat:setCondition(condition)

function onDeath(cid, ...)
    local creature = Creature(cid)
    local master = creature:getMaster()
    if master then
        local level = master:getLevel()
        local maglevel = master:getMagicLevel()
        local min = (level / 5) + (maglevel * 1.8) + 25
        local max = (level / 5) + (maglevel * 2.85) + 45
        combat:setFormula(COMBAT_FORMULA_DAMAGE, -min, 0, -max, 0)
        combat:execute(master, numberToVariant(cid))
    else
        combat:setFormula(COMBAT_FORMULA_DAMAGE, -10, 0, -20, 0)
        combat:execute(creature, numberToVariant(cid))
    end
    return true
end

It's also better to have the manacosts in spell.xml, no idea why it's in the script itself:

XML:

<instant group="attack" name="Volatile Spiderling" words="volatile spiderling" lvl="23" mana="60" selftarget="1" prem="1" exhaustion="2000" groupcooldown="2000" needlearn="0" script="attack/volatile spiderling.lua">

Spell Volatile Spiderling

kamilwxx

This account is inactive.

totolol123

Well-Known Member

kamilwxx

This account is inactive.

Printer

if Printer then print("LUA") end

wafuboe

Member

Codinablack

Dreamer

Wasbo

New Member

kamilwxx

This account is inactive.

hodleo

Formerly cbrm -Crypto enthusiast, Retired scripter

EagerBeaver

New Member

trayron1

New Member

Snizzle Snap

Advanced OT User

trayron1

New Member

trayron1

New Member

Vladimir Glebov

http://www.zorgania.com

andu

Sold 649 scripts, 25 maps and 9 events!

Vladimir Glebov

http://www.zorgania.com

Leo32

Getting back into it...

Similar threads