#NoTrayIcon
#include <NomadMemory.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <Misc.au3>
#include <Array.au3>
#include <GUIConstants.au3>
#include <WindowsConstants.au3>
#Include <Constants.au3>
#include <EditConstants.au3>
Opt("GuiOnEventMode", 1)
;hotkeys
HotKeySet("{ESC}","_exit")
HotKeySet("{F1}","consistency")
HotKeySet("{F2}","svcheats")
;variables
$consistency=1
$svcheats=1
$GuiWidth = 175
$GuiHeight = 300
$xPos = (@DesktopWidth - $GuiWidth) / 2
$yPos = (@DesktopHeight - $GuiHeight) / 2
;does the game exist?
If ProcessExists("hl2.exe") Then
$exist=1
else
$exist=0
EndIf
if $exist=0 then
MsgBox(0, "Error", "Please start CS:S first!!")
exit
EndIf
;sv_consistency bypass
Func consistency()
if $consistency=1 then
$ID=_MemoryOpen(ProcessExists("hl2.exe"))
$Address=0x0E87C32C
_MemoryWrite($Address, $ID, 5325234);5325234 pointer
_MemoryClose($ID)
GUICtrlCreateInput("Consistency Bypass On", 5, 270, 295, 20, $ES_READONLY, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xff0000)
ElseIf $consistency=0 Then
$ID=_MemoryOpen(ProcessExists("hl2.exe"))
$Address=0x0E87C32C
_MemoryWrite($Address, $ID, 5325234);5325234 pointer
_MemoryClose($ID)
GUICtrlCreateInput("Consistency Bypass Off", 5, 270, 295, 20, $ES_READONLY, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xff0000)
EndIf
If $consistency = 1 Then
$consistency = 0
Else
$consistency = 1
EndIf
EndFunc
;Replicated cvar bypass
Func svcheats()
if $svcheats=1 then
$ID=_MemoryOpen(ProcessExists("hl2.exe"))
$Address=0x20074C30
_MemoryWrite($Address, $ID, 1956724971)
_MemoryClose($ID)
GUICtrlCreateInput("Sv_cheats Bypass On", 5, 270, 295, 20, $ES_READONLY, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xff0000)
ElseIf $svcheats=0 Then
$ID=_MemoryOpen(ProcessExists("hl2.exe"))
$Address=0x20074C30
_MemoryWrite($Address, $ID, 1956724853)
_MemoryClose($ID)
GUICtrlCreateInput("Sv_cheats Bypass Off", 5, 270, 3295, 20, $ES_READONLY, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xff0000)
EndIf
If $svcheats = 1 Then
$svcheats = 0
Else
$svcheats = 1
EndIf
EndFunc
;exit
Func _exit()
Exit
EndFunc
;info
Func info()
MsgBox(0, "Autoit cs:s Hack Example", "Vac Proof as of 24/09/08" & @CRLF & "Coded By m-tek"& @CRLF & "************"& @CRLF & "Useage"& @CRLF & "**********"& @CRLF & "Start CS:S"& @CRLF & "Minimize CS:S"& @CRLF & "Start Hack"& @CRLF & "Choose features"& @CRLF & "Close Hack"& @CRLF & "Maximize CS:S"& @CRLF & ""& @CRLF & "Start Owning"& @CRLF & ""& @CRLF & "Get Vac Proof VIP Hacks"& @CRLF & "@ supex0.co.uk"& @CRLF & ""& @CRLF & "(c)2008"& @CRLF & ""& @CRLF & ""& @CRLF & ""& @CRLF & "")
EndFunc
;<<------lets make the gui
GUICreate("Gui", $GuiWidth, $GuiHeight, $xPos, $yPos, $WS_POPUP)
GUICtrlCreateLabel(" ", 0, 0, 175, 150, $ES_CENTER, $GUI_WS_EX_PARENTDRAG)
GUICtrlCreatePic("back.bmp", 0, 0, 175, 300)
GuiCtrlSetState(-1,$GUI_DISABLE)
GUISetBkColor(000000)
GUICtrlCreateInput("Please make a selection....", 5, 270, 295, 20, $ES_READONLY, $WS_EX_TRANSPARENT)
GUICtrlSetBkColor(-1, 0x000000)
GUICtrlSetColor(-1, 0xff0000)
GuiCtrlSetState(-1,$GUI_DISABLE)
$Button1 = GUICtrlCreateButton ( "Exit", 130, 240 ,40,20 )
GUICtrlSetOnEvent($Button1, "_exit")
GUISetState()
$Button2 = GUICtrlCreateButton ( "Consistency", 5, 210 ,100 ,20 )
GUICtrlSetOnEvent($Button2, "consistency")
GUISetState()
$Button3 = GUICtrlCreateButton ( "Cvar Bypass", 5, 240 ,100 ,20 )
GUICtrlSetOnEvent($Button3, "svcheats")
GUISetState()
$Button4 = GUICtrlCreateButton ( "Info", 130, 210 ,40,20 )
GUICtrlSetOnEvent($Button4, "info")
GUISetState()
;gui end------>>
While 1
Sleep(100)
wend