[spoiler*] SCYTHER
local scyther = {lookType = 1169}
local scythe1 = createCombatArea{
{0, 0, 0},
{0, 0, 0},
{0, 2, 0},
{1, 0, 0},
}
local scythe2 = createCombatArea{
{1, 0, 0},
{0, 0, 0},
{0, 2, 0},
}
local scythe3 = createCombatArea{
{1, 0, 0, 0},
{0, 0, 2, 0},
{0, 0, 0, 0},
}
local scythe4 = createCombatArea{
{0, 0, 0, 1},
{0, 0, 2, 0},
{0, 0, 0, 0},
}
local rollarea = createCombatArea{
{1, 1, 1},
{1, 2, 1},
{1, 1, 1},
}
function onCastSpell(cid, var)
if getCreatureCondition(getCreatureMaster(cid), CONDITION_INFIGHT) == TRUE then
return true
end
if getCreatureCondition(cid, CONDITION_OUTFIT) == true then
return true
end
doCreatureSay(cid, "", TALKTYPE_MONSTER)
if getCreatureOutfit(cid).lookType == 1170 then
doSetCreatureOutfit(cid, scyther, -1)
doChangeSpeed(cid, -1000)
damage = 1500
end
local dmg = damage
local function damage(params)
if isCreature(params.cid) then
doAreaCombatHealth(params.cid, BUGDAMAGE, getThingPos(params.cid), rollarea, -(params.dmg), -(params.dmg), 255)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe1, 0, 0, 128)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe2, 0, 0, 131)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe3, 0, 0, 129)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe4, 0, 0, 130)
end
end
local function voltar(params)
if isCreature(params.cid) then
doRemoveCondition(params.cid, CONDITION_OUTFIT)
doChangeSpeed(cid, 1000)
doRemoveCondition(getCreatureMaster(cid),CONDITION_INFIGHT)
end
end
local vezes = 3
local delay = 600 -- não mexe
for i = 1, vezes do
addEvent(damage, delay*i, {cid = cid, dmg = dmg})
end
addEvent(voltar, 800*vezes, {cid = cid})
end [/spoiler*]
Hitmontop
[spoiler*] local Hitmontop = {lookType = 1194}
local scythe1 = createCombatArea{
{0, 0, 0},
{0, 0, 0},
{0, 2, 0},
{1, 0, 0},
}
local scythe2 = createCombatArea{
{1, 0, 0},
{0, 0, 0},
{0, 2, 0},
}
local scythe3 = createCombatArea{
{1, 0, 0, 0},
{0, 0, 2, 0},
{0, 0, 0, 0},
}
local scythe4 = createCombatArea{
{0, 0, 0, 1},
{0, 0, 2, 0},
{0, 0, 0, 0},
}
local rollarea = createCombatArea{
{1, 1, 1},
{1, 2, 1},
{1, 1, 1},
}
function onCastSpell(cid, var)
if getCreatureCondition(getCreatureMaster(cid), CONDITION_INFIGHT) == TRUE then
return true
end
if getCreatureCondition(cid, CONDITION_OUTFIT) == true then
return true
end
doCreatureSay(cid, "", TALKTYPE_MONSTER)
if getCreatureOutfit(cid).lookType == 1195 then
doSetCreatureOutfit(cid, Hitmontop, -1)
doChangeSpeed(cid, -1000)
damage = 1500
end
local dmg = damage
local function damage(params)
if isCreature(params.cid) then
doAreaCombatHealth(params.cid, FIGHTINGDAMAGE, getThingPos(params.cid), rollarea, -(params.dmg), -(params.dmg), 255)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe1, 0, 0, 128)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe2, 0, 0, 131)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe3, 0, 0, 129)
doAreaCombatHealth(params.cid, element, getThingPos(params.cid), scythe4, 0, 0, 130)
end
end
local function voltar(params)
if isCreature(params.cid) then
doRemoveCondition(params.cid, CONDITION_OUTFIT)
doChangeSpeed(cid, 1000)
doRemoveCondition(getCreatureMaster(cid),CONDITION_INFIGHT)
end
end
local vezes = 3
local delay = 400 -- não mexe
for i = 1, vezes do
addEvent(damage, delay*i, {cid = cid, dmg = dmg})
end
addEvent(voltar, 600*vezes, {cid = cid})
end [/spoiler*]