「HowTo: Singleplayer Campaign Creation (SCAR)」の編集履歴（バックアップ）一覧はこちら

「HowTo: Singleplayer Campaign Creation (SCAR)」(2007/02/24 (土) 17:14:00) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

http://forums.relicnews.com/showthread.php?t=138634

HowTo: Singleplayer Campaign Creation (SCAR) 

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

Hi,

There are a lot of modders and HowTo's about Multiplayer Maps. I'm a typically singleplayer and missed user created campaigns. Luckily I'm a programmer and so i decided to go deeper into SCAR. And now I can present a basic singleplayer test campaign for you to look into and build upon it.

First of all some interesting Links:

(I can't reach it actually to get the link to "Tips&Tricks", will edit later)
http://wiki.relicrank.com/index.php?title=CoH

the source of inspiration:
http://forums.relicnews.com/showthread.php?t=124232

All files go to directory "Company of Heroes\WW2\Data\Scenarios\SP" !



1.You will need a map (create anything you want, basic maps are included in attachment)
2.the worldbuilder creates a SCAR file named mapname_id.scar. Don't edit it! (as somewhere else told) it contains all markers, etc. and is updated evrytime you save it in Worldbuilder.
3.Create a file mapname.scar and fill it with e.g.

Code:
----
>import("ScarUtil.scar")
>import("tybor.scar")
>
>function OnGameSetup()
>
>	player_Axis = Setup_Player(1, 95050, "Axis", 1)
>	player_Allies = Setup_Player(2, 95000, "Allies", 2)
>
>end
>
>
>function OnGameRestore()
>
>	player_Axis = World_GetPlayerAt(1)
>	player_Allies = World_GetPlayerAt(2)
>
>	-- function takes care of restoring all global mission parameters after a save/load
>	Game_DefaultGameRestore()
>
>end 
>
>-------------------------------------------------------------------------
>-- [[ ONINIT ]]
>-------------------------------------------------------------------------
>
>function OnInit()
>
>	-- only for debugging
>	FOW_Enable(false)
>
>	-- set resources for the player
>	Tybor_PlayerResourceAdd(player_Axis, RT_Manpower, -70)
>	Tybor_PlayerResourceAdd(player_Axis, RT_Munition, 10)
>	Tybor_PlayerResourceAdd(player_Axis, RT_Fuel, 20)
>	Player_SetResource(player_Axis, RT_Manpower, 600)
>	Player_SetResource(player_Axis, RT_Munition, 600)
>	Player_SetResource(player_Axis, RT_Fuel, 200)
>
>	Tybor_PlayerResourceAdd(player_Allies, RT_Manpower, -70)
>	Tybor_PlayerResourceAdd(player_Allies, RT_Munition, 10)
>	Tybor_PlayerResourceAdd(player_Allies, RT_Fuel, 20)
>	Player_SetResource(player_Allies, RT_Manpower, 600)
>	Player_SetResource(player_Allies, RT_Munition, 600)
>	Player_SetResource(player_Allies, RT_Fuel, 200)
>--	Modify_PlayerResourceRate(player_Axis, RT_Manpower, 0)
>--	Modify_PlayerResourceRate(player_Axis, RT_Munition, 0)
>--	Modify_PlayerResourceRate(player_Axis, RT_Fuel, 0)
>--	Modify_PlayerResourceRate(player_Allies, RT_Manpower, 0)
>--	Modify_PlayerResourceRate(player_Allies, RT_Munition, 0)
>--	Modify_PlayerResourceRate(player_Allies, RT_Fuel, 0)
>
>	--Player_SetAbilityAvailability(player_Axis, ABILITY.AXIS_THROWGRENADE, ITEM_UNLOCKED)
>	--Player_SetAbilityAvailability(player_Allies, ABILITY.ALLIED_THROWGRENADE, ITEM_UNLOCKED)
>	Player_SetUpgradeAvailability(player_Axis, UPG.AXIS_FLAMETHROWER, ITEM_LOCKED)
>	Player_SetUpgradeAvailability(player_Allies, UPG.ALLIED_FLAMETHROWER, ITEM_LOCKED)
>
>	-- get the difficulty
>	--g_dif = Game_GetSPDifficulty()
>	
>	-- set health bonus for player (Allies get bonus! see Setup_Difficulty)
>	--Setup_Difficulty(player_Allies, g_dif)
>
>	-- set health handicap for player (Axis get handicap ! see Setup_Difficulty)
>	--Setup_Difficulty(player_Axis, g_dif)
>
>	-- Spawn Squads
>	sg_allied_engineers = SGroup_CreateIfNotFound("sg_allied_engineers")
>	Util_CreateSquadsAtMarker(player_Allies, sg_allied_engineers, SBP.ALLIED_ENGINEER, mkr_Allies_Spawn, 1)
>	
>	sg_axis_pioneer = SGroup_CreateIfNotFound("sg_axis_pioneer")
>	Util_CreateSquadsAtMarker(player_Axis, sg_axis_pioneer, SBP.AXIS_PIONEER, mkr_Axis_Spawn, 1)
>
>	---------------------
>	-- Sample AI setup --
>	---------------------
>
>--? An example use:\n
>--? Util_AI_Setup(player5, 10, player_Axis, 1, 6, 5, 2, 3)\n
>--? player5 = the AI player \n
>--? 10 = the popcap override value \n
>--? player_Axis = the main target for the AI \n
>--? 1 = the difficulty setting \n
>--? 6 = the AI production template table entry \n
>--? 5 = the aggression setting, 1-5, 5 is the most aggressive \n
>--? 2 = the unit preference, 1-5, 1 is infantry heavy, 5 is vehicle heavy\n
>--? 3 = the counter preference, 1-5, 1 is anti-infantry, 5 is anti-vehicle\n
>	Tybor_AI_Setup(player_Allies, {Util_DifVar({10, 15, 20, 30}), 5}, Game_GetSPDifficulty(), 1, Util_DifVar({1, 2, 3, 5}), 2, 3)
>	
>	-- tell AI to go after strongest threat instead of the weakest
>	AI_DoString( player_Allies, "s_personality.attack_prefer_threat = true" )
>	AI_DoString( player_Allies, "s_personality.defend_prefer_threat = true" )
>
>	-- tell AI not to "defend" territories outside of the ring around its base
>	AI_EnableComponent(player_Allies, false, COMPONENT_ForwardDefending)
>	
>	-- enable use of comapny commander menu and abilities
>	AI_DoString( player_Allies, "s_commandtree_enabled = true" )
>	AI_DoString( player_Allies, "s_playerabilities_enabled = true" )
>	
>	-- tell AI to not attack target
>	AI_EnableComponent(player_Allies, false, COMPONENT_Attacking)
>
>
>
>	-- set up game objectives
>	Initialize_OBJ_Annihilate()
>
>	Objective_Start(OBJ_Annihilate, true)
>
>	-- Start up the main game logic loop
>	Rule_Add(SP_test_MainLoop)
>
>end
>
>Scar_AddInit(OnInit)
>
>
>
>-------------------------------------------------------------------------
>-- MISSION SCRIPTS
>-------------------------------------------------------------------------
>function SP_test_MainLoop()
>	-- executed every frame
>
>end
>
>function Initialize_OBJ_Annihilate()
>
>	OBJ_Annihilate = {
>		
>		SetupUI = function() end,
>		
>		OnStart = function()
>			-- win condition
>			Rule_AddInterval(OBJ_Annihilate_WinCondition, 5)
>		end,
>		
>		OnComplete = function() 
>			-- we won
>			Game_EndSP( true, nil, true )
>		end,
>		
>		OnFail = function()
>			-- we failed
>			Game_EndSP( false, nil, true )
>		end,
>		
>		Title		   = LOC("Annihilate all enemy forces!"),
>		Description	 = LOC("There is a small base of Allied forces which has to be destroyed."),
>		Type			= OT_Primary,
>		Icon			= IT_P_Attack,
>		
>	}
>
>	Objective_Register(OBJ_Annihilate) 
>end
>
>function OBJ_Annihilate_WinCondition()
>
>	-- Player_GetAll creates sg_allsquads per default (see description)
>	Player_GetAll(player_Axis)
>	if SGroup_IsEmpty(sg_allsquads) then
>		
>		-- you loose
>		Objective_Fail(OBJ_Annihilate)
>		
>		Rule_RemoveMe()
>	end
>	
>	Player_GetAll(player_Allies)
>	if SGroup_IsEmpty(sg_allsquads) then
>		
>		-- you win
>		Objective_Complete(OBJ_Annihilate)
>		
>		Rule_RemoveMe()
>	end
>	
>end
----

This is just a simple setup of an SP Annihilation map(everything is included in attachment) with basic AI, controlling resources, spawning at markers, objective setup.

5. to be able to select the campaign you have to create a campaignname.camp file with e.g.:

Code:
----
>Name="Single Player Test Campaign"
>
>ModName="WW2"
>
>Missions = {
>
>	{
>		name = "Single Player Test Mission - Axis",
>		mission = "sp_axis_test",
>	},
>
>	{
>		name = "Single Player Test Mission - Allies",
>		mission = "sp_allies_test",
>	},
>} 
----
6. Start your CoH with the -dev option
7. You should be able to select the campaign.

The whole bunch of files (including my utility tybor.scar) can be found in the attached sp_test.zip. To use the files simple extract it to the mentioned SP folder.
The campaign consists of 2 Missions. First played as Axis, second played as Allies. Altough the AI is set up completely equal, in the 2nd mission it doesn't create any buildings (this is because AI has already 2 Victory points at beginning).

Please leave comments and suggestions here, so the code can be improved further.

Hint: I didn't wanted to edit UCS File and have found a function called LOC() which creates a LocString out of a normal string but with "LOC: " in front.

gr33tz Tybor

----

http://forums.relicnews.com/showthread.php?t=138634

**HowTo: Singleplayer Campaign Creation (SCAR)