function anticheat()
	if Game.IsAlmostAllLandExplored() == 1 then
	Game.SetAlliesDontRevealFog(1)
	Game.ResetFogging()
       Tutorial.Exit()
	end
end

function cheathelp()
	if Game.Time() == 100 then
	unrequest_event(anticheat,Events.FIVE_TICKS)
	end

	if Game.HasPlayerLost(2) + Game.HasPlayerLost(3) + Game.HasPlayerLost(4) + Game.HasPlayerLost(5) > 1 then
	unrequest_event(anticheat,Events.FIVE_TICKS)
	end
end

function TurnOnLandExploreCheck()
	Game.EnableLandExploredCheck(1)
end

function new_game()
	dbg.stm("Script Loaded")
       request_event(VictoryConditionCheck, Events.VICTORY_CONDITION_CHECK)
       request_event(TurnOnLandExploreCheck,Events.FIRST_TICK_OF_NEW_OR_LOADED_GAME)
	request_event(anticheat,Events.FIVE_TICKS)
	request_event(cheathelp,Events.TICK)
end

function register_functions()
	reg_func(VictoryConditionCheck)
	reg_func(TurnOnLandExploreCheck)
	reg_func(anticheat)
	reg_func(cheathelp)
end

--//Beispiel Siegesbedingung, in diesem Fall besiege Spieler 2//--
function VictoryConditionCheck()
	Game.DefaultPlayersLostCheck()
	if Game.HasPlayerLost(1) == 0
	and Game.HasPlayerLost(2) == 1
	and Game.HasPlayerLost(3) == 1
	and Game.HasPlayerLost(4) == 1
	and Game.HasPlayerLost(5) == 1
	then
		unrequest_event(anticheat,Events.FIVE_TICKS)
		Game.EnemyPlayersLost(1)
	end
	Game.DefaultGameEndCheck()
end