XStep:= cos(Angle);
YStep:= sin(Angle);
Add those steps to your x, y, just remember to make x and y real numbers.