|
You last visited: Today at 04:07
Advertisement
[Tutorial] How To Make Your (Ingame & AOB-Scan) trainer
Discussion on [Tutorial] How To Make Your (Ingame & AOB-Scan) trainer within the S4 League Hacks, Bots, Cheats & Exploits forum part of the S4 League category.
08/22/2015, 15:24
|
#196
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Yes it should work.
|
|
|
08/22/2015, 15:29
|
#197
|
elite*gold: 0
Join Date: Jul 2010
Posts: 129
Received Thanks: 46
|
Thank you.
|
|
|
08/22/2015, 18:04
|
#198
|
elite*gold: 0
Join Date: Jun 2015
Posts: 79
Received Thanks: 30
|
HaMaDa how you give your trainer a good theme like your button and check box
|
|
|
08/22/2015, 18:09
|
#199
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Its skin crafter.
|
|
|
08/22/2015, 18:23
|
#200
|
elite*gold: 0
Join Date: Jun 2015
Posts: 79
Received Thanks: 30
|
i have more thing when i download it i download
SkinCrafter x86 for VS 2005,2008 (ActiveX, DLL, .NET)
or
SkinCrafter x64 for VS 2005,2008 (ActiveX, DLL, .NET)
or
SkinCrafter x86 for VS 2010, 2012 (ActiveX, DLL, .NET)
or
SkinCrafter x64 for VS 2010, 2012 (ActiveX, DLL, .NET)
or
SkinBuilder (without SkinCrafter library)
or
SkinCrafter Installer
or
Unicode NSIS SkinCrafter Plugin
or
ANSI NSIS SkinCrafter Plugin
or
Users Manual Guide (ActiveX) (.chm)
or
Users Manual Guide (.Net) (.chm)
or
SkinBuilder Manual (.chm)
this is all what of this all i have download
and any one can check my code is it has something wrong
Code:
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#AutoIt3Wrapper_Icon=..\lphawolf injector\lphawolf injector\3xhumed-Mega-Games-Pack-30-S4-League-1.ico
#AutoIt3Wrapper_Compile_Both=y
#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Res_Language=1033
#AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D")
$200hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D64")
$GodMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"7205E9760B00008B4D90")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"7605E9870000008B55E8")
$Mission = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"8A80A80000008BE5")
$InstantRespawn = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"043B48087209C745B001000000EB07C745B0000000000FB655B085D20F85D4")
$Onehitkill = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$IncreaseFire = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"8B4A043B48087209C745BC01000000EB07C745BC000000000FB655BC85D20F84A1")
$Hitrange = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945C48B4DF464890D")
$000Hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D84")
$Invisible = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"74108B55FC8B8AA0020000")
$Speedhackrun = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"006A038D95C8")
$Speedhackwalk = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"6A038D853CFEFFFF50E8")
$Channelnolvl = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"75318B0D........894DDC8B15........8955D86A018B4DDCE8........50")
$Suicide = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D70")
$NoLaser = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"6A218D4D9851E8")
$Conquest = _MemoryScan(_MemoryOpen(ProcessExists("S4client.exe")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D450850")
#Region ### START Koda GUI section ### Form=c:\users\new-soft-2015-\desktop\form1.kxf
$Form1_1 = GUICreate("Alphawolf Ingame ", 615, 516, 195, 124)
$Button1 = GUICtrlCreateButton("Exit", 224, 248, 75, 25)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 88, 24, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("200hp", 224, 24, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("GodMode", 352, 24, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("InfAmmo", 88, 56, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Mission", 224, 56, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("InstantRespawn", 352, 56, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("Onehitkill", 88, 80, 97, 17)
$Checkbox8 = GUICtrlCreateCheckbox("IncreaseFire", 224, 80, 97, 17)
$Checkbox9 = GUICtrlCreateCheckbox("Hitrange", 352, 80, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("000/000Hp", 88, 120, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Invisible", 224, 120, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Speedhackrun", 352, 120, 97, 17)
$Checkbox13 = GUICtrlCreateCheckbox("Speedhackwalk", 88, 152, 97, 17)
$Checkbox14 = GUICtrlCreateCheckbox("Channelnolvl", 224, 152, 97, 17)
$Checkbox15 = GUICtrlCreateCheckbox("Suicide", 352, 152, 97, 17)
$Checkbox16 = GUICtrlCreateCheckbox("NoLaser", 160, 192, 97, 17)
$Checkbox17 = GUICtrlCreateCheckbox("Conquest", 296, 193, 65, 15)
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 $Button1
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($200hp,$open,"2348565979","long")
Else
_memorywrite($200hp,$open,"2348565977","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($Mission,$open,"2425356720","long")
Else
_memorywrite($Mission,$open,"11042954","long")
EndIf
Case $Checkbox6
If GUICtrlRead($Checkbox6) = 1 Then
_memorywrite($InstantRespawn,$open,"138951424","long")
Else
_memorywrite($InstantRespawn,$open,"138951428","long")
EndIf
Case $Checkbox7
If GUICtrlRead($Checkbox7) = 1 Then
_memorywrite($Onehitkill,$open,"2348565979","long")
Else
_memorywrite($Onehitkill,$open,"2348565977","long")
EndIf
Case $Checkbox8
If GUICtrlRead($Checkbox8) = 1 Then
_memorywrite($IncreaseFire,$open,"990333579","long")
Else
_memorywrite($IncreaseFire,$open,"990136971","long")
EndIf
Case $Checkbox9
If GUICtrlRead($Checkbox9) = 1 Then
_memorywrite($Hitrange,$open,"2344895963","long")
Else
_memorywrite($Hitrange,$open,"2344895961","long")
EndIf
Case $Checkbox10
If GUICtrlRead($Checkbox10) = 1 Then
_memorywrite($000Hp,$open,"2348565976","long")
Else
_memorywrite($000Hp,$open,"2348565977","long")
EndIf
Case $Checkbox11
If GUICtrlRead($Checkbox11) = 1 Then
_memorywrite($Invisible,$open,"1435209872","long")
Else
_memorywrite($Invisible,$open,"1435177076","long")
EndIf
Case $Checkbox12
If GUICtrlRead($Checkbox12) = 1 Then
_memorywrite($Speedhackrun,$open,"2366073344","long")
Else
_memorywrite($Speedhackrun,$open,"2365811200","long")
EndIf
Case $Checkbox13
If GUICtrlRead($Checkbox13) = 1 Then
_memorywrite($Speedhackwalk,$open,"2240612202","long")
Else
_memorywrite($Speedhackwalk,$open,"2240611178","long")
EndIf
Case $Checkbox14
If GUICtrlRead($Checkbox14) = 1 Then
_memorywrite($Channelnolvl,$open,"1300992144","long")
Else
_memorywrite($Channelnolvl,$open,"1300962932","long")
EndIf
Case $Checkbox15
If GUICtrlRead($Checkbox15) = 1 Then
_memorywrite($Suicide,$open,"2348565983","long")
Else
_memorywrite($Suicide,$open,"2348565977","long")
EndIf
Case $Checkbox16
If GUICtrlRead($Checkbox16) = 1 Then
_memorywrite($NoLaser,$open,"1301115242","long")
Else
_memorywrite($NoLaser,$open,"1301094762","long")
EndIf
Case $Checkbox17
If GUICtrlRead($Checkbox17) = 1 Then
_memorywrite($Conquest,$open,"2348565970","long")
Else
_memorywrite($Conquest,$open,"990136971","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
|
|
|
08/30/2015, 10:12
|
#201
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
`.` I want to know how to make name changer and injector ^^ HaMaDa can u teach me? ^^
|
|
|
09/08/2015, 21:39
|
#202
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Aaaaaaaaaaaaaaa help me Hamada pls ((((
What is wrong with my source code?
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
|
|
|
09/09/2015, 00:07
|
#203
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by #XxXAnimeXxX#
Aaaaaaaaaaaaaaa help me Hamada pls ((((
What is wrong with my source code?
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
|
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$N = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($N)
$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")
$000Hp = _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
You also can make it _MemoryWrite($aaa,ProcessExists("S4Client.exe"),.. .)
Code:
_memorywrite($200HP,ProcessExists("S4Client.exe"),"2348565979","long")
|
|
|
09/09/2015, 06:33
|
#204
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Quote:
Originally Posted by HaMaDa..
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$N = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($N)
$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")
$000Hp = _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
You also can make it _MemoryWrite($aaa,ProcessExists("S4Client.exe"),.. .)
Code:
_memorywrite($200HP,ProcessExists("S4Client.exe"),"2348565979","long")
|
Thanks for ur hard work 
But for some reasons when I use 1 hit kill/hit range/fast fire and others, s4 crashes. 200 Hp and Inf sp works. And for me S4client.ex e isn't working, but S4client.exe works.
P.S. how to make name changer & f5 bot? o.o
|
|
|
09/09/2015, 15:54
|
#205
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by #XxXAnimeXxX#
Thanks for ur hard work 
But for some reasons when I use 1 hit kill/hit range/fast fire and others, s4 crashes. 200 Hp and Inf sp works. And for me S4client.ex e isn't working, but S4client.exe works.
P.S. how to make name changer & f5 bot? o.o
|
1. Maybe the values not working.
2. For the name changer i can't say here
3. F5Bot :
Code:
EndSwitch
Sleep(2000)
Send("{F5}")
Wend
|
|
|
09/09/2015, 21:07
|
#206
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Quote:
Originally Posted by HaMaDa..
1. Maybe the values not working.
2. For the name changer i can't say here
3. F5Bot :
Code:
EndSwitch
Sleep(2000)
Send("{F5}")
Wend
|
Thanks, eh it's too sad that hack isn't working )
And how to make f5 bot? didn't understand ... I must write
Sleep(2000)
Send("{F5}")
between EndSwitch and Wend? Must I change something in koma?
|
|
|
11/11/2015, 19:45
|
#207
|
elite*gold: 0
Join Date: Sep 2010
Posts: 6
Received Thanks: 1
|
Bitte antworte schnell, mein problem:
Wenn ich auf das X oben recht drücke schließt sich der hack nicht. Keine ahnung woran es liegt.
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Hack = GUICreate("Hack", 196, 85, 370, 244)
GUISetBkColor(0x3399FF)
$InfSP = GUICtrlCreateCheckbox("InfSP", 8, 8, 89, 17)
$GodMode = GUICtrlCreateCheckbox("GodMode", 105, 8, 79, 17)
$FastFire = GUICtrlCreateCheckbox("FastFIre", 8, 32, 81, 17)
$OneHit = GUICtrlCreateCheckbox("OneHit", 104, 32, 73, 17)
$Test = GUICtrlCreateCheckbox("Test", 72, 56, 65, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$InfSp = "D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D"
$InfSpMEMSCAN = _MEMSCAN($OPEN,$InfSp,0x0000000000000000,0x7ffffff fffffffff)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $InfSP
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSpMEMSCAN,$open,2348303835,"long" )
Else
_memorywrite($InfSpMEMSCAN,$open,2348303833,"long" )
EndIf
EndSwitch
WEnd
;_________________________________________________ _____________________________________
Func _MEMSCAN($AH_HANDLE, $AB_ARRAY, $BASE_ADD = 0x00400000, $STOP_ADD = 0xFFFFFFFF)
For $ADD = $BASE_ADD To $STOP_ADD Step 51200 - (StringLen($AB_ARRAY) / 2)
StringRegExp(_MREAD($ADD, $AH_HANDLE, "byte[" & 51200 & "]"), $AB_ARRAY, 1, 2)
If Not @Error Then
Return StringFormat("0x%.8X", $ADD + ((@extended - StringLen($AB_ARRAY) - 2) / 2))
EndIf
Next
EndFunc
Func _MOPEN($IV_PID, $IV_DESIREDACCESS = 2035711, $IV_INHERITHANDLE = 1)
If Not ProcessExists($IV_PID) Then
SetError(1)
Return 0
EndIf
Local $AH_HANDLE[2] = [DllOpen("kernel32.dll")]
If @error Then
SetError(2)
Return 0
EndIf
Local $AV_OPENPROCESS = DllCall($AH_HANDLE[0], "int", "OpenProcess", "int", $IV_DESIREDACCESS, "int", $IV_INHERITHANDLE, "int", $IV_PID)
If @error Then
DllClose($AH_HANDLE[0])
SetError(3)
Return 0
EndIf
$AH_HANDLE[1] = $AV_OPENPROCESS[0]
Return $AH_HANDLE
EndFunc
Func _MREAD($IV_ADDRESS, $AH_HANDLE, $SV_TYPE = "dword")
If Not IsArray($AH_HANDLE) Then
SetError(1)
Return 0
EndIf
Local $V_BUFFER = DllStructCreate($SV_TYPE)
If @error Then
SetError(@error + 1)
Return 0
EndIf
DllCall($AH_HANDLE[0], "int", "ReadProcessMemory", "int", $AH_HANDLE[1], "int", $IV_ADDRESS, "ptr", DllStructGetPtr($V_BUFFER), "int", DllStructGetSize($V_BUFFER), "int", "")
If Not @error Then
Local $V_VALUE = DllStructGetData($V_BUFFER, 1)
Return $V_VALUE
Else
SetError(6)
Return 0
EndIf
EndFunc
Func _MCLOSE($AH_HANDLE)
If Not IsArray($AH_HANDLE) Then
SetError(1)
Return 0
EndIf
DllCall($AH_HANDLE[0], "int", "CloseHandle", "int", $AH_HANDLE[1])
If Not @error Then
DllClose($AH_HANDLE[0])
Return 1
Else
DllClose($AH_HANDLE[0])
SetError(2)
Return 0
EndIf
EndFunc
|
|
|
11/11/2015, 19:59
|
#208
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by DJTinu
Bitte antworte schnell, mein problem:
Wenn ich auf das X oben recht drücke schließt sich der hack nicht. Keine ahnung woran es liegt.
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Hack = GUICreate("Hack", 196, 85, 370, 244)
GUISetBkColor(0x3399FF)
$InfSP = GUICtrlCreateCheckbox("InfSP", 8, 8, 89, 17)
$GodMode = GUICtrlCreateCheckbox("GodMode", 105, 8, 79, 17)
$FastFire = GUICtrlCreateCheckbox("FastFIre", 8, 32, 81, 17)
$OneHit = GUICtrlCreateCheckbox("OneHit", 104, 32, 73, 17)
$Test = GUICtrlCreateCheckbox("Test", 72, 56, 65, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$InfSp = "D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D"
$InfSpMEMSCAN = _MEMSCAN($OPEN,$InfSp,0x0000000000000000,0x7ffffff fffffffff)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $InfSP
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSpMEMSCAN,$open,2348303835,"long" )
Else
_memorywrite($InfSpMEMSCAN,$open,2348303833,"long" )
EndIf
EndSwitch
WEnd
;_________________________________________________ _____________________________________
Func _MEMSCAN($AH_HANDLE, $AB_ARRAY, $BASE_ADD = 0x00400000, $STOP_ADD = 0xFFFFFFFF)
For $ADD = $BASE_ADD To $STOP_ADD Step 51200 - (StringLen($AB_ARRAY) / 2)
StringRegExp(_MREAD($ADD, $AH_HANDLE, "byte[" & 51200 & "]"), $AB_ARRAY, 1, 2)
If Not @Error Then
Return StringFormat("0x%.8X", $ADD + ((@extended - StringLen($AB_ARRAY) - 2) / 2))
EndIf
Next
EndFunc
Func _MOPEN($IV_PID, $IV_DESIREDACCESS = 2035711, $IV_INHERITHANDLE = 1)
If Not ProcessExists($IV_PID) Then
SetError(1)
Return 0
EndIf
Local $AH_HANDLE[2] = [DllOpen("kernel32.dll")]
If @error Then
SetError(2)
Return 0
EndIf
Local $AV_OPENPROCESS = DllCall($AH_HANDLE[0], "int", "OpenProcess", "int", $IV_DESIREDACCESS, "int", $IV_INHERITHANDLE, "int", $IV_PID)
If @error Then
DllClose($AH_HANDLE[0])
SetError(3)
Return 0
EndIf
$AH_HANDLE[1] = $AV_OPENPROCESS[0]
Return $AH_HANDLE
EndFunc
Func _MREAD($IV_ADDRESS, $AH_HANDLE, $SV_TYPE = "dword")
If Not IsArray($AH_HANDLE) Then
SetError(1)
Return 0
EndIf
Local $V_BUFFER = DllStructCreate($SV_TYPE)
If @error Then
SetError(@error + 1)
Return 0
EndIf
DllCall($AH_HANDLE[0], "int", "ReadProcessMemory", "int", $AH_HANDLE[1], "int", $IV_ADDRESS, "ptr", DllStructGetPtr($V_BUFFER), "int", DllStructGetSize($V_BUFFER), "int", "")
If Not @error Then
Local $V_VALUE = DllStructGetData($V_BUFFER, 1)
Return $V_VALUE
Else
SetError(6)
Return 0
EndIf
EndFunc
Func _MCLOSE($AH_HANDLE)
If Not IsArray($AH_HANDLE) Then
SetError(1)
Return 0
EndIf
DllCall($AH_HANDLE[0], "int", "CloseHandle", "int", $AH_HANDLE[1])
If Not @error Then
DllClose($AH_HANDLE[0])
Return 1
Else
DllClose($AH_HANDLE[0])
SetError(2)
Return 0
EndIf
EndFunc
|
You're using a badly format to scan aob so use this way:
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Hack = GUICreate("Hack", 196, 85, 370, 244)
GUISetBkColor(0x3399FF)
$InfSP = GUICtrlCreateCheckbox("InfSP", 8, 8, 89, 17)
$GodMode = GUICtrlCreateCheckbox("GodMode", 105, 8, 79, 17)
$FastFire = GUICtrlCreateCheckbox("FastFIre", 8, 32, 81, 17)
$OneHit = GUICtrlCreateCheckbox("OneHit", 104, 32, 73, 17)
$Test = GUICtrlCreateCheckbox("Test", 72, 56, 65, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $InfSP
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSp,$open,2348303835,"long" )
Else
_memorywrite($InfSp,$open,2348303833,"long" )
EndIf
EndSwitch
WEnd
;_________________________________________________ _____________________________________
Func _MemoryScan($ah_Handle, $pattern, $after = False, $iv_addrStart = 0x00000000, $iv_addrEnd = 0X0FFFFFFF, $step = 51200) ; omg dis iz amazing beatrice pr0
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
|
|
|
11/11/2015, 20:01
|
#209
|
elite*gold: 0
Join Date: Sep 2010
Posts: 6
Received Thanks: 1
|
Thank you so much <3
|
|
|
11/12/2015, 21:19
|
#210
|
elite*gold: 0
Join Date: Sep 2010
Posts: 6
Received Thanks: 1
|
Sorry for this little spam but its not working pls help :/
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Hack = GUICreate("Smoke1337", 564, 268, 206, 130)
GUISetIcon("C:\Users\Steven\Desktop\S4 League hack test\Hack.ico", -1)
GUISetBkColor(0x3399FF)
$InfSP = GUICtrlCreateCheckbox("InfSP", 24, 56, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$Walls = GUICtrlCreateCheckbox("InfWalls", 24, 96, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$OneHit = GUICtrlCreateCheckbox("1Hit", 24, 136, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$Invisible = GUICtrlCreateCheckbox("Invisible", 24, 176, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$MaxHP = GUICtrlCreateCheckbox("200HP", 168, 56, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$NoLaser = GUICtrlCreateCheckbox("NoLaser", 168, 104, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$WSpeed = GUICtrlCreateCheckbox("WalkSpeed", 168, 136, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$Suicide = GUICtrlCreateCheckbox("Suicide", 168, 176, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$NoHP = GUICtrlCreateCheckbox("000/000HP", 312, 56, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$InfAmmo = GUICtrlCreateCheckbox("InfAmmo", 312, 96, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$RSpeed = GUICtrlCreateCheckbox("Speed", 312, 136, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$HitRange = GUICtrlCreateCheckbox("HitRange", 312, 176, 137, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Palatino Linotype")
GUICtrlSetColor(-1, 0xFF0000)
$Exit = GUICtrlCreateButton("Exit", 464, 176, 81, 73)
GUICtrlSetFont(-1, 16, 400, 0, "Impact")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen($Pid)
$InfSP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$200HP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558B EC51894DFC8D4508508B0D64")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
$nMsg = GUIGetMsg()
Case $Exit
Exit
Case $InfSP
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSP,$open,"2348303835","long")
Else
_memorywrite($InfSP,$open,"2348303833","long")
EndIf
Case $MaxHP
If GUICtrlRead($MaxHP) = 1 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
#cs
No Mad memory Text:
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
#ce
|
|
|
 |
|
Similar Threads
|
[Tutorial] Making an Ingame Trainer Using Visual Basic
09/26/2015 - S4 League Hacks, Bots, Cheats & Exploits - 43 Replies
Tutorial ]
https://www.youtube.com/watch?v=dTFO22tyFAA
First :
Designing Section :
First you should open "Visual Studio" then New Project Then new windows Form.
|
S4League Ingame-Trainer 2015 [by HaMaDa..] {Tutorial}
04/05/2015 - S4 League Hacks, Bots, Cheats & Exploits - 16 Replies
#Closed
Deleted complete Tutorial.
Grüße ._.
|
[Tutorial] How To Make Ingame Hack In VB.Net
12/11/2014 - S4 League Hacks, Bots, Cheats & Exploits - 26 Replies
http://i.epvpimg.com/ePJve.jpg
ADVERTISE!!!! ALL SPAMMERS OR WHINERS EVERYONE IS ENTITLED LEARN!!!!
Me Finish programming, so I have a free gift for all epvpers as programming so here is a tutorial to make a simple Hack ingame
1º First Need Next Programs :
Visual Studio 2013 Update 2 Download Here : Visual Studio 2013 Update 2
|
[Tutorial]How to make a Trainer
08/23/2014 - S4 League Hacks, Bots, Cheats & Exploits - 79 Replies
#Close!
Hello guys,
I've made a tutorial before about how to create a trainer for s4 league, but it wasn't good explained, this tutorial is better I think, I've added more stuff, and explained more, I hope you like this one, and if there is mistakes just type in and do not flame since it is to big and I may have mistakes,
Chapters Info]
Creating a simple Design.
Improving our design and adding Functions of the trainer.
Adding a Picture and Audio.
|
All times are GMT +1. The time now is 04:08.
|
|