Sign in to follow this  
Followers 0
Win4lif3

CSS aimbot..

6 posts in this topic

#1 ·  Posted (edited)

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



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


_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_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: 04/09/2015

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

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

Lame.

I agree your initial question was exactly that!

_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_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: 04/09/2015

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

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  
Followers 0