Jump to content
Sign in to follow this  
Win4lif3

CSS aimbot..

Recommended Posts

Win4lif3

Ive made my own aimbot script.

Its working great and all that, but theres just one little problem,

and that is that it wont work in Fullscreen mode

but in Windowed mode it works like it should

Code:

#Include <Misc.au3>
    Global $paused
    Local $click = 0
    AutoItSetOption("MouseCoordMode", 0)
    $letter = "¨"
    HotKeySet("{F9}", "goExit")
    $Pausee = 1

    Do
        $letter = InputBox("Choose Pause Button!", "Please enter the letter you want to be your pause button." & @CR & "You can only choose one letter!" & @CR & "To close the aimbot Press F9")
    Until IsString($letter) and StringLen($letter) = 1 and StringIsLower($letter)
    $letter = "" & $letter
    HotKeySet($letter, "TogglePause")

    Func TogglePause()
        If $Pausee = 0 Then
            $Pausee = 1
            ToolTip("Aimbot Un-Paused!", 0, 0)
        Else
            $Pausee = 0
            ToolTip("Aimbot Paused!", 0, 0)
        EndIf
         $Paused = NOT $Paused
         While $Paused
              sleep(100)
          WEnd
     EndFunc

    func goExit()
        Exit
    EndFunc


    $res = 0
    Do
        $res = InputBox("Choose your IN-GAME resolution", "Type 1 For: 640 X 480" & @CR & "2 For: 800 X 600" & @CR & "3 For: 1024 X 768" & @CR & "4 For: 1152 X 864" & @CR & "5 For: 1176 X 664" & @CR & "6 For: 1280 X 720" & @CR & "7 For: 1280 X 960" & @CR & "8 For:1280 X 1024" & @CR & "9 For: 1366 X 768" & @CR & "10 For:1400 x 1050" & @CR & "11 For: 1600 X 1024" & @CR & "12 For: 1768 X 992" & @CR & "13 For: 1980 X 1080")
        If $res = 1 Then
            $xx = 640
            $yy = 480
        ElseIf $res = 2 Then
            $xx = 800
            $yy = 600
        ElseIf $res = 3 Then
            $xx = 1024
            $yy = 768
        ElseIf $res = 4 Then
            $xx = 1152
            $yy = 864
        ElseIf $res = 5 Then
            $xx = 1176
            $yy = 664
        ElseIf $res = 6 Then
            $xx = 1280
            $yy = 720
        ElseIf $res = 7 Then
            $xx = 1280
            $yy = 960
        ElseIf $res = 8 Then
            $xx = 1280
            $yy = 1024
        ElseIf $res = 9 Then
            $xx = 1366
            $yy = 768
        ElseIf $res= 10 Then
            $xx = 1400
            $yy = 1050
        ElseIf $res = 11 Then
            $xx = 1600
            $yy = 1024
        ElseIf $res = 12 Then
            $xx = 1768
            $yy = 992
        ElseIf $res = 13 Then
            $xx = 1920
            $yy = 1080

        EndIf
    Until $res = 1 or $res = 2 or $res = 3 or $res = 4 or $res = 5 or $res = 6 or $res = 7 or $res = 8 or $res = 9 or $res = 10 or $res = 11 or $res = 12 or $res = 13

    Do
        $TAget = InputBox("Target!", "Type 1 For: Counter Terrorist's" & @CR & "And 2 For: Terrorist")
        If $TAget = 1 Then
            $target = "0x0000FF"
        ElseIf $TAget = 2 Then
            $target = "0xFF0000"

        EndIf
    Until $TAget = 1 or $TAget = 2

    MsgBox(0, "Ready To Launch", "Please Enter Counter Strike:Source" & @CR & "And Press your Pause buttom to start the Aimbot.")

Func _MouseMovePlus($X, $Y,$absolute = 0)
        Local $MOUSEEVENTF_MOVE = 1
    Local $MOUSEEVENTF_ABSOLUTE = 32768
    DllCall("user32.dll", "none", "mouse_event", _
            "long",  $MOUSEEVENTF_MOVE + ($absolute*$MOUSEEVENTF_ABSOLUTE), _
            "long",  $X, _
            "long",  $Y, _
            "long",  0, _
        "long",  0)
EndFunc

While 1 Or _IsPressed('01')
    Sleep(1)
    if _IsPressed('01') Then
        $variable = PixelSearch(0, 0, $xx, $yy, $target)
        If Not @error And IsArray($variable) Then _MouseMovePlus($variable[0], $variable[1]+1.6)
        if $click = 0 Then
            $click = 1
        EndIf
    Else
        $click = 0
    EndIf
WEnd

if you want to try it, remember to go in windowed mode and then take the css window all the way up the the left upper corner and you must have skins (T=red model CT=blue model)

Any ideas please :unsure:

Edited by Win4lif3

Share this post


Link to post
Share on other sites
guinness

Check out why you won't get help by reading this >> http://www.autoitscript.com/forum/forum-2/announcement-12-game-bots-and-automation/


UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Share this post


Link to post
Share on other sites
Win4lif3

what if i say this: i cant get mousemove to work with fullscreen games.?

Edited by Win4lif3

Share this post


Link to post
Share on other sites
guinness

Lame.

I agree your initial question was exactly that!

UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Share this post


Link to post
Share on other sites
Valik

what if i say this: i cant get mousemove to work with fullscreen games.?

If you say that you prove you are not welcome here since you demonstrate a complete lack of reading comprehension. You will not get help on this forum, go somewhere else or better yet L2play.

Edit: Do not PM me to talk/argue/explain/criticize forum policy, you will be banned.

Edited by Valik

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.