Miscellany

import("ScarUtil.scar")

function OnGameSetup()
	player1 = World_GetPlayerAt(1)
	player2 = World_GetPlayerAt(2)
	player3 = World_GetPlayerAt(3)
	player4 = World_GetPlayerAt(4)
	player5 = World_GetPlayerAt(5)
	player6 = World_GetPlayerAt(6)
	player7 = World_GetPlayerAt(7)
	player8 = World_GetPlayerAt(8)
end

function OnInit()
	Sound_PlayStreamed("ambiences/ambiences_streamed/m02_ambience")
	Util_PlayMusic("SOUND/Music/brothers suspense", 0, 0)
	ABILITY_SINGLEARTY = Util_GetAbilityID("abilities/sp/sp_gen_single_off_map_artillery_strike.lua")
	status_intro = 1
	Game_Letterbox(true, 0)
	Game_FadeToBlack(true, 0)
	Rule_AddInterval(arty_ammo, 10)
	Rule_AddInterval(Event_PlayIntro, 1)
end

Scar_AddInit(OnInit)

function arty_ammo()
	if World_GetRand(0, 1) == 0 then	 
		bomber = World_GetPlayerAt(World_GetRand(1, 8))	
		ABILITY_SINGLEARTY = Util_GetAbilityID("abilities/sp/sp_gen_single_off_map_artillery_strike.lua")
		target = Util_GetPosition(Marker_FromName("marker"..World_GetRand(1,13), "blue_marker"))
		target.x = target.x + World_GetRand(-50, 50)
		target.z = target.z + World_GetRand(-50, 50)
		Cmd_PlayerAbilityPos(bomber, ABILITY_SINGLEARTY, target, true)
	end

	
	function Event_PlayIntro()
		if status_intro == 1 then
        	Game_Letterbox(true, 0)
			Game_FadeToBlack(FADE_IN, 0.5)
			Camera_MoveToPosition(marker5, false)
			Camera_SetOrbit(3)
			Camera_SetDeclination(0.75)
			Cmd_PlayerAbilityPos(player1, ABILITY_SINGLEARTY,  Util_GetPosition(marker5))
		elseif status_intro == 20 then
			Game_FadeToBlack(true, 2)
		elseif status_intro == 23 then
			Camera_ResetToDefault()
			Camera_MoveToPosition(Player_GetStartingPosition(Game_GetLocalPlayer()))
			Game_Letterbox(false, 1.5)
			Game_FadeToBlack(false, 1.5)
			Rule_RemoveMe()
		end
		status_intro = status_intro + 1
	end
end