S4League Hack

#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>

$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
$200HP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"DB45FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCC")
$Random5kBypass = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"74136A016A7A8B0D9031D901E8EE6674FF32")
$1Hit = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$NoLaser = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"6A218D4D9851E8")
$HitRange = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945C48B4DF464890D")
$InstantRespawn = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"043B48087209C745B001000000EB07C745B000000 000 0FB655B085D20F85D4")
$Suicide = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"74136A016A7A8B0D9031D901E8EE6674FF32")
$SpeedHackRun = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"006A038D95C8")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 596, 344, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\Bosshaft\Pictures\untit led.jpg", 0, 0, 593, 337)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 0, 128, 105, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox2 = GUICtrlCreateCheckbox("InfAmmo", 0, 160, 105, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox3 = GUICtrlCreateCheckbox("200HP", 0, 96, 105, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Label1 = GUICtrlCreateLabel("S4 LEAGUE DESTROYER", 216, 16, 133, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Random5kBypass", 0, 192, 105, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox5 = GUICtrlCreateCheckbox("1Hit", 0, 224, 105, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox6 = GUICtrlCreateCheckbox("NoLaser", 408, 224, 185, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox7 = GUICtrlCreateCheckbox("SpeedHackRun", 408, 96, 185, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox8 = GUICtrlCreateCheckbox("Hit Range", 408, 128, 185, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox9 = GUICtrlCreateCheckbox("InstantRepsawn", 408, 160, 185, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
$Checkbox10 = GUICtrlCreateCheckbox("Suicide", 408, 192, 185, 25)
GUICtrlSetFont(-1, 15, 400, 0, "AR JULIAN")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
If GUICtrlRead($Checkbox1) = 1 Then
_memorywrite($InfSp,$open,"2348303835","long")
Else
_memorywrite($InfSp,$open,"2348303833","long")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 1 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
If GUICtrlRead($Checkbox3) = 1 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 1 Then
_memorywrite($Random5kBypass,$open,"23729131","lon g")
Else
_memorywrite($Random5kBypass,$open,"23729012","lon g")
EndIf
Case $Checkbox5
If GUICtrlRead($Checkbox5) = 1 Then
_memorywrite($1Hit,$open,"2348565979","long")
Else
_memorywrite($1Hit,$open,"2348565977","long")
EndIf
Case $Checkbox6
If GUICtrlRead($Checkbox6) = 1 Then
_memorywrite($NoLaser,$open,"1301115242","long")
Else
_memorywrite($NoLaser,$open,"1301094762","long")
EndIf
Case $Checkbox7
If GUICtrlRead($Checkbox7) = 1 Then
_memorywrite($HitRange,$open,"2344895963","long")
Else
_memorywrite($HitRange,$open,"2344895961","long")
EndIf
Case $Checkbox8
If GUICtrlRead($Checkbox8) = 1 Then
_memorywrite($InstantRespawn,$open,"138951424","lo ng")
Else
_memorywrite($InstantRespawn,$open,"138951428","lo ng")
EndIf
Case $Checkbox9
If GUICtrlRead($Checkbox9) = 1 Then
_memorywrite($Suicide,$open,"23729131","long")
Else
_memorywrite($Suicide,$open,"23729012","long")
EndIf
Case $Checkbox10
If GUICtrlRead($Checkbox10) = 1 Then
_memorywrite($SpeedHackRun,$open,"2366073344","lon g")
Else
_memorywrite($SpeedHackRun,$open,"2365811200","lon g")
EndIf
EndSwitch
WEnd

Func _MemoryScan($ah_Handle, $pattern, $after = False, $iv_addrStart = 0x00000000, $iv_addrEnd = 0X0FFFFFFF, $step = 51200)
If Not IsArray($ah_Handle) Then
SetError(1)
Return -1
EndIf
$pattern = StringRegExpReplace($pattern, "[^0123456789ABCDEFabcdef.]", "")
If StringLen($pattern) = 0 Then
SetError(2)
Return -2
EndIf
For $addr = $iv_addrStart To $iv_addrEnd Step $step - (StringLen($pattern) / 2)
StringRegExp(_MemoryRead($addr, $ah_Handle, "byte[" & $step & "]"), $pattern, 1, 2)
If Not @error Then
If $after Then
Return StringFormat("0x%.8X", $addr + ((@extended - 2) / 2))
Else
Return StringFormat("0x%.8X", $addr + ((@extended - StringLen($pattern) - 2) / 2))
EndIf
EndIf
Next
Return -3
EndFunc ;==>_MemoryScan