Zikadasilva

local combat = createCombatObject()
        setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED)

local area = createCombatArea(AREA_SQUARE1X1)
        setCombatArea(combat, area)

function onTargetCreature(cid, target)
    if isPlayer(target) then
            return doAddCondition(target, CONDITION_EXHAUST) end
                    setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
        return doCombat(cid, combat, var)
end