Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$200hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D64")
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D")
$GodMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
$1Hit = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$HitRange = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945C48B4DF464890D")
$FastFire = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"894D808B55808B45808B4A04")
$MissionClear = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7514C745FC........8D4D08E8........E9........C745")
$WalkSpeed = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"016A038D85........50E8")
$Invisible = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"74108B55FC8B8A........E8........EB0E8B45FC8B88........E8........EB26")
$RunSpeed = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"006A038D95........52E8......8BC8E8........8945..8B45..8945..C745..........8B4D..E8........D95D..8B4D..4D")
$RandomShopAnimation = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"77578B55FCFF2495")
$FriendlyFire = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D46A018B........45F8")
$NoLaser = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"6A218D4D9851E8")
$ChannelNoLvl = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"75318B0D........894DDC8B15........8955D86A018B4DDCE8........50")
$GhostMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCC558BEC83EC30")
$WallShoot = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945EC51D91C248B4D08")
$InstantRespawn = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"043B48087209C745B0........EB07C745B0........0FB655B085D20F85........8B45CC8B108B4DCC")
$Suicide = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D70")
$WallsNoDelay = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"8B4D083B4818............8B15")
$000 = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D84")
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Crasher", 586, 374, 517, 281)
$Checkbox1 = GUICtrlCreateCheckbox("200 Hp", 8, 8, 57, 33)
$Checkbox2 = GUICtrlCreateCheckbox("Inf Sp", 8, 40, 49, 25)
$Checkbox3 = GUICtrlCreateCheckbox("God Mode", 8, 64, 73, 33)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 8, 128, 81, 25)
$Checkbox5 = GUICtrlCreateCheckbox("1 Hit", 8, 160, 49, 33)
$Checkbox6 = GUICtrlCreateCheckbox("Hit Range", 8, 200, 73, 33)
$Checkbox7 = GUICtrlCreateCheckbox("Fast Fire", 8, 232, 65, 33)
$Checkbox8 = GUICtrlCreateCheckbox("Mission Clear", 8, 264, 81, 33)
$Checkbox9 = GUICtrlCreateCheckbox("Walk Speed", 8, 296, 89, 33)
$Checkbox10 = GUICtrlCreateCheckbox("Invisible", 120, 16, 65, 33)
$Checkbox11 = GUICtrlCreateCheckbox("Run Speed", 120, 56, 73, 25)
$Checkbox12 = GUICtrlCreateCheckbox("Random Shop Animation", 120, 88, 137, 33)
$Checkbox13 = GUICtrlCreateCheckbox("Friendly Fire", 120, 120, 121, 41)
$Checkbox14 = GUICtrlCreateCheckbox("No Laser", 120, 160, 113, 33)
$Checkbox15 = GUICtrlCreateCheckbox("Channel No Lvl", 120, 200, 113, 25)
$Checkbox16 = GUICtrlCreateCheckbox("Ghost Mode", 120, 232, 81, 33)
$Checkbox17 = GUICtrlCreateCheckbox("Wall Shoot", 120, 264, 89, 33)
$Checkbox18 = GUICtrlCreateCheckbox("Instant Respawn", 120, 296, 105, 33)
$Checkbox19 = GUICtrlCreateCheckbox("Suicide", 264, 16, 105, 33)
$Checkbox20 = GUICtrlCreateCheckbox("Walls - No Delay", 264, 56, 105, 25)
$Checkbox21 = GUICtrlCreateCheckbox("000/000Hp", 264, 88, 105, 33)
$Button1 = GUICtrlCreateButton("Exit", 472, 320, 105, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Checkbox1
If GUICtrlRead($Checkbox1) = 1 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 1 Then
_memorywrite($InfSp,$open,"2348303835","long")
Else
_memorywrite($InfSp,$open,"2348303833","long")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 1 Then
_memorywrite($Godmode,$open,"2348565979","long")
Else
_memorywrite($Godmode,$open,"2348565977","long")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 1 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
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($HitRange,$open,"2344895963","long")
Else
_memorywrite($HitRange,$open,"2344895961","long")
EndIf
Case $Checkbox7
If GUICtrlRead($Checkbox7) = 1 Then
_memorywrite($FastFire,$open,"990333579","long")
Else
_memorywrite($FastFire,$open,"990136971","long")
EndIf
Case $Checkbox8
If GUICtrlRead($Checkbox8) = 1 Then
_memorywrite($MissionClear,$open,"2425356720","long")
Else
_memorywrite($MissionClear,$open,"11042954","long")
EndIf
Case $Checkbox9
If GUICtrlRead($Checkbox9) = 1 Then
_memorywrite($WalkSpeed,$open,"2366073344","long")
Else
_memorywrite($WalkSpeed,$open,"2365811200","long")
EndIf
Case $Checkbox10
If GUICtrlRead($Checkbox10) = 1 Then
_memorywrite($Invisible,$open,"1435209872","long")
Else
_memorywrite($Invisible,$open,"1435177076","long")
EndIf
Case $Checkbox11
If GUICtrlRead($Checkbox11) = 1 Then
_memorywrite($RunSpeed,$open,"2366073344","long")
Else
_memorywrite($RunSpeed,$open,"2365811200","long")
EndIf
Case $Checkbox12
If GUICtrlRead($Checkbox12) = 1 Then
_memorywrite($RandomShopAnimation,$open,"1435195371","long")
Else
_memorywrite($RandomShopAnimation,$open,"1435195255","long")
EndIf
Case $Checkbox13
If GUICtrlRead($Checkbox13) = 1 Then
_memorywrite($FriendlyFire,$open,"2332322552","long")
Else
_memorywrite($FriendlyFire,$open,"2332125944","long")
EndIf
Case $Checkbox14
If GUICtrlRead($Checkbox14) = 1 Then
_memorywrite($NoLaser,$open,"1301115242","long")
Else
_memorywrite($NoLaser,$open,"1301094762","long")
EndIf
Case $Checkbox15
If GUICtrlRead($Checkbox15) = 1 Then
_memorywrite($ChannelNoLvl,$open,"1300992144","long")
Else
_memorywrite($ChannelNoLvl,$open,"1300962932","long")
EndIf
Case $Checkbox16
If GUICtrlRead($Checkbox16) = 1 Then
_memorywrite($GhostMode,$open,"2348565979","long")
Else
_memorywrite($GhostMode,$open,"2348565977","long")
EndIf
Case $Checkbox17
If GUICtrlRead($Checkbox17) = 1 Then
_memorywrite($WallShoot,$open,"1374438875","long")
Else
_memorywrite($WallShoot,$open,"1374438873","long")
EndIf
Case $Checkbox18
If GUICtrlRead($Checkbox18) = 1 Then
_memorywrite($InstantRespawn,$open,"138951424","long")
Else
_memorywrite($InstantRespawn,$open,"138951428","long")
EndIf
Case $Checkbox19
If GUICtrlRead($Checkbox19) = 1 Then
_memorywrite($Suicide,$open,"2348565979","long")
Else
_memorywrite($Suicide,$open,"2348565977","long")
EndIf
Case $Checkbox20
If GUICtrlRead($Checkbox20) = 1 Then
_memorywrite($WallsNoDelay,$open,"989941131","long")
Else
_memorywrite($WallsNoDelay,$open,"990399883","long")
EndIf
Case $Checkbox21
If GUICtrlRead($Checkbox21) = 1 Then
_memorywrite($000Hp,$open,"2348565976","long")
Else
_memorywrite($000Hp,$open,"2348565977","long")
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