Problem bei Mine

[FastBow]

Ich will eine Karte machen, bei der der Menschliche Spieler eine Mine baut und sie dann an einen Computer übergeben wird, allerdings weiß ich nicht wie dass geht?

Beispiel ist die Karte Evelance,
bei der der Spieler 4 Schwefelminen für Leonardo bauen muss!

Würde mich über Hilfe freuen!

[FastBow]

Hallo ?
Irgendjemand da der mir helfen kann?

[trabbi]

doch doch, das geht
hab da mal so was gemacht, finde aber diese Testkarte nicht mehr.

Halt Scriptmäßig, erst an einer Stelle das Gelände fast punktförmig absenken,
auf Höhenmass achten, dort hinein die Mine setzen.

Probiers erst mal im Edi so aus, danach kannste dann das Script schreiben !

[jugl]

Mit der Funktion "Suche auf der Welt"

abfragen, ob Mine gebaut. Anschliessend an anderen Spieler übergeben.

Nur ein Gedankendang, Probier mal, ob es klappt .
Gruß
jugl

[FastBow]

Okay und hat jemand noch andere vorschläge?

[Noigi]

Ich würde in einem Simple-Job eine Gebietsabfrage durchführen lassen, z.B. so:

local t = {Logic.GetPlayerEntitiesInArea( GUI.GetPlayerID(), Entities.PB_ClayMine1, pos.X, pos.Y, 500, 1 )};
if t[2] then
    ChangePlayer(t[2], 2);
    return true;
end

[Flodder]

Okay und hat jemand noch andere vorschläge?

Jupp, die hat einer:
Wenn eine Mine gebaut wird, dann hat sie keinen Namen. Man kann also die Mine mit ChangePlayer nicht so einfach übergeben.

Daher folgendes machen:
Du legst eine Skriptentity in die Mitte, oder unmittelbar am Rand der "Rohmine", also dort, wo die Mine gebaut werden soll und gibst dieser Skriptentitity den Namen "posMine1", die 1 deshalb, weil es ja sein kann, dass Du dies mit mehrerer Minen vorhast. Ansonsten die 1 einfach weglassen.

Nun kommt es drauf an, wie weit die Mine ausgebaut werden soll, bevor sie Übergeben wird.
Nehmen wir mal an, es ist eine Schwefelmine die erst einmal vom Spieler aufgebaut und dann zur höchsten Stufe ausgebaut werden soll. Das wäre dann eine PB_SulfurMine3.

Jetzt kanns losgehen:

local quest = {
    AreaPos     = "posMine1",  -- Die Stelle an der die Mine gebaut werden soll
    AreaSize    = 2000,  -- Ein Toleranzwert (Radius) um die Position, denn genau darauf wird man sie nicht bauen können.
    EntityTypes = {
    {Entities.PB_SulfurMine3, 1} -- Die angegebene Mine soll gebaut werden
    },
    Callback = function(_quest)  --Diese Funktion wird aufgerufen, wenn die Mine gebaut wurde
        -- Hiermit bekommt man die Entity ID der Mine, damit man die Spieler ID ändern kann
        -- Die Funktion GetEntityIdInArea() muss man aber noch zusätzlich in das Script kopieren (siehe unten)
        local entityID = GetEntityIdInArea(1, _quest.EntityTypes[1][1], _quest.AreaPos, _quest.AreaSize)
        -- Jetzt kann man die ID der Mine ändern, bzw. die Mine übergeben:
        ChangePlayer(entityID, 4)
    end,
}
-- Quest starten:
SetupEstablish(quest)

Benötigter Comfort-Code:
Die Funktion GetEntityIdInArea() liefert eine ID einer bestimmten Entity,
welche in dem Radius _range um _position liegt und sieht so aus:

function GetEntityIdInArea(_playerID, _entity, _position, _range)
    local data = {Logic.GetPlayerEntitiesInArea(_playerID, _entity, _position.X, _position.Y, _range, 1)}
    
    if Logic.IsBuilding(data[2]) then
        if Logic.IsConstructionComplete(data[2]) == 1 then
            return data[2]
        else
            return false
        end
    end
    
    return data[2]
end

Das Ganze noch mal ohne Kommentare:

local quest = {
    AreaPos     = "posMine1",
    AreaSize    = 2000,
    EntityTypes = {
    {Entities.PB_SulfurMine3, 1}
    },
    Callback = function(_quest) 
    local entityID = GetEntityIdInArea(1, _quest.EntityTypes[1][1], _quest.AreaPos, _quest.AreaSize)
    ChangePlayer(entityID, 4)
    end,
}
SetupEstablish(quest)

Benötigter Comfort-Code (Irgendwo ans Skriptende kopieren):

function GetEntityIdInArea(_playerID, _entity, _position, _range)
    local data = {Logic.GetPlayerEntitiesInArea(_playerID, _entity, _position.X, _position.Y, _range, 1)}
    
    if Logic.IsBuilding(data[2]) then
        if Logic.IsConstructionComplete(data[2]) == 1 then
            return data[2]
        else
            return false
        end
    end
    
    return data[2]
end

Ich hoffe, Dir hiermit helfen zu können.
Gruss
Flodder

[Flodder]

UPS...! Da war einer schneller (=Noigi)
Na egal, doppelt hält besser und mit etwas Erklärung meinerseits sicher auch kein Fehler.

[FastBow]

Vielen Dank Noigi und vielen Dank Flodder

Grüße
FastBow