• Home
 · 
• Miscellaneous
 · 
• Move the Mouse Cursor (good for pay programs)

Move the Mouse Cursor (good for pay programs)

Move the Mouse Cursor (good for pay programs)

Rate Move the Mouse Cursor (good for pay programs)

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'This code is of good use.  If you use those surf programs to make 
'money, notice that they react and stay idle upon mouse movement or the 
'button will go red?  Well this code will keep the mouse button moving 
'so you can make more money without have to actually surf the internet.  
'(Note:  'Another way to work on your computer and make money is to change 
'the title of a caption with the text "- Microsoft Internet Explorer")
'Good Luck!

'Code:

'Dim t&
't& = SetCursorPos(0, 0)
'timeout 1.5
't& = SetCursorPos(500, 300)
'timeout 1.5
't& = SetCursorPos((Screen.Width - Me.Width) / 2, (Screen.Height - Me.Height) / 2)
'timeout 1.5

Function timeout(interval)
current = Timer
Do While Timer - current < Val(interval)
DoEvents
Loop
End Function