globalvar x_p,y_p,len,k,b;

x_p=x;y_p=y;//заносим соответствующие координаты в переменную.
//считаем расстояние от игрока до врага:
len=sqrt(sqr(x_p-x)+sqr(y_p-y));

//код хождения ставим под условие:
if len>=100{ / /т.е.наш враг будет сам по себе ходить, пока расстояние между ним и игроком больше 100 пикселей.
if vector=1{y+=speed};
if vector=2{x+=speed};
if vector=3{y-=speed};
if vector=4{x-=speed};
If (y=200) and (x=100){vector=2;sprite_index=right};//спрайт врага, идущего вправо.
If (y=200) and (x=200){vector=3;sprite_index=up};//спрайт врага, идущего вверх.
If (y=100) and (x=200){vector=4;sprite_index=left};//спрайт врага, идущего влево.
If (y=100) and (x=100){vector=1;sprite_index=down};//спрайт врага, идущего вниз.
}
else {
//посчитаем координаты прямой, на которой находятся игрок и враг(эту часть можно делать путем, но я с ним плохо знаком, сделаю математически))
//уравнение прямой-y=k*x+b;
//не буду расписывать, как я получил, но вот:
k=(y_p-y)/(x_p-x);
b=y_p-(k*x_p);
x+=3;//любое число, но лучше ставить маленькое. Это, фактически, резкость изменения координат врага)
y=k*x+b;
//таким образом, если расстояние сократилось, вычисляется зависимость между координатами игрока и врага, и враг начинает приближаться.
};

globalvar vector,speed//vector-отвечает за направление движения, 1-вниз, 2-вправо, 3-вверх, 4-влево. speed-скорость персонажа.
vector=1;
speed=5//пиксели в секунду, выставишь такое значение, которое нужно.НО ЗНАЧЕНИЕ должно быть кратно 100....т.е. если ты делишь 100 на значение скорости-должно быть целое число.100-это в данном случае, т.к. у нас длина пути в каждом расстоянии равна 100, т.е. 100 вверх, 100 вниз и т.д.

x=100,y=100//начальные координаты.
sprite_index=down//спрайт врага, идущего вниз.
image_speed=1;//скорость анимации.

if vector=1{y+=speed};
if vector=2{x+=speed};
if vector=3{y-=speed};
if vector=4{x-=speed};
If (y=200) and (x=100){vector=2;sprite_index=right};//спрайт врага, идущего вправо.
If (y=200) and (x=200){vector=3;sprite_index=up};//спрайт врага, идущего вверх.
If (y=100) and (x=200){vector=4;sprite_index=left};//спрайт врага, идущего влево.
If (y=100) and (x=100){vector=1;sprite_index=down};//спрайт врага, идущего вниз.