On Kill

function onKill takes Item itm returns nothing
    local Tower tower = itm.getCarrier() 
    local Tower next
    local Iterate in_range
    local integer count
    
    // test if tower is minimum lvl 5
    if tower.getLevel() >= 5 then
        // test, if there are towers in range
        set in_range = Iterate.overUnitsInRangeOfCaster(tower, TARGET_TOWERS, 500)
        set count = IMinBJ(5, in_range.count())
        if count > 0 then 
            call tower.removeExpFlat(count)
            loop
                set next = in_range.nextRandom()
                exitwhen next == 0
                call next.addExpFlat(1)
                call SFXAtUnit("Abilities\\Spells\\Undead\\AnimateDead\\AnimateDeadTarget.mdl", next.getUnit())
                set count = count - 1
                exitwhen count == 0
            endloop
            if next != 0 then
                call in_range.destroy()
            endif
        else
            call in_range.destroy()
        endif
    endif   
endfunction