(ti_on_agent_spawn, 0, 0, [],
[
(store_trigger_param_1, ":agent_no"),
(agent_is_non_player, ":agent_no"),
(agent_is_human, ":agent_no"),
(agent_is_alive, ":agent_no"),
(agent_get_troop_id, ":troop", ":agent_no"),
#first get items
(assign, ":head", -1),
(assign, ":body", -1),
(assign, ":shoes", -1),
(assign, ":weapon_melee", -1),
(assign, ":weapon_ranged", -1),
(assign, ":ammo", -1),
(try_begin),
(this_or_next|is_between,":troop", tropas_ch1_ini,tropas_ch1_fin),#chile 1
(this_or_next|is_between,":troop", tropas_andes1_ini,tropas_andes1_fin),#Andes 1
(this_or_next|is_between,":troop", tropas_pu1_ini,tropas_pu1_fin),#provincias unidas 1
(is_between,":troop", tropas_lf1_ini,tropas_lf1_fin),# liga federal 1
(troop_set_name, ":troop", "@Patriot Cobin Boy"),
(store_random_in_range, ":r", 0, 2),
(try_begin),# head stuff
(eq, ":r", 0),
(assign, ":head", "itm_cubrecabeza5"),
(else_try),
(eq, ":r", 1),
(assign, ":head", "itm_cubrecabeza6"),
(try_end),
(store_random_in_range, ":r", 0, 2),
(try_begin),#body stuff
(eq, ":r", 0),
(assign, ":body", "itm_paisano8"),
(else_try),
(eq, ":r", 1),
(assign, ":body", "itm_paisano9"),
(try_end),
(store_random_in_range, ":r", 0, 1),
(try_begin),# boot stuff
(eq, ":r", 0),
(assign, ":shoes", "itm_chalas"),
(try_end),
(store_random_in_range, ":r", 0, 2),
(try_begin),#weapons
(eq, ":r", 0),
(assign, ":weapon_melee", "itm_butchering_knife"),
(else_try),
(eq, ":r", 1),
(assign, ":weapon_melee", "itm_butchering_knife"),
(assign, ":weapon_ranged", "itm_throwing_knives"),
(try_end),
(else_try),
.
.
.
# royalist troops ########################################
(else_try),
(this_or_next|is_between, ":troop",tropas_vp1_ini,tropas_vp1_fin),#1
(is_between, ":troop",tropas_ap1_ini,tropas_ap1_fin),# 1
(troop_set_name, ":troop", "@Royal Cobin Boy"),
(store_random_in_range, ":r", 0, 2),
(try_begin),# head stuff
(eq, ":r", 0),
(assign, ":head", "itm_cubrecabeza5"),
(else_try),
(eq, ":r", 1),
(assign, ":head", "itm_cubrecabeza6"),
(try_end),
(store_random_in_range, ":r", 0, 2),
(try_begin),#body stuff
(eq, ":r", 0),
(assign, ":body", "itm_paisano6"),
(else_try),
(eq, ":r", 1),
(assign, ":body", "itm_paisano7"),
(try_end),
(store_random_in_range, ":r", 0, 1),
(try_begin),# boot stuff
(eq, ":r", 0),
(assign, ":shoes", "itm_chalas"),
(try_end),
(store_random_in_range, ":r", 0, 2),
(try_begin),#weapons
(eq, ":r", 0),
(assign, ":weapon_melee", "itm_butchering_knife"),
(else_try),
(eq, ":r", 1),
(assign, ":weapon_melee", "itm_butchering_knife"),
(assign, ":weapon_ranged", "itm_throwing_knives"),
(try_end),
(else_try),
.
.
.
(try_end),
(try_for_range, ":item_slot", ek_item_0, ek_gloves),
(try_begin),
(eq, ":item_slot", ek_item_0),
(gt, ":weapon_melee", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":weapon_melee",":item_slot", 0),
(else_try),
(eq, ":item_slot", ek_item_1),
(gt, ":weapon_ranged", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":weapon_ranged",":item_slot", 0),
(else_try),
(eq, ":item_slot", ek_item_2),
(gt, ":ammo", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":ammo",":item_slot", 0),
(else_try),
(eq, ":item_slot", ek_item_3),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(else_try),
(eq, ":item_slot", ek_head),
(gt, ":head", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":head",":item_slot", 0),
(else_try),
(eq, ":item_slot", ek_body),
(gt, ":body", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":body",":item_slot", 0),
(else_try),
(eq, ":item_slot", ek_foot),
(gt, ":shoes", -1),
(agent_get_item_slot, ":cur_item",":agent_no", ":item_slot"),
(try_begin),
(gt, ":cur_item", -1),
(agent_unequip_item, ":agent_no", ":cur_item"),
(try_end),
(agent_equip_item, ":agent_no",":shoes",":item_slot", 0),
(try_end),
(try_end),
]),