Odp: Skrypt na exury lecz?ce
2.
[lua]local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 13)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -1.0, 0, -1.1, 0)
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 13)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -1.0, 0, -1.1, 0)
local combat3 = createCombatObject()
setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat3, COMBAT_PARAM_EFFECT, 13)
setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -1.0, 0, -1.1, 0)
local combat4 = createCombatObject()
setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat4, COMBAT_PARAM_EFFECT, 13)
setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -1.0, 0, -1.1, 0)
arr = {
{1, 1, 1},
{1, 2, 1},
{1, 1, 1},
}
setCombatArea(combat1, createCombatArea(arr))
arr = {
{0, 1, 1, 1, 0},
{1, 0, 0, 0, 1},
{1, 0, 2, 0, 1},
{1, 0, 0, 0, 1},
{0, 1, 1, 1, 0},
}
setCombatArea(combat2, createCombatArea(arr))
arr = {
{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},
}
setCombatArea(combat3, createCombatArea(arr))
arr = {
{0, 0, 1, 1, 1, 1, 1, 0, 0},
{0, 1, 0, 0, 0, 0, 0, 1, 0},
{1, 0, 0, 0, 0, 0, 0, 0, 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, 0, 0, 0, 0, 0, 0, 0, 1},
{0, 1, 0, 0, 0, 0, 0, 1, 0},
{0, 0, 1, 1, 1, 1, 1, 0, 0},
}
setCombatArea(combat4, createCombatArea(arr))
local function castCombatSpell(cid, combat, pos)
if(isCreature(cid)) then
doCombat(cid, combat, positionToVariant(pos))
end
end
function onCastSpell(cid, var)
local pos = getCreaturePosition(cid)
addEvent(castCombatSpell, 200, cid, combat1, pos)
addEvent(castCombatSpell, 400, cid, combat2, pos)
addEvent(castCombatSpell, 600, cid, combat3, pos)
addEvent(castCombatSpell, 800, cid, combat4, pos)
return true
end[/lua]
[MENTION=15656]edi[/MENTION]t
wybacz za funkcje isCreatureCastable - ju? poprawi?em.