Balto Wallhack Private SRC

20 Lipca 2015

; <COMPILER: v1.0.48.5>
msgbox,!!!Before click F5.Make sure you in game menu - not on Vac server!!!
F5::
 
msgbox, WAIT PLEASE,IT HACKING
 
Process = csgo.exe
DllName = client.dll
 
Process, Exist, %Process%
PID = %ErrorLevel%
SetFormat, Integer, Hex
Base := GetDllBase(DllName, PID)
 
 
start:=base+0x1B0000
end:=base+0x2000000
 
 
 
 
loop {
start:=start+0x1
check:=ReadMemory2(start,"Counter-Strike: Global Offensive")
if (check==0x20b902f883)
{
msgbox, lal HACKED.
break
}
if (start>end)
{
msgbox,Something went wrong.Are you sure CSGO is on? O.o
ExitApp
}
}
 
 
 
wall:=start+0x2
 
WriteMemory( 0x01,wall,"Counter-Strike: Global Offensive")
 
 
 
 
 
 
 
 
 
 
 
ExitApp
 
 
 
 
 
 
 
GetDllBase(DllName, PID = 0)
{
   TH32CS_SNAPMODULE := 0x00000008
    INVALID_HANDLE_VALUE = -1
    VarSetCapacity(me32, 548, 0)
    NumPut(548, me32)
    snapMod := DllCall("CreateToolhelp32Snapshot", "Uint", TH32CS_SNAPMODULE
                                                 , "Uint", PID)
    If (snapMod = INVALID_HANDLE_VALUE) {
        Return 0
    }
    If (DllCall("Module32First", "Uint", snapMod, "Uint", &me32)){
        while(DllCall("Module32Next", "Uint", snapMod, "UInt", &me32)) {
            If !DllCall("lstrcmpi", "Str", DllName, "UInt", &me32 + 32) {
                DllCall("CloseHandle", "UInt", snapMod)
                Return NumGet(&me32 + 20)
            }
        }
    }
    DllCall("CloseHandle", "Uint", snapMod)
    Return 0
}
 
WriteMemory(WVALUE,WriteAddress,PROGRAM)
{
    winget, pid, PID, %PROGRAM%
    VarSetCapacity(Buffer, 1, 0)
    NumPut(WVALUE, Buffer, 0, "Int")
 
    ProcessHandle := DllCall("OpenProcess", "int", 2035711, "Int", 0, "UInt", PID)
    writeResult := DllCall("WriteProcessMemory"
     , "UInt", ProcessHandle
                                        , "UInt", WriteAddress
, "UInt", &Buffer
, "UInt", 1
, "UInt*", sizeWritten)
    DllCall("CloseHandle", "int", ProcessHandle)
 
 
return
}
 
 
ReadMemory(MADDRESS,PROGRAM)
{
winget, pid, PID, %PROGRAM%
 
VarSetCapacity(MVALUE,4,0)
ProcessHandle := DllCall("OpenProcess", "Int", 24, "Char", 0, "UInt", pid, "UInt")
DllCall("ReadProcessMemory","UInt",ProcessHandle,"UInt",MADDRESS,"Str",MVALUE,"UInt",4,"UInt *",0)
DllCall("CloseHandle", "int", ProcessHandle)
Loop 4
result += *(&MVALUE + A_Index-1) << 8*(A_Index-1)
 
return, result
}
 
 
ReadMemory2(MADDRESS,PROGRAM)
{
winget, pid, PID, %PROGRAM%
 
VarSetCapacity(MVALUE,8,0)
ProcessHandle := DllCall("OpenProcess", "Int", 24, "Char", 0, "UInt", pid, "UInt")
DllCall("ReadProcessMemory","UInt",ProcessHandle,"UInt",MADDRESS,"Str",MVALUE,"UInt",8,"UInt *",0)
DllCall("CloseHandle", "int", ProcessHandle)
Loop 8
result += *(&MVALUE + A_Index-1) << 8*(A_Index-1)
 
return, result
}