("lwbr_menu", prsntf_manual_end_only, 0, [
(ti_on_presentation_load, [
(set_fixed_point_multiplier, 1000),
(assign, "$lwbr_overlay1", 0),
(assign, "$lwbr_overlay2", 0),
(assign, "$lwbr_overlay3", 0),
(assign, "$lwbr_overlay4", 0),
(assign, "$lwbr_overlay5", 0),
#Little Pos Helper by Kuba begin
(create_text_overlay, "$g_little_pos_helper", "@00,00"),
(overlay_set_color, "$g_little_pos_helper", 0xFFFFFFFF),
(position_set_x, pos1, 10),
(position_set_y, pos1, 700),
(overlay_set_position, "$g_little_pos_helper", pos1),
#Little Pos Helper by Kuba end
(str_clear, s0),
(create_text_overlay, "$g_presentation_obj_admin_panel_container", s0, tf_scrollable),
(position_set_x, pos1, 59),
(position_set_y, pos1, 50),
(overlay_set_position, "$g_presentation_obj_admin_panel_container", pos1),
(position_set_x, pos1, 640),
(position_set_y, pos1, 520),
(overlay_set_area_size, "$g_presentation_obj_admin_panel_container", pos1),
(position_set_x, pos1, 640),
(position_set_y, pos1, 1000),
(overlay_set_size, "$g_presentation_obj_admin_panel_container", pos1),
(set_container_overlay, "$g_presentation_obj_admin_panel_container"),
(assign, ":cur_y", 850),
(create_text_overlay, "$lwbr_overlay1", "@LWBR WarForge menu."),
(position_set_x, pos1, 200),
(position_set_y, pos1, ":cur_y"),
(overlay_set_position, "$lwbr_overlay1", pos1),
(overlay_set_color, "$lwbr_overlay1", 0xf0371e),
#(overlay_set_size, "$lwbr_overlay1", pos2),
(try_begin),
(eq,"$g_server_is_native",1),
#
(val_sub, ":cur_y", escape_menu_item_height),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, "$lwbr_overlay2","@Server is not runing LWBR WarForge."),
(overlay_set_position, "$lwbr_overlay2", pos1),
(overlay_set_color, "$lwbr_overlay2", 0xf0371e),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1,"@No options available for this yet."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
#set weather client side
(else_try),
#
(val_sub, ":cur_y", escape_menu_item_height),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, "$lwbr_overlay3","@Server is runing LWBR WarForge."),
(overlay_set_position, "$lwbr_overlay3", pos1),
(overlay_set_color, "$lwbr_overlay3", 0xf0371e),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_button_overlay, reg1, "@Set Hotkeys."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
#
#random stuff like custom poll and hotkeys
(try_end),
(try_begin),
(eq,"$g_server_is_native",0),
(multiplayer_get_my_player, ":player"),
(player_is_admin, ":player"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, "$lwbr_overlay4", "@Admin options."),
(overlay_set_position, "$lwbr_overlay4", pos1),
(overlay_set_color, "$lwbr_overlay4", 0xf0371e),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_button_overlay, reg1, "@Admin Message."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Firearms Enabled."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height / 2),
(position_set_y, pos1, ":cur_y"),
(create_check_box_overlay, reg1),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_lwbr_firearms_enabled"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Persistent Stats."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height / 2),
(position_set_y, pos1, ":cur_y"),
(create_check_box_overlay, reg1),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_lwbr_persistant_stats"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Jumping from horse Enabled."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height / 2),
(position_set_y, pos1, ":cur_y"),
(create_check_box_overlay, reg1),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_jump_from_horse"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Taunting Enabled."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height / 2),
(position_set_y, pos1, ":cur_y"),
(create_check_box_overlay, reg1),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_taunt"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Cheering Enabled."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height / 2),
(position_set_y, pos1, ":cur_y"),
(create_check_box_overlay, reg1),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_cheer"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Min Mod Version required (-1 for native)."),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_number_box_overlay, reg1, -1, lwbr_mod_version),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_min_version_required"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_text_overlay, reg1, "@Time between server Messages(min)"),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_number_box_overlay, reg1, 0, 61),
(overlay_set_position, reg1, pos1),
(overlay_set_val, reg1, "$g_lwbr_sv_messaage_cd_min"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_x, pos1, 400),
(position_set_y, pos1, ":cur_y"),
(create_combo_button_overlay, reg1),
(overlay_add_item,reg1,"@Only Native items"),
(overlay_add_item,reg1,"@Native + Warforge"),
(overlay_add_item,reg1,"@Only Peasant items"),
(overlay_add_item,reg1,"@Only arena items"),
(overlay_add_item,reg1,"@No items"),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(try_begin),
(eq,"$g_lwbr_new_items", -2),
(overlay_set_val, reg1, 2),
(else_try),
(eq,"$g_lwbr_new_items", -1),
(overlay_set_val, reg1, 4),
(else_try),
(eq,"$g_lwbr_new_items", 2),
(overlay_set_val, reg1, 3),
(else_try),
(overlay_set_val, reg1, "$g_lwbr_new_items"),
(try_end),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_x, pos1, 400),
(position_set_y, pos1, ":cur_y"),
(create_combo_button_overlay, reg1),
(overlay_add_item,reg1,"@Random Weather"),
(overlay_add_item,reg1,"@Clear Sky"),
(overlay_add_item,reg1,"@Rainy"),
(overlay_add_item,reg1,"@Snowy"),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(overlay_set_val, reg1, "$g_menu_rain_type"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_combo_button_overlay, reg1),
(overlay_add_item,reg1,"@Random Time"),
(overlay_add_item,reg1,"@Random Time no Night"),
(overlay_add_item,reg1,"@Dawn"),
(overlay_add_item,reg1,"@Noon"),
(overlay_add_item,reg1,"@Dusk"),
(overlay_add_item,reg1,"@Midnight"),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(overlay_set_val, reg1, "$g_menu_round_day_time"),
#
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_combo_button_overlay, reg1),
(overlay_add_item, reg1, "@Random Fog"),
(overlay_add_item, reg1, "@No Fog"),
(overlay_add_item, reg1, "@Sparse Fog"),
(overlay_add_item, reg1, "@Thick Fog"),
(overlay_set_position, reg1, pos1),
(overlay_set_color, reg1, 0xFFFFFF),
(overlay_set_val, reg1, "$g_menu_fog_distance"),
(try_end),
(val_sub, ":cur_y", escape_menu_item_height),
(position_set_y, pos1, ":cur_y"),
(create_button_overlay, "$lwbr_overlay5", "@Done."),
(overlay_set_position, "$lwbr_overlay5", pos1),
(overlay_set_color, "$lwbr_overlay5", 0xFFFFFF),
(presentation_set_duration, 999999),
]),
(ti_on_presentation_event_state_change, [
(store_trigger_param_1, ":overlay"),
(store_trigger_param_2, ":value"),
(try_begin),
(is_between, ":overlay", "$lwbr_overlay2", "$lwbr_overlay5"),
(try_begin),
#Options for Native server
(assign,":check", "$lwbr_overlay2"),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 1"),#text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
#Options for LWBR WarForge server
(else_try),
(assign,":check", "$lwbr_overlay3"),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 2"),#text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(presentation_set_duration, 0),
(start_presentation,"prsnt_lwbr_set_hotkeys"),
#Admin options for LWBR WarForge server
(else_try),
(assign,":check", "$lwbr_overlay4"),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 3"),#"Admin options" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(presentation_set_duration, 0),
(start_presentation,"prsnt_lwbr_admin_chat"),#"@Admin Message." button
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 4"),#"Firearms Enabled" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_lwbr_firearms_enabled", ":value"),#"Firearms Enabled" checkbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_firearms_enabled, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 5"),#"Persistent Stats" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$lwbr_g_firearms_enabled", ":value"),#"Persistent Stats" checkbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_persistant_stats, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 6"),#"Jumping from horse Enabled" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_jump_from_horse", ":value"),#"Jumping from horse Enabled" checkbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_jump_from_horse, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 7"),#"Taunting Enabled" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_taunt", ":value"),#"Taunting Enabled" checkbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_taunt, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 8"),#"Cheering Enabled" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_cheer", ":value"),#"Cheering Enabled" checkbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_cheer, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 9"),#"Min Version Required" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_min_version_required", ":value"),#"Min Version Required" numbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_min_version_required, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(display_message,"@This should not be displayed 9"),#"Time between server Messages(min)" text
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),
(assign, "$g_lwbr_sv_messaage_cd_min", ":value"),#"Time between server Messages(min)" numbox
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_sv_message_cd_min, ":value"),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),#Items available
(try_begin),
(eq,":value", 0),
(str_store_string,s1,"@DEBUG: Only Native items selected"),
(assign,"$g_lwbr_new_items", 0),
(else_try),
(eq,":value", 1),
(str_store_string,s1,"@DEBUG: Native + Warforge selected"),
(assign,"$g_lwbr_new_items", 1),
(else_try),
(eq,":value", 2),
(str_store_string,s1,"@DEBUG: Only Peasant items selected"),
(assign,"$g_lwbr_new_items", -2),
(else_try),
(eq,":value", 3),
(str_store_string,s1,"@DEBUG: Only arena items selected"),
(assign,"$g_lwbr_new_items", 2),
(else_try),
(eq,":value", 4),
(str_store_string,s1,"@DEBUG: No items selected"),
(assign,"$g_lwbr_new_items", -1),
(try_end),
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_new_items, "$g_lwbr_new_items"),
(try_begin),
(eq, lwbr_debug_mode, 1),
(display_message,"@DEBUG: Selecting Allowed Items"),
(display_message,s1),
(try_end),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),#Weather
(try_begin),
(eq,":value", 0),
(str_store_string,s1,"@DEBUG: Random Weather selected"),
(else_try),
(eq,":value", 1),
(str_store_string,s1,"@DEBUG: Clear Sky selected"),
(else_try),
(eq,":value", 2),
(str_store_string,s1,"@DEBUG: Rainy selected"),
(else_try),
(eq,":value", 3),
(str_store_string,s1,"@DEBUG: Snowy selected"),
(try_end),
(assign, "$g_menu_rain_type", ":value"),
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_menu_rain_type, ":value"),
(try_begin),
(eq, lwbr_debug_mode, 1),
(display_message,"@DEBUG: Selecting Weather"),
(display_message,s1),
(try_end),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),#Time
(try_begin),
(eq,":value", 0),
(str_store_string,s1,"@DEBUG: Random Time selected"),
(else_try),
(eq,":value", 1),
(str_store_string,s1,"@DEBUG: Random Time no Night selected"),
(else_try),
(eq,":value", 2),
(str_store_string,s1,"@DEBUG: Dawn selected"),
(else_try),
(eq,":value", 3),
(str_store_string,s1,"@DEBUG: Noon selected"),
(else_try),
(eq,":value", 4),
(str_store_string,s1,"@DEBUG: Dusk selected"),
(else_try),
(eq,":value", 5),
(str_store_string,s1,"@DEBUG: Midnight selected"),
(try_end),
(assign, "$g_menu_round_day_time", ":value"),
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_menu_day_time, ":value"),
(try_begin),
(eq, lwbr_debug_mode, 1),
(display_message,"@DEBUG: Selecting Time"),
(display_message,s1),
(try_end),
(else_try),
(val_add,":check", 1),
(eq, ":overlay", ":check"),#Fog
(try_begin),
(eq,":value", 0),
(str_store_string,s1,"@DEBUG: Random Fog selected"),
(else_try),
(eq,":value", 1),
(str_store_string,s1,"@DEBUG: No Fog selected"),
(else_try),
(eq,":value", 2),
(str_store_string,s1,"@DEBUG: Sparse Fog selected"),
(else_try),
(eq,":value", 3),
(str_store_string,s1,"@DEBUG: Thick Fog selected"),
(try_end),
(assign, "$g_menu_fog_distance", ":value"),
(multiplayer_send_3_int_to_server, multiplayer_event_lwbr_server, lwbr_server_set_var, lwbr_server_var_menu_fog_dist, ":value"),
(try_begin),
(eq, lwbr_debug_mode, 1),
(display_message,"@DEBUG: Selecting Fog"),
(display_message,s1),
(try_end),
(try_end),
(else_try),
(eq, ":overlay", "$lwbr_overlay5"),
(presentation_set_duration, 0),
(try_end),
]),
(ti_on_presentation_run,[
(set_fixed_point_multiplier, 1000),
(store_trigger_param_1, ":cur_time"),
(try_begin),
(this_or_next|key_clicked, key_escape),
(key_clicked, key_xbox_start),
(gt, ":cur_time", 200),
(presentation_set_duration, 0),
(try_end),
#Little Pos Helper by Kuba begin
(mouse_get_position, pos1),
(position_get_x, reg1, pos1),
(position_get_y, reg2, pos1),
(overlay_set_text, "$g_little_pos_helper", "@{reg1},{reg2}"),
#Little Pos Helper by Kuba end
]),
]),
.
