Девлет Герай-хан это не то...вот то что тебе надо ...
# script_diplomacy_start_war_between_kingdoms
# Input: arg1 = kingdom_1, arg2 = kingdom_2, arg3 = initializing_war_peace_cond
# Output: none
("diplomacy_start_war_between_kingdoms", #sets relations between two kingdoms and their vassals.
[
(store_script_param, ":kingdom_a", 1),
(store_script_param, ":kingdom_b", 2),
(store_script_param, ":initializing_war_peace_cond", 3),
(store_relation, ":relation", ":kingdom_a", ":kingdom_b"),
(val_min, ":relation", -10),
(val_add, ":relation", -30),
(set_relation, ":kingdom_a", ":kingdom_b", ":relation"),
(try_begin),
(eq, "$players_kingdom", ":kingdom_a"),
(store_relation, ":relation", "fac_player_supporters_faction", ":kingdom_b"),
(val_min, ":relation", -30),
(call_script, "script_set_player_relation_with_faction", ":kingdom_b", ":relation"),
(else_try),
(eq, "$players_kingdom", ":kingdom_b"),
(store_relation, ":relation", "fac_player_supporters_faction", ":kingdom_a"),
(val_min, ":relation", -30),
(call_script, "script_set_player_relation_with_faction", ":kingdom_a", ":relation"),
(try_end),
(try_begin),
(eq, ":initializing_war_peace_cond", 1),
(try_begin),
(store_random_in_range, ":random_no", 0, 2),
(this_or_next|eq, ":kingdom_a", "fac_player_supporters_faction"),
(eq, ":random_no", 0),
(assign, ":local_temp", ":kingdom_a"),
(assign, ":kingdom_a", ":kingdom_b"),
(assign, ":kingdom_b", ":local_temp"),
(try_end),
(str_store_faction_name_link, s1, ":kingdom_a"),
(str_store_faction_name_link, s2, ":kingdom_b"),
(display_log_message, "@{s1} has declared war against {s2}."),
(call_script, "script_add_notification_menu", "mnu_notification_war_declared", ":kingdom_a", ":kingdom_b"),
(call_script, "script_update_faction_notes", ":kingdom_a"),
(call_script, "script_update_faction_notes", ":kingdom_b"),
(assign, "$g_recalculate_ais", 1),
(try_end),
]),
