"S6L1.sce"
{
	INT unit_recno 
	INT charlies_recno
	INT jean_recno
	INT lahire_recno
	INT alencon_recno
	INT orlean_recno
	INT horse_recno

	INT joan_team_member_1
	INT joan_team_member_2
	INT joan_team_member_3
	INT joan_team_member_4
	INT joan_team_member_5
	INT joan_team_member_6
	INT joan_team_member_7
	INT joan_team_member_8
	INT joan_team_member_9
	INT jean_team_member_1
	INT jean_team_member_2
	INT jean_team_member_3
	INT jean_team_member_4
	INT jean_team_member_5
	INT jean_team_member_6
	INT jean_team_member_7
	INT jean_team_member_8
	INT jean_team_member_9
	INT lahire_team_member_1
	INT lahire_team_member_2
	INT lahire_team_member_3
	INT lahire_team_member_4
	INT lahire_team_member_5
	INT lahire_team_member_6
	INT lahire_team_member_7
	INT lahire_team_member_8
	INT lahire_team_member_9
	INT orleans_team_member_1
	INT orleans_team_member_2
	INT orleans_team_member_3
	INT orleans_team_member_4
	INT orleans_team_member_5
	INT orleans_team_member_6
	INT orleans_team_member_7
	INT orleans_team_member_8
	INT orleans_team_member_9
	INT alencon_team_member_1
	INT alencon_team_member_2
	INT alencon_team_member_3
	INT alencon_team_member_4
	INT alencon_team_member_5
	INT alencon_team_member_6
	INT alencon_team_member_7
	INT alencon_team_member_8
	INT alencon_team_member_9
	INT charles_team_member_1
	INT charles_team_member_2
	INT charles_team_member_3
	INT charles_team_member_4
	INT charles_team_member_5
	INT charles_team_member_6

	init
	{
		if(FUNC("get_scenario_stage") == 0)
		{
			FUNC("set_game_start_date", 1429, 4, 29, 420, 0, 1440)

			FUNC("set_nation_friendship", "ENGLISH", "FRENCH", -77)
			FUNC("set_nation_friendship", "FRENCH", "ENGLISH", -77)
			FUNC("set_relation_status", "ENGLISH", "FRENCH", 0)

			unit_recno = FUNC("load_unit", "JOAN_OF_ARC", "FRENCH") 

			if( unit_recno == 0 )
			{
				unit_recno = FUNC("add_unit", "JOAN_OF_ARC", "FRENCH") 
			}

			FUNC("set_unit_pos", unit_recno, 2330.0, 20356.0, 0.0)
			FUNC("set_unit_dir", unit_recno, 180) 
			FUNC("set_unit_ranking", unit_recno, "GENERAL")
			FUNC("set_unit_team", unit_recno, 1)
			FUNC("set_main_character", unit_recno, 1)
			FUNC("set_charmove_detect_block_flag", 1)

			FUNC("set_reputation", 50)
		}

		FUNC("set_fog_distance", 4096) 
		unit_recno = FUNC("search_unit_by_name", "Joanna d'Arc") 
		lahire_recno = FUNC("search_unit_by_name", "La Hire")
		jean_recno = FUNC("search_unit_by_name", "Jean de Metz")
		charlies_recno = FUNC("search_unit_by_name", "Karol VII")
		orlean_recno = FUNC("search_unit_by_name", "Bastard z Orleanu")
		alencon_recno = FUNC("search_unit_by_name", "Książę Alencon")

		horse_recno = FUNC("search_unit_by_name", "Charlies Horse")

		FUNC("set_delay_before_win", 5000)
	}


	// run the tactic script for this scenario
	SCRIPT("script\scenario\S6L1_tactic.sce")

	// run the finish script for this scenario
	if( FUNC("is_game_finish") == 0 ) 
	{
		SCRIPT("script\scenario\S6L1_finish.sce")
	}

	if( FUNC("get_scenario_stage") == 0 )
	{
		FUNC("set_scenario_stage", 1)
	}
	
}