Results 1 to 6 of 6
  1. #1
    maxius12's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    145
    Reputation
    10
    Thanks
    41

    Aimbot source code with video

    Here my new code for aimbot and a video how to use:

    video:


    Sorry You must wait for the video ca 40min can be earlier because youtube isnt fast in upload videos , i belive








    code:

    Code:
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=..\..\..\..\Program Files\Subagames\CrossFire\CrossFireIcon.ico
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    
    
    
    
    ;combos
    
    
    #RequireAdmin
    
    ;funktion _c()
    
    
    $_cd=""
    $_cc="0x2A2D2A"
    $_cb="0x1E252D"
    $_ca="0x2A2D32"
    
    ;funktion _b()
    
    $_be=""
    $_bd="0x212826"
    $_bc="0x000101"
    $_bb="0x282C30"
    $_ba="0x1E2826"
    
    
    ;funktion _a()
    
    $_ae="0x6D5845"
    $_ad="0xC6A88F"
    $_ac="0xD2AD8F"
    $_ab="0xD0B69B"
    $_aa="0xD0AC8F"
    
    ;hotkeys
    $c="f"
    $b="x"
    $a="h"
    
    
    
    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1_1 = GUICreate("Aimbotmaker", 628, 511, 212, 125)
    $PageControl1 = GUICtrlCreateTab(8, 0, 604, 496)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $TabSheet1 = GUICtrlCreateTabItem("Main")
    $Button1 = GUICtrlCreateButton("Start the new Aimbot", 412, 397, 155, 57, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label1 = GUICtrlCreateLabel("Hotkeys:", 68, 109, 46, 18)
    GUICtrlSetFont(-1, 8, 800, 0, "Arial")
    $Label2 = GUICtrlCreateLabel("Welcome to the new Aimbotmaker", 132, 45, 322, 31)
    GUICtrlSetFont(-1, 14, 800, 0, "Comic Sans MS")
    $Button2 = GUICtrlCreateButton("another", 148, 149, 75, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button3 = GUICtrlCreateButton("Antiterror", 148, 189, 75, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button4 = GUICtrlCreateButton("Terror", 148, 229, 75, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label3 = GUICtrlCreateLabel("h", 268, 157, 36, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label4 = GUICtrlCreateLabel("x", 268, 197, 36, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label5 = GUICtrlCreateLabel("f", 268, 237, 36, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $combo4 = GUICtrlCreateCombo("h", 336, 160, 33, 25)
    GUICtrlSetData($combo4, "q|w|e|r|t|z|u|i|o|p|ü|a|s|d|f|g|h|j|k|l|ö|ä|y|x|c|v|b|n|m")
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $combo2= GUICtrlCreateCombo("x", 336, 200, 33, 25)
    GUICtrlSetData($combo2, "q|w|e|r|t|z|u|i|o|p|ü|a|s|d|f|g|h|j|k|l|ö|ä|y|x|c|v|b|n|m")
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $combo3= GUICtrlCreateCombo("f", 336, 240, 33, 25)
    GUICtrlSetData($combo3, "q|w|e|r|t|z|u|i|o|p|ü|a|s|d|f|g|h|j|k|l|ö|ä|y|x|c|v|b|n|m")
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $TabSheet2 = GUICtrlCreateTabItem("Aimbotmaker")
    $Label6 = GUICtrlCreateLabel("Here u must edit the collor", 44, 61, 129, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button13 = GUICtrlCreateButton("ok", 62, 195, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button12 = GUICtrlCreateButton("ok", 62, 171, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button11 = GUICtrlCreateButton("ok", 62, 147, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button10 = GUICtrlCreateButton("ok", 318, 243, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button9 = GUICtrlCreateButton("ok", 318, 219, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button8 = GUICtrlCreateButton("ok", 318, 195, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button7 = GUICtrlCreateButton("ok", 318, 171, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button6 = GUICtrlCreateButton("ok", 318, 147, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button15 = GUICtrlCreateButton("ok", 62, 243, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button14 = GUICtrlCreateButton("ok", 62, 219, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label21 = GUICtrlCreateLabel("0x6D5845", 173, 250, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label22 = GUICtrlCreateLabel("0xC6A88F", 173, 226, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label23 = GUICtrlCreateLabel("0xD2AD8F", 173, 202, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label24 = GUICtrlCreateLabel("0xD0B69B", 173, 178, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label20 = GUICtrlCreateLabel("0xD0AC8F", 173, 154, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label19 = GUICtrlCreateLabel("", 429, 242, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label18 = GUICtrlCreateLabel("0x212826", 429, 218, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label17 = GUICtrlCreateLabel("0x000101", 429, 194, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label16 = GUICtrlCreateLabel("0x282C30", 429, 170, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label15 = GUICtrlCreateLabel("0x1E2826", 429, 146, 58, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label7 = GUICtrlCreateLabel("Terror", 108, 109, 34, 18)
    GUICtrlSetFont(-1, 8, 800, 0, "Arial")
    $Label8 = GUICtrlCreateLabel("Antiterror", 388, 109, 58, 18)
    GUICtrlSetFont(-1, 8, 800, 0, "Arial")
    $Button16 = GUICtrlCreateButton("ok", 185, 424, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label10 = GUICtrlCreateLabel("", 296, 423, 66, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button17 = GUICtrlCreateButton("ok", 185, 352, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button18 = GUICtrlCreateButton("ok", 185, 376, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button19 = GUICtrlCreateButton("ok", 185, 400, 75, 17, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label11 = GUICtrlCreateLabel("0x2A2D2A", 296, 399, 66, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label12 = GUICtrlCreateLabel("0x1E252D", 296, 375, 66, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label13 = GUICtrlCreateLabel("0x2A2D32", 296, 351, 66, 17)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label14 = GUICtrlCreateLabel("another", 255, 314, 57, 18)
    GUICtrlSetFont(-1, 8, 800, 0, "Arial")
    $TabSheet3 = GUICtrlCreateTabItem("Info/Credits")
    $Label25 = GUICtrlCreateLabel("How to use:", 44, 53, 73, 20)
    GUICtrlSetFont(-1, 9, 800, 0, "Comic Sans MS")
    $Label26 = GUICtrlCreateLabel("Put the aimbotmaker into to the crossfile.", 44, 93, 198, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label27 = GUICtrlCreateLabel("You can read the color of bodys or heads with AutoitInfo", 44, 117, 291, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label28 = GUICtrlCreateLabel("Then put the Color code into the aimbotmaker.", 44, 141, 223, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label29 = GUICtrlCreateLabel("Choose the Hotkeys and start the aimbot.", 44, 165, 202, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label30 = GUICtrlCreateLabel("Have fun!", 44, 189, 50, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label31 = GUICtrlCreateLabel("Credits by Maxius12", 44, 229, 102, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button20 = GUICtrlCreateButton("Visit Mpgh.net", 36, 437, 99, 25, $WS_GROUP)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    
    While 1
    	$nMsg = GUIGetMsg()
    	Switch $nMsg
    		Case $GUI_EVENT_CLOSE
    			Exit
    		case $Button1
    WinSetState($Form1_1, '', @SW_HIDE)
    
    Run("CF_G4box.exe")
    WinActive("crossfire.exe")
    HotKeySet(""&$a&"", "_b")
    HotKeySet(""&$b&"", "_a")
    HotKeySet(""&$c&"", "_b1")
    
    while 1
    	sleep(200)
    	WEnd
    
    
    case $combo4
    	$a=guictrlread($combo4) ;combo
       GUICtrlSetData($Label3,$a)
    
    case $combo2
    	$b=guictrlread($combo2) ;combo
       GUICtrlSetData($Label4,$b)
    
    case $combo3;combo
    	$c=guictrlread($combo3)
       GUICtrlSetData($Label5,$c)
    
    
    
    
    
    
    			case $Button2
    			$a=Inputbox("another","Hotkey:",$a) ;hotkey
    			GUICtrlSetData($Label3,$a)
    
    		case $Button3
    			$b=Inputbox("Antiterror","Hotkey:",$b);hotkey
    			GUICtrlSetData($Label4,$b)
    
    		case $Button4
    			$c=Inputbox("Antiterror","Hotkey:",$c)  ;hotkey
    			GUICtrlSetData($Label5,$c)
    
    		case $Button20
    			ShellExecute("www.mpgh.net")                 ;intertnetbutton
    ;...........................................................................
    
    case $Button17
    	$_ca=Inputbox("another","Color:",$_ca) ;func _c()
    			GUICtrlSetData($Label13,$_ca)
    case $Button18
    			$_cb=Inputbox("another","Color:",$_cb) ;func _c()
    			GUICtrlSetData($Label12,$_cb)
    
    case $Button19
    	$_cc=Inputbox("another","Color:",$_cc) ;func _c()
    			GUICtrlSetData($Label11,$_cc)
    
    case $Button16
    	$_cd=Inputbox("another","Color:",$_cd) ;func _c()
    			GUICtrlSetData($Label10,$_cd)
    
    ;.........................................................................
    
    case $Button6
    	$_ba=Inputbox("another","Color:",$_ba) ;func _b()
    			GUICtrlSetData($Label15,$_ba)
    
    case $Button7
    	$_bb=Inputbox("another","Color:",$_bb) ;func _b()
    			GUICtrlSetData($Label16,$_bb)
    
    case $Button8
    	$_bc=Inputbox("another","Color:",$_bc) ;func _b()
    			GUICtrlSetData($Label17,$_bc)
    
    
    case $Button9
    	$_bd=Inputbox("another","Color:",$_bd) ;func _b()
    			GUICtrlSetData($Label18,$_bd)
    
    
    case $Button10
    	$_be=Inputbox("another","Color:",$_be) ;func _b()
    			GUICtrlSetData($Label19,$_be)
    ;.........................................................................
    
    case $Button11
    	$_aa=Inputbox("another","Color:",$_aa) ;func _a()
    			GUICtrlSetData($Label20,$_aa)
    case $Button12
    	$_ab=Inputbox("another","Color:",$_ab) ;func _a()
    			GUICtrlSetData($Label24,$_ab)
    
    case $Button13
    	$_ac=Inputbox("another","Color:",$_ac) ;func _a()
    			GUICtrlSetData($Label23,$_ac)
    
    case $Button14
    	$_ad=Inputbox("another","Color:",$_ad) ;func _a()
    			GUICtrlSetData($Label22,$_ad)
    
    case $Button15
    	$_ae=Inputbox("another","Color:",$_ae) ;func _a()
    			GUICtrlSetData($Label21,$_ae)
    
    
    ;......................................................................
    
    
    
    	EndSwitch
    WEnd
    
    
    
    
    
    
    
    Func _a()
    $var = 1
    
    while $var = 1
            $coord = PixelSearch( 0, 0,1024, 768, $_aa )
        $coord = PixelSearch( 0, 0,1024, 768, $_ab )
    	    $coord = PixelSearch( 0, 0,1024, 768, $_ac)
     $coord = PixelSearch( 0, 0,1024, 768, $_ad )
    	$coord = PixelSearch( 0, 0,1024, 768, $_ae )
    
    
    
    	If Not @error Then
          MouseMove($coord[0], $coord[1])
    
        EndIf
    wend
    EndFunc
    
    Func _b()
    
    $1var = 1
    while $1var = 1
    $coord = PixelSearch( 0, 0,1024, 768, $_ba )
        $coord = PixelSearch( 0, 0,1024, 768, $_bb )
    	    $coord = PixelSearch( 0, 0,1024, 768, $_bc )
     $coord = PixelSearch( 0, 0,1024, 768, $_bd )
    	 $coord = PixelSearch( 0, 0,1024, 768, $_be )
    
    
    	If Not @error Then
          MouseMove($coord[0], $coord[1])
    
        EndIf
    WEnd
    EndFunc
    
    Func _b1()
    
    $1var = 1
    while $1var = 1
    $coord = PixelSearch( 0, 0,1024, 768, $_ca )
       $coord = PixelSearch( 0, 0,1024, 768, $_cb )
    	$coord = PixelSearch( 0, 0,1024, 768, $_cc )
    $coord = PixelSearch( 0, 0,1024, 768, $_cd )
    
    	If Not @error Then
          MouseMove($coord[0], $coord[1])
    
        EndIf
    WEnd
    EndFunc
    
    
    
    Func _c()
    	$var = 0
    	Endfunc
    
    Func _d()
    
    	$1var = 0
    	Endfunc

    It works if u have the right color...
    Please Dont Spam This a autoit source code and it isnt a .dll
    Watch the video and u will understand how

  2. #2
    greathamza's Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    with daves mom
    Posts
    5,607
    Reputation
    14
    Thanks
    505
    My Mood
    Asleep
    you already made a thread like this and there is no vid so im gonna say
    FAIL!!!!!!!!!
    everybody lies


  3. #3
    maxius12's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    145
    Reputation
    10
    Thanks
    41
    Quote Originally Posted by greathamza View Post
    you already made a thread like this and there is no vid so im gonna say
    FAIL!!!!!!!!!

    I see it Sorry this can be closed.
    my internet has lagg

  4. #4
    Saberio's Avatar
    Join Date
    Feb 2010
    Gender
    male
    Location
    Same place as always.
    Posts
    214
    Reputation
    10
    Thanks
    7
    My Mood
    Paranoid
    Yes, I see no video :P, but I would love to learn to use the aim bot. Mind making a text tutorial since there is no apparent video? And a double topic post? Tsk, Tsk.
    Last edited by Saberio; 02-18-2010 at 04:43 PM. Reason: Forgot something.

  5. #5
    greathamza's Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    with daves mom
    Posts
    5,607
    Reputation
    14
    Thanks
    505
    My Mood
    Asleep
    he copy and paste this + this has been posted b4
    everybody lies


  6. #6
    maxius12's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    145
    Reputation
    10
    Thanks
    41
    Quote Originally Posted by greathamza View Post
    you already made a thread like this and there is no vid so im gonna say
    FAIL!!!!!!!!!
    You cant read or??

    i had say in the first post :
    Sorry You must wait for the video ca 40min can be earlier because youtube isnt fast in upload videos , i belive

Similar Threads

  1. Aimbot Source Code
    By Augs in forum Combat Arms Hack Coding / Programming / Source Code
    Replies: 43
    Last Post: 06-07-2010, 09:13 PM
  2. [Source Code] Cross Fire Aimbot Source Code
    By lol~lol in forum CrossFire Hacks & Cheats
    Replies: 30
    Last Post: 02-20-2010, 12:38 PM
  3. [Source Code] Aimbot source code with video
    By maxius12 in forum CrossFire Hacks & Cheats
    Replies: 37
    Last Post: 02-18-2010, 06:07 PM
  4. Visual Basic Aimbot Source Code
    By whitten in forum Visual Basic Programming
    Replies: 19
    Last Post: 08-05-2009, 10:39 AM
  5. My Aimbot source code!
    By wertoskiller in forum Combat Arms Hacks & Cheats
    Replies: 8
    Last Post: 07-27-2009, 04:46 PM