Something

      // Player Position
      PosX := Player[Index].PosX;
      PosY := Player[Index].PosY;

      // Player Target Position
      TargetX := Player[Index].TargetX;
      TargetY := Player[Index].TargetY;

      If (PosX < TargetX) Then
          PosX := PosX + Random(TargetX - PosX)
      Else
          PosX := PosX - Random(PosX - TargetX);

      If (PosY < TargetY) Then
          PosY := PosY + Random(TargetY - PosY)
      Else
          PosY := PosY - Random(PosY - TargetY);