﻿# Story for knytling dynasty
# originally made by Petter Vilberg
# adjusted by me

story_knytling_invasion = {
	on_setup = {
		historicinvasions_story_setup_effect = { # global start variable, story variables, conditional dissolution protection
			INVADER_DYNN = knytling # for story start global variable
			INVADER_TITLE = title:e_knytling # title the invader spawns with
		}
		story_owner = {
			knytling_maintenance_effect = {
				INVADER_DYNN = knytling
				INVADER_CHAR = scope:story.story_owner
				INVADER_TITLE = scope:story.var:invader_title_var
				LANDLESS_YES_NO = no
				STARTING_TIER = duchy
			}
			if = { # don't force an existing player into war
				limit = { is_ai = yes }
				trigger_event = {
					id = knytling_invasion.0200
					months = 1
				}
			}
		}
	}

	on_end = {
		invader_story_on_end_effect = { INVADER_DYNN = knytling }

		# establishing kingdoms will fail if the story ended because the story owner died (can't grant titles to dead characters); that's why the script tries to create them periodically further down
		story_owner = {
			create_north_sea_empire_kingdoms_effect = yes
		}
	}

	on_owner_death = {
		# random chance to set variable to end story after ruler N dies, depending on how many story owners there have been in total
		random = {
			chance = 0
			modifier = {
				add = 100
				var:story_owner_counter >= 1 # end story after death of ruler N?
			}
			set_variable = {
				name = end_of_invasion_story
				value = yes
			}
		}
		invader_story_on_death_effect = { INVADER_DYNN = knytling }
	}

	# maintenance
	effect_group = {
		days = historicinvasions_story_maintenance_value

		trigger = { always = yes }

		# make sure they have money on hand
		triggered_effect = {
			trigger = { story_owner = { gold < 0 } }
			effect = { story_owner = { add_gold = 350 } }
		}

		# end the story prematurely, because their conquests have been completed
		triggered_effect = {
			trigger = {
				story_owner = { completely_controls_region = special_knytling_conquest_region_total }
			}
			effect = {
				debug_log = "ending knytling story because the conquest goal has been completed"
				end_story = yes
			}
		}

		# end the story prematurely, because the invader has lost their #th offensive war
		triggered_effect = {
			trigger = {
				NOT = { has_game_rule = historicinvasions_invasion_ends_after_defeat_disabled }
			}
			effect = {
				historicinvasions_invasion_ends_after_defeat_effect = yes
			}
		}
	}

	#Start a new war if none is ongoing
	effect_group = {
		days = { 160 320 }

		trigger = { story_owner = { is_ai = yes } }

		first_valid = {
			triggered_effect = {
				trigger = {
					story_owner = { has_character_flag = invasion_ends_after_player_win }
				}
				effect = {
					debug_log = "ending knytling story because a player was able to defend against the invader"
					end_story = yes
				}
			}
			# solution: jump into a duchy within Denmark to gain a border
			triggered_effect = {
				trigger = {
					# doesn't already own land in the targeted scandinavia region
					any_county_in_region = {
						region = special_knytling_conquest_region_scandinavia
						count = 0
						OR = {
							holder = scope:story.story_owner
							holder = { target_is_liege_or_above = scope:story.story_owner }
						}
					}
					# other triggers
					story_owner = {
						should_invader_declare_war_trigger = { INVADER_TITLE = scope:story.var:invader_title_var }
						completely_controls_region = special_knytling_conquest_region_start # has consolidated England
					}
				}
				effect = {
					story_owner = {
						unlanded_war_target_evaluation_and_declaration_effect = {
							INVADER_DYNN = knytling
							INVADER_REGION = 2 # k_denmark
							EVERY_RANDOM = random # declare on just one ruler / title (random) or on a large area (every)?
							INVADER_TARGET_TITLE_TIER = kingdom
							INVADER_TITLE_TARGETS = "target_title = title:d_sjaelland.de_jure_liege"
							#INVADER_TITLE_TARGETS = "target_title = scope:random_start_invasion_target_title"
							INVADER_LIEGE_RESTRICTIONS = ""
						}
					}
				}
			}
			# problem: the distance between England and Denmark / Norway is too large - they are not neighboring!
			triggered_effect = {
				trigger = { story_owner = { should_invader_declare_war_trigger = { INVADER_TITLE = scope:story.var:invader_title_var } } }
				effect = {
					story_owner = {
						war_target_evaluation_and_declaration_effect = {
							INVADER_DYNN = knytling
							INVADER_CHAR = scope:story.story_owner
							INVADER_REGION = total
							INVADER_TARGET_TITLE_TIER = kingdom
							INVADER_RANGE = neighboring_and_across_water
							INVADER_LIEGE_RESTRICTIONS = ""
						}
					}
				}
			}
		}
	}

	# Story handling in case of succession weirdness
	effect_group = {
		days = historicinvasions_succession_weirdness_value

		trigger = { NOT = { story_owner = { has_title = scope:story.var:invader_title_var } } }

		# either transfer story ownership or end story if the title is not created
		triggered_effect = {
			trigger = { always = yes }
			effect = {
				hi_check_for_valid_story_owner_effect = {
					INVADER_TITLE = scope:story.var:invader_title_var
					STORY_COUNTER_INCREASE = 0
				}
			}
		}
	}

	# hand out successor kingdoms prematurely
	effect_group = {
		days = 140

		trigger = { always = yes }

		triggered_effect = {
			trigger = {
				OR = {
					title:k_england = { is_title_created = no }
					title:k_denmark = { is_title_created = no }
					title:k_norway = { is_title_created = no }
				}
			}
			effect = { story_owner = { create_north_sea_empire_kingdoms_effect = yes } }
		}
	}
}