Die Siedler AeK:Steinangebot bei Handelsposten klappt nicht!
» Siedler Map Source Forum » Mapping » Die Siedler AeK:Steinangebot bei Handelsposten klappt nicht!
Seiten: 1
Kratos
|
#1 03.12.2008 19:09 Beiträge: 18 |
Die Siedler AeK:Steinangebot bei Handelsposten klappt nicht!
Ich hab ein problem:meine karte funktioniert ganz prächtig nur will der dritte spieler an seinem handelsposten keinen stein verkaufen und ich versteh nicht wo der fehler ist alle anderen güter werden ganz normal gehandelt und verkauft nur der stein nicht!
Hier ist mal dass script wäre nett wenn einer dass mal untersuchen könnte:
----------------------------------------------------------------------------------------------------------------------
function Mission_InitPlayers()
end
----------------------------------------------------------------------------------------------------------------------
function Mission_SetStartingMonth()
Logic.SetMonthOffset(3)
end
----------------------------------------------------------------------------------------------------------------------
function Mission_InitMerchants()
local PlayerID = 3
local TraderId = Logic.GetStoreHouse(PlayerID)
AddOffer( TraderId, 2, Goods.G_Wool)
AddOffer( TraderId, 3, Goods.G_Grain)
AddOffer( TraderId, 1, Goods.G_Sheep)
AddOffer( TraderId, 5, Goods.G_Herb)
local _, TradepostID = Logic.GetPlayerEntities( PlayerID, Entities.I_X_TradePostConstructionSite, 1, 0 )
assert( TradepostID and TradepostID ~= 0 )
Logic.TradePost_SetTradePartnerGenerateGoodsFlag(TradepostID, true)
Logic.TradePost_SetTradePartnerPlayerID(TradepostID, PlayerID)
Logic.TradePost_SetTradeDefinition(TradepostID, 0, Goods.G_Fish, 6, Goods.G_Stone, 9)
Logic.TradePost_SetTradeDefinition(TradepostID, 1, Goods.G_Wood, 5, Goods.G_Herb, 9)
Logic.TradePost_SetActiveTradeSlot(TradepostID, 0)
local PlayerID = 4
local traderId = Logic.GetStoreHouse(PlayerID)
AddOffer( TraderId, 2, Goods.G_Milk)
AddOffer( TraderId, 3, Goods.G_Iron)
AddOffer( TraderId, 1, Goods.G_Cow)
local _, TradepostID = Logic.GetPlayerEntities( PlayerID, Entities.I_X_TradePostConstructionSite, 1, 0 )
assert( TradepostID and TradepostID ~= 0 )
Logic.TradePost_SetTradePartnerGenerateGoodsFlag(TradepostID, true)
Logic.TradePost_SetTradePartnerPlayerID(TradepostID, PlayerID)
Logic.TradePost_SetTradeDefinition(TradepostID, 0, Goods.G_Grain, 5, Goods.G_Iron,
Logic.TradePost_SetTradeDefinition(TradepostID, 1, Goods.G_Wool, 4, Goods.G_Salt, 9)
Logic.TradePost_SetActiveTradeSlot(TradepostID, 0)
local PlayerID = 7
local TraderId = Logic.GetStoreHouse(PlayerID)
AddEntertainerOffer( TraderId, Entities.U_FireEater)
AddOffer( TraderId, 9, Goods.G_Dye)
AddOffer( TraderId, 9, Goods.G_Olibanum)
end
----------------------------------------------------------------------------------------------------------------------
function Mission_FirstMapAction()
-- init players in singleplayer games only
if Framework.IsNetworkGame() ~= true then
Startup_Player()
Startup_StartGoods()
Startup_Diplomacy()
end
-- create quests
do
local MapName = Framework.GetCurrentMapName()
local ScriptName = "Maps\\ExternalMap\\"..MapName.."\\QuestSystemBehavior.lua"
Script.Load(ScriptName)
CreateQuests()
end
end
function Mission_Victory()
local PossibleSettlerTypes = {
Entities.U_NPC_Monk_ME,
Entities.U_NPC_Monk_NE,
Entities.U_NPC_Monk_NA,
Entities.U_NPC_Monk_SE,
Entities.U_NPC_Villager01_ME,
Entities.U_NPC_Villager01_NE,
Entities.U_NPC_Villager01_SE,
Entities.U_NPC_Villager01_NA,
Entities.U_Baker,
Entities.U_BathWorker,
Entities.U_Soapmaker,
Entities.U_DairyWorker,
Entities.U_HerbGatherer,
Entities.U_GrainFarmer,
Entities.U_CattleFarmer,
Entities.U_Woodcutter,
Entities.U_SheepFarmer,
Entities.U_Weaver,
Entities.U_BannerMaker,
Entities.U_Beekeeper,
Entities.U_Barkeeper,
Entities.U_IronMiner,
Entities.U_Stonecutter,
Entities.U_Fisher,
Entities.U_Hunter,
Entities.U_SmokeHouseWorker,
Entities.U_Butcher,
Entities.U_Pharmacist,
Entities.U_BroomMaker,
Entities.U_Tanner,
Entities.U_Priest,
Entities.U_Blacksmith,
Entities.U_CandleMaker,
Entities.U_Carpenter,
Entities.U_Actor_Nobleman,
Entities.U_Actor_Bandit,
Entities.U_Actor_Princess,
Entities.U_TheatreWorker,
Entities.U_SpouseS01,
Entities.U_SpouseS02,
Entities.U_SpouseS03,
Entities.U_SpouseF01,
Entities.U_SpouseF02,
Entities.U_SpouseF03,
Entities.U_NPC_Monk_ME,
Entities.U_NPC_Monk_NE,
Entities.U_NPC_Monk_NA,
Entities.U_NPC_Monk_SE,
Entities.U_NPC_Villager01_ME,
Entities.U_NPC_Villager01_NE,
Entities.U_NPC_Villager01_SE,
Entities.U_NPC_Villager01_NA,
Entities.U_Baker,
Entities.U_BathWorker,
Entities.U_Soapmaker,
Entities.U_DairyWorker,
Entities.U_HerbGatherer,
Entities.U_GrainFarmer,
Entities.U_CattleFarmer,
Entities.U_Woodcutter,
Entities.U_SheepFarmer,
Entities.U_Weaver,
Entities.U_BannerMaker,
Entities.U_Beekeeper,
Entities.U_Barkeeper,
Entities.U_IronMiner,
Entities.U_Stonecutter,
Entities.U_Fisher,
Entities.U_Hunter,
Entities.U_SmokeHouseWorker,
Entities.U_Butcher,
Entities.U_Pharmacist,
Entities.U_BroomMaker,
Entities.U_Tanner,
Entities.U_Priest,
Entities.U_Blacksmith,
Entities.U_CandleMaker,
Entities.U_Carpenter,
Entities.U_Actor_Nobleman,
Entities.U_Actor_Bandit,
Entities.U_Actor_Princess,
Entities.U_TheatreWorker,
Entities.U_SpouseS01,
Entities.U_SpouseS02,
Entities.U_SpouseS03,
Entities.U_SpouseF01,
Entities.U_SpouseF02,
Entities.U_SpouseF03,
}
VictoryGenerateFestivalAtPlayer( 1, PossibleSettlerTypes )
local VictoryKnightPos = Logic.GetEntityIDByName("VictoryKnightPos"
local x,y = Logic.GetEntityPosition(VictoryKnightPos)
local Orientation = Logic.GetEntityOrientation(VictoryKnightPos)
local KnightID = Logic.GetKnightID(1)
VictorySetEntityToPosition( KnightID, x, y, Orientation )
end
Gruß
Kratos
Anmerkungie smileys im script sind nicht beabsichtig sondern erst im Forum enstanden!
____________________
Wer das lol nicht ehrt ist des rofls nicht wert!
bv
|
#2 05.12.2008 09:08 Beiträge: 7 |
Logic.TradePost_SetTradeDefinition(TradepostID, 0, Goods.G_RawFish, 6, Goods.G_Stone, 9)
RawFish, nicht Fish.
Seiten: 1