constant function Trig_Rjawchina_Ability takes nothing returns integer
     return 'A04F'
endfunction

constant function Trig_Rjawchina_Dummy takes nothing returns integer
     return 'n02J'
endfunction

constant function Trig_Rjawchina_Effect takes nothing returns string
     return "Abilities\\Spells\\Other\\StrongDrink\\BrewmasterMissile.mdl"
endfunction

constant function Trig_Rjawchina_Dummy_Abilities takes integer lvl returns integer
     local integer i  
     if lvl == 1 then
         set i = 'A049'
     endif
     if lvl == 2 then
         set i = 'A04D'
     endif
     if lvl == 3 then
         set i = 'A04E'
     endif
     if lvl == 4 then
         set i = 'A04f'
     endif
     if lvl == 5 then
         set i = 'A04G'
     endif
     if lvl == 6 then
         set i = 'A04H'
     endif
     return i
endfunction

constant function Trig_Rjawchina_Period takes nothing returns real
     return 1.
endfunction

constant function Trig_Rjawchina_Time takes nothing returns integer
     return 1
endfunction

constant function Trig_Rjawchina_AOE takes integer lvl returns real
     return 100. + 20. * lvl
endfunction

function Trig_Rjawchina_Conditions takes nothing returns boolean
     return GetSpellAbilityId() == Trig_Rjawchina_Ability()
endfunction

function Trig_Rjawchina_Timer takes nothing returns nothing
     local timer t = GetExpiredTimer()
     local integer id = GetHandleId(t)
     local unit u = LoadUnitHandle(udg_Hash, id, 0)
     local group g = LoadGroupHandle(udg_Hash, id, 1)
     local integer i = LoadInteger(udg_Hash, id, 2) + Trig_Rjawchina_Time()
     local unit d = null
     local unit b = null
     if i > 6 then
         call DestroyGroup(g)
         call DestroyTimer(t)  
         call FlushChildHashtable(udg_Hash, id)  
     else
         loop
         b = FirstOfGroup(g)
         exitwhen(b == null)
         if IsUnitEnemy(b, GetOwningPlayer(u)) == true and not IsUnitType(b, UNIT_TYPE_MAGIC_IMMUNE) == true and GetWidgetLife(b) > 0.405 and not IsUnitType(b, UNIT_TYPE_STRUCTURE) == true then
             set d = CreateUnit(GetOwningPlayer(u), Trig_Rjawchina_Dummy(), GetWidgetX(b), GetWidgetY(b), 0)
             call UnitAddAbility(d, Trig_Rjawchina_Dummy_Abilities(GetUnitAbilityLevel(u, Trig_Rjawchina_Ability())))
             call SetUnitAbilityLevel(d, Trig_Rjawchina_Dummy_Abilities(GetUnitAbilityLevel(u, Trig_Rjawchina_Ability())), i)
             call IssueTargetOrder(d, "cripple", b)
             call UnitApplyTimedLife(d, 'BTLF', 1.00)  
             call DestroyEffect(AddSpecialEffectTarget(Trig_Rjawchina_Effect(), b, "chest"))
         endif
         call GroupRemoveUnit(g, b)
         endloop
         call DestroyGroup(g)
     endif
     call SaveInteger(udg_Hash, id, 2, i)
     set t = null
     set u = null
     set g = null
     set d = null
     set b = null
endfunction

function Trig_Rjawchina_Actions takes nothing returns nothing
     local unit u = GetTriggerUnit()
     local location l = GetSpellTargetLoc()
     local real x = GetLocationX(l)
     local real y = GetLocationY(l)
     local unit d = null
     local timer t = CreateTimer()
     local integer id = GetHandleId(t)
     local group g = CreateGroup()
     local group gr = CreateGroup()
     local unit b = null
     call RemoveLocation(l)
     call GroupEnumUnitsInRange(g, x, y, Trig_Rjawchina_AOE(GetUnitAbilityLevel(u,Trig_Rjawchina_Ability())), null)
     loop
         b = FirstOfGroup(g)
         exitwhen(b == null)
         if IsUnitEnemy(b, GetOwningPlayer(u)) == true and not IsUnitType(b, UNIT_TYPE_MAGIC_IMMUNE) == true and GetWidgetLife(b) > 0.405 and not IsUnitType(b, UNIT_TYPE_STRUCTURE) == true then
             set d = CreateUnit(GetOwningPlayer(u), Trig_Rjawchina_Dummy(), x, y, 0)
             call UnitAddAbility(d, Trig_Rjawchina_Dummy_Abilities(GetUnitAbilityLevel(u,Trig_Rjawchina_Ability())))
             call IssueTargetOrder(d, "cripple", b)
             call UnitApplyTimedLife(d, 'BTLF', 1.00)  
             call DestroyEffect(AddSpecialEffectTarget(Trig_Rjawchina_Effect(), b, "chest"))
             call GroupAddUnit(gr, b)
         endif
         call GroupRemoveUnit(g, b)       
         endloop
         call DestroyGroup(g)
     call SaveAgentHandle(udg_Hash, id, 0, u)
     call SaveGroupHandle(udg_Hash, id, 1, gr)
     call SaveInteger(udg_Hash, id, 2, Trig_Rjawchina_Time())
     call TimerStart(t, Trig_Rjawchina_Period(), true, function Trig_Rjawchina_Timer)
     set u = null
     set l = null
     set d = null
     set t = null
     set g = null
     set gr = null
     set b = null
endfunction

//===========================================================================
function InitTrig_Rjawchina takes nothing returns nothing
     local unit u = CreateUnit(Player(0), 'n02G', 0, 0, 0)
     call UnitAddAbility(u, 'A049')
     call SetUnitAbilityLevel(u, 'A049', 6)
     call UnitAddAbility(u, 'A04D')
     call SetUnitAbilityLevel(u, 'A04D', 6)
     call UnitAddAbility(u, 'A04E')
     call SetUnitAbilityLevel(u, 'A04E', 6)
     call UnitAddAbility(u, 'A04F')
     call SetUnitAbilityLevel(u, 'A04F', 6)
     call UnitAddAbility(u, 'A04G')
     call SetUnitAbilityLevel(u, 'A04G', 6)
     call UnitAddAbility(u, 'A04H')
     call SetUnitAbilityLevel(u, 'A04H', 6)
     call KillUnit(u)
     set gg_trg_Rjawchina = CreateTrigger(  )
     call TriggerRegisterAnyUnitEventBJ( gg_trg_Rjawchina, EVENT_PLAYER_UNIT_SPELL_EFFECT )
     call TriggerAddCondition( gg_trg_Rjawchina, Condition( function Trig_Rjawchina_Conditions ) )
     call TriggerAddAction( gg_trg_Rjawchina, function Trig_Rjawchina_Actions )
     call Preload("Abilities\\Spells\\Other\\StrongDrink\\BrewmasterMissile.mdl")
     call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Other\\StrongDrink\\BrewmasterMissile.mdl", 0, 0))
     set u = null
endfunction