object controller:

create event:
action_type = -1 - отвечает за действие, определяемое нашим движение. -1 - необрабатываемое значение
action_enabled = true - блокиратор на управление
xsaved = 0;
ysaved = 0;
angle = 0:

step event

if action_type > -1
{
    switch(action_type)
    {
    case 0:
    show_message("up")
    break;

    case 1:
    show_message("down")
    break;

    case 2:
    show_message("left")
    break;

    case 3:
    show_message("right")
    break;
    }
    action_enabled = true
    action_type = -1
}

global_mouse_pressed:
if action_enabled
{
    action_enabled = false
    xsaved = mouse_x
    ysaved = mouse_y
}

global_mouse_released://представим нашу рабочую область как круг с перекрестием в центре на весь размер круга. Перекрестие образует 4 сектора внутри круга. Определяем сектор, в котором находится курсор, и по нему определяем тип действия:

if action_enabled = false
{
    angle = point_direction(xsaved, ysaved, mouse_x, mouse_y)
    if angle > 315 or angle <= 45 action_type = 3 - правый сектор
    if angle <= 135 and angle > 45 action_type = 0 - верхний сектор
    if angle <= 225 or angle > 135 action_type = 2 - левый сектор
    if angle <= 315 or angle > 225 action_type = 1 - нижний сектор
}