(
"town_cheats",0,
"Do whatever you want",
"none",[],
[
("summon_drunk",
[(party_slot_eq, "$current_town", slot_party_type, spt_town),
# (troop_get_slot, ":town", "trp_belligerent_drunk", slot_troop_cur_center),
(try_begin),
# (is_between, ":town", towns_begin, towns_end),
(troop_slot_eq, "trp_belligerent_drunk", slot_troop_cur_center, "$current_town"),
(assign, reg10, 1),
(else_try),
(assign, reg10, 0),
(try_end),
],
"{reg10?Dismiss:Get} a drunkard.",
[
(try_begin),
(eq, reg10, 1),
(troop_set_slot, "trp_belligerent_drunk", slot_troop_cur_center, -1),
(else_try),
(troop_set_slot, "trp_belligerent_drunk", slot_troop_cur_center, "$current_town"),
(try_end),
]),
("summon_ass",
[(party_slot_eq, "$current_town", slot_party_type, spt_town),
(try_begin),
# (is_between, ":town", towns_begin, towns_end),
(troop_slot_eq, "trp_hired_assassin", slot_troop_cur_center, "$current_town"),
(assign, reg11, 1),
(else_try),
(assign, reg11, 0),
(try_end),
],
"{reg11?Scare away:Hire} an assassin.",
[
(try_begin),
(eq, reg11, 1),
(troop_set_slot, "trp_hired_assassin", slot_troop_cur_center, -1),
(else_try),
(troop_set_slot, "trp_hired_assassin", slot_troop_cur_center, "$current_town"),
(try_end),
]),
("summon_bandit",
[
(neg|party_slot_eq, "$current_town", slot_party_type, spt_castle),
(party_get_slot, reg12, "$current_town", slot_center_has_bandits),
# (try_begin),
# (party_slot_ge, "$current_town", slot_center_has_bandits, 1),
# (assign, reg12, 1),
# (else_try),
# (assign, reg12, 0),
# (try_end).
],
"{reg12?Kick out:Get ambushed by} some bandits.",
[
(try_begin), #cleanse
(ge, reg12, 1),
(party_set_slot, "$current_town", slot_center_has_bandits, 0),
(else_try), #ambush
(store_random_in_range, ":bandit", bandits_begin, bandits_end),
(party_set_slot, "$current_town", slot_center_has_bandits, ":bandit"),
(assign, "$town_nighttime", 1),
(assign, "$sneaked_into_town", 0),
(assign, "$g_defending_against_siege", 0),
(call_script, "script_cf_enter_center_location_bandit_check"),
# (assign, "$town_nighttime", 1),
(try_end),
]),