ill try wait if i dun pst back i cant help ill try tho
i have recently made an afkbot that only works ingame. i was wondering if some1 can help me make an afkbot that joins quick games and clicks ready?? please pm me a tut or tell me how to do it, i will love u forever
ill try wait if i dun pst back i cant help ill try tho
First you would have to find the X, Y of the button to click, then you would make your program click it. I dont know how to do the first, but I can help you with simulating a Click in VB
Add this below an "End Sub"
This is code that will simulate clickCode:Private Const BM_CLICK = &HF5 Public Const MOUSEEVENTF_LEFTDOWN = &H2 Public Const MOUSEEVENTF_LEFTUP = &H4 Public Const MOUSEEVENTF_MIDDLEDOWN = &H20 Public Const MOUSEEVENTF_MIDDLEUP = &H40 Public Const MOUSEEVENTF_RIGHTDOWN = &H8 Public Const MOUSEEVENTF_RIGHTUP = &H10 Public Const MOUSEEVENTF_MOVE = &H1 Private Const MOUSEEVENTF_WHEEL = &H800 Declare Sub mouse_event Lib "user32.dll" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Code:mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0) mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)
1.
Easier version:
Add 2 textboxes add this code
TextBox1.Text = System.Windows.Forms.Cursor.Position.X.ToString()
TextBox2.Text = system.Windows.Forms.Cursor.Position.Y.ToString()
2
add a timer and use this code:
declare with this:
Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Windows.Forms.Cursor.Position = New System.Drawing.Point(Windows.Forms.Cursor.Position )
and then
Cursor.Position = New Point(xxx, xxx) move mouse to axis
mouse_event(&H2, 0, 0, 0, 1) is for left click
mouse_event(&H4, 0, 0, 0, 1) is for left click
xxx = Y or X axis
Thanks me if i helped!
-Rest in peace leechers-
Your PM box is 100% full.
kay thanks. i'll try to figure this out, what are the x,y axis for mouse click ready and quick join?
-Rest in peace leechers-
Your PM box is 100% full.
some 1 make a video
the code is easy enuff to understand...
X Y
E.G Cursor.Position = New Point(379, 382) = Move The Mouse To The Axis U Wrote
To Find The Axis U Can Put : Cursor.Position.X = Label1.Text
Cursor.Position.Y = Label2.Text
Then To Make The Mouse Go From One Place To Another , Make 2 Timers, Disable The First One And Set Thier Interval To Anytime u wan E.G 1000 = 1 second
Double Click oN teh Second Timer And Put :
X Y
Cursor.Position = New Point(TextBox1.Text, TextBox2.Text)
mouse_event(&H2, 0, 0, 0, 1)
mouse_event(&H4, 0, 0, 0, 1)
Timer1.Start()
Timer2.Stop()
Then Double Click On The First Timer And Put:
X Y
If Cursor.Position = New Point(TextBox1.Text, TextBox2.Text) Then
Cursor.Position = New Point(TextBox3.Text, TextBox4.Text)
mouse_event(&H2, 0, 0, 0, 1)
mouse_event(&H4, 0, 0, 0, 1)
Timer1.Stop()
Timer2.Start()
End If
Make 4 Textbox Btw And Put Thier Axis To Anything u wan
now i got a problem
whats the axis of combat arms quick join O.o