﻿###| Harthgate Artifact Creation Effects for Lords of Wessex |###

###| Credits |###

#: Developed by Edgar Harthgate

###| End of Credits |###

###| Table of Contents |###																						###| Status |###	###| Quick Link |###

#: 001: Major Decisions																							#: Building			major_decisions_scripted_effects

###| 001: Major Decisions	 |###																				###| Status |###	###| major_decisions_scripted_effects |###

#: harthgate_decisions_major_establish_danelaw_scripted_effect = Establish the Danelaw							#: Building
#: harthgate_decisions_major_form_england_scripted_effect_low = Crown the King of all England					#: Building
#: harthgate_decisions_major_institute_cultural_reformation_scripted_effect = Institute Cultural Reformation	#: Building
#: harthgate_decisions_major_partition_england_scripted_effect_low = Partition the Kingdom of England			#: Building

###| End of Table of Contents |###

###| 001: Major Decisions |###    ###| major_decisions_scripted_effects |###

#: harthgate_decisions_major_establish_danelaw_scripted_effect = Establish the Danelaw

harthgate_decisions_major_establish_danelaw_scripted_effect = {
	
	save_scope_as = founder															#: Defines the [character.root] under a scope through which the resolution of effects may be handled.
	culture = { save_scope_as = founder_culture }									#: Defines the [culture] of the [founder] under a scope through which the resolution of effects may be handled.
		
	hidden_effect = {																#: Immediately resolves the de-jure drift of titles into [k_danelaw], and [k_danelaw] into [e_britannia].
		title:k_danelaw = {
			set_de_jure_liege_title = title:e_britannia
		}
		title:d_york = {
			set_de_jure_liege_title = title:k_danelaw
		}
		title:d_northumberland = {
			set_de_jure_liege_title = title:k_danelaw
		}
		title:d_lancaster = {
			set_de_jure_liege_title = title:k_danelaw
		}
	}
		
	create_title_and_vassal_change = {												#: Initiates the creation of [k_danelaw] and defines a scope through which handle the resolution.
		type = created
		save_scope_as = establish_danelaw
	}
	
	title:k_danelaw = {																#: Initiates a [change] in title history for [k_danelaw], defines the classification of the [change], and defines the [holder] of the [title]
		change_title_holder = {
			holder = scope:founder
			change = scope:establish_danelaw
		}
	}
	resolve_title_and_vassal_change = scope:establish_danelaw						#: Resolves any unresolved [change] in title history defined under the scope of [establish_danelaw].
		
}

#: harthgate_decisions_major_form_england_scripted_effect_low = Crown the King of all England

harthgate_decisions_major_form_england_scripted_effect_low = {

	save_scope_as = king_england
	
	if = {
		limit = {
			is_target_in_global_variable_list = {
				name = unavailable_unique_decisions
				target = flag:flag_partition_england_low
			}
		}
		custom_tooltip = harthgate_decisions_major_form_england_scripted_effect_low.adjust_dejure_lesser.tt
		title:k_lesser_wessex_low = {
			every_in_de_jure_hierarchy = {
				limit = { tier = tier_duchy }
				set_de_jure_liege_title = title:k_england
			}
		}
		title:k_lesser_mercia_low = {
			every_in_de_jure_hierarchy = {
				limit = { tier = tier_duchy }
				set_de_jure_liege_title = title:k_england
			}
		}
		title:k_lesser_east_anglia_low = {
			every_in_de_jure_hierarchy = {
				limit = { tier = tier_duchy }
				set_de_jure_liege_title = title:k_england
			}
		}
		title:k_lesser_deira_low = {
			every_in_de_jure_hierarchy = {
				limit = { tier = tier_duchy }
				set_de_jure_liege_title = title:k_england
			}
		}
	}
	
	if = { 
		limit = { 
			is_target_in_global_variable_list = {
				name = unavailable_unique_decisions
				target = flag:flag_partition_england_low
			}
			OR = {
				title:k_danelaw = { 
					is_title_created = yes
					holder = scope:king_england
				}
				completely_controls_region = custom_geographical_region_harthgate_danelaw_kingdom_low
			}
		}
		custom_tooltip = harthgate_decisions_major_form_england_scripted_effect_low.adjust_dejure_danelaw.tt
		title:k_danelaw = {
			every_in_de_jure_hierarchy = {
				limit = { tier = tier_duchy }
				set_de_jure_liege_title = title:k_england
			}
		}
	}
	
	create_title_and_vassal_change = {
		type = created
		save_scope_as = form_england
	}
	
	title:k_england = {
		change_title_holder = {
			holder = scope:king_england
			change = scope:form_england
		}
	}
	resolve_title_and_vassal_change = scope:form_england
	
	hidden_effect = { set_primary_title_to = title:k_england }
	
	if = {
		limit = {
			is_target_in_global_variable_list = {
				name = unavailable_unique_decisions
				target = flag:flag_partition_england_low
			}
		}
		custom_tooltip = harthgate_decisions_major_form_england_scripted_effect_low.destroy_lesser.tt
		destroy_title = title:k_lesser_wessex_low
		destroy_title = title:k_lesser_mercia_low
		destroy_title = title:k_lesser_east_anglia_low
		destroy_title = title:k_lesser_deira_low
	}
	
	if = {
		limit = {
			is_target_in_global_variable_list = {
				name = unavailable_unique_decisions
				target = flag:flag_partition_england_low
			}
		}
		custom_tooltip = harthgate_decisions_major_form_england_scripted_effect_low.press_claims.tt
		title:k_lesser_wessex_low = {
			every_claimant = {
				custom = harthgate_decisions_major_form_england_scripted_effect_low.all_claimants
				remove_claim = title:k_lesser_wessex_low
				add_unpressed_claim = title:k_england
			}
		}
		title:k_lesser_mercia_low = {
			every_claimant = {
				custom = harthgate_decisions_major_form_england_scripted_effect_low.all_claimants
				remove_claim = title:k_lesser_mercia_low
				add_unpressed_claim = title:k_england
			}
		}
		title:k_lesser_east_anglia_low = {
			every_claimant = {
				custom = harthgate_decisions_major_form_england_scripted_effect_low.all_claimants
				remove_claim = title:k_lesser_east_anglia_low
				add_unpressed_claim = title:k_england
			}
		}
		title:k_lesser_deira_low = {
			every_claimant = {
				custom = harthgate_decisions_major_form_england_scripted_effect_low.all_claimants
				remove_claim = title:k_lesser_deira_low
				add_unpressed_claim = title:k_england
			}
		}
	}
	
	if = { 
		limit = { 
			is_target_in_global_variable_list = {
				name = unavailable_unique_decisions
				target = flag:flag_partition_england_low
			}
			OR = {
				title:k_danelaw = { 
					is_title_created = yes
					holder = scope:king_england
				}
				completely_controls_region = custom_geographical_region_harthgate_danelaw_kingdom_low
			}
		}
		custom_tooltip = harthgate_decisions_major_form_england_scripted_effect_low.destroy_danelaw.tt
		destroy_title = title:k_danelaw
		every_claimant = {
			custom = harthgate_decisions_major_form_england_scripted_effect_low.all_claimants
			remove_claim = title:k_danelaw
			add_unpressed_claim = title:k_england
		}
	}
	
	scope:king_england = { 
		dynasty = { add_dynasty_prestige = 250 } 
		add_prestige = 500
		add_legitimacy = 100
	}
	
}

#: harthgate_decisions_major_institute_cultural_reformation_scripted_effect = Institute Cultural Reformation

harthgate_decisions_major_institute_cultural_reformation_scripted_effect = {
	
	save_scope_as = reformer_of_culture												#: Defines the [character.root] under a scope through which the resolution of effects may be handled.
	culture = { save_scope_as = reformer_of_culture_culture }						#: Defines the [culture] of the [reformer_of_culture] under a scope through which the resolution of effects may be handled.
		
	hidden_effect = {																#: Immediately resolves the establishment of the scripted [traditions] and learning of [innovations].
	
		 scope:reformer_of_culture_culture = {
			add_culture_tradition = tradition_herepaths_low
			add_culture_tradition = tradition_rota_organization_low
			add_innovation = innovation_mustering_grounds
			add_innovation = innovation_city_planning
			add_innovation = innovation_ledger
		}
		
	}
		
}

#: harthgate_decisions_major_partition_england_scripted_effect_low = Partition the Kingdom of England

harthgate_decisions_major_partition_england_scripted_effect_low = {

	title:d_somerset.holder = { save_scope_as = petty_king_wessex }
	title:d_norfolk.holder = { save_scope_as = petty_king_east_anglia }
	title:d_hereford.holder = { save_scope_as = petty_king_mercia }
	title:d_york.holder = { save_scope_as = petty_king_deira }

	if = {
		limit = { title:d_somerset = { is_title_created = yes } }
		create_title_and_vassal_change = {
			type = created
			save_scope_as = elevate_wessex
		}
	
		title:k_lesser_wessex_low = {
			change_title_holder = {
				holder = scope:petty_king_wessex
				change = scope:elevate_wessex
			}
		}
		resolve_title_and_vassal_change = scope:elevate_wessex
		scope:petty_king_wessex = {
			dynasty = { add_dynasty_prestige = 100 } 
			add_prestige = 250
			add_legitimacy = 25
			add_pressed_claim = title:k_lesser_east_anglia_low
			add_pressed_claim = title:k_lesser_mercia_low
			add_truce_both_ways = {
				character = scope:petty_king_east_anglia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_mercia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_deira
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
		}
	}
	
	if = {
		limit = { title:d_norfolk = { is_title_created = yes } }
		create_title_and_vassal_change = {
			type = created
			save_scope_as = elevate_east_anglia
		}
	
		title:k_lesser_east_anglia_low = {
			change_title_holder = {
				holder = scope:petty_king_east_anglia
				change = scope:elevate_east_anglia
			}
		}
		resolve_title_and_vassal_change = scope:elevate_east_anglia
		scope:petty_king_east_anglia = { 
			dynasty = { add_dynasty_prestige = 100 } 
			add_prestige = 250
			add_legitimacy = 25
			add_pressed_claim = title:k_lesser_wessex_low
			add_pressed_claim = title:k_lesser_mercia_low
			add_truce_both_ways = {
				character = scope:petty_king_wessex
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_mercia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_deira
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
		}
	}
	
	if = {
		limit = { title:d_hereford = { is_title_created = yes } }
		create_title_and_vassal_change = {
			type = created
			save_scope_as = elevate_mercia
		}
	
		title:k_lesser_mercia_low = {
			change_title_holder = {
				holder = scope:petty_king_mercia
				change = scope:elevate_mercia
			}
		}
		resolve_title_and_vassal_change = scope:elevate_mercia
		scope:petty_king_mercia = { 
			dynasty = { add_dynasty_prestige = 100 } 
			add_prestige = 250
			add_legitimacy = 25
			add_pressed_claim = title:k_lesser_wessex_low
			add_pressed_claim = title:k_lesser_east_anglia_low
			add_truce_both_ways = {
				character = scope:petty_king_wessex
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_east_anglia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_deira
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
		}
	}

	if = {
		limit = { 
			title:d_york = { 
				is_title_created = yes 
				holder = { culture = culture:norse }
			}
		}
		create_title_and_vassal_change = {
			type = created
			save_scope_as = elevate_deira
		}
	
		title:k_danelaw = {
			change_title_holder = {
				holder = scope:petty_king_deira
				change = scope:elevate_deira
			}
		}
		resolve_title_and_vassal_change = scope:elevate_deira
		scope:petty_king_deira = {
			random = { chance = { value = 25 } set_character_faith_with_conversion = faith:catholic }
			dynasty = { add_dynasty_prestige = 100 } 
			add_prestige = 250
			add_legitimacy = 25
			add_pressed_claim = title:k_lesser_wessex_low
			add_pressed_claim = title:k_lesser_east_anglia_low
			add_pressed_claim = title:k_lesser_mercia_low
			add_truce_both_ways = {
				character = scope:petty_king_wessex
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_east_anglia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
			add_truce_both_ways = {
				character = scope:petty_king_mercia
				years = 100
				name = harthgate_decisions_major_partition_england_truce
			}
		}
	}
	
	if = {
		limit = { 
			title:d_york = { 
				is_title_created = yes 
				holder = { culture = culture:anglo_saxon }
			}
		}
		create_title_and_vassal_change = {
			type = created
			save_scope_as = elevate_deira
		}
	
		title:k_lesser_deira_low = {
			change_title_holder = {
				holder = scope:petty_king_deira
				change = scope:elevate_deira
			}
		}
		resolve_title_and_vassal_change = scope:elevate_deira
		scope:petty_king_deira = { 
			dynasty = { add_dynasty_prestige = 100 } 
			add_prestige = 250
			add_legitimacy = 25
			add_pressed_claim = title:k_lesser_wessex_low
			add_pressed_claim = title:k_lesser_east_anglia_low
			add_pressed_claim = title:k_lesser_mercia_low
		}
	}
	
	title:d_cornwall = { set_de_jure_liege_title = title:k_lesser_wessex_low }
	title:d_somerset = { set_de_jure_liege_title = title:k_lesser_wessex_low }
	title:d_gloucester = { set_de_jure_liege_title = title:k_lesser_wessex_low }
	title:d_canterbury = { set_de_jure_liege_title = title:k_lesser_wessex_low }
	if = { limit = { title:d_bedford.holder = scope:petty_king_wessex } title:d_bedford = { set_de_jure_liege_title = title:k_lesser_wessex_low } }
	title:d_norfolk = { set_de_jure_liege_title = title:k_lesser_east_anglia_low }
	if = { limit = { title:d_bedford.holder = scope:petty_king_east_anglia } title:d_bedford = { set_de_jure_liege_title = title:k_lesser_east_anglia_low } }
	title:d_hereford = { set_de_jure_liege_title = title:k_lesser_mercia_low }
	if = { limit = { title:d_bedford.holder = scope:petty_king_mercia } title:d_bedford = { set_de_jure_liege_title = title:k_lesser_mercia_low } }
	if = {
		limit = { title:d_york = { holder = { culture = culture:norse } } }
		title:d_york = { set_de_jure_liege_title = title:k_danelaw }
		title:d_lancaster = { set_de_jure_liege_title = title:k_danelaw }
		title:d_northumberland = { set_de_jure_liege_title = title:k_danelaw }
		scope:petty_king_wessex = { add_pressed_claim = title:k_danelaw }
		scope:petty_king_east_anglia = { add_pressed_claim = title:k_danelaw }
		scope:petty_king_mercia = { add_pressed_claim = title:k_danelaw }
	}
	if = {
		limit = { title:d_york = { holder = { culture = culture:anglo_saxon } } }
		title:d_york = { set_de_jure_liege_title = title:k_lesser_deira_low }
		title:d_lancaster = { set_de_jure_liege_title = title:k_lesser_deira_low }
		title:d_northumberland = { set_de_jure_liege_title = title:k_lesser_deira_low }
		scope:petty_king_wessex = { add_pressed_claim = title:k_lesser_deira_low }
		scope:petty_king_east_anglia = { add_pressed_claim = title:k_lesser_deira_low }
		scope:petty_king_mercia = { add_pressed_claim = title:k_lesser_deira_low }
	}

}