grant_cardinal_title_effect

grant_cardinal_title_effect = {
	save_scope_as = cardinal_recipient
	# Government is picked during the title transfer, before change_government below
	# A theocratic government_base keeps a lowborn from founding a dynasty
	if = {
		limit = { rite.head_of_rite ?= { government_has_flag = government_is_theocracy } }
		rite.head_of_rite = { save_scope_as = cardinal_government_base }
	}
	else_if = {
		limit = { faith.religious_head ?= { government_has_flag = government_is_theocracy } }
		faith.religious_head = { save_scope_as = cardinal_government_base }
	}
	else_if = {
		limit = { title:k_papal_state.holder ?= { government_has_flag = government_is_theocracy } }
		title:k_papal_state.holder = { save_scope_as = cardinal_government_base }
	}
	else = {
		save_scope_as = cardinal_government_base
	}
	# Grant a vacant cardinalate
	if = {
		limit = {
			pam_can_hold_cardinalate_trigger = yes
			pam_can_receive_cardinalate_trigger = yes
			pam_pope_is_head_of_faith_or_rite_trigger = yes
			any_in_global_list = {
				variable = roma_cardinalates
				NOR = {
					exists = holder
					AND = {
						this = title:d_cd_velletri
						game_start_date >= 1178.1.1
					}
				}
			}
		}
		random_in_global_list = {
			variable = roma_cardinalates
			limit = {
				NOR = {
					exists = holder
					exists = var:suppressed_cardinalate
				}
				any_past_holder = {} # prefer titles which have been used before
			}
			alternative_limit = {
				NOR = {
					exists = holder
					exists = var:suppressed_cardinalate
				}
			}
			save_scope_as = cardinalate
		}
		scope:cardinalate ?= {
			# Register before transfer so lay-clergy rites see a clerical elector during gov validation
			if = {
				limit = {
					scope:cardinal_recipient.faith = {
						NOT = {
							any_clerical_elector_title = { scope:cardinalate = this }
						}
					}
				}
				add_clerical_elector = scope:cardinal_recipient.faith
			}
			create_title_and_vassal_change = {
				type = granted
				save_scope_as = change
				add_claim_on_loss = no
			}
			change_title_holder = {
				holder = scope:cardinal_recipient
				change = scope:change
				government_base = scope:cardinal_government_base
			}
			resolve_title_and_vassal_change = scope:change
		}
	}
	# Create a new cardinalate
	else_if = {
		limit = {
			pam_can_hold_cardinalate_trigger = yes
			pam_can_receive_cardinalate_trigger = yes
			pam_pope_is_head_of_faith_or_rite_trigger = yes
		}
		capital_barony ?= { save_scope_as = capital_barony }
		$CARDINAL_COUNTY$ ?= { save_scope_as = cardinal_county }
		if = {
			limit = {
				NOT = { exists = scope:cardinal_county }
				exists = default_location.county
			}
			default_location.county = { save_scope_as = cardinal_county }
		}
		if = {
			limit = { exists = scope:cardinal_county }
			scope:cardinal_county = {
				random_direct_de_jure_vassal_title = {
					limit = {
						title_province = { has_holding_type = church_holding }
						save_temporary_scope_as = temple_barony
						NOT = {
							scope:cardinal_recipient.faith = {
								any_clerical_elector_title = {
									var:named_after ?= scope:temple_barony
								}
							}
						}
					}
					save_scope_as = cardinal_temple_barony
				}
			}
		}
		create_dynamic_title = {
			tier = duchy
			name = {
				first_valid = {
					triggered_desc = {
						trigger = { exists = scope:cardinal_temple_barony }
						desc = CE3_CARDINAL_DYNAMIC_TITLE_NAME_TEMPLE

As written in game/common/scripted_effects/11_dlc_pam_scripted_effects.txt.