(
"lead_charge",mtf_battle_mode,charge,
"You lead your men to battle.",
[
(1,mtef_defenders|mtef_team_0,0,aif_start_alarmed,12,[]),
(0,mtef_defenders|mtef_team_0,0,aif_start_alarmed,0,[]),
(4,mtef_attackers|mtef_team_1,0,aif_start_alarmed,12,[]),
(4,mtef_attackers|mtef_team_1,0,aif_start_alarmed,0,[]),
],
[
######Tactical triggers below##########
(ti_before_mission_start, 0, 0, [],
[ (assign,"$formation",0),
(assign,"$infantryformationtype",0),
(assign,"$archerformationtype",0),
(assign,"$cavalryformationtype",0),]),
(0, 0, 0,
[(key_clicked, key_2),
(assign,"$formation",grc_infantry),
], []),
(0, 0, 0,
[(key_clicked, key_3),
(assign,"$formation",grc_archers),
], []),
# (0, 0, 0,
# [(key_clicked, key_4),
# (assign,"$formation",grc_cavalry),
# ], []),
(0, 0, 0,
[(key_clicked, key_j),
(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,"$formation"),
(call_script,"script_cf_formation"),
(try_begin),
(eq,"$formation",grc_infantry),
(assign,"$infantryformationtype",1),
(else_try),
(eq,"$formation",grc_archers),
(assign,"$archerformationtype",1),
# (else_try),
# (eq,"$formation",grc_cavalry),
# (assign,"$cavalryformationtype",1),
(end_try),
# (display_message,"@Forming_ranks."),
], []),
(0, 0, 0,
[(key_clicked, key_p),
(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,"$formation"),
(call_script,"script_cf_formation_stagger"),
(call_script,"script_cf_formation"),
(try_begin),
(eq,"$formation",grc_infantry),
(assign,"$infantryformationtype",3),
(else_try),
(eq,"$formation",grc_archers),
(assign,"$archerformationtype",3),
# (else_try),
# (eq,"$formation",grc_cavalry),
# (assign,"$cavalryformationtype",3),
(end_try),
# (display_message,"@Forming_a_line."),
], []),
(0, 0, 0,
[(key_clicked, key_k),
(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,"$formation"),
(call_script,"script_cf_formation_wedge"),
(call_script,"script_cf_formation"),
(try_begin),
(eq,"$formation",grc_infantry),
(assign,"$infantryformationtype",2),
(else_try),
(eq,"$formation",grc_archers),
(assign,"$archerformationtype",2),
# (else_try),
# (eq,"$formation",grc_cavalry),
# (assign,"$cavalryformationtype",2),
(end_try),
# (display_message,"@Forming_a_wedge."),
], []),
(0, 0, 0,
[(key_clicked, key_u),
(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,"$formation"),
(call_script,"script_formation_end"),
(call_script,"script_cf_formation"),
(try_begin),
(eq,"$formation",grc_infantry),
(assign,"$infantryformationtype",0),
(else_try),
(eq,"$formation",grc_archers),
(assign,"$archerformationtype",0),
# (else_try),
# (eq,"$formation",grc_cavalry),
# (assign,"$cavalryformationtype",0),
(end_try),
# (display_message,"@Formation_disassembled."),
], []),
(5.0, 0, 0,
[(try_for_agents,":agent"),
(agent_is_human,":agent"),
(neg|agent_is_ally,":agent"),
(assign,":enemy",":agent"),
(end_try),
(gt,":enemy",-1),
(agent_get_team ,reg0, ":enemy"),
(assign,reg1,grc_cavalry),
(call_script,"script_formation_end"),
(assign,reg1,grc_infantry),
(call_script,"script_formation_end"),
(assign,reg1,grc_archers),
(call_script,"script_formation_end"),], []),
(5.0, 0, 0,
[(assign,":enemy",-1),
(assign,":infantry",0),
(assign,":cavalry",0),
(try_for_agents,":agent"),
(agent_is_human,":agent"),
(agent_is_alive,":agent"),
(neg|agent_is_ally,":agent"),
(assign,":enemy",":agent"),
(agent_get_class ,":class", ":agent"),
(try_begin),
(eq,":class",grc_cavalry),
(val_add,":cavalry",1),
(else_try),
(val_add,":infantry",1),
(end_try),
(end_try),
(gt,":enemy",-1),
(agent_get_team ,reg0, ":enemy"),
(assign,":ratio",":infantry"),
(val_div,":ratio",":cavalry"),
(try_begin),
(gt,":ratio",10),
(lt,":cavalry",1),
(team_give_order, reg0, grc_everyone, mordr_dismount),
(else_try),
(team_give_order, reg0, grc_everyone, mordr_mount),
(end_try),], []),
(5.0, 0, 0,
[(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(val_add,reg0,2),
(assign,reg1,grc_cavalry),
(call_script,"script_formation_end"),
(assign,reg1,grc_infantry),
(call_script,"script_formation_end"),
(assign,reg1,grc_archers),
(call_script,"script_formation_end"),], []),
(5.0, 0, 0,
[(neq, "$battle_won", 1),
(assign,":infantry",0),
(assign,":cavalry",0),
(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(val_add,reg0,2),
(try_for_agents,":agent"),
(agent_is_human,":agent"),
(agent_is_alive,":agent"),
(agent_get_team ,":team", ":agent"),
(eq,":team",reg0),
(agent_get_class ,":class", ":agent"),
(try_begin),
(eq,":class",grc_cavalry),
(val_add,":cavalry",1),
(else_try),
(val_add,":infantry",1),
(end_try),
(end_try),
(assign,":ratio",":infantry"),
(val_div,":ratio",":cavalry"),
(try_begin),
(gt,":ratio",10),
(lt,":cavalry",1),
(team_give_order, reg0, grc_everyone, mordr_dismount),
(else_try),
(team_give_order, reg0, grc_everyone, mordr_mount),
(end_try),], []),
(0.2, 0, 0,
[(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,grc_infantry),
(try_begin),
(eq,"$infantryformationtype",1),
(call_script,"script_cf_formation"),
(else_try),
(eq,"$infantryformationtype",2),
(call_script,"script_cf_formation_wedge"),
(else_try),
(eq,"$infantryformationtype",3),
(call_script,"script_cf_formation_stagger"),
(else_try),
(call_script,"script_formation_end"),
(end_try),], []),
(0.2, 0, 0,
[(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(assign,reg1,grc_archers),
(try_begin),
(eq,"$archerformationtype",1),
(call_script,"script_cf_formation"),
(else_try),
(eq,"$archerformationtype",2),
(call_script,"script_cf_formation_wedge"),
(else_try),
(eq,"$archerformationtype",3),
(call_script,"script_cf_formation_stagger"),
(else_try),
(call_script,"script_formation_end"),
(end_try),], []),
# (0.2, 0, 0,
# [(get_player_agent_no,":player"),
# (agent_get_team ,reg0, ":player"),
# (assign,reg1,grc_cavalry),
# (try_begin),
# (eq,"$cavalryformationtype",1),
# (call_script,"script_cf_formation"),
# (else_try),
# (eq,"$cavalryformationtype",2),
# (call_script,"script_cf_formation_wedge"),
# (else_try),
# (eq,"$cavalryformationtype",3),
# (call_script,"script_cf_formation_stagger"),
# (else_try),
# (call_script,"script_formation_end"),
# (end_try),], []),
(0.2, 0, 0,
[(try_for_agents,":agent"),
(agent_is_human,":agent"),
(neg|agent_is_ally,":agent"),
(assign,":enemy",":agent"),
(end_try),
(gt,":enemy",-1),
(agent_get_team ,reg0, ":enemy"),
(store_normalized_team_count,":num", reg0),
(gt,":num",5),
(assign,reg1,grc_infantry),
(call_script,"script_cf_formation"),
], []),
(0.2, 0, 0,
[(try_for_agents,":agent"),
(agent_is_human,":agent"),
(neg|agent_is_ally,":agent"),
(assign,":enemy",":agent"),
(end_try),
(gt,":enemy",-1),
(agent_get_team ,reg0, ":enemy"),
(store_normalized_team_count,":num", reg0),
(gt,":num",5),
(assign,reg1,grc_archers),
(call_script,"script_cf_formation_stagger"),
], []),
# (0.2, 0, 0,
# [(try_for_agents,":agent"),
# (agent_is_human,":agent"),
# (neg|agent_is_ally,":agent"),
# (assign,":enemy",":agent"),
# (end_try),
# (gt,":enemy",-1),
# (agent_get_team ,reg0, ":enemy"),
# (store_normalized_team_count,":num", reg0),
# (gt,":num",5),
# (assign,reg1,grc_cavalry),
# (call_script,"script_cf_formation_wedge"),
# ], []),
(0.2, 0, 0,
[(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(val_add,reg0,2),
(store_normalized_team_count,":num", reg0),
(gt,":num",5),
(assign,reg1,grc_infantry),
(call_script,"script_cf_formation"),
], []),
(0.2, 0, 0,
[(get_player_agent_no,":player"),
(agent_get_team ,reg0, ":player"),
(val_add,reg0,2),
(store_normalized_team_count,":num", reg0),
(gt,":num",5),
(assign,reg1,grc_archers),
(call_script,"script_cf_formation_stagger"),
], []),
# (0.2, 0, 0,
# [(get_player_agent_no,":player"),
# (agent_get_team ,reg0, ":player"),
# (val_add,reg0,2),
# (store_normalized_team_count,":num", reg0),
# (gt,":num",5),
# (assign,reg1,grc_cavalry),
# (call_script,"script_cf_formation_wedge"),
# ], []),
##########Tactical triggers above########