secure_high_kingdom_north_sea_scripted_effect

secure_high_kingdom_north_sea_scripted_effect = {
	scope:founder = {
		dynasty = { add_dynasty_prestige = monumental_dynasty_prestige_gain }
		#Standard effects.
		##Adjust the de jure capital appropriately first up, since otherwise we won't be able to see your preferred title.
		hidden_effect = {
			#If it's Denmark, we do nothing, as Denmark has the capital & CoA by default.
			#If it's England, we make the capital London/York.
			if = {
				limit = { primary_title = title:k_england }
				title:e_north_sea = {
					set_capital_county = title:k_england.title_capital_county
				}
			}
			#If it's Norway, we make the capital Steinkjer.
			if = {
				limit = { primary_title = title:k_norway }
				title:e_north_sea = {
					set_capital_county = title:c_trandheim.title_capital_county
				}
			}
		}
		##Hand over the High Kingdom.
		create_title_and_vassal_change = {
			type = created
			save_scope_as = title_change
			add_claim_on_loss = no
		}
		title:e_north_sea = {
			change_title_holder = {
				holder = scope:founder
				change = scope:title_change
			}
		}
		resolve_title_and_vassal_change = scope:title_change
		##Configure the new de jure setup.
		title:k_england = { set_de_jure_liege_title = title:e_north_sea }
		title:k_denmark = { set_de_jure_liege_title = title:e_north_sea }
		title:k_norway = { set_de_jure_liege_title = title:e_north_sea }
		if = {
			limit = {
				title:k_daneland = { is_titular = no }
				OR = {
					has_title = title:k_daneland
					completely_controls = title:k_daneland
				}
			}
			title:k_daneland = { set_de_jure_liege_title = title:e_north_sea }
		}
		if = {
			limit = {
				title:k_frisia = { is_titular = no }
				OR = {
					has_title = title:k_frisia
					completely_controls = title:k_frisia
				}
			}
			title:k_frisia = { set_de_jure_liege_title = title:e_north_sea }
		}
		if = {
			limit = {
				title:d_flanders = { is_titular = no }
				title:d_normandy = { is_titular = no }
				OR = {
					has_title = title:d_flanders
					completely_controls = title:d_flanders
				}
				OR = {
					has_title = title:d_normandy
					completely_controls = title:d_normandy
				}
			}
			custom_tooltip = secure_high_kingdom_neustria
			hidden_effect = {
				save_scope_as = founder
				create_dynamic_title = {
					tier = kingdom
					name = NEUSTRIA
				}
				create_title_and_vassal_change = {
					type = created
					save_scope_as = change
					add_claim_on_loss = no
				}
				
				scope:new_title = {
					change_title_holder = {
						holder = root
						change = scope:change
					}
				}
				
				resolve_title_and_vassal_change = scope:change
				title:d_flanders = { set_de_jure_liege_title = scope:new_title }
				title:d_normandy = { set_de_jure_liege_title = scope:new_title }
				scope:new_title = { 
					set_de_jure_liege_title = title:e_north_sea 
					set_coa = title:c_guines
					set_color_from_title = title:d_normandy
					set_capital_county = title:d_normandy.title_capital_county
				}
			}
		}
		if = {
			limit = {
				title:k_brittany = { is_titular = no }
				OR = {
					has_title = title:k_brittany
					completely_controls = title:k_brittany
				}
			}
			title:k_brittany = { set_de_jure_liege_title = title:e_north_sea }
		}
		if = {
			limit = {
				title:k_scotland = { is_titular = no }
				OR = {
					has_title = title:k_scotland
					completely_controls = title:k_scotland
				}

As written in game/common/scripted_effects/01_dlc_fp1_scripted_effects.txt.