Profile of IronMedic

-------------------------------------------------------------------------
-------------------------------------------------------------------------

import("ScarUtil.scar")
import("Systems/BlizzardMulitplayer.scar")

-------------------------------------------------------------------------
-- [[ ONINIT ]]
-------------------------------------------------------------------------

function OnInit()
	
	
	MP_BlizzardInit("data:art/scenarios/presets/atmosphere/DLC/mp_don_river_01_blizzard.aps" ,"data:art/scenarios/presets/atmosphere/DLC/mp_don_river_01.aps", nil, nil, true, nil)
	g_popCapOverRide = 300

	for i = 1, World_GetPlayerCount() do
		local player = World_GetPlayerAt(i)
		Player_SetPopCapOverride(player, g_popCapOverRide)
	end
end


Scar_AddInit(OnInit)

How To: Pseudo-Random Offmap Abilities

function OnInit()
	t_players = {}
	--Time in seconds to first
	g_offmap_interval_first_min = 60
	g_offmap_interval_first_max = 120
	--Time in seconds to the following strikes after first
	g_offmap_interval_min = 120
	g_offmap_interval_max = 240
	--Give each race a ability. 
	g_aef_ability = ABILITY.GERMAN.STUKA_AERIAL_SUPERIORITY_RECON
	g_west_german_ability = ABILITY.GERMAN.STUKA_AERIAL_SUPERIORITY_RECON
	g_german_ability = ABILITY.GERMAN.STUKA_AERIAL_SUPERIORITY_RECON
	g_soviet_ability = ABILITY.GERMAN.STUKA_AERIAL_SUPERIORITY_RECON
	for i=1,World_GetPlayerCount() do	
		local player = World_GetPlayerAt(i)
		table.insert (t_players, player)
		if Player_GetRaceName(player) == "german" then
			Player_AddAbility(t_players[i], g_german_ability)
		elseif Player_GetRaceName(player) == "west_german" then
			Player_AddAbility(t_players[i], g_west_german_ability)
		elseif Player_GetRaceName(player) == "soviet" then
			Player_AddAbility(t_players[i], g_soviet_ability)
		elseif Player_GetRaceName(player) == "aef" then
			Player_AddAbility(t_players[i], g_aef_ability)
		end
	end
	Rule_AddInterval(RES_Cast, World_GetRand(g_offmap_interval_first_min, g_offmap_interval_first_max))

end

--Cast offmap-----------------------------------
function RES_Cast ()
	--Exampel markers, replace them whit YOUR MARKERS!!!
	local markers_Cast =
		{
		mkr_44,
		mkr_45,
		mkr_46,
		mkr_47,
		mkr_48,
	}

	local target_R = Table_GetRandomItem(markers_Cast)
	local target_Player = t_players[World_GetRand(1, World_GetPlayerCount())]
	if Player_GetRaceName(target_Player) == "german" then
		Cmd_Ability(target_Player, g_german_ability,target_R, nil, true)
	elseif Player_GetRaceName(target_Player) == "west_german" then
		Cmd_Ability(target_Player, g_west_german_ability,target_R, nil, true)
	elseif Player_GetRaceName(target_Player) == "soviet" then
		Cmd_Ability(target_Player, g_soviet_ability,target_R, nil, true)
	elseif Player_GetRaceName(target_Player) == "aef" then
		Cmd_Ability(target_Player, g_aef_ability,target_R, nil, true)
	end

	Rule_ChangeInterval(RES_Cast, World_GetRand(g_offmap_interval_min, g_offmap_interval_max))

end

Scar_AddInit(OnInit)