Objective.BuildRoad

Dieses Objective funktioniert nur,wenn man als Entitäten Gebäude angibt. Meistens ist das auch sinnvoll, da Gebäude die beste Sichtbarkeit für den Spieler gewährleisten. Wer aber unbedingt auch andere Entitäten als Zielpunkte angeben will, kann diesen Patch im globalen Script an eine freie Stelle einfügen. (Wird auch in den nächsten QSB-Versionen integriert sein ( DELETEME Wenn erledigt))

code

do
    local QuestTemplate_IsObjectiveCompletedOriginal = QuestTemplate.IsObjectiveCompleted
    function QuestTemplate:IsObjectiveCompleted(objective)
        local objectiveType = objective.Type
        local data = objective.Data
 
        if objective.Completed ~= nil then
            return objective.Completed
        elseif objectiveType == Objective.BuildRoad then
            local ID1, ID2, bSmallerThan, nLength, bPavedOnly = data[1], data[2], data[3], data[4], data[5]
 
            if Logic.IsEntityDestroyed( ID1 ) or Logic.IsEntityDestroyed( ID2 ) then
                objective.Completed = false
            else
                local x1, y1 = Logic.GetEntityPosition( ID1 )
                local x2, y2 = Logic.GetEntityPosition( ID2 )
                if Logic.IsBuilding( ID1 ) == 1 then
                    x1, y1 = Logic.GetBuildingApproachPosition( ID1 )
                end
                if Logic.IsBuilding( ID2 ) == 1 then
                    x2, y2 = Logic.GetBuildingApproachPosition( ID2 )
                end
 
                local bFound, Length = Logic.DoesRoadConnectionExist( x1, y1, x2, y2, bPavedOnly, 1000, bSmallerThan and nLength or nil )
                if bFound and ( ( bSmallerThan and Length < nLength )
                    or ( not bSmallerThan and Length > nLength ) ) then
 
                    objective.Completed = true
 
                end
            end
        else
            return QuestTemplate_IsObjectiveCompletedOriginal(self, objective)
        end
        return objective.Completed
    end
end

Siehe auch: Goal_BuildRoad - Siedler Games