function InitPlayerColorMapping()
end

--++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-- This function is called on game start after all initialization is done
function FirstMapAction()

  -- Anmerkung: "HQKI2/4-6" gibt es in der Map nicht, am Besten, die jeweiligen HQs/Türme so benennen
	MapEditor_SetupAI(2, 2, 10000, 3, "HQKI2", 2, 10)  -- ob peacetime von 10 Sinn macht :)
	MapEditor_SetupAI(4, 2, 14000, 3, "HQKI4", 2, 10)
	MapEditor_SetupAI(5, 2, 15000, 3, "HQKI5", 2, 10)
	MapEditor_SetupAI(6, 5, 22000, 3, "HQKI6", 3, 10)

  CreatePreludeBriefing()

  Chest()

  StartSimpleJob("VictoryJob")

  Mainquest()

end

function Chest()
  CreateChestOpener("erec")
  StartChestQuest()
  CreateChest(GetPosition("chest1"), chestCallbackGold)
  CreateChest(GetPosition("chest2"), chestCallbackSulfur)
  CreateChest(GetPosition("chest3"), chestCallbackSulfur)
end

function chestCallbackGold()
  Message("Herr ich schenke euch dieses Gold, dass ihr wohl leben koennt.")
  AddGold(2000)
end

function chestCallbackSulfur()
  Message("Etwas Schwefel braucht ihr bestimmt!?")
  AddSulfur(200)
end

function CreatePreludeBriefing()
  PreludeBriefing = {}
  PreludeBriefing.finished = PreludeBriefingFinished
  local page = 1
  --seite #1
  PreludeBriefing[page]           = {}
  PreludeBriefing[page].title     = ("Erec")
  PreludeBriefing[page].text      = ("Wo sind wir hier nur hin geraten?")
  PreludeBriefing[page].position  = GetPosition("erec1")

  --seite #2
  page = page + 1
  PreludeBriefing[page]           = {}
  PreludeBriefing[page].title     = ("Pilgrim")
  PreludeBriefing[page].text      = ("Ich weis auch nicht genau wo wir sind, aber die Bruecke im Norden sollten wir noch nicht so schnell bauen. Erec, lass uns erst mal in den Westen gehen!")
  PreludeBriefing[page].position  = GetPosition("pilgrim1")

  --seite #3
  page = page + 1
  PreludeBriefing[page]           = {}
  PreludeBriefing[page].title     = ("Erec")
  PreludeBriefing[page].text      = ("Wie du meinst Pilgrim! Wird wohl besser sein. Wir muessen uns auch noch ein paar Bodenschaetze suchen.")
  PreludeBriefing[page].position  = GetPosition("erec1")

  --seite #4
  page = page + 1
  PreludeBriefing[page]           = {}
  PreludeBriefing[page].title     = ("Pilgrim")
  PreludeBriefing[page].text      = ("Sieh her! Ich habe schon mal Steine gefunden! Lass uns anfangen !!!")
  PreludeBriefing[page].position  = GetPosition("pilgrim1")

  StartBriefing(PreludeBriefing)
end

function PreludeBriefingFinished()
  -- leer
end

function Mainquest()
  Logic.AddQuest(1,1,MAINQUEST_OPEN,
    "Bruecken bauen",
    "Baut zuerst die Bruecke, die in den Westen fuehrt. Dort findet ihr auch alle Rohstoffe, die ihr benoetigt. Wenn ihr dann soweit seid, baut die Brueck in den Norden und vernichtet eure Gegner!!!", 1)
end

function VictoryJob()
  if IsDead("HQKI2") and IsDead("HQKI4") and IsDead("HQHI5") and IsDead("HQKI6") then
    CreateEnde() -- unnötig
    CreateSchlussBriefing()
    return true
  end
end

function CreateSchlussBriefing()
  BriefingSchluss           = {}
  BriefingSchluss.finished  = Victory -- Siegmeldung direkt aufrufen
  local page                = 1
  --seite #1
  BriefingSchluss[page]     = {}
  BriefingSchluss[page].title   = "Ende"
  BriefingSchluss[page].text    = ("Sie haben das Spiel gewonnen!!!")
  StartBriefing(BriefingSchluss)
end

function CreateEnde()
  SetPosition("erec", GetPosition("erecEnde"))  -- "erecEnde" gibt es in der Map nicht!
-- Unnötig
end

-- Quest data
MapEditor_QuestTitle				= "Inselwanderung"
MapEditor_QuestDescription 	= "Gehe von Insel zu Insel um in den Genuss, aller Bodenschätze zu kommen. Aber sei auf der Hut.Baue zuerst die Bruecke im Westen."