function Trig_Vrata_LeeJ_Conditions takes nothing returns boolean
    return GetSpellAbilityId() == 'A002'
endfunction

function Trig_Vrata_LeeJ_Actions takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local unit Caster = LoadUnitHandle(udg_Hash, GetHandleId(t), 0)
    call SetUnitVertexColor(Caster, 100, 100, 100, 0)
    call UnitRemoveAbility(Caster, 'A004')
    call FlushChildHashtable(udg_Hash, GetHandleId(t))
    call DestroyTimer(t)
    set Caster = null
    set t = null
endfunction

function Trig_Vrata_LeeJ_Actions2 takes nothing returns nothing
    local unit Caster = GetSpellAbilityUnit()
    local timer t = CreateTimer()
    call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Orc\\WarStomp\\WarStompCaster.mdl",GetU​nitX(Caster), GetUnitY(Caster)))
    call SetUnitVertexColor(Caster, 100, 50, 50, 0)
    call UnitAddAbility(Caster, 'A004')
    call SetUnitAbilityLevel(Caster, 'A004', GetUnitAbilityLevelSwapped('A002', Caster))
    call SaveUnitHandle(udg_Hash, GetHandleId(t), 0, Caster)
    call TimerStart(t,20.0, false, function Trig_Vrata_LeeJ_Actions2 )
endfunction

//===========================================================================
function InitTrig_Vrata_LeeJ takes nothing returns nothing
    local trigger t = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( t, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( t, Condition( function Trig_Vrata_LeeJ_Conditions ) )
    call TriggerAddAction( t, function Trig_Vrata_LeeJ_Actions )
endfunction

call TriggerAddAction( t, function Trig_Vrata_LeeJ_Actions )

call TriggerAddAction( t, function Trig_Vrata_LeeJ_Actions2 )

call TimerStart(t,20.0, false, function Trig_Vrata_LeeJ_Actions2 )

call TimerStart(t,20.0, false, function Trig_Vrata_LeeJ_Actions )