Thread: afkbot

Results 1 to 8 of 8
  1. #1
    DylanOwnsYou's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Location
    In the air, rising higher and higher as I watch you crash.
    Posts
    379
    Reputation
    19
    Thanks
    82
    My Mood
    Cynical

    afkbot

    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

  2. #2
    HackMaker's Avatar
    Join Date
    Aug 2009
    Gender
    male
    Posts
    359
    Reputation
    11
    Thanks
    11
    My Mood
    Cheerful
    ill try wait if i dun pst back i cant help ill try tho

  3. #3
    Iamazn's Avatar
    Join Date
    Dec 2008
    Gender
    male
    Posts
    141
    Reputation
    10
    Thanks
    85
    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"

    Code:
     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)
    This is code that will simulate click
    Code:
     mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
            mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)

  4. #4
    Zoom's Avatar
    Join Date
    May 2009
    Gender
    male
    Location
    Your going on my 24/7 DDoS hit list.
    Posts
    8,552
    Reputation
    127
    Thanks
    5,970
    My Mood
    Happy

    Red face

    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.

  5. #5
    DylanOwnsYou's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Location
    In the air, rising higher and higher as I watch you crash.
    Posts
    379
    Reputation
    19
    Thanks
    82
    My Mood
    Cynical
    kay thanks. i'll try to figure this out, what are the x,y axis for mouse click ready and quick join?

  6. #6
    Zoom's Avatar
    Join Date
    May 2009
    Gender
    male
    Location
    Your going on my 24/7 DDoS hit list.
    Posts
    8,552
    Reputation
    127
    Thanks
    5,970
    My Mood
    Happy
    Quote Originally Posted by DylanOwnsYou View Post
    kay thanks. i'll try to figure this out, what are the x,y axis for mouse click ready and quick join?
    Figure that out, something you must do
    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()
    -Rest in peace leechers-

    Your PM box is 100% full.

  7. #7
    Jimmy's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Location
    Jersey
    Posts
    4,572
    Reputation
    70
    Thanks
    647
    some 1 make a video

  8. #8
    upperdragon's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Posts
    23
    Reputation
    10
    Thanks
    0
    My Mood
    Stressed
    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

Similar Threads

  1. [Release] Afkbot, Invitebot, undetected by hejsan1
    By Zoom in forum Combat Arms Europe Hacks
    Replies: 68
    Last Post: 10-10-2009, 04:14 AM
  2. Translating EpicPacMan's AFKBot Script
    By why06 in forum C++/C Programming
    Replies: 2
    Last Post: 09-30-2009, 06:53 AM
  3. [Preview] Afkbot
    By Zoom in forum Combat Arms Europe Hacks
    Replies: 30
    Last Post: 09-17-2009, 02:17 PM
  4. Most Epic AFKbot ever. [Not a release]
    By -XpliCitt- in forum Combat Arms Hacks & Cheats
    Replies: 37
    Last Post: 08-20-2009, 04:19 PM
  5. EPICPACMAN AFKBOT PUBLIC I'm Feeling good today.
    By EpicPacMan in forum Combat Arms Hacks & Cheats
    Replies: 44
    Last Post: 07-24-2009, 11:28 PM

Tags for this Thread