feat: allow dragging mouse w/ held button over multiple layer buttons

Author: Bentroen

scripts/control_create/control_create.gml

@@ -381,6 +381,8 @@ function control_create() {
 	insselect = -1
 	mouse_xprev = mouse_x
 	mouse_yprev = mouse_y
+	mousepress_x = -1
+	mousepress_y = -1
 	asso_nbs = 1
 	asso_midi = 0
 	asso_sch = 0

scripts/control_draw/control_draw.gml

@@ -27,6 +27,11 @@ function control_draw() {
 		else window_reset_icon_raw(window_handle())
 	}
 
+	if (mouse_check_button_pressed(mb_left)) {
+		mousepress_x = mouse_x
+		mousepress_y = mouse_y
+	}
+	
 	if (!mouseover) curs = cr_default
 	showmenu = 0
 	cursmarker = 0

scripts/draw_layericon/draw_layericon.gml

@@ -12,6 +12,12 @@ function draw_layericon(argument0, argument1, argument2, argument3, argument4, a
 
 	popup_set(xx, yy, 16, 16, str)
 	a = (mouse_rectangle(xx, yy, 16, 16) && window = 0 && locked = 0 && sb_drag = -1)
+	
+	var mouse_in_prev = (mouse_xprev >= xx && mouse_yprev >= yy && mouse_xprev <= xx + 16 && mouse_yprev <= yy + 16)
+	var mouse_entered = (mouse_check_button(mb_left) && (!mouse_in_prev && a))
+	//var mousepress_started_in = (mousepress_x >= xx && mousepress_y >= yy && mousepress_x <= xx + 16 && mousepress_y <= yy + 16)
+	//var mouse_pressed_and_moved_away = false // mousepress_started_in && (mouse_in_prev && !a && mouse_check_button(mb_left))
+	
 	a += ((mouse_check_button(mb_left) || mouse_check_button_released(mb_left)) && a)
 	if (pressed = 1) {
 	    if (!hires || theme != 3) draw_sprite(spr_frame4, 2 + 3 * theme, xx, yy)
@@ -31,7 +37,7 @@ function draw_layericon(argument0, argument1, argument2, argument3, argument4, a
 		draw_sprite_ext(spr_layericons_f_hires, i - locked + 18, xx + (a = 2 || pressed = 1), yy + (a = 2 || pressed = 1), 0.25, 0.25, 0, accent[6 - 2 * !fdark], 1)
 	}
 	}
-	return (a && mouse_check_button_released(mb_left))
+	return (mouse_entered || (a && mouse_check_button_pressed(mb_left)))
 
 
 }