add beta menu switch system, various improvements

Author: mstop4

current-scripts/Demos/useful-scripts/objects/obj_column_menu/Draw_0.gml

@@ -26,4 +26,4 @@ for (var i=0; i<num_items; i++) {
 	}
 }
 
-draw_sprite(cursor_spr, 0, x, y + (item_height + line_spacing) * pos);
+draw_sprite(cursor_spr, 0, x, y + (item_height + line_spacing) * pos + item_height / 2);

current-scripts/Demos/useful-scripts/objects/obj_control_manager/obj_control_manager.yy

@@ -32,5 +32,5 @@ for (var i=0; i<ds_grid_width(items); i++) {
 
 draw_sprite(cursor_spr, 0,
 	x + (cursor_padding + column_width) * pos.x,
-	y + (item_height + line_spacing) * pos.y
+	y + (item_height + line_spacing) * pos.y + item_height / 2
 );

current-scripts/Demos/useful-scripts/objects/obj_grid_menu/Draw_0.gml

@@ -0,0 +1,2 @@
+/// @desc fade in end
+enabled = true;

current-scripts/Demos/useful-scripts/objects/obj_menu_base/Alarm_10.gml

@@ -0,0 +1,13 @@
+/// @desc fade out end
+visible = false;
+
+if (script_exists(on_fade_out_end)) {
+	script_execute(on_fade_out_end, on_fade_out_end_args);
+	on_fade_out_end = noone;
+}
+
+if (instance_exists(next_menu)) {
+	next_menu.menu_fade_in();
+}
+
+next_menu = noone;

current-scripts/Demos/useful-scripts/objects/obj_menu_base/Alarm_11.gml

@@ -1,6 +1,14 @@
 enabled = true;
 
+item_height = 1;
+cursor_width = 1;
+cursor_height = 1;
+
 control_state = new MenuControlState();
 active_key_config = noone;
+menu_alpha = new DynamicValue(1, 0, 0, 1, DVLimitMode.CLAMP, true);
+
+next_menu = noone;
+on_fade_out_end = noone;
 
 menu_base_functions();

current-scripts/Demos/useful-scripts/objects/obj_menu_base/Create_0.gml

@@ -1,5 +1,5 @@
 draw_set_font(menu_font);
 draw_set_halign(fa_left);
 draw_set_valign(fa_top);
-draw_set_alpha(1);
+draw_set_alpha(menu_alpha.v);
 draw_set_colour(c_white);

current-scripts/Demos/useful-scripts/objects/obj_menu_base/Draw_0.gml

@@ -0,0 +1 @@
+menu_alpha.update();

current-scripts/Demos/useful-scripts/objects/obj_menu_base/Step_0.gml

@@ -5,6 +5,7 @@ function menu_base_init(_menu_font, _cursor_spr) {
 	draw_set_font(_menu_font);
 	item_height = string_height("Ij");
 	cursor_width = sprite_get_width(_cursor_spr);
+	cursor_height = sprite_get_height(_cursor_spr);
 }
 
 /// @func  handle_selectable_confirm(item)
@@ -73,4 +74,25 @@ function handle_key_config_change(_item) {
 		self.active_key_config = _item;
 		io_clear();
 	}
+}
+
+function menu_switch(_next_menu, _on_switch_cb, _on_switch_cb_args) {
+	enabled = false;
+	self.menu_fade_out(_next_menu, _on_switch_cb, _on_switch_cb_args);
+}
+
+function menu_fade_out(_next_menu, _on_end_cb, _on_end_cb_args) {
+	next_menu = _next_menu;
+	on_fade_out_end = asset_get_index(_on_end_cb);
+	on_fade_out_end_args = _on_end_cb_args;
+	menu_alpha.v = 1;
+	menu_alpha.d = -1/menu_fade_time;
+	alarm[11] = menu_fade_time;
+}
+
+function menu_fade_in() {
+	visible = true;
+	menu_alpha.v = 0;
+	menu_alpha.d = 1/menu_fade_time;
+	alarm[10] = menu_fade_time;
 }