Splizes Grandmaster Cheater Supreme
Reputation: 0
Joined: 21 Jun 2006 Posts: 1944 Location: Florida
|
Posted: Thu Jun 28, 2007 1:41 pm Post subject: Help in vb |
|
|
Mouse clicks:
I know how to make simple mouse clicks, and this will work sometimes but others it will just not click. I would like to know how to make it always click.
My code
General
| Code: |
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
|
and the actual stuff
| Code: |
Const MOUSEEVENTF_ABSOLUTE = &H8000, MOUSEEVENTF_LEFTDOWN = &H2, MOUSEEVENTF_LEFTUP = &H4
AppActivate ("[i]program[/i]")
If (GetAsyncKeyState(vbKeyF2)) Then
Sleep 200
mouse_event MOUSEEVENTF_LEFTDOWN Or lCoordBit, 0&, 0&, 0&, 0&
mouse_event MOUSEEVENTF_LEFTUP Or lCoordBit, 0&, 0&, 0&, 0&
Sleep 1000
SendKeys "{f3}"
End If
|
This isnt the entire code as there is a loop.
Also i would like to be able to detect pixel (or lack there of) at a certain area in an application. Kind of like an auto pot.
|
|