function Trig_Actions_to_apply_Actions takes nothing returns nothing
     // This is the caster of the knockback.
     // If you use spells, it_s mostly the 'triggering unit' or the 'casting unit'.
     set udg_KBA_Caster = GetTriggerUnit()
     //   
     // This is the unit knocked back. Set this variable to the unit which should receive the knockback.
     // Use for example 'Target unit of ability being cast' or 'picked unit', 'attacking unit', 'casting unit', 'triggering unit' or whatever.
     set udg_KBA_TargetUnit = GetSpellTargetUnit()
     //   
     // This is the location from where the unit should be knocked back.
     // Don_t set this location to the position of the unit which should be knocked back.
     set udg_KBA_StartingPositionX = GetUnitX(udg_KBA_Caster)
     set udg_KBA_StartingPositionY = GetUnitY(udg_KBA_Caster)
     //   
     // This saves the level of the spell.
     // If the level shouldn_t influence the knockback, set the variable to 1.
     set udg_KBA_Level = GetUnitAbilityLevel(udg_KBA_Caster,GetSpellAbilityId())
     //   
     // This determines the speed of the knockback.
     // If you set the speed to 0, the unit won_t move.
     set udg_KBA_Speed = 7.00
     //   
     // This determines the distance knockbacked per level of the spell.
     // If the level shouldn_t influence the knockback, simply set this variable to the distance you wish.
     set udg_KBA_DistancePerLevel = 150.00
     //   
     // The following both variables store the path of the effects used.
     // Effect[1] is more often used than Effect[2].
     set udg_KBA_SpecialEffects[1] = "Abilities\\Spells\\Human\\FlakCannons\\FlakTarget.mdl"
     set udg_KBA_SpecialEffects[2] = "Abilities\\Weapons\\AncientProtectorMissile\\AncientProtectorMissile.mdl"
     //   
     // Set the following variable to 'false' to allow trees to survive a collision with a knocked unit.
     // Set the following variable to 'true' to kill trees upon collision with a knocked unit.
     set udg_KBA_DestroyTrees = true
     //   
     // After setting the needed variables we start the knockback.
     if TriggerEvaluate(gg_trg_Cast_A_Knockback) then
         call TriggerExecute(gg_trg_Cast_A_Knockback)
     endif
     // Done. The unit knockbacked if the trigger triggers.
endfunction

//===========================================================================
function InitTrig_Actions_to_apply takes nothing returns nothing
     set gg_trg_Actions_to_apply = CreateTrigger()
     call TriggerAddAction(gg_trg_Actions_to_apply,function Trig_Actions_to_apply_Actions)
endfunction

function Knockback_KillDestructable takes nothing returns nothing
     call KillDestructable(GetEnumDestructable())  
endfunction

function Trig_Knockback_Moving takes nothing returns nothing
     local real x1  
     local real y1
     local real x2
     local real y2
     local rect r
     set udg_KB_GeneralIntegers[1] = 1
     loop
         exitwhen udg_KB_GeneralIntegers[1] > udg_KB_TotalKnockUnits
         if IsUnitInGroup(udg_KB_Units[udg_KB_GeneralIntegers[1]], udg_KB_KnockbackedUnits) == true then
             if udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]] >= udg_KB_MaxDistance[udg_KB_GeneralIntegers[1]] then
                 call GroupRemoveUnit(udg_KB_KnockbackedUnits,udg_KB_Units[udg_KB_GeneralIntegers[1]])
                 set udg_KB_CountBuffs = udg_KB_CountBuffs - 1
                 if udg_KB_TotalKnockUnits > udg_KB_GeneralIntegers[1] then
                     set udg_KB_Levels[udg_KB_GeneralIntegers[1]] = udg_KB_Levels[udg_KB_TotalKnockUnits]
                     set udg_KB_Units[udg_KB_GeneralIntegers[1]] = udg_KB_Units[udg_KB_TotalKnockUnits]
                     set udg_KB_Angle[udg_KB_GeneralIntegers[1]] = udg_KB_Angle[udg_KB_TotalKnockUnits]
                     set udg_KB_MaxDistance[udg_KB_GeneralIntegers[1]] = udg_KB_MaxDistance[udg_KB_TotalKnockUnits]
                     set udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]] = udg_KB_ReachedDistance[udg_KB_TotalKnockUnits]
                     set udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] = udg_KB_ReduceSpeedReal[udg_KB_TotalKnockUnits]
                     set udg_KB_SpecificSpeed[udg_KB_GeneralIntegers[1]] = udg_KB_SpecificSpeed[udg_KB_TotalKnockUnits]
                     set udg_KB_Effects_1[udg_KB_GeneralIntegers[1]] = udg_KB_Effects_1[udg_KB_TotalKnockUnits]
                     set udg_KB_Effects_2[udg_KB_GeneralIntegers[1]] = udg_KB_Effects_2[udg_KB_TotalKnockUnits]
                     set udg_KB_DestroyTrees[udg_KB_GeneralIntegers[1]] = udg_KB_DestroyTrees[udg_KB_TotalKnockUnits]
                     set udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter[udg_KB_TotalKnockUnits]
                     set udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter2[udg_KB_TotalKnockUnits]
                     set udg_KB_GeneralIntegers[1] = udg_KB_GeneralIntegers[1] - 1
                 endif
                 set udg_KB_Units[udg_KB_TotalKnockUnits] = null
                 set udg_KB_TotalKnockUnits = udg_KB_TotalKnockUnits - 1
                 if udg_KB_CountBuffs == 0 then
                     set udg_KB_TotalKnockUnits = 0
                     call PauseTimer(GetExpiredTimer())
                     call DestroyTimer(GetExpiredTimer())
                 endif
             else
                 set udg_KB_ReducedReal = udg_KB_SpecificSpeed[udg_KB_GeneralIntegers[1]] / udg_KB_MaxDistance[udg_KB_GeneralIntegers[1]] * udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]]
                 set udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] = udg_KB_ReducedReal - udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] * 0.10
                 set udg_KB_TempReal = udg_KB_SpecificSpeed[udg_KB_GeneralIntegers[1]] - udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] * 2.00
                  
                 set x1 = GetUnitX(udg_KB_Units[udg_KB_GeneralIntegers[1]])
                 set y1 = GetUnitY(udg_KB_Units[udg_KB_GeneralIntegers[1]])
                 set x2 = x1 + udg_KB_TempReal * Cos(udg_KB_Angle[udg_KB_GeneralIntegers[1]] * .0174532)
                 set y2 = y1 + udg_KB_TempReal * Sin(udg_KB_Angle[udg_KB_GeneralIntegers[1]] * .0174532)
                  
                 set udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] + 1
                 set udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] + 1
                 if udg_KB_DestroyTrees[udg_KB_GeneralIntegers[1]] == true then
                     set r = Rect(x2 - 200.,y2 - 200,x2 + 200.,y2 + 200.)
                     call EnumDestructablesInRect(r,null,function Knockback_KillDestructable)
                     call RemoveRect(r)
                     set r = null
                 endif
                 if udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] == 6 then
                     set udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] = 0
                     call DestroyEffect(AddSpecialEffect(udg_KB_Effects_1[udg_KB_GeneralIntegers[1]],x1,y1))
                 endif
                 if udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] == 8 then
                     set udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] = 0
                     call DestroyEffect(AddSpecialEffect(udg_KB_Effects_2[udg_KB_GeneralIntegers[1]],x1,y1))
                 endif
                 call SetUnitX(udg_KB_Units[udg_KB_GeneralIntegers[1]],x2)
                 call SetUnitY(udg_KB_Units[udg_KB_GeneralIntegers[1]],y2)
                 set udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]] = udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]] + udg_KB_TempReal
             endif
         endif
         set udg_KB_GeneralIntegers[1] = udg_KB_GeneralIntegers[1] + 1
     endloop
endfunction

function Trig_Cast_A_Knockback_Actions takes nothing returns nothing
     local timer t
     if IsUnitInGroup(udg_KBA_TargetUnit,udg_KB_KnockbackedUnits) == true then
         call GroupRemoveUnit(udg_KB_KnockbackedUnits,udg_KBA_TargetUnit)
         set udg_KB_CountBuffs = udg_KB_CountBuffs - 1
         set udg_KB_GeneralIntegers[2] = 1
         loop
             exitwhen udg_KB_GeneralIntegers[2] > udg_KB_TotalKnockUnits
             if udg_KB_Units[udg_KB_GeneralIntegers[1]] == udg_KBA_TargetUnit then
                 set udg_KB_GeneralIntegers[1] = udg_KB_GeneralIntegers[2]
                 set udg_KB_GeneralIntegers[2] = udg_KB_TotalKnockUnits
             endif
             set udg_KB_GeneralIntegers[2] = udg_KB_GeneralIntegers[2] + 1
         endloop
         if udg_KB_TotalKnockUnits > udg_KB_GeneralIntegers[1] then
             set udg_KB_Levels[udg_KB_GeneralIntegers[1]] = udg_KB_Levels[udg_KB_TotalKnockUnits]
             set udg_KB_Units[udg_KB_GeneralIntegers[1]] = udg_KB_Units[udg_KB_TotalKnockUnits]
             set udg_KB_Angle[udg_KB_GeneralIntegers[1]] = udg_KB_Angle[udg_KB_TotalKnockUnits]
             set udg_KB_MaxDistance[udg_KB_GeneralIntegers[1]] = udg_KB_MaxDistance[udg_KB_TotalKnockUnits]
             set udg_KB_ReachedDistance[udg_KB_GeneralIntegers[1]] = udg_KB_ReachedDistance[udg_KB_TotalKnockUnits]
             set udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] = udg_KB_ReduceSpeedReal[udg_KB_TotalKnockUnits]
             set udg_KB_SpecificSpeed[udg_KB_GeneralIntegers[1]] = udg_KB_SpecificSpeed[udg_KB_TotalKnockUnits]
             set udg_KB_Effects_1[udg_KB_GeneralIntegers[1]] = udg_KB_Effects_1[udg_KB_TotalKnockUnits]
             set udg_KB_Effects_2[udg_KB_GeneralIntegers[1]] = udg_KB_Effects_2[udg_KB_TotalKnockUnits]
             set udg_KB_DestroyTrees[udg_KB_GeneralIntegers[1]] = udg_KB_DestroyTrees[udg_KB_TotalKnockUnits]
             set udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter[udg_KB_TotalKnockUnits]
             set udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] = udg_KB_EffectCounter2[udg_KB_TotalKnockUnits]
             set udg_KB_GeneralIntegers[1] = udg_KB_GeneralIntegers[1] - 1
         endif
         set udg_KB_Units[udg_KB_TotalKnockUnits] = null
         set udg_KB_TotalKnockUnits = udg_KB_TotalKnockUnits - 1
         if udg_KB_CountBuffs == 0 then
             set udg_KB_TotalKnockUnits = 0
         endif
     endif
     if udg_KB_CountBuffs == 0 then
         set t = CreateTimer()
         call TimerStart(t,0.02,true,function Trig_Knockback_Moving)
         set t = null
     endif
     set udg_KB_CountBuffs = udg_KB_CountBuffs + 1
     set udg_KB_TotalKnockUnits = udg_KB_TotalKnockUnits + 1
     set udg_KB_Casters[udg_KB_TotalKnockUnits] = udg_KBA_Caster
     set udg_KB_Levels[udg_KB_TotalKnockUnits] = udg_KBA_Level
     set udg_KB_Units[udg_KB_TotalKnockUnits] = udg_KBA_TargetUnit
     set udg_KB_TempPoint[udg_KB_TotalKnockUnits] = GetUnitLoc(udg_KBA_TargetUnit)
     set udg_KB_Angle[udg_KB_TotalKnockUnits] = 57.295827 * Atan2(GetUnitY(udg_KBA_TargetUnit) - udg_KBA_StartingPositionY, GetUnitX(udg_KBA_TargetUnit) - udg_KBA_StartingPositionX)
     set udg_KB_MaxDistance[udg_KB_TotalKnockUnits] = udg_KBA_DistancePerLevel * udg_KBA_Level
     set udg_KB_ReachedDistance[udg_KB_TotalKnockUnits] = 0.00
     set udg_KB_ReduceSpeedReal[udg_KB_GeneralIntegers[1]] = 0.00
     set udg_KB_SpecificSpeed[udg_KB_TotalKnockUnits] = udg_KBA_Speed
     set udg_KB_Effects_1[udg_KB_TotalKnockUnits] = udg_KBA_SpecialEffects[1]
     set udg_KB_Effects_2[udg_KB_TotalKnockUnits] = udg_KBA_SpecialEffects[2]
     set udg_KB_DestroyTrees[udg_KB_TotalKnockUnits] = udg_KBA_DestroyTrees
     set udg_KB_EffectCounter[udg_KB_GeneralIntegers[1]] = 0
     set udg_KB_EffectCounter2[udg_KB_GeneralIntegers[1]] = 0
     call GroupAddUnit(udg_KB_KnockbackedUnits,udg_KBA_TargetUnit)
endfunction

//===========================================================================
function InitTrig_Cast_A_Knockback takes nothing returns nothing
     set gg_trg_Cast_A_Knockback = CreateTrigger()
     call TriggerAddAction(gg_trg_Cast_A_Knockback,function Trig_Cast_A_Knockback_Actions)
endfunction

call KnockBackUnit (GetEnumUnit(), 400.0, 3.0, 360.0)