function Trig_Cast_Debug_Conditions takes nothing returns boolean
    return GetSpellAbilityId() == 'A0E0' 
endfunction

function Timer_Return_Mana_Expires takes nothing returns nothing
    local timer t = GetExpiredTimer( )
    local integer id = GetHandleId( t )
    local unit u = LoadUnitHandle( gg_htb_HashData, id, 0 )
    
    call UnitRemoveAbility( u, 'BEia' )
    call UnitRemoveAbility( u, 'BEim' )
    
   // call SetUnitState( u, UNIT_STATE_MANA, LoadReal( gg_htb_HashData, id, 1 ) )
    call FlushChildHashtable( gg_htb_HashData,id )
    call DestroyTimer(t)
    
    set u = null
    set t = null
endfunction


function Trig_Cast_Debug_Actions takes nothing returns nothing
    local unit u = GetSpellAbilityUnit( )
    local timer t = CreateTimer( )
    local integer id = GetHandleId(t)
    
    
    call SaveUnitHandle( gg_htb_HashData,id,0, u )
    call TimerStart( t, 0.00, false, function Timer_Return_Mana_Expires )
    call BJDebugMsg("!")

    
    set t = null
    set u = null
endfunction

//===========================================================================
function InitTrig_Cast_Debug takes nothing returns nothing
    set gg_trg_Cast_Debug = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Cast_Debug, EVENT_PLAYER_UNIT_SPELL_CAST )
    call TriggerAddCondition( gg_trg_Cast_Debug, Condition( function Trig_Cast_Debug_Conditions ) )
    call TriggerAddAction( gg_trg_Cast_Debug, function Trig_Cast_Debug_Actions )
endfunction