XGM Forum - Написание МУИ аур

Ух как же у меня всё перекрутилось думая как это сделать через бафф или через что,начиная делать через отлов бафф столкнулось с тем что надо отлавливать носителя что б определить уровень

в итоге я это сделал и мне нужна оптимизация поэтому и сделал тему

теперь описание ауры
она в радиусе 600 союзным героям повышает максимальное кол-во здоровья по уровням
'G000' - Уровень1
'G001' - Уровень2
'G002' - Уровень3
'G003' - Уровень4

((кат Вот собственно код

library WisdomAura initializer Init{
    
    define{
        private Trigger = gg_trg_Wisdom_Aura
        private UT = UNIT_TYPE_HERO
        private UT2 = UNIT_TYPE_DEAD
        private sId = 'C002'
        private aId = 'G000'
        private Range = 601.
    }
    
    private bool Filter(){
        return GetUnitAbilityLevel(GetFilterUnit(),sId) > 0
    }
    
    private bool Filter2(){
        unit f = GetFilterUnit()
        bool b = IsUnitAlly(f,PFG) && IsUnitType(f,UT) && !IsUnitType(f,UT2)
        f = null
        return b
    }
    
    // Удаляем все способности
    private void ClearAbility(unit u){
        int i = 0
        whilenot i > 3{
            UnitRemoveAbility(u,aId+i)
            i = i + 1
        }
    }
    
    // Возврашает уровень дополнительного здоровья 
    private int GetUnitAura(unit u){
        int i = 0
        whilenot i > 3{
            if GetUnitAbilityLevel(u,i+aId) > 0{
                return i+1
            }
        i = i + 1
        }
        return 0
    }
    
    // Дейсвия от каждогоносителя
    private void GroupAction(group g,int lvl){
        unit u = null
        do{
            u = FirstOfGroup(g)
            exitwhen u == null
            if lvl != GetUnitAura(u) && GetUnitAbilityLevel(u,sId) <= lvl{ //если стоят рядом то даём больший уровень
                ClearAbility(u)
                UnitAddAbility(u,lvl+aId-1)
                UnitMakeAbilityPermanent(u,true,lvl+aId-1)
            }
            GroupRemoveUnit(g,u)
        }
        u = null
    }
    
    // Дейсвия отловливают группу носителей ауры на карте
    private void Action(){
        unit u = null
        group gB = null
        group g = CreateGroup()
        GroupEnumUnitsInRect(g,bj_mapInitialPlayableArea,Condition(function Filter))
        do{
            u = FirstOfGroup(g)
            exitwhen u == null
            int lvl = GetUnitAbilityLevel(u,sId)
            if lvl > 0{
                PFG = GetOwningPlayer(u)
                gB = CreateGroup()
                GroupEnumUnitsInRange(gB,GetUnitX(u),GetUnitY(u),Range,Condition(function Filter2))
                GroupAction(gB,lvl)
            }
            GroupRemoveUnit(g,u)
            DestroyGroup(gB)
        }
        DestroyGroup(g)
        g = null
        gB = null
        u = null
    }
    
    private void Init(){
        timer t = CreateTimer()
        TimerStart(t,1.,true,function Action)
        t = null
    }
    
}

))

и мне кажеться что очистки ауры нет надо сделать

((кат Вот теперь аура удаляется когда нет баффа

library WisdomAura initializer Init{
    
    define{
        private Trigger = gg_trg_Wisdom_Aura
        private UT = UNIT_TYPE_HERO
        private UT2 = UNIT_TYPE_DEAD
        private sId = 'C002'
        private aId = 'G000'
        private bId = 'B001'
        private Range = 601.
    }
    
    private bool Filter(){
        return GetUnitAbilityLevel(GetFilterUnit(),sId) > 0
    }
    
    private bool Filter2(){
        unit f = GetFilterUnit()
        bool b = IsUnitAlly(f,PFG) && IsUnitType(f,UT) && !IsUnitType(f,UT2)
        f = null
        return b
    }
    
    private void ClearAbility(unit u){
        int i = 0
        whilenot i > 3{
            UnitRemoveAbility(u,aId+i)
            i = i + 1
        }
    }
    
    private int GetUnitAura(unit u){
        int i = 0
        whilenot i > 3{
            if GetUnitAbilityLevel(u,i+aId) > 0{
                return i+1
            }
        i = i + 1
        }
        return 0
    }
    
    private void GroupAction(unit e,int lvl){
        unit u = null
        group g = CreateGroup()
        GroupEnumUnitsInRect(g,bj_mapInitialPlayableArea,Condition(function Filter2))
        do{
            u = FirstOfGroup(g)
            exitwhen u == null
            if IsUnitInRange(u,e,Range){
                if lvl != GetUnitAura(u) && GetUnitAbilityLevel(u,sId) <= lvl{
                    ClearAbility(u)
                    UnitAddAbility(u,lvl+aId-1)
                    UnitMakeAbilityPermanent(u,true,lvl+aId-1)
                }
            }else{
                if GetUnitAbilityLevel(u,bId) == 0{
                    ClearAbility(u)
                }
            }
            GroupRemoveUnit(g,u)
        }
        DestroyGroup(g)
        g = null
        u = null
    }
    
    
    private void Action(){
        unit u = null
        group g = CreateGroup()
        GroupEnumUnitsInRect(g,bj_mapInitialPlayableArea,Condition(function Filter))
        do{
            u = FirstOfGroup(g)
            exitwhen u == null
            int lvl = GetUnitAbilityLevel(u,sId)
            if lvl > 0{
                PFG = GetOwningPlayer(u)
                GroupAction(u,lvl)
            }
            GroupRemoveUnit(g,u)
        }
        DestroyGroup(g)
        g = null
        u = null
    }
    
    private void Init(){
        timer t = CreateTimer()
        TimerStart(t,1.,true,function Action)
        t = null
    }
    
}

))

Klop Папа римский offline Опыт: 13,006 Активность:	раз некто про то как оптимизировать весь этот код не пишет,значит оптимизировать нечего) и улучшить работу кода невозможно
28.04.2012, 00:03	#2 +0/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Msey ???? offline Опыт: 67,346 Активность:	Klop: ведь сторонний вызов или запрет не понадобится '7 символов сэкономишь же)
28.04.2012, 01:44	#5 +0/−1 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Faion Noblesse Oblige offline Опыт: 30,395 Активность:	Msey, современные оптимизаторы вообще производят ренейм всех фукнций.
28.04.2012, 14:31	#6 +1/−1 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Опции темы	Поиск в этой теме
Версия для печати	Поиск в этой теме: Расширенный поиск