[Pedido] Alterar de tempo para porcentagem de mana

local outfit = {lookType = 462} -- Roupa que ira transformar no caso seu corpo ficara em choque
local tempo = 60 * 1000 -- Tempo, nesse caso esta 60 segundos Lembrando que 1000 = 1 segundo
local voc = 14 --ID da vocação para qual será alterada
local efeito = 38 --ID do efeito que sairá a cada 1 segundo
local mhealth = 30 --porcentagem de vida maxima aumentada (ex: 30)
local mmana = 30 --porcentagem de mana maxima aumentada (ex: 30)
 
local ml = 0 -- quantos ira aumentar o skill de ML
local skillfist = 0 -- quantos ira aumentar o skill de Fist
local skillsword = 0 -- quantos ira aumentar o skill de Sword
local skillaxe = 0 -- quantos ira aumentar o skill de Axe
local skillclub = 0 -- quantos ira aumentar o skill de Club
local skilldistance = 0 -- quantos ira aumentar o skill de Distance
local skillshield = 0 -- quantos ira aumentar o skill de Shield
local health = 0 -- A cada 1 segundo quantos aumentar de vida
local mana = -55
local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, 42)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)
 
local condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)
setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml)
setConditionParam(condition, CONDITION_PARAM_SKILL_FIST, skillfist)
setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword)
setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe)
setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub)
setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield)
setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit)
setConditionParam(condition, CONDITION_PARAM_STAT_MAXHEALTHPERCENT, 100 + mhealth)
setConditionParam(condition, CONDITION_PARAM_STAT_MAXMANAPERCENT, 100 + mmana)
setCombatCondition(combat, condition)
 
local condition = createConditionObject(CONDITION_HASTE)
setConditionParam(condition, CONDITION_PARAM_SPEED, 100)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setCombatCondition(combat, condition)
 
local condition = createConditionObject(CONDITION_REGENERATION)
setConditionParam(condition, CONDITION_PARAM_SUBID, 1)
setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE)
setConditionParam(condition, CONDITION_PARAM_TICKS, tempo)
setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health)
setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 1000)
setConditionParam(condition, CONDITION_PARAM_MANAGAIN, mana)
setConditionParam(condition, CONDITION_PARAM_MANATICKS, 1000)

 
setCombatCondition(combat, condition)
 
local sys = createConditionObject(CONDITION_OUTFIT)
setConditionParam(sys, CONDITION_PARAM_TICKS, tempo)
addOutfitCondition(sys, outfit)
setCombatCondition(combat, sys)

local function meffect(cid,t)
    if isPlayer(cid) and t ~= 0 then
        doSendMagicEffect(getThingPos(cid), efeito)
        addEvent(meffect, 1000, cid, (t - 1))
    end
end
 
function onCastSpell(cid, var)
    registerCreatureEvent(cid, "stordeath12")
    setPlayerStorageValue(cid, voc_stor12, getPlayerVocation(cid))
    doPlayerSetVocation(cid, voc)
    addEvent(doPlayerSetVocation,tempo,cid,getPlayerStorageValue(cid, voc_stor12))
    addEvent(setPlayerStorageValue,tempo,cid,voc_stor12,0)
    meffect(cid,(tempo/1000))
    return doCombat(cid, combat, var)
end