#Keizer Harm - v 1.0 (25-03-2018)
namespace = INF

#Character wonders if infertile
character_event = {
	id = INF.1
	desc = {
		text = EVTDESC_INF.1_MALE
		picture = GFX_evt_bad_news
		trigger = {
			is_female = no
		}
	}
	desc = {
		text = EVTDESC_INF.1_FEMALE
		picture = GFX_evt_bad_news_female
		trigger = {
			is_female = yes
		}
	}
	
	min_age = 25
	is_married = yes
	trigger = {
		has_children = no
		OR = {
			is_female = no
			NOT = { age = 45 }
		}
		NOT = {
			trait = eunuch
			trait = celibate
		}
	}
	mean_time_to_happen = {
		months = 120
		modifier = {
			factor = 0.5
			trait = stressed
		}
		modifier = {
			factor = 0.5
			trait = lustful
		}
		modifier = {
			factor = 0.7
			trait = hedonist
		}
		modifier = {
			factor = 2
			trait = chaste
		}
		modifier = {
			factor = 0.4
			age = 30
			is_female = yes
		}
		modifier = {
			factor = 0.3
			age = 35
			is_female = yes
		}
		modifier = {
			factor = 0.5
			age = 30
			is_female = no
		}
		modifier = {
			factor = 0.5
			age = 40
			is_female = no
		}
	}
	
	option = { #For polygamists
		trigger = {
			OR = {
				num_of_spouses = 2
				num_of_consorts = 1
				trait = seducer
				trait = seductress
			}
		}
		
		name = EVTOPTA_INF.1 #I am surrounded by willing women/men - it has to be me.
		random = {
			chance = 50
			add_trait = depressed
		}
		prestige = -100
		
		hidden_tooltip = {
			any_spouse = {
				character_event = {
					id = INF.4
				}
			}
		}
		
		set_flag = infertility_exposed
	}
	
	option = {
		trigger = { 
			NOR = {
				num_of_spouses = 2
				num_of_consorts = 1
			}
		}
		
		name = EVTOPTB_INF.1 #It cannot be me, it must be [spouse]!
		
		hidden_tooltip = {
			random_spouse = {
				character_event = {
					id = INF.2
					days = 150
					random = 60
				}
			}
		}
	}
	
	option = {
		name = EVTOPTC_INF.1 #I had better keep this quiet!
		add_trait = stressed
		
		hidden_tooltip = {
			character_event = {
				id = INF.5
				days = 1500
				random = 600
			}
		}
	}
	
	option = {
		trigger = { 
			NOR = {
				num_of_spouses = 2
				num_of_consorts = 1
			}
		}
		
		name = EVTOPTD_INF.1 #I might as well accept it.
		random = {
			chance = 33
			add_trait = depressed
		}
		prestige = -100
		
		set_flag = infertility_exposed
		
		hidden_tooltip = {
			any_spouse = {
				character_event = {
					id = INF.4
				}
			}
		}
	}
}

character_event = { #Spouse suspects infertile ROOT
	id = INF.2
	desc = EVTDESC_INF.2
	picture = GFX_evt_lovers
	is_triggered_only = yes
	
	option = {
		name = EVTOPTA_INF.2 #Maybe the problem lies with me
		trigger = {
			has_children = no
		}
		prestige = -50
		random = {
			chance = 50
			add_trait = stressed
		}
	}
	
	option = {
		name = EVTOPTB_INF.2 #No, [spouse] is infertile!
		remove_trait = stressed
		
		trigger = {
			NOT = {
				trait = infertile
				has_flag = infertility_exposed
			}
		}
		
		hidden_tooltip = {
			FROM = {
				set_flag = infertility_exposed
				character_event = {
					id = INF.3
				}
			}
		}
	}
}

character_event = { #Spouse has revealed your infertility!
	id = INF.3
	is_triggered_only = yes
	desc = {
		text = EVTDESC_INF.3_MALE
		picture = GFX_evt_bad_news
		trigger = {
			is_female = no
		}
	}
	desc = {
		text = EVTDESC_INF.3_FEMALE
		picture = GFX_evt_bad_news_female
		trigger = {
			is_female = yes
		}
	}
	
	option = {
		name = EVTOPTA_INF.3 #How can I ever feel like a proper man/woman again...
		prestige = -200
		add_trait = depressed
	}
}

character_event = { #Spouse has revealed they are infertile!
	id = INF.4
	is_triggered_only = yes
	desc = EVTDESC_INF.4
	picture = GFX_evt_lovers
	
	option = {
		name = EVTOPTA_INF.4 #Off with their head!
		trigger = {
			is_landed = yes
			FROM = {
				is_landed = no
			}
			trait = cruel
			NOT = { trait = kind }
		}
		
		prestige = -300
		tooltip_info = cruel
		FROM = {
			death = {
				death_reason = death_execution
				killer = ROOT
			}
		}
		add_character_modifier = {
			name = merciless
			years = 10
		}
	}
	
	option = {
		name = EVTOPTB_INF.4
		
		random = {
			chance = 50
			add_trait = stressed
		}
	}
}

character_event = { #Court agrees ruler is infertile
	id = INF.5
	is_triggered_only = yes
	trigger = {
		has_children = no
	}
	desc = {
		text = EVTDESC_INF.5_MALE
		picture = GFX_evt_bad_news
		trigger = {
			is_female = no
		}
	}
	desc = {
		text = EVTDESC_INF.5_FEMALE
		picture = GFX_evt_bad_news_female
		trigger = {
			is_female = yes
		}
	}
	
	option = {
		name = EVTOPTA_INF.5 #How can I ever feel like a proper man/woman again...
		prestige = -500
		add_trait = depressed
		
		hidden_tooltip = {
			any_spouse = {
				character_event = {
					id = INF.4
				}
			}
		}
	}
}

character_event = { #Distribute infertile trait and prevent game-overs
	id = INF.10
	is_triggered_only = yes
	hide_window = yes
	trigger = {
	}
	
	option = {
		if = {
			limit = {
				OR = {
					AND = {
						NOT = { #To prevent game-overs
							current_heir = {
								dynasty = ROOT
							}
						}
						ai = no
					}
					has_children = yes #Makes no sense
				}
			}
			remove_trait = infertile #I think some characters may get it randomly at game start, without this event
		} else = {
			random = {
				chance = 5
				add_trait = infertile
			}
		}
	}
}