Jump to content

Proof of Concept.. Counter-Strike:Source


Sardith
 Share

Recommended Posts

Well, I've been working on my own -proof of concept- for Day of Defeat, Which is Vac2 HL2... Which also means you could use it for Counter-Strike Source. So far im not banned by Vac 2 and it's been 32 hours of play time. I made some skins with color for DOD/Counter-Strike Source, (If anyone wants them for there own purpose, let me know.) Then id have it move to the pixel color, and have it fire.. ...in short.

A few things, shade-variation past 105, it would start shoot at other objects. In certin light condition's it wouldn't fire.. IE. The dark, Dim lighting. If there was a way to turn the shader of, or get rid of the lighting that would be solved. Second, since most games have "RECOIL" it makes it almost impossible to have it hitting the target 99%, it's more like 65% without out slowing the left mouse clicking. I got mine to a point where recoil wasn't effecting it much, but how fast it was shooting the fire-arm was deceased greatly.

Thats why id say pixel scanning aimbots arn't the best.

;Made by Shynd & Geoff Haneckow, inspired by Simucal.
;Made for Counter-Strike:Source, DOD, and others in sure.

Global $Paused

;Hotkey(s)
HotKeySet("{F1}", "Stop")

;Options
Opt("OnExitFunc", "_ScriptClose")

;Speed of the mouse move
Dim $speed = "0"

;Hotkey(s)
HotKeySet("{F1}", "Stop")

;Pixel Search Color
Dim $color = "0x00EE00"

;Get Counter-Strike: Source Handle, exit if doesn't exist
Dim $Whnd = WinGetHandle("Day of Defeat Source")
If @error Then
    MsgBox(16, "Day of Defeat Source not found", "Game window not found, Exiting", 8)
    _ScriptClose()
EndIf


;Starts it paused
Stop()

$size = 20

While 1
$pos = MouseGetPos()
$coord = PixelSearch($pos[0] - $size, $pos[1] - $size, $pos[0] + $size, $pos[1] + $size, $color, 100, 2)
If IsArray($coord) Then
MouseMove($coord[0], $coord[1], 1)
MouseDown("left")
If $size > 5 Then $size = $size / 2
Sleep(250)
MouseMove($coord[0], $coord[1], 0)
Else
$size = 20
MouseUp("left")
EndIf

Sleep(1)
WEnd



;While 1
;If _IsPressed(0x01) then;Snap-to + Autoshoot
     ;$pos = MouseGetPos()
             ;$coord = PixelSearch(($pos[0] - 20) , ($pos[1] - 20) , ($pos[0] + 20) , ($pos[1] + 20), $color, 20)
     ;sleep(20)
     ;If IsArray($coord) = 1 Then
         ;MouseMove($coord[0], $coord[1], 0)
         ;MouseClick('left', $coord[0], $coord[1], 1, 0)
                 ;Sleep(100)
                 ;EndIf
                     ;EndIf
                     ;WEnd



Func _IsPressed($hexKey)
    Local $aR = DllCall("user32", "int", "GetAsyncKeyState", "int", $hexKey)
    If Not @error And BitAND($ar[0], 0x8000) = 0x8000 Then
        Return True
    Else
        Return False
    EndIf
EndFunc

Func Stop()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Stopped',0,0)
    WEnd
    ToolTip("")
EndFunc

Func _ScriptClose()
    Exit
EndFunc

Thanks Shynd for all your help, thanks Simucal for inspiration/a bases for the pixel searching Aimbot.

Edited by Sardith

[font="Verdana"]Valik:Get it straight - I'm not here to say please, I'm here to help - if my help's not appreciated then lotsa luck, gentlemen.[/font]

Link to comment
Share on other sites

Thanks Shynd for all your help.

Thanks Simucal. :)

AutoIt Scripts:Aimbot: Proof of Concept - PixelSearching Aimbot with several search/autoshoot/lock-on techniques.Sliding Toolbar - Add a nice Sliding Toolbar to your next script. Click the link to see an animation of it in action!FontInfo UDF - Get list of system fonts, or search to see if a particular font is installed.Get Extended Property UDF - Retrieve a files extended properties (e.g., video/image dimensions, file version, bitrate of song/video, etc)
Link to comment
Share on other sites

Here was the original one that was made without any testing, though the top one seemed to work better from what Sardith told me. Only reason I'm posting this is the GUI and the variable color / variant from the GUI.

#include <GuiConstants.au3>
#NoTrayIcon

Dim $winTitle = "Calculator"
Dim $color = 0x00FFCC
Dim $var = 15

Opt("GUICloseOnESC", 0)
Opt("OnExitFunc", "_ScriptClose")
Opt("GuiOnEventMode", 1)

$hWnd = WinGetHandle($winTitle)
If @error Then
    MsgBox(16, Random(100, 10000, 1), "Game window not found")
    _ScriptClose()
EndIf

$gui = GUICreate(Random(100, 10000, 1), 135, 60, (@DesktopWidth-135)/2, (@DesktopHeight-75)/2, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS - $WS_MAXIMIZEBOX - $WS_SIZEBOX)
GUISetOnEvent($GUI_EVENT_CLOSE, "_ScriptClose")

$colorlabel = GUICtrlCreateLabel("Hex Color:", 5, 12)
$colorbox = GUICtrlCreateInput(IniRead("Settings.ini", "Settings", "color", "00FFCC"), 60, 10, 70, 20)
GUICtrlSetOnEvent(-1, "_SetColor")
_SetColor()

$varlabel = GUICtrlCreateLabel("Variation:", 5, 37)
$variation = GUICtrlCreateInput(IniRead("Settings.ini", "Settings", "variation", 15), 60, 35, 70, 20)
GUICtrlSetOnEvent(-1, "_SetVariation")
$varupdown = GUICtrlCreateUpdown($variation)
GUICtrlSetOnEvent(-1, "_SetVariation")
_SetVariation()

GUISetState()

$timer = TimerInit()

While WinExists($hWnd)
    If TimerDiff($timer) >= 10000 Then
        _SetVariation()
        _SetColor()
        WinSetTitle($gui, "", Random(100, 10000, 1))
        $timer = TimerInit()
    EndIf
    
    If Not WinActive($hWnd) Then
        Sleep(100)
        ContinueLoop;keeps the aimbot from aiming while the game is not the active window
    EndIf
    
    If _IsPressed(0x01) Then
        _Aim()
    EndIf
    
    Sleep(10)
WEnd

MsgBox(64, WinGetTitle($gui), "Game exit detected, program will now terminate automatically.", 15)
_ScriptClose()

Func _Aim()
    Local $PixSearch = PixelSearch(412, 284, 612, 484, $color, $var, 2);Box
    If Not @error And IsArray($PixSearch) Then;make sure to check that $PixSearch is an array otherwise $PixSearch[0] will throw an error
    ;MouseClick("Left", $PixSearch[0], $PixSearch[1], 1, 1)
        MouseMove($PixSearch[0], $PixSearch[1], 0)
    EndIf
EndFunc

Func _SetColor()
    $color = "0x" & GUICtrlRead($colorbox)
    IniWrite("Settings.ini", "Settings", "color", GUICtrlRead($colorbox))
EndFunc

Func _SetVariation()
    $var = GUICtrlRead($variation)
    IniWrite("Settings.ini", "Settings", "variation", GUICtrlRead($variation))
EndFunc

Func _IsPressed($hexKey)
    Local $ret = DllCall("user32", "int", "GetAsyncKeyState", "int", $hexKey)
    If Not @error And BitAND($ret[0], 0x8000) = 0x8000 Then
        Return True
    Else
        Return False
    EndIf
EndFunc

Func _ScriptClose()
    Exit
EndFunc

notepad.rar

Link to comment
Share on other sites

Simucal, you 'inspired' the idea. You questioned if it could be done, and if the API for pixel searching was blocked by Vac2 which it's not.

Thanks again shynd.

Edited by Sardith

[font="Verdana"]Valik:Get it straight - I'm not here to say please, I'm here to help - if my help's not appreciated then lotsa luck, gentlemen.[/font]

Link to comment
Share on other sites

Here's my TriggerBot which may or may not be useful. It requires colored models. I designed it solely for Counter-Strike: Source, but it can be easily modified to work for almost any game:

TriggerBot.au3

#NoTrayIcon
#include <Hotkeys.au3>
#include <GUIConstants.au3>

#region Globals
Global $Pause           = 1
Global $Team[4]         = [1,0,1,2]         ;Terrorist = 1, Counter-Terrorist = -1
Global $ToolTip         = 1
Global $CyclicRate      = Random(50,100,1)
Global $SleepTime       = TimerInit()
Global $FireRate        = 100
Global $RGB[3]          = [40,40,40]

Const $Game_Title   = "Counter-Strike Source"
Const $INI_File     = StringTrimRight(@ScriptName, 4) & ".ini"
Const $Images[1]        = [@TempDir & _RandomString(1)]
#endregion Globals

;Location of CSS.jpg
FileInstall("C:\**********************************\CSS.jpg" , $Images[0])

#region Hotkeys
Global $HK_Team     = "NUMPAD7"
Global $HK_Pause    = "NUMPAD8"
Global $HK_Quit     = "NUMPAD0"
Global $HK_Trigger  = "MOUSE3"
Global $HK_Rapid    = "MOUSE5"
If (FileExists($INI_File)) Then
    $HK_Team    = StringUpper(IniRead($INI_File,"HotKeys",  "Toggle Team",  $HK_Team))
    $HK_Pause   = StringUpper(IniRead($INI_File,"HotKeys",  "Toggle Pause", $HK_Pause))
    $HK_Quit    = StringUpper(IniRead($INI_File,"HotKeys",  "Quit",         $HK_Quit))
    $HK_Trigger = StringUpper(IniRead($INI_File,"HotKeys",  "Auto Trigger", $HK_Trigger))
    $HK_Rapid   = StringUpper(IniRead($INI_File,"HotKeys",  "Rapid Fire",   $HK_Rapid))
    $FireRate   = StringUpper(IniRead($INI_File,"Other",    "Fire Rate",    $FireRate))
    ;$CyclicRate = IniRead($INI_File,"Misc","Cyclic Rate",      $CyclicRate)
EndIf

If (_IsValidAu3Hotkey($HK_Team)) Then
    HotKeySet("{" & $HK_Team & "}","ToggleTeam")
Else
    MsgBox(0,"Error","Invalid Team Toggle Hotkey: " & $HK_Team)
    Exit
EndIf

If (_IsValidAu3Hotkey($HK_Pause)) Then
    HotKeySet("{" & $HK_Pause & "}","TogglePause")
Else
    MsgBox(0,"Error","Invalid Pause Toggle Hotkey: " & $HK_Pause)
    Exit
EndIf

If (_IsValidAu3Hotkey($HK_Quit)) Then
    HotKeySet("{" & $HK_Quit & "}","Quit")
Else
    MsgBox(0,"Error","Invalid Quit Hotkey: " & $HK_Quit)
    Exit
EndIf

If (_IsValidVKHotKey($HK_Rapid)) Then
    $HK_Rapid = _GetVirtualKeyHex($HK_Rapid)
Else
    MsgBox(0,"Error","Invalid Rapid Fire Hotkey: " & $HK_Rapid)
    Exit
EndIf

If (_IsValidVKHotKey($HK_Trigger)) Then
    $HK_Trigger = _GetVirtualKeyHex($HK_Trigger)
Else
    MsgBox(0,"ERROR","Invalid Auto Trigger Hotkey: " & $HK_Trigger)
    Exit
EndIf
#endregion Hotkeys

#region GUI Stuff
Global $GUI             = GUICreate(_RandomString(0),400,180,Random(100,300,1),Random(100,300,1),$WS_SYSMENU+$WS_BORDER);,$WS_EX_TOOLWINDOW)

Global $Background      = GUICtrlCreatePic($Images[0],0,0,400,150)
Global $SearchBar[4]    = [GUICtrlCreateLabel("",75,30,20,2),GUICtrlCreateLabel("",75,35,20,2),75,-2]
Global $Label           = GUICtrlCreateLabel("",75,32,166,16)

GUISetBkColor(0x000000,$GUI)
GUICtrlSetBkColor($Label,0x000000)
GUICtrlSetBkColor($SearchBar[0],0xFF0000)
GUICtrlSetBkColor($SearchBar[1],0xFF0000)
GUICtrlSetColor($Label,0xffffff)
GUICtrlSetFont($Label,9,400,1,"Comic Sans MS")
WinSetTrans($GUI,"",0)
GUISetState(@SW_SHOW,$GUI)
For $Iter = 0 To 255 Step 5
    WinSetTrans($GUI,"",$Iter)
    Sleep(5)
Next
#endregion GUI Stuff

While 1
    If (WinActive($Game_Title)) Then
        GUISetState(@SW_HIDE,$GUI)
        
        If (_IsPressed($HK_Rapid)) Then
            MouseClick("Left")
        Else
            DetectTarget()
            UpdateToolTip()
        EndIf
    Else        
        ToolTip("")
        GUISetState(@SW_SHOW,$GUI)
        WinSetTitle($GUI,"",_RandomString(0))

        #region SearchBar
        If ($SearchBar[2] > 220 Or $SearchBar[2] < 76) Then
            $SearchBar[3] *= -1
        EndIf
        $SearchBar[2] += $SearchBar[3]
        GUICtrlSetPos($SearchBar[0],$SearchBar[2],30)
        GUICtrlSetPos($SearchBar[1],$SearchBar[2],48)
        ;ToDo, Add in Color changing from red to blue
        #endregion SearchBar
        
        If (WinExists($Game_Title)) Then
            If (GUICtrlRead($Label) <> "Waiting for fullscreen") Then
                GUICtrlSetData($Label,"Waiting for fullscreen")
            EndIf
        Else
            If (GUICtrlRead($Label) <> "Searching for Counter Strike") Then
                GUICtrlSetData($Label,"Searching for Counter Strike")
            EndIf
        EndIf
        
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Quit()
        EndSwitch
        ;Sleep(50)
    EndIf
    Sleep(10)
WEnd

Func UpdateToolTip()
    Local $String = ""
    If ($ToolTip == 1) Then
        If ($Pause == 1) Then
            $String = "***** Paused *****" & @TAB & @CRLF
        Else
            $String = @TAB & @TAB & @TAB & @TAB & @TAB & @CRLF
        EndIf
        If ($Team[0] == 1) Then
            $String = $String & "Triggers On: Terrorist"; & @CRLF
        Else
            $String = $String & "Triggers On: Counter-Terrorist"; & @CRLF
        EndIf
        #cs Debug
        $String = $String & "Red: " & @TAB & @TAB & $RGB[0] & @CRLF
        $String = $String & "Green: " & @TAB & @TAB & $RGB[1] & @CRLF
        $String = $String & "Blue: " & @TAB & @TAB & $RGB[2]
        #ce Debug
    EndIf
    ToolTip($String,0,0)
EndFunc

Func Fire()
    If (_IsPressed("01")) Then
        Return
    ElseIf (($Pause == -1 Or _IsPressed($HK_Trigger)) And (TimerDiff($SleepTime) > $CyclicRate)) Then
        $SleepTime = TimerInit()
        MouseClick("left")
    EndIf
EndFunc

Func ToggleTeam()
    $Team[0] *= -1

    If ($Team[0] == 1) Then
        $Team[1] = 0
        $Team[2] = 1
        $Team[3] = 2
    Else
        $Team[1] = 2
        $Team[2] = 1
        $Team[3] = 0
    EndIf
EndFunc

Func DetectTarget()
    Local $Size = WinGetClientSize("Counter-Strike Source")
    If (@error) Then Return
    
    $Size[0] /= 2
    $Size[1] /= 2
    
    ;Local $RGB = 
    _GetColorInfo( ($Size[0]-1) , ($Size[1]-1) )

    If (($RGB[$Team[1]] >= 75 And $RGB[$Team[2]] < 50 And $RGB[$Team[3]] < 50) Or (($RGB[$Team[1]] > 10 And ($RGB[$Team[2]] + $RGB[$Team[3]]) == 0))) Then
        Fire()
    EndIf
    
    Return
EndFunc

Func _GetColorInfo($X,$Y)
    Local $Color = PixelGetColor($X,$Y)
    ;Local $RGB[3]
    
    $RGB[0] = BitAND( BitShift($Color, 16), 0xff)   ; Red
    $RGB[1] = BitAND( BitShift($Color, 8), 0xff)    ; Green
    $RGB[2] = BitAND($Color, 0xff)                  ; Blue
    
    ;Return $RGB
EndFunc

Func _RandomString($file = 0)
    Switch $file
        Case 0
            Return Hex(Random(10000000,99999999,1),Random(6,8,1))
        Case 1
            Return "\" & Hex(Random(10000000,99999999,1),Random(6,8,1)) & "." & Hex(Random(100,999,1),3)
    EndSwitch
EndFunc

Func ToggleToolTip()
    $ToolTip *= -1
EndFunc

Func TogglePause()
    $Pause *= -1
    ToggleToolTip()
EndFunc

Func Quit()
    For $Iter = 255 To 0 Step -5
        WinSetTrans($GUI,"",$Iter)
        Sleep(5)
    Next
    IniWrite($INI_File,"HotKeys",   "Toggle Team",  $HK_Team)
    IniWrite($INI_File,"HotKeys",   "Toggle Pause", $HK_Pause)
    IniWrite($INI_File,"HotKeys",   "Quit",         $HK_Quit)
    IniWrite($INI_File,"HotKeys",   "Auto Trigger", _GetVirtualKeyString($HK_Trigger))
    IniWrite($INI_File,"HotKeys",   "Rapid Fire",   _GetVirtualKeyString($HK_Rapid))
    IniWrite($INI_File,"Other",     "Fire Rate",    $FireRate)
    ;IniWrite($INI_File,"Misc","Cyclic Rate",       $CyclicRate)
    FileDelete($Images[0])
    GUIDelete($GUI)
    DllClose($v_dll)
    Exit
EndFunc   ;==>Quit
oÝ÷ Øz-ì¬jíÚºÚ"µÍÛÛÝ  ÌÍÝÙHÜ[    ][ÝÝÙÌ  ][ÝÊBÛÛÝ   ÌÍÚÕÒÙ^SÝÎMWHHÉ][ÝÌI][ÝË   ][ÝÌ][ÝË    ][ÝÌ
    ][ÝË  ][ÝÌ
I][ÝË ][ÝÌ
][ÝË  ][ÝÌ  ][ÝË  ][ÝÌI][ÝË   ][ÝÌ  ][ÝË  ][ÝÌL ][ÝË  ][ÝÌLI][ÝË  ][ÝÌL][ÝË   ][ÝÌLÉ][ÝË ][ÝÌM ][ÝË  ][ÝÌP][ÝË   ][ÝÌ  ][ÝË  ][ÝÌI][ÝË   ][ÝÌ][ÝË    ][ÝÌÉ][ÝË  ][ÝÌ  ][ÝË  ][ÝÌI][ÝË   ][ÝÌ][ÝË    ][ÝÌÉ][ÝË  ][ÝÌ  ][ÝË  ][ÝÌÉ][ÝË  ][ÝÌ  ][ÝË  ][ÝÌI][ÝË   ][ÝÌ
    ][ÝË  ][ÝÌ
I][ÝË ][ÝÌ
][ÝË  ][ÝÌ
É][ÝË    ][ÝÌ
    ][ÝË  ][ÝÌ
I][ÝË ][ÝÌ
][ÝË  ][ÝÌ
É][ÝË    ][ÝÌ
    ][ÝË  ][ÝÌ
I][ÝË ][ÝÌ
I][ÝË ][ÝÌ
][ÝË  ][ÝÌ
    ][ÝË  ][ÝÌ
I][ÝË ][ÝÌ
][ÝË  ][ÝÌ
Ì  ][ÝË  ][ÝÌ
ÌI][ÝË   ][ÝÌ
Ì][ÝË    ][ÝÌ
ÌÉ][ÝË  ][ÝÌ
Í  ][ÝË  ][ÝÌ
ÍI][ÝË   ][ÝÌ
Í][ÝË    ][ÝÌ
ÍÉ][ÝË  ][ÝÌ
Π ][ÝË  ][ÝÌ
ÎI][ÝË   ][ÝÌ
ÐI][ÝË   ][ÝÌ
Ð][ÝË    ][ÝÌL ][ÝË  ][ÝÌL ][ÝË  ][ÝÌLI][ÝË  ][ÝÌL][ÝË   ][ÝÌLÉ][Ý×BÛÛÝ  ÌÍÜ×Ð]LÒÙ^SÝÍMHHÉ][ÝÔÔPÑI][ÝË   ][ÝÑST][ÝË  ][ÝÐS ][ÝË  ][ÝÐPÒÔÔPÑI][ÝË ][ÝÑSUI][ÝË ][ÝÕT ][ÝË  ][ÝÑÕÓ][ÝË    ][ÝÓQ ][ÝË  ][ÝÔQÒ   ][ÝË  ][ÝÒÓQI][ÝË    ][ÝÑS ][ÝË  ][ÝÑTÐÉ][ÝË   ][ÝÒSÑT  ][ÝË  ][ÝÔÕT   ][ÝË  ][ÝÔÑ][ÝË  ][ÝÑI][ÝË   ][ÝÑ][ÝË    ][ÝÑÉ][ÝË  ][ÝÑ  ][ÝË  ][ÝÑI][ÝË   ][ÝÑ][ÝË    ][ÝÑÉ][ÝË  ][ÝÑ  ][ÝË  ][ÝÑI][ÝË   ][ÝÑL ][ÝË  ][ÝÑLI][ÝË  ][ÝÑL][ÝË   ][ÝÕP][ÝË   ][ÝÔSÐÔQS][ÝË ][ÝÓSSÐÒÉ][ÝË    ][ÝÔUTÑI][ÝË   ][ÝÐÐTÓÐÒÉ][ÝË ][ÝÓSTQ   ][ÝË  ][ÝÓSTQI][ÝË    ][ÝÓSTQ][ÝË ][ÝÓSTQÉ][ÝË   ][ÝÓSTQ
    ][ÝË  ][ÝÓSTQ
I][ÝË ][ÝÓSTQ
][ÝË  ][ÝÓSTQ
É][ÝË    ][ÝÓSTQ   ][ÝË  ][ÝÓSTQI][ÝË    ][ÝÓSTQUS ][ÝË  ][ÝÓSTQQ  ][ÝË  ][ÝÓSTQÕP][ÝË  ][ÝÓSTQU][ÝË    ][ÝÓSTQÕ ][ÝË  ][ÝÓSTQST][ÝË   ][ÝÓS ][ÝË  ][ÝÔS ][ÝË  ][ÝÓÕ    ][ÝË  ][ÝÔÕ    ][ÝË  ][ÝÓÒQ   ][ÝË  ][ÝÔÒQ   ][Ý×B[ÈÒÔÜÙY
    ÌÍÜ×Ú^Ù^JNË  ÌÍÝÙH   ÌÎNÝÙÌ ÌÎNÊBNÈ ÌÍÚ^Ù^H]ÝHH[YHÙÛHÙHÙ^ËNÈÒ×ÒÙ^WÔÜÙYÚ[]YHÙ^HÈÝÜÙYHY]ËSØØ[  ÌÍØWÔHØ[
    ÌÍÝÙ    ][ÝÚ[ ][ÝË  ][ÝÑÙ]Þ[ÒÙ^TÝ]I][ÝË    ][ÝÚ[ ][ÝË  ÌÍÜ×Ú^Ù^JBRYÝÜ[]S
    ÌÍØWÔÌK
HH[]BT][[ÈÏOIÝ×Ò×ÒÙ^WÔÜÙY[ÈÒÐÙ]ÙÊ
BQÜ    ÌÍÚ]HÈ
PÝ[
    ÌÍÚÕÒÙ^SÝ
HHJBBRY
ÒÔÜÙY
    ÌÍÚÕÒÙ^SÝÉÌÍÚ]JJH[BBT]ÑÙ]X[Ù^TÝ[Ê   ÌÍÚÕÒÙ^SÝÉÌÍÚ]JBBQ[YS^T] ][ÝÉ][ÝÂ[[Â[ÈÑÙ]X[Ù^R^
    ÌÍÜ×ÒÙ^JBIÌÍÜ×ÒÙ^HHÝ[Õ    ÌÍÜ×ÒÙ^JBBTÝÚ]Ú    ÌÍÜ×ÒÙ^BBPØÙH   ][ÝÓSÕTÑLI][ÝÂBBT]    ][ÝÌI][ÝÂBPØÙH    ][ÝÓSÕTÑL][ÝÂBBT] ][ÝÌ][ÝÂBPØÙH ][ÝÓSÕTÑLÉ][ÝÂBBT]   ][ÝÌ
    ][ÝÂBPØÙH   ][ÝÓSÕTÑM   ][ÝÂBBT]  ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSÕTÑMI][ÝÂBBT]    ][ÝÌ
][ÝÂBPØÙH   ][ÝÐPÒÔÔPÑI][ÝÂBBT] ][ÝÌ  ][ÝÂBPØÙH   ][ÝÕP][ÝÂBBT]   ][ÝÌI][ÝÂBPØÙH    ][ÝÑST][ÝÂBBT]  ][ÝÌ  ][ÝÂBPØÙH   ][ÝÔÒQ   ][ÝÂBBT]  ][ÝÌL ][ÝÂBPØÙH   ][ÝÐÕ    ][ÝÂBBT]  ][ÝÌLI][ÝÂBPØÙH   ][ÝÐS ][ÝÂBBT]  ][ÝÌL][ÝÂBPØÙH    ][ÝÔUTÑI][ÝÂBBT]   ][ÝÌLÉ][ÝÂBPØÙH  ][ÝÐÐTÓÐÒÉ][ÝÂBBT] ][ÝÌM ][ÝÂBPØÙH   ][ÝÑTÐÉ][ÝÂBBT]   ][ÝÌP][ÝÂBPØÙH    ][ÝÔÔPÑI][ÝÂBBT]  ][ÝÌ  ][ÝÂBPØÙH   ][ÝÔÕT   ][ÝÂBBT]  ][ÝÌI][ÝÂBPØÙH    ][ÝÔÑ][ÝÂBBT]  ][ÝÌ][ÝÂBPØÙH ][ÝÑS ][ÝÂBBT]  ][ÝÌÉ][ÝÂBPØÙH   ][ÝÒÓQI][ÝÂBBT]    ][ÝÌ  ][ÝÂBPØÙH   ][ÝÓQ ][ÝÂBBT]  ][ÝÌI][ÝÂBPØÙH    ][ÝÕT ][ÝÂBBT]  ][ÝÌ][ÝÂBPØÙH ][ÝÔQÒ   ][ÝÂBBT]  ][ÝÌÉ][ÝÂBPØÙH   ][ÝÑÕÓ][ÝÂBBT]    ][ÝÌ  ][ÝÂBPØÙH   ][ÝÔSÐÔQS][ÝÂBBT] ][ÝÌÉ][ÝÂBPØÙH   ][ÝÒSÑT  ][ÝÂBBT]  ][ÝÌ  ][ÝÂBPØÙH   ][ÝÑSUI][ÝÂBBT] ][ÝÌI][ÝÂBPØÙH    ][ÝÓSTQ   ][ÝÂBBT]  ][ÝÌ
    ][ÝÂBPØÙH   ][ÝÓSTQI][ÝÂBBT]    ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSTQ][ÝÂBBT] ][ÝÌ
][ÝÂBPØÙH   ][ÝÓSTQÉ][ÝÂBBT]   ][ÝÌ
É][ÝÂBPØÙH ][ÝÓSTQ
    ][ÝÂBBT]  ][ÝÌ
    ][ÝÂBPØÙH   ][ÝÓSTQ
I][ÝÂBBT] ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSTQ
][ÝÂBBT]  ][ÝÌ
][ÝÂBPØÙH   ][ÝÓSTQ
É][ÝÂBBT]    ][ÝÌ
É][ÝÂBPØÙH ][ÝÓSTQ   ][ÝÂBBT]  ][ÝÌ
    ][ÝÂBPØÙH   ][ÝÓSTQI][ÝÂBBT]    ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSTQUS ][ÝÂBBT]  ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSTQQ  ][ÝÂBBT]  ][ÝÌ
][ÝÂBPØÙH   ][ÝÓSTQÕP][ÝÂBBT]  ][ÝÌ
    ][ÝÂBPØÙH   ][ÝÓSTQÕ ][ÝÂBBT]  ][ÝÌ
I][ÝÂBPØÙH  ][ÝÓSTQU][ÝÂBBT]    ][ÝÌ
][ÝÂBPØÙH   ][ÝÑI][ÝÂBBT]   ][ÝÌ
Ì  ][ÝÂBPØÙH   ][ÝÑ][ÝÂBBT]    ][ÝÌ
ÌI][ÝÂBPØÙH    ][ÝÑÉ][ÝÂBBT]  ][ÝÌ
Ì][ÝÂBPØÙH ][ÝÑ  ][ÝÂBBT]  ][ÝÌ
ÌÉ][ÝÂBPØÙH   ][ÝÑI][ÝÂBBT]   ][ÝÌ
Í  ][ÝÂBPØÙH   ][ÝÑ][ÝÂBBT]    ][ÝÌ
ÍI][ÝÂBPØÙH    ][ÝÑÉ][ÝÂBBT]  ][ÝÌ
Í][ÝÂBPØÙH ][ÝÑ  ][ÝÂBBT]  ][ÝÌ
ÍÉ][ÝÂBPØÙH   ][ÝÑI][ÝÂBBT]   ][ÝÌ
Π ][ÝÂBPØÙH   ][ÝÑL ][ÝÂBBT]  ][ÝÌ
ÎI][ÝÂBPØÙH    ][ÝÑLI][ÝÂBBT]  ][ÝÌ
ÐI][ÝÂBPØÙH    ][ÝÑL][ÝÂBBT]   ][ÝÌ
Ð][ÝÂBPØÙH ][ÝÓSSÐÒÉ][ÝÂBBT]    ][ÝÌL ][ÝÂBPØÙH   ][ÝÓÒQ   ][ÝÂBBT]  ][ÝÌL ][ÝÂBPØÙH   ][ÝÔÒQ   ][ÝÂBBT]  ][ÝÌLI][ÝÂBPØÙH   ][ÝÓÕ    ][ÝÂBBT]  ][ÝÌL][ÝÂBPØÙH    ][ÝÔÕ    ][ÝÂBBT]  ][ÝÌLÉ][ÝÂQ[ÝÚ]ÚBBBT]   ][ÝÌ  ][ÝÂ[[Â[ÈÑÙ]X[Ù^TÝ[Ê   ÌÍÚÒ^
BBTÝÚ]Ú  ÌÍÚÒ^BPØÙH    ][ÝÌI][ÝÂBBT]   ][ÝÓSÕTÑLI][ÝÂBPØÙH ][ÝÌ][ÝÂBBT]    ][ÝÓSÕTÑL][ÝÂBPØÙH  ][ÝÌ
    ][ÝÂBBT]  ][ÝÓSÕTÑLÉ][ÝÂBPØÙH    ][ÝÌ
I][ÝÂBBT] ][ÝÓSÕTÑM   ][ÝÂBPØÙH   ][ÝÌ
][ÝÂBBT]  ][ÝÓSÕTÑMI][ÝÂBPØÙH ][ÝÌ  ][ÝÂBBT]  ][ÝÐPÒÔÔPÑI][ÝÂBPØÙH  ][ÝÌI][ÝÂBBT]   ][ÝÕP][ÝÂBPØÙH    ][ÝÌ  ][ÝÂBBT]  ][ÝÑST][ÝÂBPØÙH   ][ÝÌL ][ÝÂBBT]  ][ÝÔÒQ   ][ÝÂBPØÙH   ][ÝÌLI][ÝÂBBT]  ][ÝÐÕ    ][ÝÂBPØÙH   ][ÝÌL][ÝÂBBT]   ][ÝÐS ][ÝÂBPØÙH   ][ÝÌLÉ][ÝÂBBT] ][ÝÔUTÑI][ÝÂBPØÙH    ][ÝÌM ][ÝÂBBT]  ][ÝÐÐTÓÐÒÉ][ÝÂBPØÙH  ][ÝÌP][ÝÂBBT]   ][ÝÑTÐÉ][ÝÂBPØÙH    ][ÝÌ  ][ÝÂBBT]  ][ÝÔÔPÑI][ÝÂBPØÙH   ][ÝÌI][ÝÂBBT]   ][ÝÔÕT   ][ÝÂBPØÙH   ][ÝÌ][ÝÂBBT]    ][ÝÔÑ][ÝÂBPØÙH   ][ÝÌÉ][ÝÂBBT]  ][ÝÑS ][ÝÂBPØÙH   ][ÝÌ  ][ÝÂBBT]  ][ÝÒÓQI][ÝÂBPØÙH ][ÝÌI][ÝÂBBT]   ][ÝÓQ ][ÝÂBPØÙH   ][ÝÌ][ÝÂBBT]    ][ÝÕT ][ÝÂBPØÙH   ][ÝÌÉ][ÝÂBBT]  ][ÝÔQÒ   ][ÝÂBPØÙH   ][ÝÌ  ][ÝÂBBT]  ][ÝÑÕÓ][ÝÂBPØÙH ][ÝÌÉ][ÝÂBBT]  ][ÝÔSÐÔQS][ÝÂBPØÙH  ][ÝÌ  ][ÝÂBBT]  ][ÝÒSÑT  ][ÝÂBPØÙH   ][ÝÌI][ÝÂBBT]   ][ÝÑSUI][ÝÂBPØÙH  ][ÝÌ
    ][ÝÂBBT]  ][ÝÓSTQ   ][ÝÂBPØÙH   ][ÝÌ
I][ÝÂBBT] ][ÝÓSTQI][ÝÂBPØÙH ][ÝÌ
][ÝÂBBT]  ][ÝÓSTQ][ÝÂBBBBPØÙH   ][ÝÌ
É][ÝÂBBT]    ][ÝÓSTQÉ][ÝÂBPØÙH    ][ÝÌ
    ][ÝÂBBT]  ][ÝÓSTQ
    ][ÝÂBPØÙH   ][ÝÌ
I][ÝÂBBT] ][ÝÓSTQ
I][ÝÂBPØÙH  ][ÝÌ
][ÝÂBBT]  ][ÝÓSTQ
][ÝÂBPØÙH   ][ÝÌ
É][ÝÂBBT]    ][ÝÓSTQ
É][ÝÂBPØÙH ][ÝÌ
    ][ÝÂBBT]  ][ÝÓSTQ   ][ÝÂBPØÙH   ][ÝÌ
I][ÝÂBBT] ][ÝÓSTQI][ÝÂBPØÙH ][ÝÌ
I][ÝÂBBT] ][ÝÓSTQUS ][ÝÂBPØÙH   ][ÝÌ
][ÝÂBBT]  ][ÝÓSTQQ  ][ÝÂBPØÙH   ][ÝÌ
    ][ÝÂBBT]  ][ÝÓSTQÕP][ÝÂBPØÙH   ][ÝÌ
I][ÝÂBBT] ][ÝÓSTQÕ ][ÝÂBPØÙH   ][ÝÌ
][ÝÂBBT]  ][ÝÓSTQU][ÝÂBPØÙH ][ÝÌ
Ì  ][ÝÂBBT]  ][ÝÑI][ÝÂBPØÙH    ][ÝÌ
ÌI][ÝÂBBT]   ][ÝÑ][ÝÂBPØÙH ][ÝÌ
Ì][ÝÂBBT]    ][ÝÑÉ][ÝÂBPØÙH   ][ÝÌ
ÌÉ][ÝÂBBT]  ][ÝÑ  ][ÝÂBPØÙH   ][ÝÌ
Í  ][ÝÂBBT]  ][ÝÑI][ÝÂBPØÙH    ][ÝÌ
ÍI][ÝÂBBT]   ][ÝÑ][ÝÂBPØÙH ][ÝÌ
Í][ÝÂBBT]    ][ÝÑÉ][ÝÂBPØÙH   ][ÝÌ
ÍÉ][ÝÂBBT]  ][ÝÑ  ][ÝÂBPØÙH   ][ÝÌ
Π ][ÝÂBBT]  ][ÝÑI][ÝÂBPØÙH    ][ÝÌ
ÎI][ÝÂBBT]   ][ÝÑL ][ÝÂBPØÙH   ][ÝÌ
ÐI][ÝÂBBT]   ][ÝÑLI][ÝÂBPØÙH   ][ÝÌ
Ð][ÝÂBBT]    ][ÝÑL][ÝÂBPØÙH    ][ÝÌL ][ÝÂBBT]  ][ÝÓSSÐÒÉ][ÝÂBPØÙH ][ÝÌL ][ÝÂBBT]  ][ÝÓÒQ   ][ÝÂBPØÙH   ][ÝÌLI][ÝÂBBT]  ][ÝÔÒQ   ][ÝÂBPØÙH   ][ÝÌL][ÝÂBBT]   ][ÝÓÕ    ][ÝÂBPØÙH   ][ÝÌLÉ][ÝÂBBT] ][ÝÔÕ    ][ÝÂQ[ÝÚ]ÚBT]  ][ÝÒSSQÑVI][ÝÂ[[Â[ÈÒÕ[YÒÝÙ^J    ÌÍÜ×ÒÙ^JBIÌÍÜ×ÒÙ^HHÝ[Õ    ÌÍÜ×ÒÙ^JBRY
ÑÙ]X[Ù^R^
    ÌÍÜ×ÒÙ^JH ÉÝÈ  ][ÝÌ  ][ÝÊH[BT]YBQ[YT][ÙB[[Â[ÈÒÕ[Y]LÒÝÙ^J   ÌÍÜ×ÒÙ^JBIÌÍÜ×ÒÙ^HHÝ[Õ    ÌÍÜ×ÒÙ^JBQÜ  ÌÍÚ]HÈ
PÝ[
    ÌÍÜ×Ð]LÒÙ^SÝ
HHJBBRY
    ÌÍÜ×ÒÙ^HOH    ÌÍÜ×Ð]LÒÙ^SÝÉÌÍÚ]JH[BBT]YBBQ[YS^T][ÙB[[Â[ÈÑÙ]ÝÙ^UJ   ÌÍÜ×ÒÙ^JBRY
ÒÕ[Y]LÒÝÙ^J    ÌÍÜ×ÒÙ^JJH[BT]BQ[ÙRY
ÒÕ[YÒÝÙ^J  ÌÍÜ×ÒÙ^JJH[BT]Q[YBT]Â[[Â

It has some incomplete stuff in there (Cyclic Rate/Fire Rates) and I'm in the process of expanding it some more (Building a child GUI for setting up hotkeys and what-not). Maybe you can learn from this code.

-CMR

Edited by CodeMaster Rapture
Link to comment
Share on other sites

Thanks alot, i'll be looking at it. Right now im making a clock/no recoil, so i'll post that, and get back to the aimbot.. Then add the clcok/norecoil.

[font="Verdana"]Valik:Get it straight - I'm not here to say please, I'm here to help - if my help's not appreciated then lotsa luck, gentlemen.[/font]

Link to comment
Share on other sites

Mis-phrasing on my part, just like you can't make no spread :)

[font="Verdana"]Valik:Get it straight - I'm not here to say please, I'm here to help - if my help's not appreciated then lotsa luck, gentlemen.[/font]

Link to comment
Share on other sites

$h_VKKeyList[95]= ["0x01","0x02","0x04","0x05","0x06","0x08","0x09","0x0D","0x10","0x11","0x12","0x13","0x14","0x1B","0x20","0x21","0x22","0x23","0x24","0x25","0x26","0x27","0x28","0x2C","0x2D","0x2E","0x60","0x61","0x62","0x63","0x64","0x65","0x66","0x67","0x68","0x69","0x6A","0x6B","0x6D","0x6E","0x6F","0x70","0x71","0x72","0x73","0x74","0x75","0x76","0x77","0x78","0x79","0x7A","0x7B","0x90","0xA0","0xA1","0xA2","0xA3"]

what is this?, anyone tell me where n how i can find it
Link to comment
Share on other sites

WARNING!

If you are caught by VAC (or VAC2) you are banned 1-2 months after you are caught!

[left][sub]We're trapped in the belly of this horrible machine.[/sub][sup]And the machine is bleeding to death...[/sup][sup][/sup][/left]

Link to comment
Share on other sites

*Rolls his eyes* Take a look at gamedeception, people are using the same API in some of there Direct3D hacks. There's no set time for when you'll recieve a "Ban" Status. I've been running it for the past few weeks, tweaking things out, you'd get pending. Also CodeMaster is using the same method, not blocked by PunkBuster, or Vac 2 as of the last update.

[font="Verdana"]Valik:Get it straight - I'm not here to say please, I'm here to help - if my help's not appreciated then lotsa luck, gentlemen.[/font]

Link to comment
Share on other sites

WARNING!

If you are caught by VAC (or VAC2) you are banned 1-2 months after you are caught!

lolz0r :)

vac is unable to find the exe...

only with crc check or smt...

or titlename but it would be stupid, just name it counter-strike, or give it no title :(

My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity
Link to comment
Share on other sites

lolz0r :D

vac is unable to find the exe...

only with crc check or smt...

or titlename but it would be stupid, just name it counter-strike, or give it no title :D

Or, as I do, randomize all internal and external strings. As far as Anti-Cheats go, any script/exe made with AutoIt2Exe would be rather easy to find, since there is only one compiler (currently) and it will use the same optimization method for every script (thus easily CRCed/Disassembled). VAC can find the exe, it just isn't trying too hard right now. Though, I think there was a lawsuit against Steam for some of the intrusive things VAC was doing, like reading directories/files outside teh Steam folders, and they had to tone down VAC2. I may be wrong, but I think they will not find the exe due to legal issues.

-CMR

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...