IO´s nur mit Kosten belegen

[Sombeline]

Hallo,

Eine Ruine fordert ja ehe man sie richtig initiert nur 50 Holz und gibt nichts.
Jetzt würde ich das gerne nutzen und die Ruine anweisen, daß sie nur Gold nimmt und nichts gibt. Mit der Version in der QSB bringe ich diese nicht zum Laufen. Jetzt hab ich mir mal das alte Script angesehen, könnte man nicht da was ändern, damit sie so reagiert. Ich habe es schon damit versucht, daß ich Zeilen ausklammere siehe Beispiel.

function ActivateIntObject(_IOID, _Cost, _CostAmount,  _Duration, _ReplaceEntity)
    local IntObjectID = GetEntityId(_IOID)
    Logic.InteractiveObjectSetPlayerState( IntObjectID, 1, 0 )
    Logic.InteractiveObjectSetAvailability( IntObjectID, true )
    Logic.InteractiveObjectSetInteractionDistance( IntObjectID, 1000 )
    Logic.InteractiveObjectSetTimeToOpen( IntObjectID, _Duration)
    Logic.InteractiveObjectClearCosts(IntObjectID)
    Logic.InteractiveObjectAddCosts (IntObjectID, _Cost, _CostAmount)
    ---Logic.InteractiveObjectSetCostGoldCartType(IntObjectID, Entities.U_GoldCart)                  ------Ergänzung
   ---Logic.InteractiveObjectSetCostResourceCartType(IntObjectID, Entities.U_ResourceMerchant)      ------Ergänzung
    Logic.InteractiveObjectClearRewards(IntObjectID)
    ---Logic.InteractiveObjectSetReplacingEntityType(IntObjectID, _ReplaceEntity)
end

irgendwie will sie damit auch nicht. Noch zur Info. Es ist die neueste QSB und am Anfang deaktiviere ich alle Ruinen mit dem Code von Britta.

Gruß
Sombeline

[BVernheim]

Poste mal die Aufrufzeile bitte

[Sombeline]

Hallo Britta,

ich hab nur die alte Aufrufzeile etwas abgeändert.


ActivateIntObject("Gold", Goods.G_Gold, 1500)

eben wo ich das poste sehe ich noch was.

ActivateIntObject(_IOID, _Cost, _CostAmount) das muss da noch weg _Duration, _ReplaceEntity)

Sombeline

[BVernheim]

_Duration würde ich schon noch mit angeben, und _ReplaceEntity stört da nicht weiter, da du die zugehörige Zeile ja auskommentiert hast.
Probier es mal damit, eine Dauer anzugeben, oder kommentiere die Zeile SetTimeToOpen auch noch aus.

[Netsurfer]

Hallo,

Eine Ruine fordert ja ehe man sie richtig initiert nur 50 Holz und gibt nichts.

Das stimmt so übrigens nicht ganz - das hängt vom Typ und einem evt. Script-Namen ab.

Jetzt würde ich das gerne nutzen und die Ruine anweisen, daß sie nur Gold nimmt und nichts gibt. Mit der Version in der QSB bringe ich diese nicht zum Laufen.

Ah ja! Jetzt wissen wir natürlich auch ganz genau, wie und was du versucht hast.

Jetzt hab ich mir mal das alte Script angesehen, könnte man nicht da was ändern, damit sie so reagiert.

Bestimmt.

Ich habe es schon damit versucht, daß ich Zeilen ausklammere siehe Beispiel.

Logic.InteractiveObjectClearRewards(IntObjectID)

Wenn alles andere bereits erledigt ist, ist das die einzige Zeile, die es braucht.

irgendwie will sie damit auch nicht.

Das verstehe ich jetzt "irgendwie" nicht!

Noch zur Info. Es ist die neueste QSB und am Anfang deaktiviere ich alle Ruinen mit dem Code von Britta.

Ah ja - weil wir ja auch alle den hier gemeinten Code von Britta kennen!

[Sombeline]

Hallo,

danke für eure Hilfe es klappt jetzt.

Ich habe das script jetzt so:

function ActivateIntObject(_IOID, _Cost, _CostAmount)     ---, _Duration, _ReplaceEntity)
    local IntObjectID = GetEntityId(_IOID)
    Logic.InteractiveObjectSetPlayerState( IntObjectID, 1, 0 )
    Logic.InteractiveObjectSetAvailability( IntObjectID, true )
    Logic.InteractiveObjectSetInteractionDistance( IntObjectID, 1000 )
    --Logic.InteractiveObjectSetTimeToOpen( IntObjectID, _Duration)
    --Logic.InteractiveObjectClearCosts(IntObjectID)
    Logic.InteractiveObjectAddCosts (IntObjectID, _Cost, _CostAmount)
    --Logic.InteractiveObjectSetCostGoldCartType(IntObjectID, Entities.U_GoldCart)                  ------Ergänzung
    --Logic.InteractiveObjectSetCostResourceCartType(IntObjectID, Entities.U_ResourceMerchant)      ------Ergänzung
    --Logic.InteractiveObjectClearRewards(IntObjectID)
    --Logic.InteractiveObjectSetReplacingEntityType(IntObjectID, _ReplaceEntity)
end

Aufgerufen mit: ActivateIntObject("ruine9", Goods.G_Gold, 5)

Dann gehe ich im Questsystem her und setze erst den Reward_ObjectSetupCosts in der nächsten Quest dann Reward_InteractiveObjectActivate mehr nicht.

Gruß
Sombeline