Analog

xx = mouse_x
yy = mouse_y

l_max = argument0 //max length of analog zone
s_max = argument1 //max spd of player

if((mouse_button_check(mb_left)) && (mouse_x < view_wview[0]/2) && (mouse_y < view_hview[0])){
    dir = point_direction(xx,yy,mouse_x,mouse_y)
    spd = l_max / (l_max/s_max)
}