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

SiteEngine v1.5.0 by nevermind, ©2005-2007
Design by SpiderFive (www.siedler-games.de) - English translation by juja

Impressum