function Trig_GetHerb_Actions takes nothing returns nothing
       local integer o = GetPlayerId(GetOwningPlayer(GetKillingUnit())) + 1
       local destructable dest = GetDyingDestructable()
       local integer dt = GetDestructableTypeId(dest)
       local real d = LoadReal(udg_Hash, GetHandleId(dest), 0)
       local integer i = LoadInteger(udg_Hash, GetHandleId(dest), 1)

       call BJDebugMsg("yes")
       if dt == 'B002' then
           call SetUnitState( udg_HeroesPlaying[o], UNIT_STATE_LIFE, GetUnitState( udg_HeroesPlaying[o], UNIT_STATE_LIFE ) + GetUnitState( udg_HeroesPlaying[o], UNIT_STATE_LIFE ) * d )
       endif
       if dt == 'B005' then
           call SetUnitState( udg_HeroesPlaying[o], UNIT_STATE_MANA, GetUnitState( udg_HeroesPlaying[o], UNIT_STATE_MANA ) + GetUnitState( udg_HeroesPlaying[o], UNIT_STATE_MANA ) * d )
       endif

       set udg_Herbs[i] = null
       set dest = null
endfunction

//===========================================================================
function InitTrig_GetHerb takes nothing returns nothing
       set gg_trg_GetHerb = CreateTrigger(  )
       call TriggerRegisterDestDeathInRegionEvent( gg_trg_GetHerb, bj_mapInitialPlayableArea )
       call TriggerAddAction( gg_trg_GetHerb, function Trig_GetHerb_Actions )
endfunction

function Trig_Rewards_Actions takes nothing returns nothing
       local unit u = GetDyingUnit()
       local integer l = GetUnitLevel(u)
       local player p = GetOwningPlayer(u)
       local real x = GetWidgetX(u)
       local real y = GetWidgetY(u)
       local integer array herb
       local real hSize
       local real hRest
       local integer n = GetRandomInt( 0, 100 )
       local integer h
       if GetPlayerId(p) > 9 and l < 21 then

       set herb[1] = 21 - l
       set herb[2] = herb[1] + 21 - l
       set herb[3] = herb[2] + R2I( l * 0.7 )
       set herb[4] = herb[3] + R2I( l * 0.7 )
       set herb[5] = herb[4] + R2I( l * 0.4 )
       set herb[6] = herb[5] + R2I( l * 0.4 )

       if n <= herb[1] then
           set h = 'B002'
           set hSize = 0.45
           set hRest = 0.1
       elseif n > herb[1] and n <= herb[2] then
           set h = 'B005'
           set hSize = 0.45
           set hRest = 0.1
       elseif n > herb[2] and n <= herb[3] then
           set h = 'B002'
           set hSize = 0.55
           set hRest = 0.2
       elseif n > herb[3] and n <= herb[4] then
           set h = 'B005'
           set hSize = 0.55
           set hRest = 0.2
       elseif n > herb[4] and n <= herb[5] then
           set h = 'B002'
           set hSize = 0.7
           set hRest = 0.3
       elseif n > herb[5] and n <= herb[6] then
           set h = 'B005'
           set hSize = 0.7
           set hRest = 0.3
       elseif n > herb[6] then
           set h = 0
       endif

       if h != 0 then
           if udg_HerbIndex == 50 then
               set udg_HerbIndex = 1
           endif
           if udg_Herbs[udg_HerbIndex] != null then
               call RemoveDestructable(udg_Herbs[udg_HerbIndex])
           endif
           set udg_Herbs[udg_HerbIndex] = CreateDestructable( h, x, y, 0.0, hSize, 1 )
           call SaveReal(udg_Hash, GetHandleId(udg_Herbs[udg_HerbIndex]), 0, hRest)
           call SaveInteger(udg_Hash, GetHandleId(udg_Herbs[udg_HerbIndex]), 1, udg_HerbIndex)
           set udg_HerbIndex = udg_HerbIndex + 1
       endif

       endif

       set p = null
       set u = null