("adv_diplomacy_preferences", 0, mesh_load_window,
[
(ti_on_presentation_load,
[
(set_fixed_point_multiplier, 1000),
(presentation_set_duration, 999999),
(str_clear, s0),
## OPTIONS CONTAINER
##(create_text_overlay, reg0, s0, tf_scrollable),
(create_text_overlay, ":container", s0, tf_scrollable),
(position_set_x, pos1, 25),
(position_set_y, pos1, 50),
(overlay_set_position, ":container", pos1),
(position_set_x, pos1, 550),
(position_set_y, pos1, 630),
(overlay_set_area_size, ":container", pos1),
(set_container_overlay, ":container"),
## VARIABLE VERTICAL POSITIONS AND INCREMENTS
(assign, ":y_increment", 50),
(store_mul, ":texts_y", ":y_increment", DPLMC_NUM_PREFERENCE_OPTIONS),
(store_sub, ":inputs_y", ":texts_y", 8),
(try_for_range, ":slot_no", 0, DPLMC_NUM_PREFERENCE_OPTIONS),
(troop_set_slot, "trp_temp_array_a", ":slot_no", 0), #label
(troop_set_slot, "trp_temp_array_b", ":slot_no", 0), #field
(troop_set_slot, "trp_temp_array_c", ":slot_no", 0), #pictures
(try_end),
(assign, ":num_options", 0), #index
## TEXTS & INPUTS
(position_set_x, pos1, 50),
(position_set_x, pos2, 450),
#picture location
(position_set_x, pos3, 500),
(position_set_y, pos3, 125),
#picture size
(position_set_x, pos4, 480),
(position_set_y, pos4, 640),
#picture downscaled size
(position_set_x, pos6, 375),
(position_set_y, pos6, 500),
#dropdown size
(position_set_x, pos5, 700),
(position_set_y, pos5, 800),
## AI CHANGES
(create_text_overlay, reg0, "@AI Changes:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_combo_button_overlay, reg0),
(position_set_x, pos2, 485),
(val_sub, ":inputs_y", 8),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(overlay_set_size, reg0, pos5),
(try_for_range, ":string", "str_dplmc_setting_2", "str_dplmc_setting_on"),
(overlay_add_item, reg0, ":string"),
(try_end),
(position_set_x, pos2, 450),
(val_add, ":inputs_y", 8),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(store_sub, ":actual_input_value", DPLMC_AI_CHANGES_HIGH, "$g_dplmc_ai_changes"),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_sally_out"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos6),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## ECONOMICS & BEHAVIORAL
(create_text_overlay, reg0, "@Economics & Behavioral:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_combo_button_overlay, reg0),
(position_set_x, pos2, 485),
(val_sub, ":inputs_y", 8),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(overlay_set_size, reg0, pos5),
(try_for_range, ":string", "str_dplmc_setting_2", "str_dplmc_setting_on"),
(overlay_add_item, reg0, ":string"),
(try_end),
(position_set_x, pos2, 450),
(val_add, ":inputs_y", 8),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(store_sub, ":actual_input_value", DPLMC_GOLD_CHANGES_HIGH, "$g_dplmc_gold_changes"),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_payment"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## PREJUDICE LEVEL
(create_text_overlay, reg0, "@Prejudice Level:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_combo_button_overlay, reg0),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(position_set_x, pos2, 485),
(val_sub, ":inputs_y", 8),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(overlay_set_size, reg0, pos5),
(overlay_add_item, reg0, "str_randomize"),
(overlay_add_item, reg0, "str_dplmc_setting_2"),
(overlay_add_item, reg0, "str_dplmc_setting_off"),
(overlay_add_item, reg0, "str_default"),
(position_set_x, pos2, 450),
(val_add, ":inputs_y", 8),
(val_sub, ":inputs_y", ":y_increment"),
(store_div, ":actual_input_value", "$g_disable_condescending_comments", 2),
(try_begin), #both gender in battles
(eq, ":actual_input_value", 2),
(overlay_set_val, reg0, 0),
(else_try), #high
(lt, ":actual_input_value", 0),
(overlay_set_val, reg0, 1),
(else_try), #disabled
(eq, ":actual_input_value", 1),
(overlay_set_val, reg0, 2),
(else_try), #default
(overlay_set_val, reg0, 3),
(try_end),
(assign, reg1, "$g_disable_condescending_comments"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_siege_sighted_fem"),
(set_container_overlay, ":container"),
(overlay_set_size, reg0, pos4),
(overlay_set_position, reg0, pos3),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## LORDS RETURNING FROM EXILE
(create_text_overlay, reg0, "@Lords Returning From Exile:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_x, pos2, 450),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_dplmc_lord_recycling", DPLMC_LORD_RECYCLING_ENABLE),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_messenger"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## HORSE SPEED
(create_text_overlay, reg0, "@Horse Speed Fix:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(store_sub, ":actual_input_value", 1, "$g_dplmc_horse_speed"),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_charge"),
(overlay_set_size, reg0, pos4),
(overlay_set_position, reg0, pos3),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
(set_container_overlay, ":container"),
## HORSE CULL
(create_text_overlay, reg0, "@Horse Culling:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_number_box_overlay, reg0, 0, 31),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(try_begin),
(neg|is_between, "$g_horses_are_avaliable", 0, 31),
(assign, "$g_horses_are_avaliable", 10),
(try_end),
(overlay_set_val, reg0, "$g_horses_are_avaliable"),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_defeat"),
(set_container_overlay, ":container"),
(overlay_set_size, reg0, pos4),
(overlay_set_position, reg0, pos3),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## BATTLE CONTINUATION
(create_text_overlay, reg0, "@Battle Continuation:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_dplmc_battle_continuation", 0),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_wounded"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
(set_container_overlay, ":container"),
(try_begin), #sub-options
(eq, "$g_dplmc_battle_continuation", 0),
## Charge When Dead
(create_text_overlay, reg0, "@Charge When Dead:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(overlay_set_val, reg0, "$g_dplmc_charge_when_dead"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_victory"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(set_container_overlay, ":container"),
(try_end),
(val_add, ":num_options", 1), #skip index regardless
## TERRAIN ADVANTAGE
(create_text_overlay, reg0, "@Terrain Advantages:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_dplmc_terrain_advantage", 0),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_camp"),
(set_container_overlay, ":container"),
(overlay_set_size, reg0, pos4),
(overlay_set_position, reg0, pos3),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## TROOP RATIO BAR
(create_text_overlay, reg0, "@Show troop ratio bar:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_x, pos2, 450),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_troop_ratio_bar", 1),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_wounded"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## BATTLE MINI MAP
(create_text_overlay, reg0, "@Show battle mini map:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_x, pos2, 450),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_battle_minimap", 1),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_wounded"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## PERSONAL KILL COUNT
(create_text_overlay, reg0, "@Show personal kill count:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_x, pos2, 450),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(try_begin),
(eq, "$g_killcount", 1),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_wounded"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## NPC COMPLAINTS
(create_text_overlay, reg0, "@Disable Companions Complaints:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(overlay_set_val, reg0, "$disable_npc_complaints"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_recruits"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos6),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## DISGUISES
(create_text_overlay, reg0, "@Disguise System:", tf_vertical_align_center),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(val_sub, ":texts_y", ":y_increment"),
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(overlay_set_val, reg0, "$g_dplmc_player_disguise"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_townriot"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
## CHEAT MENU
(create_text_overlay, reg0, "@Cheat Mode:", tf_vertical_align_center),
(troop_set_slot, "trp_temp_array_a", ":num_options", reg0),
(position_set_y, pos1, ":texts_y"),
(overlay_set_position, reg0, pos1),
(val_sub, ":texts_y", ":y_increment"),
#Native has bunch of message modes (up to 4) but they're not useful
(create_check_box_overlay, reg0, "mesh_checkbox_off", "mesh_checkbox_on"),
(troop_set_slot, "trp_temp_array_b", ":num_options", reg0),
(position_set_y, pos2, ":inputs_y"),
(overlay_set_position, reg0, pos2),
(val_sub, ":inputs_y", ":y_increment"),
(try_begin),
(gt, "$cheat_mode", 0),
(assign, ":actual_input_value", 1),
(else_try),
(assign, ":actual_input_value", 0),
(try_end),
(overlay_set_val, reg0, ":actual_input_value"),
(set_container_overlay, -1),
(create_mesh_overlay, reg0, "mesh_pic_cattle"),
(set_container_overlay, ":container"),
(overlay_set_position, reg0, pos3),
(overlay_set_size, reg0, pos4),
(troop_set_slot, "trp_temp_array_c", ":num_options", reg0),
(val_add, ":num_options", 1),
(set_container_overlay, -1),
## MOUSE-OVER TIPS
(create_text_overlay, reg0, "@DIPLOMACY^" + DPLMC_DIPLOMACY_VERSION_STRING+ "^Preferences", tf_center_justify|tf_with_outline),
(overlay_set_color, reg0, 0xFFFFFFFF),
(position_set_x, pos1, 800),
(position_set_y, pos1, 600),
(overlay_set_position, reg0, pos1),
(position_set_x, pos1, 2000),
(position_set_y, pos1, 2000),
(overlay_set_size, reg0, pos1),
(str_store_string, s0, "str_dplmc_setting_tt0"),
(create_text_overlay, reg0, s0, tf_double_space|tf_scrollable),
(position_set_x, pos1, 650),
(position_set_y, pos1, 400),
(overlay_set_position, reg0, pos1),
(position_set_x, pos1, 800),
(position_set_y, pos1, 800),
(overlay_set_size, reg0, pos1),
(position_set_x, pos1, 300),
(position_set_y, pos1, 150),
(overlay_set_area_size, reg0, pos1),
(assign, "$g_presentation_obj_admin_panel_container", reg0),
## BUTTONS
(position_set_x, pos1, 900),
(try_begin),
(eq, "$g_dplmc_battle_continuation", 0),
(position_set_y, pos1, 125),
(create_game_button_overlay, reg0, "str_spectator_camera", tf_center_justify),
(overlay_set_position, reg0, pos1),
(assign, "$g_dplmc_cam_activated", reg0),
(else_try),
(assign, "$g_dplmc_cam_activated", -1),
(try_end),
(position_set_y, pos1, 75),
(create_game_button_overlay, reg0, "str_reset_to_default", tf_center_justify),
(overlay_set_position, reg0, pos1),
(assign, "$g_presentation_obj_profile_banner_selection_1", reg0),
(position_set_y, pos1, 25),
(create_game_button_overlay, reg0, "str_done", tf_center_justify),
(overlay_set_position, reg0, pos1),
(assign, "$g_presentation_obj_profile_banner_selection_2", reg0),
## HIDE PICTURES
(try_for_range, ":slot_no", 0, ":num_options"),
(troop_get_slot, ":overlay", "trp_temp_array_c", ":slot_no"),
(gt, ":overlay", 0),
(overlay_set_display, ":overlay", 0),
(try_end),
]
),
(ti_on_presentation_event_state_change,
[
(store_trigger_param_1, ":object"),
(store_trigger_param_2, ":value"),
## "RESET" BUTTON KILL THE PRESENTATION AND START ANOTHER ONE
(try_begin),
(eq, ":object", "$g_presentation_obj_profile_banner_selection_1"),
(assign, "$g_dplmc_cam_default", camera_keyboard),
(assign, "$g_dplmc_ai_changes", DPLMC_AI_CHANGES_LOW),
(assign, "$g_dplmc_gold_changes", DPLMC_GOLD_CHANGES_LOW),
(assign, "$g_dplmc_lord_recycling", DPLMC_LORD_RECYCLING_ENABLE),
(assign, "$g_dplmc_horse_speed", 0),
(assign, "$g_horses_are_avaliable", 10),
(assign, "$g_dplmc_battle_continuation", 0),
(assign, "$g_dplmc_charge_when_dead", 1),
(assign, "$g_dplmc_terrain_advantage", DPLMC_TERRAIN_ADVANTAGE_ENABLE),
(assign, "$g_troop_ratio_bar", 0),
(assign, "$g_battle_minimap", 0),
(assign, "$g_killcount", 0),
(assign, "$disable_npc_complaints", 0),
(assign, "$g_disable_condescending_comments", 0),
(assign, "$g_dplmc_player_disguise", disguise_pilgrim),
(assign, "$sneaked_into_town", disguise_none), #associated with above
(assign, "$cheat_mode", 0),
(start_presentation, "prsnt_adv_diplomacy_preferences"),
(else_try),
## "SAVE AND EXIT" BUTTON GETS THE OPTION VALUES AND GIVE THEM TO PROPER VARIABLES.
## THEN IT KILLS THE PRESENTATION.
(eq, ":object", "$g_presentation_obj_profile_banner_selection_2"),
(call_script, "script_dplmc_update_info_settings"),
(presentation_set_duration, 0),
(else_try), #deathcam launch new presentation
(eq, ":object", "$g_dplmc_cam_activated"),
(assign, "$g_presentation_next_presentation", "prsnt_redefine_keys"),
(start_presentation, "prsnt_redefine_keys"),
(else_try), ## AI
(troop_slot_eq, "trp_temp_array_b", 1, ":object"),
(store_sub, "$g_dplmc_ai_changes", DPLMC_AI_CHANGES_HIGH, ":value"),
(else_try), ## ECO
(troop_slot_eq, "trp_temp_array_b", 2, ":object"),
(store_sub, "$g_dplmc_gold_changes", DPLMC_GOLD_CHANGES_HIGH, ":value"),
(else_try), ## PREJUDICE
(troop_slot_eq, "trp_temp_array_b", 3, ":object"),
(try_begin), # default
(eq, ":value", 3),
(assign, "$g_disable_condescending_comments", 0),
(else_try), # off
(eq, ":value", 2),
(assign, "$g_disable_condescending_comments", 2),
(else_try), # high
(eq, ":value", 1),
(assign, "$g_disable_condescending_comments", -2),
(else_try), # randomize
(eq, ":value", 0),
(assign, "$g_disable_condescending_comments", 4),
(try_end),
(call_script, "script_dplmc_init_faction_gender_ratio", 1),
(else_try), ## LORDS RETURNING FROM EXILE
(troop_slot_eq, "trp_temp_array_b", 4, ":object"),
(store_sub, "$g_dplmc_lord_recycling", ":value", 1),
(else_try), ## HORSE SPEED
(troop_slot_eq, "trp_temp_array_b", 5, ":object"),
(store_sub, "$g_dplmc_horse_speed", 1, ":value"),
(else_try), ## HORSE CULL
(troop_slot_eq, "trp_temp_array_b", 6, ":object"),
(assign, "$g_horses_are_avaliable", ":value"),
(else_try), ## BATTLE CONTINUATION
(troop_slot_eq, "trp_temp_array_b", 7, ":object"),
(store_sub, "$g_dplmc_battle_continuation", 1, ":value"),
#refresh presentation to show new options
(start_presentation, "prsnt_adv_diplomacy_preferences"),
(else_try), ## CHARGE AFTER DEATH
(troop_slot_eq, "trp_temp_array_b", 8, ":object"),
(assign, "$g_dplmc_charge_when_dead", ":value"),
(else_try), ## TERRAIN ADVANTAGE
(troop_slot_eq, "trp_temp_array_b", 9, ":object"),
(store_sub, "$g_dplmc_terrain_advantage", ":value", 1),
(else_try), ## TROOP RATIO BAR
(troop_slot_eq, "trp_temp_array_b", 10, ":object"),
(assign, "$g_troop_ratio_bar", ":value"),
(else_try), ## BATTLE MINI MAP
(troop_slot_eq, "trp_temp_array_b", 11, ":object"),
(assign, "$g_battle_minimap", ":value"),
(else_try), ## PERSONAL KILL COUNT
(troop_slot_eq, "trp_temp_array_b", 12, ":object"),
(assign, "$g_killcount", ":value"),
(else_try), ## NPC COMPLAINTS
(troop_slot_eq, "trp_temp_array_b", 13, ":object"),
(assign, "$disable_npc_complaints", ":value"),
(else_try), ## DISGUISE
(troop_slot_eq, "trp_temp_array_b", 14, ":object"),
(assign, "$g_dplmc_player_disguise", ":value"),
(assign, "$sneaked_into_town", disguise_none), #so as to not proc trigger
(else_try), ## CHEATS MENU
(troop_slot_eq, "trp_temp_array_b", 15, ":object"),
(assign, "$cheat_mode", ":value"),
(try_end),
]
),
(ti_on_presentation_mouse_enter_leave, #Mouse-Over Pref-Tips
[
(store_trigger_param_1, ":object"),
(store_trigger_param_2, ":enter_leave"), #0 if mouse enters, 1 if mouse leaves
##IF THE EVENT IS "ENTER", WE CHOOSE THE TEXT THAT WILL BE SHOWED
(try_begin),
(eq, ":enter_leave", 0),
(gt, ":object", 0), #not the overlay
#could use overlay_set_material but stretching
(assign, ":num_options", DPLMC_NUM_PREFERENCE_OPTIONS),
(assign, ":selected_option", -1),
(try_for_range, ":slot_no", 0, ":num_options"),
(this_or_next|troop_slot_eq, "trp_temp_array_a", ":slot_no", ":object"),
(troop_slot_eq, "trp_temp_array_b", ":slot_no", ":object"),
(store_add, ":string", "str_dplmc_setting_tt1", ":slot_no"),
(overlay_set_text, "$g_presentation_obj_admin_panel_container", ":string"),
(assign, ":num_options", -1),
(assign, ":selected_option", ":slot_no"),
(try_end),
(try_begin),
(eq, ":selected_option", -1),
(overlay_set_text, "$g_presentation_obj_admin_panel_container", "str_dplmc_setting_tt0"),
(else_try),
(try_for_range, ":slot_no", 0, DPLMC_NUM_PREFERENCE_OPTIONS),
(troop_get_slot, ":overlay_no", "trp_temp_array_c", ":slot_no"),
(gt, ":overlay_no", 0),
(try_begin),
(eq, ":slot_no", ":selected_option"),
(overlay_set_display, ":overlay_no", 1),
(else_try),
(overlay_set_display, ":overlay_no", 0),
(try_end),
(try_end),
(try_end),
(try_end),
]
),
## SETS A LISTENER TO SOME KEY_CLICKS TO TERMINATE THE PRESENTATION
## VERY USEFUL FOR MODDING
(ti_on_presentation_run,
[
(try_begin),
(this_or_next|key_clicked, key_space),
(this_or_next|key_clicked, key_enter),
(this_or_next|key_clicked, key_escape),
# (this_or_next|key_clicked, key_back_space), #needed for number box
(this_or_next|key_clicked, key_xbox_ltrigger),
(key_clicked, key_xbox_rtrigger),
(presentation_set_duration, 0),
(try_end),
]
),