library mylib initializer init{
    private hashtable H = InitHashtable()
    
    private function Trig_Agility_Blade_Remove_Agi_Actions takes nothing returns nothing
        local timer t = GetExpiredTimer()
        local integer i = GetHandleId(t)
        local unit caster = LoadUnitHandle(H,i,0)
        
        call SetHeroAgi(caster,GetHeroAgi(caster,false)-LoadInteger(H,i,1),true)
        call DestroyEffect(LoadEffectHandle(H,i,2))
        call DestroyEffect(LoadEffectHandle(H,i,3))
        call DestroyTimer(t)
        call FlushChildHashtable(H,i)
        
        set caster = null
        set t = null
    endfunction
    
    private function Trig_Agility_Blade_Actions takes nothing returns nothing
        local timer t = CreateTimer()
        local integer i = GetHandleId(t)
        local unit caster = GetSpellAbilityUnit()
        local integer agi = GetHeroAgi(caster,true)
        local integer clearagi = GetHeroAgi(caster,false)
        local integer bonus = R2I(agi/2)
        
        call SetHeroAgi(caster,clearagi+bonus,true)
        call SaveUnitHandle(H,i,0,caster)
        call SaveInteger(H,i,1,bonus)
        call SaveEffectHandle(H,i,2,AddSpecialEffectTarget("Abilities\\Spells\\Other\\AcidBomb\\BottleImpact.mdl",caster,"weapon"))
        call SaveEffectHandle(H,i,3,AddSpecialEffectTarget("Abilities\\Spells\\Other\\Drain\\DrainCaster.mdl",caster,"head"))
        call TimerStart(t,7.,false,function Trig_Agility_Blade_Remove_Agi_Actions)
        
        set caster = null
        set t = null
    endfunction
    
    private function Trig_Agility_Blade_Conditions takes nothing returns boolean
        return GetSpellAbilityId() == 'A000'
    endfunction
    
    private function init takes nothing returns nothing
        local integer index = 0
        local trigger gg_trg_Agility_Blade = CreateTrigger( )
        loop
            call TriggerRegisterPlayerUnitEvent(gg_trg_Agility_Blade, Player(index), EVENT_PLAYER_UNIT_SPELL_EFFECT , null)
            set index = index + 1
            exitwhen index == bj_MAX_PLAYER_SLOTS
        endloop
        call TriggerAddCondition( gg_trg_Agility_Blade, Condition( function Trig_Agility_Blade_Conditions ) )
        call TriggerAddAction( gg_trg_Agility_Blade, function Trig_Agility_Blade_Actions )
    endfunction
}