speed = point_distance(x, y, xgoal, ygoal) * 0.075;
direction = point_direction(x, y, xgoal, ygoal);