function Trig_CorTarFlamePrecast_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A05R' ) ) then
        return false
    endif
    return true
endfunction

function Trig_CorTarFlamePrecast_Actions takes nothing returns nothing
    call SetUnitAnimation( GetSpellAbilityUnit(), "stand channel" )
    set udg_p = GetUnitLoc(GetSpellAbilityUnit())
    call CreateNUnitsAtLoc( 1, 'u00M', GetOwningPlayer(GetSpellAbilityUnit()), udg_p, GetUnitFacing(GetSpellAbilityUnit()) )
    call SetUnitVertexColorBJ( GetLastCreatedUnit(), 100, 100, 100, 60.00 )
    call RemoveLocation( udg_p )
    local unit CorTarF
    set CorTarF = GetLastCreatedUnit()
    call SetUnitAnimation( CorTarF, "stand channel" )
    call PolledWait( 0.90 )
    call SetUnitAnimation( CorTarF, "spell" )
    call PolledWait( 0.40 )
    call RemoveUnit( CorTarF )
    set CorTarF = null
endfunction

//===========================================================================
function InitTrig_CorTarFlamePrecast takes nothing returns nothing
    set gg_trg_CorTarFlamePrecast = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_CorTarFlamePrecast, EVENT_PLAYER_UNIT_SPELL_CHANNEL )
    call TriggerAddCondition( gg_trg_CorTarFlamePrecast, Condition( function Trig_CorTarFlamePrecast_Conditions ) )
    call TriggerAddAction( gg_trg_CorTarFlamePrecast, function Trig_CorTarFlamePrecast_Actions )
endfunction

function Trig_CorTarFlamePrecast_Conditions takes nothing returns boolean
    return GetSpellAbilityId() == 'A05R' 
endfunction