Hola amigos, pues si esto es posible, hace tiempo, cuando teia un Windows98 (de mi hermana), pues a esta le enviaba programillas y videos y powerpoints (lo que hacen la gente de Hotmail vamos) y encontre entre todo eso un Alcolimetro Electronico xD el caso es que cuando lo ejecute, te decia:

Has estado toda la noche de juerga y ahora te vamos a hacer una prueba de Alchollmeitro, tararitarara y mas bla bla bla..

Le das a siguiente te sale una prueba sencilla.
Le das a siguiente,

Haz un circulo para ver tu coordinacion y cando pasabas por encima de una caja de no se que campo gris, el puntero empeza a temblar hacias un churro.

Le dabas a finalizar y te dice con Label que se ueven para todos los lados ( y el puntero tambien)

Felicitaciones esta usted mas ebrio que no se que xDDD

El caso que el puntero tembnlaba alocado y no se podria cerrarla apliacion.

Aguie abe como lo pedo hacer, si se puede hacer con Batch o VB.NET o algo?

Un saludo.

Es decir, podria hacer un bucle de posiciones, lo unico que como pongo posiciones random en la pantalla, pero que no tenga una gran desvarie, ejemplo:

X = 200
Y = 300

X = 204
Y = 296

por ejemplo. 

A ver, xD eso si iba a buscarlo yo, pero quiero saber como poner numeros random con poco desvarie xD (la pregunta iba toda junta)

---

No tenia tiempo de buscar esta mañana pero ahora si, mira lo que encontre:

http://www.freevbcode.com/ShowCode.asp?ID=3754

Lo unico que como lo puedo transformar a VB.NET, voy a investigar.

---

Resuelto, codigo:

Public Class Form1
    Dim Intensity As Integer = 10
 
    Public Function ShakeMouse()
        Cursor.Position = New Point(Cursor.Position.X + CInt(Int((Intensity - -Intensity + 1) * Rnd() + -Intensity)), Cursor.Position.Y + CInt(Int((Intensity - -Intensity + 1) * Rnd() + -Intensity)))
    End Function
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Interval = 30
        Timer1.Start()
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ShakeMouse()
    End Sub
End Class

¿es que no tienes nada mejor que hacer que andar metiendote siempre con el moderador, conmigo, y con el usuario de este post?, 3x1, vas progresando en aptitudes.

Y por cierto, hay una  GRAN diferencia entre pedir información, y pedir las cosas echas, no sé si es que no te lo han enseñado en el colegio o sólo es que te gusta molestar, cuando quieras te repasas mis palabras del post del USB que tanto me criticas, o cualquier otro post.

Bueno, a ver si nos dejas en paz de una vez a todos, porque nadie te ha dicho nada y tú ya vienes a trollear,
Saludos.