Not one of the best ones out there but guess what it works

C#

Code:
public void moveMouse(int x, int y)
{
	System.Windows.Forms.Cursor.Position = new Point(x, y);
}
public void moveMouseHuman(int TargetX, int targetY)
{
	dynamic mouseLocation = System.Windows.Forms.Cursor.Position;
	int X = mouseLocation.X;
	int y = mouseLocation.Y;
	while (!(X == TargetX & y == targetY)) {
		if ((X > TargetX)) {
			X = X - 3;
		}
		if ((X < TargetX)) {
			X = X + 2;
		}
		if ((y > targetY)) {
			y = y - 4;
		}
		if ((y < targetY)) {
			y = y + 3;
		}
		moveMouse(X + new Random().Next(3, 4), y + new Random().Next(3, 4));
		System.Threading.Thread.Sleep(5);
	}
}
VB

Code:
Public Sub moveMouse(ByVal x As Integer, ByVal y As Integer)
        Windows.Forms.Cursor.Position = New Point(x, y)
    End Sub
    Public Sub moveMouseHuman(ByVal TargetX As Integer, ByVal targetY As Integer)
        Dim mouseLocation = Windows.Forms.Cursor.Position
        Dim X As Integer = mouseLocation.X, y As Integer = mouseLocation.Y
        Do Until X = TargetX And y = targetY
            If (X > TargetX) Then : X = X - 3 : End If
            If (X < TargetX) Then : X = X + 2 : End If
            If (y > targetY) Then : y = y - 4 : End If
            If (y < targetY) Then : y = y + 3 : End If
            moveMouse(X + New Random().Next(3, 4), y + New Random().Next(3, 4))
            Threading.Thread.Sleep(5)
        Loop
    End Sub
I'm not the original creator of this code