Rugged Mage
Lua Scripter
- Joined
- Mar 8, 2010
- Messages
- 1,182
- Solutions
- 2
- Reaction score
- 74
These Spells Arent The Best of the Best or anything but they were some of the first ive ever made so i feel like ive finally accomplished something hehe.
Four New Spells I Made Recently:
Add In Data>Spells>Spells.xml
-Attack Spells-
</instant>
<instant name="Druid Fury" words="druid fury" lvl="200" mana="1500" exhaustion="2100" needlearn="0" script="attack/razgos exo.lua">
<vocation id="2" />
<vocation id="6" />
</instant>
<instant name="Divine Condition" words="exevo san condition" lvl="200" mana="500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/thecondition.lua">
<vocation id="3"/>
<vocation id="7" />
</instant>
<instant name="Exori Super Gran" words="exori super gran" lvl="200" mana="500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/superexori.lua">
<vocation id="4"/>
<vocation id="8" />
</instant>
<instant name="Sorcerer Fury" words="blind anger" lvl="200" mana="1500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/anger.lua">
<vocation id="1"/>
<vocation id="5"/>[/PHP]
Goto Data>Spells>Scripts>Attack
Now Make a Lua named razgos exo
and put this in it
Picture:
Goto Data>Spells>Scripts>Attack
Now Make a Lua named thecondition
and put this in it
Goto Data>Spells>Scripts>Attack
Now Make a Lua named SuperExori
and put this in it
Goto Data>Spells>Scripts>Attack
Now Make a Lua named anger
and put this in it
Four New Spells I Made Recently:
Add In Data>Spells>Spells.xml
-Attack Spells-
</instant>
<instant name="Druid Fury" words="druid fury" lvl="200" mana="1500" exhaustion="2100" needlearn="0" script="attack/razgos exo.lua">
<vocation id="2" />
<vocation id="6" />
</instant>
<instant name="Divine Condition" words="exevo san condition" lvl="200" mana="500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/thecondition.lua">
<vocation id="3"/>
<vocation id="7" />
</instant>
<instant name="Exori Super Gran" words="exori super gran" lvl="200" mana="500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/superexori.lua">
<vocation id="4"/>
<vocation id="8" />
</instant>
<instant name="Sorcerer Fury" words="blind anger" lvl="200" mana="1500" prem="1" selftarget="1" exhaustion="2100" needlearn="0" script="attack/anger.lua">
<vocation id="1"/>
<vocation id="5"/>[/PHP]
Goto Data>Spells>Scripts>Attack
Now Make a Lua named razgos exo
and put this in it
PHP:
local repeatAmount = 3
local deathFlamesArea = {
createCombatArea({
{0, 1, 0},
{1, 2, 1},
{0, 1, 0}
}),
createCombatArea({
{0, 1, 1, 1, 0},
{1, 1, 0, 1, 1},
{1, 0, 2, 0, 1},
{1, 1, 0, 1, 1},
{0, 1, 1, 1, 0}
}),
createCombatArea({
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0},
{1, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 2, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0}
})
}
local bigFlamesArea = createCombatArea({
{0, 0, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 0, 2, 0, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 0, 0}
})
local deathFlames = {}
for k, area in ipairs(deathFlamesArea) do
deathFlames[k] = createCombatObject()
setCombatParam(deathFlames[k], COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE)
setCombatParam(deathFlames[k], COMBAT_PARAM_EFFECT, CONST_ME_ICETORNADO)
setCombatFormula(deathFlames[k], COMBAT_FORMULA_LEVELMAGIC, -5.593, -50, -7.929, -100)
setCombatArea(deathFlames[k], area)
end
local bigFlames = createCombatObject()
setCombatParam(bigFlames, COMBAT_PARAM_TYPE, COMBAT_EARTHDAMAGE)
setCombatParam(bigFlames, COMBAT_PARAM_EFFECT, CONST_ME_PLANTATTACK)
setCombatFormula(bigFlames, COMBAT_FORMULA_LEVELMAGIC, -5.766, -50, -6.241, -100)
setCombatArea(bigFlames, bigFlamesArea)
function onTargetTile(cid, pos)
doSendDistanceShoot(getCreaturePosition(cid), pos, CONST_ANI_DEATH)
end
setCombatCallback(bigFlames, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
local function castSpellDelay(p)
if(isCreature(p[1]) == TRUE) then
doCombat(unpack(p))
end
end
function onCastSpell(cid, var)
for i = 0, repeatAmount - 1 do
for k, combat in ipairs(deathFlames) do
addEvent(castSpellDelay, (150 * k) + #deathFlames * 150 * i + 700 * i, {cid, combat, var})
end
addEvent(castSpellDelay, (150 * #deathFlames) + #deathFlames * 150 * i + 700 * i, {cid, bigFlames, var})
end
return LUA_NO_ERROR
end
Picture:
Goto Data>Spells>Scripts>Attack
Now Make a Lua named thecondition
and put this in it
PHP:
local repeatAmount = 3
local deathFlamesArea = {
createCombatArea({
{0, 1, 0},
{1, 2, 1},
{0, 1, 0}
}),
createCombatArea({
{0, 1, 1, 1, 0},
{1, 1, 0, 1, 1},
{1, 0, 2, 0, 1},
{1, 1, 0, 1, 1},
{0, 1, 1, 1, 0}
}),
createCombatArea({
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0},
{1, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 2, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0}
})
}
local bigFlamesArea = createCombatArea({
{0, 0, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 0, 2, 0, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 0, 0}
})
local deathFlames = {}
for k, area in ipairs(deathFlamesArea) do
deathFlames[k] = createCombatObject()
setCombatParam(deathFlames[k], COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(deathFlames[k], COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)
setCombatFormula(deathFlames[k], COMBAT_FORMULA_LEVELMAGIC, -6.593, -50, -8.929, -100)
setCombatArea(deathFlames[k], area)
end
local bigFlames = createCombatObject()
setCombatParam(bigFlames, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE)
setCombatParam(bigFlames, COMBAT_PARAM_EFFECT, CONST_ME_ENERGYAREA)
setCombatFormula(bigFlames, COMBAT_FORMULA_LEVELMAGIC, -6.766, -50, -8.241, -100)
setCombatArea(bigFlames, bigFlamesArea)
function onTargetTile(cid, pos)
doSendDistanceShoot(getCreaturePosition(cid), pos, CONST_ANI_ETHEREALSPEAR)
end
setCombatCallback(bigFlames, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
local function castSpellDelay(p)
if(isCreature(p[1]) == TRUE) then
doCombat(unpack(p))
end
end
function onCastSpell(cid, var)
for i = 0, repeatAmount - 1 do
for k, combat in ipairs(deathFlames) do
addEvent(castSpellDelay, (150 * k) + #deathFlames * 150 * i + 700 * i, {cid, combat, var})
end
addEvent(castSpellDelay, (150 * #deathFlames) + #deathFlames * 150 * i + 700 * i, {cid, bigFlames, var})
end
return LUA_NO_ERROR
end
Goto Data>Spells>Scripts>Attack
Now Make a Lua named SuperExori
and put this in it
PHP:
local repeatAmount = 3
local deathFlamesArea = {
createCombatArea({
{0, 1, 0},
{1, 2, 1},
{0, 1, 0}
}),
createCombatArea({
{0, 1, 1, 1, 0},
{1, 1, 0, 1, 1},
{1, 0, 2, 0, 1},
{1, 1, 0, 1, 1},
{0, 1, 1, 1, 0}
}),
createCombatArea({
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0},
{1, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 2, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0}
})
}
local bigFlamesArea = createCombatArea({
{0, 0, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 0, 2, 0, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 0, 0}
})
local deathFlames = {}
for k, area in ipairs(deathFlamesArea) do
deathFlames[k] = createCombatObject()
setCombatParam(deathFlames[k], COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(deathFlames[k], COMBAT_PARAM_EFFECT, CONST_ME_GROUNDSHAKE)
setCombatFormula(deathFlames[k], COMBAT_FORMULA_LEVELMAGIC, -12.593, -50, -13.929, -100)
setCombatArea(deathFlames[k], area)
end
local bigFlames = createCombatObject()
setCombatParam(bigFlames, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(bigFlames, COMBAT_PARAM_EFFECT, CONST_ME_GROUNDSHAKER)
setCombatFormula(bigFlames, COMBAT_FORMULA_LEVELMAGIC, -13.766, -50, -12.241, -100)
setCombatArea(bigFlames, bigFlamesArea)
function onTargetTile(cid, pos)
doSendDistanceShoot(getCreaturePosition(cid), pos, CONST_ANI_WHIRLWINDAXE)
end
setCombatCallback(bigFlames, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
local function castSpellDelay(p)
if(isCreature(p[1]) == TRUE) then
doCombat(unpack(p))
end
end
function onCastSpell(cid, var)
for i = 0, repeatAmount - 1 do
for k, combat in ipairs(deathFlames) do
addEvent(castSpellDelay, (150 * k) + #deathFlames * 150 * i + 700 * i, {cid, combat, var})
end
addEvent(castSpellDelay, (150 * #deathFlames) + #deathFlames * 150 * i + 700 * i, {cid, bigFlames, var})
end
return LUA_NO_ERROR
end
Goto Data>Spells>Scripts>Attack
Now Make a Lua named anger
and put this in it
PHP:
local repeatAmount = 3
local deathFlamesArea = {
createCombatArea({
{0, 1, 0},
{1, 2, 1},
{0, 1, 0}
}),
createCombatArea({
{0, 1, 1, 1, 0},
{1, 1, 0, 1, 1},
{1, 0, 2, 0, 1},
{1, 1, 0, 1, 1},
{0, 1, 1, 1, 0}
}),
createCombatArea({
{0, 0, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 1, 0},
{1, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 2, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 0, 0}
})
}
local bigFlamesArea = createCombatArea({
{0, 0, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 0, 0, 0, 2, 0, 0, 0, 1},
{1, 0, 0, 0, 0, 0, 0, 0, 1},
{1, 1, 0, 0, 0, 0, 0, 1, 1},
{0, 1, 1, 0, 0, 0, 1, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 0, 0}
})
local deathFlames = {}
for k, area in ipairs(deathFlamesArea) do
deathFlames[k] = createCombatObject()
setCombatParam(deathFlames[k], COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(deathFlames[k], COMBAT_PARAM_EFFECT, CONST_ME_FIREAREA)
setCombatFormula(deathFlames[k], COMBAT_FORMULA_LEVELMAGIC, -0.593, -50, -0.929, -100)
setCombatArea(deathFlames[k], area)
end
local bigFlames = createCombatObject()
setCombatParam(bigFlames, COMBAT_PARAM_TYPE, COMBAT_ENERGYLDAMAGE)
setCombatParam(bigFlames, COMBAT_PARAM_EFFECT, CONST_ME_BIGCLOUDS)
setCombatFormula(bigFlames, COMBAT_FORMULA_LEVELMAGIC, -0.766, -50, -1.241, -100)
setCombatArea(bigFlames, bigFlamesArea)
function onTargetTile(cid, pos)
doSendDistanceShoot(getCreaturePosition(cid), pos, CONST_ANI_DEATH)
end
setCombatCallback(bigFlames, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
local function castSpellDelay(p)
if(isCreature(p[1]) == TRUE) then
doCombat(unpack(p))
end
end
function onCastSpell(cid, var)
for i = 0, repeatAmount - 1 do
for k, combat in ipairs(deathFlames) do
addEvent(castSpellDelay, (150 * k) + #deathFlames * 150 * i + 700 * i, {cid, combat, var})
end
addEvent(castSpellDelay, (150 * #deathFlames) + #deathFlames * 150 * i + 700 * i, {cid, bigFlames, var})
end
return LUA_NO_ERROR
end