Map
» Siedler Map Source Forum » Mapping » Map
Seiten: 1
polaster64
|
#1 04.12.2014 21:22 Beiträge: 184 |
Map
Hi, can Somebody add this script to map Kyrana. Maybe The Autor will do it and give me to download. Please help.
--++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -- This function is called on game start and after save game to initialize player colors function InitPlayerColorMapping() Display.SetPlayerColorMapping(1, FRIENDLY_COLOR2) --This sets displayed color of player 1 (human player) to yellow. end --++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -- This function is called on game start after all initialization is done function FirstMapAction() SpawnVargArmy end function SpawnVargArmy() if Counter.Tick2(60) then --when 60 seconds pass local ArmyOne = {player = 1} local banditbow = { minNumberOfSoldiers = 0, maxNumberOfSoldiers = 4, experiencePoints = MEDIUM_EXPERIENCE, leaderType = Entities.CU_BanditLeaderBow1, position = GetPosition("VargArmy") } local banditsword = { minNumberOfSoldiers = 4, maxNumberOfSoldiers = 8, experiencePoints = MEDIUM_EXPERIENCE, leaderType = Entities.CU_BanditLeaderSword2, position = GetPosition("VargArmy") } local barbarianleader = { minNumberOfSoldiers = 0, maxNumberOfSoldiers = 4, experiencePoints = MEDIUM_EXPERIENCE, leaderType = Entities.CU_Barbarian_LeaderClub2, position = GetPosition("VargArmy") } local blackknights = { minNumberOfSoldiers = 0, maxNumberOfSoldiers = 4, experiencePoints = MEDIUM_EXPERIENCE, leaderType = Entities.CU_BlackKnight_LeaderMace2 , position = GetPosition("VargArmy") } CreateTroop (ArmyOne, banditbow) CreateTroop (ArmyOne, banditsword) CreateTroop (ArmyOne, barbarianleader) CreateTroop (ArmyOne, barbarianleader) CreateTroop (ArmyOne, blackknights) CreateTroop (ArmyOne, blackknights) end end -- Quest data MapEditor_QuestTitle = "" MapEditor_QuestDescription = "" --*****Countdown*****-- function CountdownTick() local empty = true for i = 1, Counter.Index do if Counter.IsValid("counter" .. i) then if Counter.Tick("counter" .. i) then Counter["counter" .. i].Finished = true end if Counter["counter" .. i].Finished and not IsBriefingActive() then if Counter["counter" .. i].Show then MapLocal_StopCountDown() end -- callback function if type(Counter["counter" .. i].Callback) == "function" then Counter["counter" .. i].Callback() end Counter["counter" .. i] = nil end empty = false end end if empty then Counter.JobId = nil Counter.Index = nil return true end end function CountdownIsVisisble() for i = 1, Counter.Index do if Counter.IsValid("counter" .. i) and Counter["counter" .. i].Show then return true end end return false end
Seiten: 1