AnalogMovement

var xx = mouse_x
var yy = mouse_y

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

if((mouse_check_button(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)
}