|
You last visited: Today at 23:31
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.
11/12/2015, 22:34
|
#211
|
elite*gold: 0 
Join Date: May 2010
Posts: 498
Received Thanks: 11,286
|
Quote:
Originally Posted by DJTinu
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
|
http://pastebin.com/jh39e0Ty
|
|
|
|
11/12/2015, 23:59
|
#212
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by DJTinu
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
|
Code:
#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.exe")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D")
$200HP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D64")
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
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
|
|
|
|
|
12/09/2015, 20:49
|
#213
|
elite*gold: 0
Join Date: Apr 2012
Posts: 35
Received Thanks: 5
|
Hey,
sorry to annoy you in case these have already been posted and i'm blind but could I have:
-Godmode
-Instant Respawn
-One Hit Kill
-Hitrange
normal and hacked values & adresses
and
-Inf. Ammo
AOB & andress if you have them
Thanks in advance, this tutorial is very clear and don't listen to the **** that say you're useless on this forum ! 
|
|
|
|
|
12/09/2015, 23:05
|
#214
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by Geroge301
Hey,
sorry to annoy you in case these have already been posted and i'm blind but could I have:
-Godmode
-Instant Respawn
-One Hit Kill
-Hitrange
normal and hacked values & adresses
and
-Inf. Ammo
AOB & andress if you have them
Thanks in advance, this tutorial is very clear and don't listen to the **** that say you're useless on this forum ! |
Code:
GodMode ==> 7205E9760B00008B4D90
Normal = 1994982770 Hacked = 1995018384
Instant Respawn ==> 043B48087209C745B001000000EB07C745B0000000000FB655B085D20F85D4
Normal = 138951428 Hacked = 138951424
One Hit ==> D945FC8BE55DC3CCCCCCCCCCCC558BEC51
Normal = 2348565977 Hacked = 2348565979
Hitrange ==> D945C48B4DF464890D
Normal = 2344895961 Hacked = 2344895963
Infinite ammo ==> 7605E9870000008B55E8
Normal = 2280195446 Hacked = 2280231056
|
|
|
|
|
12/10/2015, 07:13
|
#215
|
elite*gold: 0
Join Date: Apr 2012
Posts: 35
Received Thanks: 5
|
Man, you're awesome ! Thanks !
EDIT: I have an error, it says that "_MemoryScan" isn't a fucntion. I did write #include <NoMadMemory.au3> and I tried other scripts that had it only to end up on the sae error.
NoMadMemory.au3 is in the "Include" folder
EDIT2: I'm dumb, I forgot to add the function , now it works perfectly !
|
|
|
|
|
12/10/2015, 12:48
|
#216
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by Geroge301
Man, you're awesome ! Thanks !
EDIT: I have an error, it says that "_MemoryScan" isn't a fucntion. I did write #include <NoMadMemory.au3> and I tried other scripts that had it only to end up on the sae error.
NoMadMemory.au3 is in the "Include" folder
EDIT2: I'm dumb, I forgot to add the function , now it works perfectly !
|
If u have any errors, send me your source.
|
|
|
|
|
12/10/2015, 15:47
|
#217
|
elite*gold: 0
Join Date: Apr 2012
Posts: 35
Received Thanks: 5
|
Well it worked perfectly till I got in the game and tried to activate one of the hacks, nothing happened :
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4 League Trainer", 213, 94, 298, 168)
$Exit = GUICtrlCreateButton("[- Exit Trainer -]", 24, 64, 161, 25)
$IR = GUICtrlCreateCheckbox("Instant Respawn", 13, 24, 97, 17)
$God = GUICtrlCreateCheckbox("Godmode", 13, 4, 73, 17)
$OHKO = GUICtrlCreateCheckbox("One Hit K.O", 13, 44, 73, 17)
$HR = GUICtrlCreateCheckbox("Hitrange", 115, 4, 73, 17)
$InfSP = GUICtrlCreateCheckbox("Inf. SP", 115, 24, 73, 17)
$InfAmmo = GUICtrlCreateCheckbox("Inf. Ammo", 115, 44, 73, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$IR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"043B48087209C745B001000000EB07C745B000000000 0FB655B085D20F85D4")
$God = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$OHKO = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$HR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945C48B4DF464890D")
$InfSP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"605E9870000008B55E8")
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
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Exit
Exit
Case $IR
If GUICtrlRead($IR) = 1 Then
_memorywrite($IR,$open,"138951424","Long")
Else
_memorywrite($IR,$open,"138951428","Long")
EndIf
Case $God
If GUICtrlRead($God) = 1 Then
_memorywrite($God,$open,"1995018384","Long")
Else
_memorywrite($God,$open,"1994982770","Long")
EndIf
If GUICtrlRead($OHKO) = 1 Then
_memorywrite($OHKO,$open,"2348565979","Long")
Else
_memorywrite($OHKO,$open,"2348565977","Long")
EndIf
If GUICtrlRead($HR) = 1 Then
_memorywrite($HR,$open,"2344895961","Long")
Else
_memorywrite($HR,$open,"2344895963","Long")
EndIf
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSP,$open,"2348303835","Long")
Else
_memorywrite($InfSP,$open,"2348303833","Long")
EndIf
If GUICtrlRead($InfAmmo) = 1 Then
_memorywrite($InfAmmo,$open,"2280195446","Long")
Else
_memorywrite($InfAmmo,$open,"2280231056","Long")
EndIf
EndSwitch
WEnd
|
|
|
|
|
12/10/2015, 18:03
|
#218
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by Geroge301
Well it worked perfectly till I got in the game and tried to activate one of the hacks, nothing happened :
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4 League Trainer", 213, 94, 298, 168)
$Exit = GUICtrlCreateButton("[- Exit Trainer -]", 24, 64, 161, 25)
$IR = GUICtrlCreateCheckbox("Instant Respawn", 13, 24, 97, 17)
$God = GUICtrlCreateCheckbox("Godmode", 13, 4, 73, 17)
$OHKO = GUICtrlCreateCheckbox("One Hit K.O", 13, 44, 73, 17)
$HR = GUICtrlCreateCheckbox("Hitrange", 115, 4, 73, 17)
$InfSP = GUICtrlCreateCheckbox("Inf. SP", 115, 24, 73, 17)
$InfAmmo = GUICtrlCreateCheckbox("Inf. Ammo", 115, 44, 73, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$IR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"043B48087209C745B001000000EB07C745B000000000 0FB655B085D20F85D4")
$God = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$OHKO = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$HR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945C48B4DF464890D")
$InfSP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"605E9870000008B55E8")
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
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Exit
Exit
Case $IR
If GUICtrlRead($IR) = 1 Then
_memorywrite($IR,$open,"138951424","Long")
Else
_memorywrite($IR,$open,"138951428","Long")
EndIf
Case $God
If GUICtrlRead($God) = 1 Then
_memorywrite($God,$open,"1995018384","Long")
Else
_memorywrite($God,$open,"1994982770","Long")
EndIf
If GUICtrlRead($OHKO) = 1 Then
_memorywrite($OHKO,$open,"2348565979","Long")
Else
_memorywrite($OHKO,$open,"2348565977","Long")
EndIf
If GUICtrlRead($HR) = 1 Then
_memorywrite($HR,$open,"2344895961","Long")
Else
_memorywrite($HR,$open,"2344895963","Long")
EndIf
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSP,$open,"2348303835","Long")
Else
_memorywrite($InfSP,$open,"2348303833","Long")
EndIf
If GUICtrlRead($InfAmmo) = 1 Then
_memorywrite($InfAmmo,$open,"2280195446","Long")
Else
_memorywrite($InfAmmo,$open,"2280231056","Long")
EndIf
EndSwitch
WEnd
|
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <NoMadMemory.au3>
$IR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"043B48087209C745B001000000EB07C745B0000000000FB655B085D20F85D4")
$God = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"7205E9760B00008B4D90")
$OHKO = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945FC8BE55DC3CCCCCCCCCCCC558BEC51")
$HR = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945C48B4DF464890D")
$InfSP = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.exe")),"605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4 League Trainer", 213, 94, 298, 168)
$Exit = GUICtrlCreateButton("[- Exit Trainer -]", 24, 64, 161, 25)
$IR1 = GUICtrlCreateCheckbox("Instant Respawn", 13, 24, 97, 17)
$God1 = GUICtrlCreateCheckbox("Godmode", 13, 4, 73, 17)
$OHKO1 = GUICtrlCreateCheckbox("One Hit K.O", 13, 44, 73, 17)
$HR1 = GUICtrlCreateCheckbox("Hitrange", 115, 4, 73, 17)
$InfSP1 = GUICtrlCreateCheckbox("Inf. SP", 115, 24, 73, 17)
$InfAmmo1 = GUICtrlCreateCheckbox("Inf. Ammo", 115, 44, 73, 17)
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 $EXIT
EXIT
Case $IR1
If GUICtrlRead($IR1) = 1 Then
_memorywrite($IR,$open,"138951424","Long")
Else
_memorywrite($IR,$open,"138951428","Long")
EndIf
Case $God1
If GUICtrlRead($God1) = 1 Then
_memorywrite($God,$open,"1995018384","Long")
Else
_memorywrite($God,$open,"1994982770","Long")
EndIf
Case $OHKO1
If GUICtrlRead($OHKO1) = 1 Then
_memorywrite($OHKO,$open,"2348565979","Long")
Else
_memorywrite($OHKO,$open,"2348565977","Long")
EndIf
Case $HR1
If GUICtrlRead($HR) = 1 Then
_memorywrite($HR,$open,"2344895961","Long")
Else
_memorywrite($HR,$open,"2344895963","Long")
EndIf
Case $INFSP1
If GUICtrlRead($InfSP) = 1 Then
_memorywrite($InfSP,$open,"2348303835","Long")
Else
_memorywrite($InfSP,$open,"2348303833","Long")
EndIf
CASE $INFAMMO1
If GUICtrlRead($InfAmmo) = 1 Then
_memorywrite($InfAmmo,$open,"2280195446","Long")
Else
_memorywrite($InfAmmo,$open,"2280231056","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
1- you can't make the checkboxs name like the functions name so i have changed them
2- I have changed the aob functions place so it will search for them before the trainer start
|
|
|
|
|
12/10/2015, 18:58
|
#219
|
elite*gold: 0
Join Date: Apr 2012
Posts: 35
Received Thanks: 5
|
Oooooh so placing the codes differently did change something ! You're an awesome person, thanks !
|
|
|
|
|
01/05/2016, 10:53
|
#220
|
elite*gold: 0
Join Date: Dec 2015
Posts: 14
Received Thanks: 40
|
I would like you to make tutorial about aob trainer in vb.net
|
|
|
|
|
03/28/2016, 15:40
|
#221
|
elite*gold: 0
Join Date: Jan 2014
Posts: 139
Received Thanks: 36
|
Hey hamada do you still help
|
|
|
|
|
04/01/2016, 16:42
|
#222
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by Destroyer-*
Hey hamada do you still help
|
Ofc.
|
|
|
|
|
04/01/2016, 21:20
|
#223
|
elite*gold: 0
Join Date: Jan 2014
Posts: 139
Received Thanks: 36
|
Quote:
Originally Posted by HaMaDa..
Ofc.
|
Can you give your skype to me that I can tell my problem easily?
|
|
|
|
|
04/01/2016, 23:08
|
#224
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by Destroyer-*
Can you give your skype to me that I can tell my problem easily?
|
Iam not using skype anymore.
|
|
|
|
|
04/02/2016, 09:45
|
#225
|
elite*gold: 0
Join Date: Jan 2014
Posts: 139
Received Thanks: 36
|
Quote:
Originally Posted by HaMaDa..
Iam not using skype anymore.
|
Aw, okay then, Can I pm you?
|
|
|
|
 |
|
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 23:32.
|
|
![[Tutorial] How To Make Your (Ingame & AOB-Scan) trainer](https://www.elitepvpers.com/forum/iconimages/s4-league-hacks-bots-cheats-exploits/tutorial-how-make-your-ingame-aob-scan-trainer_ltr.gif){kind=small}
