###########################################
#
# Easter-eggs
#
# ID 6500-6899 is reserved
#
###########################################
#
# Written by Sara Wendel-rtqvist

#Sex Crusader Kings
character_event = {
	id = 6500
	desc = "EVTDESC6500"
	picture = GFX_evt_brothel
	
	min_age = 35
	only_men = yes
	only_playable = yes
	prisoner = no
	ai = no
	
	trigger = {
		NOT = {
			num_traits = 4
		}
		trait = indulgent_wastrel
		NOT = { trait = in_hiding }
	}
	
	mean_time_to_happen = {
		months = 50000
		
		modifier = {
			factor = 0.8
			trait = imbecile
		}
	}
	
	option = {
		name = "EVTOPTA6500"
		random_list = {
			50 = {
				add_trait = lustful
			}
			50 = {
				add_trait = infirm
			}
		}
	}
	
	option = {
		name = "EVTOPTB6500"
		random_list = {
			25 = {
				add_trait = lustful
			}
			25 = {
				add_trait = ambitious
			}
			25 = {
				add_trait = greedy
			}
			25 = {
				add_trait = incapable
			}
		}
	}
}

#Marco... 
character_event = {
	id = 6501
	desc = "EVTDESC6501"
	picture = GFX_evt_lunatic
	
	min_age = 20
	only_playable = yes
	ai = no
	
	mean_time_to_happen = {
		months = 100000
	}
	
	option = {
		name = "EVTOPTA6501" #...Polo
		prestige = 50
	}
}

#Stroke the kitty
character_event = {
	id = 6502
	desc = "EVTDESC6502"
	picture = "GFX_evt_family"
	
	min_age = 20
	only_playable = yes
	capable_only = yes
	prisoner = no
	
	mean_time_to_happen = {
		months = 100000
	}
	
	option = {
		name = "EVTOPTA6502"
		prestige = 25
		hidden_tooltip = {
			character_event = {
				id = 1009
				days = 7
				random = 4
			}
		}
	}
	option = {
		name = "EVTOPTB6502"
		add_trait = cruel
		if = {
			limit = {
				NOT = {
					trait = maimed
				}
			}
			random = {
				chance = 25
				add_trait = maimed
				hidden_tooltip = {
					character_event = {
						id = 38281 #Notify Maimed
					}
				}
			}
		}
	}
}

#Bohemian Rhapsody - only for the king of Bohemia

#Letter event - "Mama, I killed a man" - after a battle?

#Slovak sympathy
narrative_event = {
	id = 55012
	title = "EVTNAME55011"
	desc = "EVTNAME55012"
	picture = GFX_evt_marriage
trigger = {
		culture = hungarian
		any_demesne_province = {
			culture = slovak
mean_time_to_happen = { 1 month
}
}
        only_rulers = yes	
	has_landed_title = d_nyitra

	option = {
		name = "EVTOPTA55012"

		prestige = -5
		hidden_tooltip = {
			narrative_event = {
				id = 55013
				days = 30
				random = 60
			}
		}
create_character = {
			dynasty = none
			religion = ROOT
			culture = slovak
			male = yes
			age = 51
			attributes = {
				intrigue = 3
				martial = 8
				diplomacy = 5
				stewardship = 6
				learning = 2
			}
			trait = genius
			trait = drunkard
			trait = patient
			trait = honest
			trait = charitable
			trait = diligent
			trait = grey_eminence
                        health = 8
	}
}
	option = {
		name = "EVTOPTB55012"
		add_trait = wroth
		}
		}
	}
}

#Slovak sympathy 2

narrative_event = {
	id = 55013
	title = "EVTNAME55011"
	desc = "EVTNAME55013"
	picture = GFX_evt_marriage
	
	is_triggered_only = yes

	option = {
		name = "EVTOPTA55013"

		prestige = -50
	}
	option = {
		name = "EVTOPTB55013"
		add_trait = wroth
		}
		}
	}
}