#Project Age Of Machinery begin-----------------------------------------------
(ti_before_mission_start,0,0,[],#cannon placement
[
(call_script,"script_artillery_variables_reset"),
(call_script,"script_field_artillery_spawn_a"),
]),
(0,0.1,ti_once,[(eq,"$error_stop_artillery",0)],
[(call_script,"script_field_artillery_spawn_b"),
]),
(3,0,0,[(eq,"$error_stop_artillery",0)],#cannon ready for fire?
[(call_script,"script_prepare_artillery"),
]),
(1,0.5,0,#cannon fire
[(eq,"$error_stop_artillery",0),
(call_script,"script_artillery_fire_a"),
],
[(call_script,"script_artillery_fire_b"),
]),
(0.1,0,0,[(eq,"$error_stop_artillery",0)],[(val_add,"$timer",1)]),
(0.1,0,0,[(eq,"$error_stop_artillery",0)],
[
(assign,reg1,"$timer"),
(val_sub,reg1,"$last_time"),
(gt,reg1,0),
(val_add,"$last_time",reg1),
(try_for_range,":ammo","spr_cannonball","spr_cannonball_start_position"),
(scene_prop_get_num_instances,":num_cannonballs",":ammo"),
(try_for_range,":instance_no",0,":num_cannonballs"),
(scene_prop_get_instance,":instance", ":ammo", ":instance_no"),
(item_get_slot,":moving",":instance",216),
(try_begin),
(eq,":moving",1),
(item_get_slot,":time",":instance",215),
(val_add,":time",reg1),
(item_set_slot,":instance",215,":time"),
(else_try),
(call_script,"script_get_cannon_instance",":instance_no"),
(item_get_slot,":time",reg0,206),
(val_sub,":time",reg1),
(item_set_slot,reg0,206,":time"),
(try_end),
(try_end),
(try_end),
]),
(0.1,0,0,[(eq,"$error_stop_artillery",0)],
[(call_script,"script_projectile_physics_field"),
]),
(0,1,10,[(eq,"$error_stop_artillery",0)],
[
(try_for_agents,":agent_no"),
(agent_get_troop_id,":troop_id",":agent_no"),
(is_between,":troop_id","trp_foot_gunner","trp_new_array_a"),
(agent_is_alive,":agent_no"),
(agent_slot_eq,":agent_no",12,0),
(agent_get_team,":agent_team",":agent_no"),
(try_begin),
(neg|teams_are_enemies,":agent_team",1),
(assign,":agent_team",1),
(val_add,"$team1_gunner_spawn",1),
(assign,":num_cannons","$team1_num_cannons"),
(assign,":num_other_cannons","$team0_num_cannons"),
(assign,":num_gunners","$team1_gunner_spawn"),
(else_try),
(neg|teams_are_enemies,":agent_team",0),
(assign,":agent_team",0),
(val_add,"$team0_gunner_spawn",1),
(assign,":num_gunners","$team0_gunner_spawn"),
(assign,":num_other_cannons","$team1_num_cannons"),
(assign,":num_cannons","$team0_num_cannons"),
(try_end),
(gt,":num_cannons",0),
(store_div,":line",":num_gunners",":num_cannons"),
(val_mod,":num_gunners",":num_cannons"),
(val_mul,":line",-100),
#(get_player_agent_no,":player_agent"), #FIX HYPERCHARGE
# (agent_get_team,":players_team",":player_agent"),
# (try_begin),
# (neq,":agent_team",":players_team"),
# (val_add,":num_gunners",":num_other_cannons"),
# (try_end),
# (call_script,"script_get_cannon_instance",":num_gunners"),
(assign,":number",-1),
(try_for_range,":scene_prop","spr_art_mangonel","spr_cannonball"),
(scene_prop_get_num_instances,":num_instances",":scene_prop"),
(try_for_range,":instance_no",0,":num_instances"),
(scene_prop_get_instance,":cannon_instance",":scene_prop",":instance_no"),
(item_slot_eq,":cannon_instance",204,":agent_team"),
(val_add,":number",1),
(eq,":number",":num_gunners"),
(assign,":instance",":cannon_instance"),
(try_end),
(try_end),
# (assign,":instance",reg0),
(is_between,":instance",0,9999999),
(prop_instance_get_position,pos1,":instance"),
(position_move_x,pos1,-250),
(position_move_y,pos1,":line"),
(position_set_z,pos1,10000),
(position_set_z_to_ground_level,pos1),
(agent_set_slot,":agent_no",12,2),
(agent_set_slot,":agent_no",13,":instance"),
# (agent_set_position,":agent_no",pos1),
(agent_set_scripted_destination,":agent_no",pos1),
(try_end),
]),
#Project Age Of Machinery end-----------------------------------------------