Remote Controlled Mouse

[gneville16]

Hi, strange post this but i will explain what it is all about in good time.

Request:
A program (macro? i dont know) that makes your mouse move from side to side of the screen and up and down the screen extremely quickly, and i mean really quickly.

Reason:
There is a game on a website (www.fastwars.com) in which you must move your mouse over as many green dots as possible before they hit the screen, and it is impossible to get scores as high as what some people have got, and i know for a fact someone i know has a program that does what i want.

If you go to the website and play the game you will understand what i want, the moust does not need to click, just move from side to side of the screen up and down at speeds so fast you cant imagine.

I know it is possible, i just dont know how to do it as i am not very good with VB

thanks,

GNEVILLE

[007shahid]

thats cheating...

[MC2]

Realy now? Well, he must want it 'for educational purposes only'... like the disclamer in all those cracks...

[007shahid]

lol

[HotlineCorsair]

look for code related to "get paid while you serf" most of the "get paid to serf" programs require mouse movement or clicking, and quite a few coders have created cheats for this using vb. the speed should be adjustable in most of these projects.

[ysa1441]

it is cheating, but it is fun...


Option Explicit
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long

Private Sub Command1_Click()
Dim i, z
Me.Hide
AppActivate ("FastWars!")
Do
For i = 0 To 800 Step 60
For z = 50 To 510 Step 60
SetCursorPos i, z
Next z
Next i
'DoEvents
Loop
End Sub


try this code, play with the numbers.... I haven't yet figured the right numbers for the best results. but it's fun watching the thing go automaticaly...
have fun...