###########################################
#
# Holy Order Events
#
# ID 8700-9999 is reserved
#
###########################################


########################################
# The Teutonic Order
########################################

### Ask for a County in order to help against Pagans ###

# Hochmeister writes a letter
character_event = {
	id = 8700
	desc = EVTDESC8700
	picture = GFX_evt_council
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes # on_yearly_pulse

	only_independent = yes
	lacks_dlc = "Holy Fury"
	religion_group = christian
	only_capable = yes
	min_age = 16
	prisoner = no

	trigger = {
		# Teutonic Order is active
		is_title_active = d_teutonic_order
		is_landed = no

		primary_title = {
			title = d_teutonic_order
		}

		NOR = {
			has_global_flag = teutonic_order_invited_to_kingdom

			has_alternate_start_parameter = {
				key = religion_names
				value = random
			}
		}

		trigger_if = {
			limit = { has_character_flag = land_given_to_teutonic_order }

			OR = {
				had_character_flag = {
					flag = land_given_to_teutonic_order
					years >= 1
				}

				had_character_flag = {
					flag = no_land_to_teutonic_order_at_the_moment
					years >= 2
				}
			}
		}

		# There is a valid province
		any_independent_ruler = {
			higher_real_tier_than = DUKE
			religion = ROOT
			NOT = { has_character_flag = no_land_to_religious_orders }

			any_demesne_province = {
				region = custom_eastern_baltic
				owned_by = PREV

				OR = {
					has_castle = yes
					has_temple = yes
					has_city = yes
					has_tribal = yes
				}

				OR = {
					religion_group = pagan_group

					AND = {
						NOT = { religion = ROOT }

						any_neighbor_province = {
							has_owner = yes

							owner = {
								religion_group = pagan_group
							}
						}
					}
				}

				kingdom = {
					trigger_if = {
						limit = { has_holder = yes }

						holder_scope = {
							NOT = { religion = ROOT }
						}
					}
				}
			}
		}
	}

	option = {
		name = EVTOPTA8700

		random_independent_ruler = {
			limit = {
				religion = ROOT
				higher_real_tier_than = DUKE

				any_demesne_province = {
					region = custom_eastern_baltic
					NOT = { religion = ROOT }
					owned_by = PREV

					OR = {
						has_castle = yes
						has_temple = yes
						has_city = yes
						has_tribal = yes
					}

					OR = {
						religion_group = pagan_group

						AND = {
							NOT = { religion = ROOT }

							any_neighbor_province = {
								has_owner = yes

								owner = {
									religion_group = pagan_group
								}
							}
						}
					}

					kingdom = {
						trigger_if = {
							limit = { has_holder = yes }

							holder_scope = {
								NOT = { religion = ROOT }
							}
						}
					}
				}
			}

			random_demesne_province = {
				limit = {
					region = custom_eastern_baltic
					NOT = { religion = ROOT }
					owned_by = PREV

					OR = {
						has_castle = yes
						has_temple = yes
						has_city = yes
						has_tribal = yes
					}

					OR = {
						religion_group = pagan_group

						AND = {
							NOT = { religion = ROOT }

							any_neighbor_province = {
								has_owner = yes

								owner = {
									religion_group = pagan_group
								}
							}
						}
					}

					kingdom = {
						trigger_if = {
							limit = { has_holder = yes }

							holder_scope = {
								NOT = { religion = ROOT }
							}
						}
					}
				}

				save_event_target_as = land_wanted_by_teutonic_order

				owner = {
					letter_event = {
						id = 8701
						days = 7
					}
				}
			}
		}
	}
}

# Ask permission from the King
letter_event = {
	id = 8701
	desc = EVTDESC8701
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPTA8501

		prestige = 50
		piety = 50

		event_target:land_wanted_by_teutonic_order = {
			show_scope_change = no

			county = {
				show_scope_change = no

				grant_title = FROM

				FROM = {
					show_scope_change = no

					add_character_modifier = {
						name = holy_truce_timer
						years = 10
					}

					gain_settlements_under_title = {
						title = PREV
						enemy = ROOT
					}

					opinion = {
						name = opinion_granted_county_to_holy_order
						who = ROOT
						years = 100
					}
				}

				hidden_effect = {
					add_building = ca_order_house
				}
			}

			province_event = {
				id = 8702
				days = 1
			}
		}

		religion_head = {
			show_scope_change = no

			opinion = {
				name = opinion_exalted
				who = ROOT
				years = 10
			}
		}

		set_character_flag = land_given_to_teutonic_order
	}

	option = {
		name = EVTOPTB8501

		set_character_flag = no_land_to_teutonic_order_at_the_moment

		ai_chance = { factor = 0 }
	}

	option = {
		name = EVTOPTC8501

		piety = -25

		FROM = {
			show_scope_change = no

			opinion = {
				name = opinion_angry
				who = ROOT
				years = 20
			}

			letter_event = {
				id = 8800
				days = 1
			}
		}

		religion_head = {
			show_scope_change = no

			opinion = {
				name = opinion_disappointed
				who = ROOT
				years = 10
			}
		}

		set_character_flag = no_land_to_religious_orders

		ai_chance = { factor = 0 }
	}
}

# The county has been ceded
province_event = {
	id = 8702
	desc = EVTDESC8702
	picture = GFX_evt_castle_construction
	border = GFX_event_normal_frame_religion

	is_triggered_only = yes

	option = {
		name = EXCELLENT

		owner = {
			narrative_event = {
				id = 8703
				days = 7
			}
		}

		any_player = {
			limit = {
				NOT = { character = FROM }

				OR = {
					religion_group = christian
					war_with = FROM

					capital_scope = {
						distance = {
							where = ROOT
							value < 100 # Means we live fairly near the province where the castle is built
						}
					}
				}
			}

			narrative_event = {
				id = 8703
				days = 7
			}
		}
	}
}

# News spread about the new county
narrative_event = {
	id = 8703
	title = EVTNAME8703
	desc = EVTDESC8703
	picture = GFX_evt_crusaders
	border = GFX_event_narrative_frame_religion

	is_triggered_only = yes

	only_rulers = yes

	option = {
		name = EVTOPTA8503

		trigger = { has_character_flag = land_given_to_teutonic_order }

		prestige = 100
		clr_character_flag = land_given_to_teutonic_order
	}

	option = {
		name = {
			text = EVTOPTB8503
			trigger = {
				religion = FROMFROM
				NOT = { has_character_flag = land_given_to_teutonic_order }
			}
		}
		name = {
			text = EVTOPTC8503
			trigger = {
				NOT = { religion_group = christian }
			}
		}
		name = {
			text = EVTOPTD8503
			trigger = {
				religion_group = christian
				NOT = { religion = FROMFROM }
			}
		}
	}
}


### HRE vassal wants to give land to the Teutonic Order ###

# HRE vassal wants to donate land to the Teutonic Order
province_event = {
	id = 8720
	desc = EVTDESC8720
	picture = GFX_evt_council
	border = GFX_event_normal_frame_religion

	lacks_dlc = "Holy Fury"

	trigger = {
		region = custom_eastern_baltic

		# Teutonic Order is active
		is_title_active = d_teutonic_order

		d_teutonic_order = {
			is_primary_holder_title = yes

			holder_scope = {
				independent = yes
			}
		}

		owner = {
			# The Emperor is Top liege
			top_liege = {
				OR = {
					trigger_if = {
						limit = {
							e_germania = {
								has_holder = yes
							}
						}

						primary_title = {
							title = e_germania
						}
					}
					trigger_else = {
						primary_title = {
							title = e_hre
						}

						culture_group = central_germanic
					}
				}
			}

			NOR = {
				has_character_flag = no_land_to_teutonic_order
				has_character_flag = wants_to_give_land_to_teutonic_order
			}

			war = no
		}

		# There is a valid province
		OR = {
			has_castle = yes
			has_temple = yes
			has_city = yes
			has_tribal = yes
		}

		NOT = {
			has_alternate_start_parameter = {
				key = religion_names
				value = random
			}
		}
	}

	mean_time_to_happen = {
		years = 10

		mult_modifier = {
			factor = 0.75
			religion_group = pagan_group
		}

		mult_modifier = {
			factor = 0.75

			any_neighbor_province = {
				has_owner = yes

				owner = {
					religion_group = pagan_group
				}
			}
		}
	}

	immediate = {
		county = {
			save_event_target_as = county_for_teutonic_order
		}

		owner = {
			set_character_flag = wants_to_give_land_to_teutonic_order
		}
	}

	option = {
		name = EVTOPTA8720

		tooltip = {
			d_teutonic_order = {
				show_scope_change = no

				holder_scope = {
					show_scope_change = no

					grant_title = event_target:county_for_teutonic_order
				}
			}
		}

		owner = {
			liege = {
				letter_event = {
					id = 8721
					days = 3
				}
			}
		}
	}

	option = {
		name = EVTOPTB8720

		owner = {
			set_character_flag = no_land_to_teutonic_order
		}
	}
}

# Liege decides
letter_event = {
	id = 8721
	desc = EVTDESC8721
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPTA8721 # Ask top liege

		trigger = { independent = no }

		liege = {
			letter_event = {
				id = 8722
				days = 3
			}
		}
	}

	option = {
		name = EVTOPTB8721 # Yes

		trigger = { independent = yes }

		FROM = {
			owner = {
				letter_event = {
					id = 8723
					days = 3
				}
			}
		}
	}

	option = {
		name = EVTOPTC8721 # No

		trigger = { independent = yes }

		FROM = {
			owner = {
				letter_event = {
					id = 8724
					days = 3
				}
			}
		}

		ai_chance = { factor = 0 }
	}
}

# Top liege decides
letter_event = {
	id = 8722
	desc = EVTDESC8722
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPTA8722 # Yes

		FROMFROM = {
			owner = {
				letter_event = {
					id = 8723
					days = 3
				}
			}
		}
	}

	option = {
		name = EVTOPTB8722 # No

		FROMFROM = {
			owner = {
				letter_event = {
					id = 8724
					days = 3
				}
			}
		}

		ai_chance = { factor = 0 }
	}
}

# Gift was allowed
letter_event = {
	id = 8723
	desc = EVTDESC8723
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	option = {
		name = EVTOPTA8723

		d_teutonic_order = {
			holder_scope = {
				letter_event = {
					id = 8725
					days = 3
				}
			}
		}
	}
}

# Gift was not allowed
letter_event = {
	id = 8724
	desc = EVTDESC8724
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	ai = no

	option = {
		name = EVTOPTA8724
	}
}

# The Teutonic Order is informed
letter_event = {
	id = 8725
	desc = EVTDESC8725
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	option = {
		name = EXCELLENT

		grant_title = event_target:county_for_teutonic_order

		gain_settlements_under_title = {
			title = event_target:county_for_teutonic_order
			enemy = FROM
		}
	}
}

########################################
# General Holy Order Events
########################################

### No Religious Orders Allowed ###

letter_event = {
	id = 8800
	desc = EVTDESC8800
	border = GFX_event_letter_frame_religion

	is_triggered_only = yes

	ai = no

	option = {
		name = EVTOPTA8800
	}
}