torture_blind_castrate_disfigure_opinion_effect

torture_blind_castrate_disfigure_opinion_effect = {
	if = {
		limit = { NOT = { exists = scope:puppet_or_actor } }
		scope:actor = { save_scope_as = puppet_or_actor }
	}
	scope:recipient = {
		add_opinion = {
			modifier = $VERB$_me
			target = scope:puppet_or_actor
		}
		if = {
			limit = {
				has_opinion_modifier = {
					modifier = grateful_opinion
					target = scope:puppet_or_actor
				}
			}
			remove_opinion = {
				modifier = grateful_opinion
				target = scope:puppet_or_actor
			}
		}

		if = {
			limit = {
				primary_spouse ?= { is_alive = yes }
				NOT = { primary_spouse = { this = scope:puppet_or_actor } }
			}
			primary_spouse = { add_to_list = family_of_tortured }
		}
		every_close_family_member = {
			limit = { this != scope:puppet_or_actor }
			add_to_list = family_of_tortured
		}
		if = {
			limit = {
				any_in_list = {
					list = family_of_tortured
					count = 1
					always = yes
				}
			}
			every_in_list = {
				list = family_of_tortured
				add_opinion = {
					target = scope:puppet_or_actor
					modifier = $VERB$_family_member
				}
			}
		}
		else_if = {
			limit = {
				any_in_list = {
					list = family_of_tortured
					count > 1
					always = yes
				}
			}
			every_in_list = {
				list = family_of_tortured
				custom = all_close_family_and_spouses
				add_opinion = {
					target = scope:puppet_or_actor
					modifier = $VERB$_family_member
				}
			}
		}
	}
}

As written in game/common/scripted_effects/00_interaction_effects.txt.