[[http://www.siedler-games.de|{{:sg-link.jpg|}}]]

====== IsArmyNear ======

Mit dieser Funktion kann man testen ob mindestens ein Hauptmann einer Armee sich in der Nähe einer bestimmten Position befindet.

===== Beispiel =====

ArmyOne ist ein globales Armee-Table.

<code=lua>function ControlArmyOne()

    if Counter.Tick2("ControlArmyOne", 10) then
        if IsArmyNear(ArmyOne, "FeindlicheBurg") then
            FrontalAttack(ArmyOne)
        else
            Advance(ArmyOne)
        end
    end

end</code>

===== Code =====

Der Parameter _Distance ist optional. Ohne ihn wird der Aktionsradius der Armee verwendet.

<code=lua>function IsArmyNear(_Army, _Target, _Distance)

    local LeaderID = 0
    -- Distance not available? Then use the army's rodeLength
    if not _Distance then
        _Distance = _Army.rodeLength
    end
    
    -- Iterate over all leaders
    local NumberOfLeader = Logic.GetNumberOfLeader(_Army.player)
    for i = 1, NumberOfLeader do
        -- Get next leader ID
        LeaderID = Logic.GetNextLeader(_Army.player, LeaderID)
        
        -- Is the leader connected to this army?
        local ArmyID = AI.Entity_GetConnectedArmy(LeaderID)
        if ArmyID == _Army.id then
            -- Is this leader near the target position?
            if IsNear(LeaderID, _Target, _Distance) then
                -- At least one leader is near, that's enough
                return true
            end
        end
    end

    -- No leader is in range of the target
    return false

end</code>