function GetRandomUnitFromGroupDeath takes group g returns unit
        real s = GetRandomReal( -10, 10)
        real l = 0
        real lm = 0
        if CountUnitsInGroup(g) > 1 {
            G = CopyGroup(g)
            loop
                E = FirstOfGroup(G)
                lm = GetUnitLifePercent(E)
                exitwhen E == null
                if lm + s > l {
                    l = lm
                    n = E
                }
                GroupRemoveUnit(G, E)
                endloop
            else
        n = FirstOfGroup(g)
        }
        return n
    endfunction