CountDestructablesInCircle

function CountDestructablesInRect_Enum takes nothing returns nothing
    set bj_randomSubGroupWant = bj_randomSubGroupWant + 1
endfunction
function CountDestructablesInCircle takes location where, real radius returns integer
    local integer old = bj_randomSubGroupWant
    local integer new
    set bj_randomSubGroupWant = 0
    call EnumDestructablesInCircleBJ(radius, where, function CountDestructablesInRect_Enum)
    set new = bj_randomSubGroupWant
    set bj_randomSubGroupWant = old
    return new
endfunction

No comments.