|
You last visited: Today at 02:29
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/19/2015, 11:44
|
#61
|
elite*gold: 21 
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Quote:
Originally Posted by AnimeLover-MY♥
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$AnimeLover = GUICreate("AnimeLover", 598, 431, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\EMS\Desktop\AnimeLover2828-3150270_580_600.jpg", 224, 0, 393, 433)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Sp", 40, 16, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Sans")
GUICtrlSetColor(-1, 0x800080)
$Checkbox2 = GUICtrlCreateCheckbox("200HP", 40, 80, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Serif")
GUICtrlSetColor(-1, 0x800080)
$Checkbox3 = GUICtrlCreateCheckbox("Godmode", 40, 224, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 40, 152, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Button1 = GUICtrlCreateButton("Exit", 48, 312, 81, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
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,"2348565979","DB 45 F8 8B E5 5D C3 CC CC CC CC CC CC CC 55 8B EC 51 89 4D")
Else
_memorywrite($InfSp,$open,"2348565977","D9 45 F8 8B E5 5D C3 CC CC CC CC CC CC CC 55 8B EC 51 89 4D")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 2 Then
_memorywrite($200HP,$open,"2348565979","DB 45 FC 8B E5 5D C3 CC CC CC CC CC CC CC CC CC CC CC CC CC 55 8B EC 51 89 4D FC 8D 45 08 50")
Else
_memorywrite($200HP,$open,"2348565977","D9 45 FC 8B E5 5D C3 CC CC CC CC CC CC CC CC CC CC CC CC CC 55 8B EC 51 89 4D FC 8D 45 08 50")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 3 Then
_memorywrite($Godmode,$open,"3488190608","90 90 E9 ?? ?? ?? ?? 8B 4D 90 8B 11 8B 4D 90 8B 42 44 FF D0 0F B6 C8")
Else
_memorywrite($Godmode,$open,"3488155002","72 05 E9 ?? ?? ?? ?? 8B 4D 90 8B 11 8B 4D 90 8B 42 44 FF D0 0F B6 C8")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 4 Then
_memorywrite($InfAmmo,$open,"2833843572","90 90 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 08 7E 0B 8B 45 E8")
Else
_memorywrite($InfAmmo,$open,"2833843573","76 05 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 08 7E 0B 8B 45 E8")
EndIf
EndSwitch
WEnd
|
I only can make inf sp  nothing more x'D
And why u don't write "long" instead of writting 76 05 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 ...... ??
|
|
|
|
08/19/2015, 12:14
|
#62
|
elite*gold: 157
Join Date: Feb 2012
Posts: 1,590
Received Thanks: 603
|
Quote:
Originally Posted by #XxXAnimeXxX#
I only can make inf sp nothing more x'D
And why u don't write "long" instead of writting 76 05 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 ...... ?? |
already edit , but s4league crash xD !
|
|
|
|
|
08/19/2015, 12:29
|
#63
|
elite*gold: LOCKED
Join Date: Oct 2014
Posts: 1,258
Received Thanks: 12,469
|
Quote:
Originally Posted by AnimeLover-MY♥
already edit , but s4league crash xD !
|
Oh lord, your code is completely wrong.7
|
|
|
|
|
08/19/2015, 12:41
|
#64
|
elite*gold: 157
Join Date: Feb 2012
Posts: 1,590
Received Thanks: 603
|
Quote:
Originally Posted by [Beatrice]
Oh lord, your code is completely wrong.7
|
which part? can you please show me 
|
|
|
|
|
08/19/2015, 13:47
|
#65
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Quote:
Originally Posted by AnimeLover-MY♥
which part? can you please show me |
I just saw, why u always write Case Checkbox 1,2,3 ... ???
|
|
|
|
|
08/19/2015, 14:54
|
#66
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by AnimeLover-MY♥
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=
$AnimeLover = GUICreate("AnimeLover", 598, 431, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\EMS\Desktop\AnimeLover2828-3150270_580_600.jpg", 224, 0, 393, 433)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Sp", 40, 16, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Sans")
GUICtrlSetColor(-1, 0x800080)
$Checkbox2 = GUICtrlCreateCheckbox("200HP", 40, 80, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Serif")
GUICtrlSetColor(-1, 0x800080)
$Checkbox3 = GUICtrlCreateCheckbox("Godmode", 40, 224, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 40, 152, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Button1 = GUICtrlCreateButton("Exit", 48, 312, 81, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
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,"2348565979","DB 45 F8 8B E5 5D C3 CC CC CC CC CC CC CC 55 8B EC 51 89 4D")
Else
_memorywrite($InfSp,$open,"2348565977","D9 45 F8 8B E5 5D C3 CC CC CC CC CC CC CC 55 8B EC 51 89 4D")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 2 Then
_memorywrite($200HP,$open,"2348565979","DB 45 FC 8B E5 5D C3 CC CC CC CC CC CC CC CC CC CC CC CC CC 55 8B EC 51 89 4D FC 8D 45 08 50")
Else
_memorywrite($200HP,$open,"2348565977","D9 45 FC 8B E5 5D C3 CC CC CC CC CC CC CC CC CC CC CC CC CC 55 8B EC 51 89 4D FC 8D 45 08 50")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 3 Then
_memorywrite($Godmode,$open,"3488190608","90 90 E9 ?? ?? ?? ?? 8B 4D 90 8B 11 8B 4D 90 8B 42 44 FF D0 0F B6 C8")
Else
_memorywrite($Godmode,$open,"3488155002","72 05 E9 ?? ?? ?? ?? 8B 4D 90 8B 11 8B 4D 90 8B 42 44 FF D0 0F B6 C8")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 4 Then
_memorywrite($InfAmmo,$open,"2833843572","90 90 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 08 7E 0B 8B 45 E8")
Else
_memorywrite($InfAmmo,$open,"2833843573","76 05 E9 ?? ?? ?? ?? 8B 55 E8 3B 55 08 7E 0B 8B 45 E8")
EndIf
EndSwitch
WEnd
|
Here's the fix of your code
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$200hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558B EC51894DFC8D4508508B0D64")
$GodMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=
$AnimeLover = GUICreate("AnimeLover", 598, 431, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\EMS\Desktop\AnimeLover2 828-3150270_580_600.jpg", 224, 0, 393, 433)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Sp", 40, 16, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Sans")
GUICtrlSetColor(-1, 0x800080)
$Checkbox2 = GUICtrlCreateCheckbox("200HP", 40, 80, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Serif")
GUICtrlSetColor(-1, 0x800080)
$Checkbox3 = GUICtrlCreateCheckbox("Godmode", 40, 224, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 40, 152, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Button1 = GUICtrlCreateButton("Exit", 48, 312, 81, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
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) = 2 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 3 Then
_memorywrite($Godmode,$open,"1995018384","long")
Else
_memorywrite($Godmode,$open,"1994982770","long")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 4 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
EndSwitch
WEnd
; Here's the functions of the scans
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
Quote:
Originally Posted by #XxXAnimeXxX#
If u mean this....
Code:
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
#Region ### START Koda GUI section ### Form=c:\users\ivane\desktop\levani\noname\infsp,ammo...kxf
$Form1_1 = GUICreate("Form1", 615, 437, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 224, 248, 97, 41)
$Button1 = GUICtrlCreateButton("Exit", 176, 312, 225, 81)
$Pic1 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\NoName\0875b981b2b1953c9e2d2f5edd94eddb.gif", 472, 0, 140, 132)
$Checkbox2 = GUICtrlCreateCheckbox("Inf Ammo", 224, 208, 89, 41)
$Pic2 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\NoName\post_thanks.gif", 464, 384, 137, 41)
$Icon1 = GUICtrlCreateIcon("C:\Users\Ivane\Desktop\levani\NoName\S4 League - Launcher.exe", -1, 0, 0, 105, 97)
$Pic3 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\NoName\f87e879b248a273ecf645f51a45013c5.jpg", 152, 16, 209, 113)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Pid = ProcessExists("S4Client.exe")
$OPEN = _MemoryOpen ($Pid)
$InfSp = "D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D"
$InfSpMEMSCAN = _MEMSCAN($OPEN,$InfSp,0x0000000000000000,0x7fffffffffffffff)
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
If GUICtrlRead($Checkbox2) = 2 Then
_memorywrite($InfAmmo,$open,1005081993,"long")
Else
_memorywrite($InfAmmo,$open,1005081995,"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
|
Here's the fix of your code.
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=c:\users\ivane\desktop\levani\noname\infsp,am mo...kxf
$Form1_1 = GUICreate("Form1", 615, 437, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 224, 248, 97, 41)
$Button1 = GUICtrlCreateButton("Exit", 176, 312, 225, 81)
$Pic1 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\0875b981b2b1953c9e2d2f5edd94eddb.gif", 472, 0, 140, 132)
$Checkbox2 = GUICtrlCreateCheckbox("Inf Ammo", 224, 208, 89, 41)
$Pic2 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\post_thanks.gif", 464, 384, 137, 41)
$Icon1 = GUICtrlCreateIcon("C:\Users\Ivane\Desktop\levani\N oName\S4 League - Launcher.exe", -1, 0, 0, 105, 97)
$Pic3 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\f87e879b248a273ecf645f51a45013c5.jpg", 152, 16, 209, 113)
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($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","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/19/2015, 15:15
|
#67
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
Quote:
Originally Posted by HaMaDa..
Here's the fix of your code
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$200hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558B EC51894DFC8D4508508B0D64")
$GodMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=
$AnimeLover = GUICreate("AnimeLover", 598, 431, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\EMS\Desktop\AnimeLover2 828-3150270_580_600.jpg", 224, 0, 393, 433)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Sp", 40, 16, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Sans")
GUICtrlSetColor(-1, 0x800080)
$Checkbox2 = GUICtrlCreateCheckbox("200HP", 40, 80, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Serif")
GUICtrlSetColor(-1, 0x800080)
$Checkbox3 = GUICtrlCreateCheckbox("Godmode", 40, 224, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 40, 152, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Button1 = GUICtrlCreateButton("Exit", 48, 312, 81, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
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) = 2 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 3 Then
_memorywrite($Godmode,$open,"1995018384","long")
Else
_memorywrite($Godmode,$open,"1994982770","long")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 4 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
EndSwitch
WEnd
; Here's the functions of the scans
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
Here's the fix of your code.
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=c:\users\ivane\desktop\levani\noname\infsp,am mo...kxf
$Form1_1 = GUICreate("Form1", 615, 437, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 224, 248, 97, 41)
$Button1 = GUICtrlCreateButton("Exit", 176, 312, 225, 81)
$Pic1 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\0875b981b2b1953c9e2d2f5edd94eddb.gif", 472, 0, 140, 132)
$Checkbox2 = GUICtrlCreateCheckbox("Inf Ammo", 224, 208, 89, 41)
$Pic2 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\post_thanks.gif", 464, 384, 137, 41)
$Icon1 = GUICtrlCreateIcon("C:\Users\Ivane\Desktop\levani\N oName\S4 League - Launcher.exe", -1, 0, 0, 105, 97)
$Pic3 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\f87e879b248a273ecf645f51a45013c5.jpg", 152, 16, 209, 113)
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($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","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
|
thanks for this hard work, but how u know this? $InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8") ???? And when I start this hack as admin and select inf ammo/sp, it isn't working o.O
If GUICtrlRead($Checkbox1) = 1 Then
_memorywrite($InfSp,$open,"2348303835","long")
Else
_memorywrite($InfSp,$open,"2348303833","long")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 1 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
why always = 1 Then ? o.O
Edit: HURREEEEEEEEEEEEEEEEEEEEY!!!!!!!!!!!!!!!! WORKS! IT WORKS!!!!!!
HaMaDa, here is ur fault x'D (ProcessExists("S4Client.ex e")) I had to delete space ^^ And pls tell me about $InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")...How u know that?
HaMaDa, can u give me aob list ? ^^
Same fail is in AnimeLover-MY's code
|
|
|
|
|
08/19/2015, 17:12
|
#68
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by #XxXAnimeXxX#
thanks for this hard work, but how u know this? $InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8") ???? And when I start this hack as admin and select inf ammo/sp, it isn't working o.O
If GUICtrlRead($Checkbox1) = 1 Then
_memorywrite($InfSp,$open,"2348303835","long")
Else
_memorywrite($InfSp,$open,"2348303833","long")
EndIf
Case $Checkbox2
If GUICtrlRead($Checkbox2) = 1 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
why always = 1 Then ? o.O
Edit: HURREEEEEEEEEEEEEEEEEEEEY!!!!!!!!!!!!!!!! WORKS! IT WORKS!!!!!!
HaMaDa, here is ur fault x'D (ProcessExists("S4Client.ex e")) I had to delete space ^^ And pls tell me about $InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")...How u know that?
HaMaDa, can u give me aob list ? ^^
Same fail is in AnimeLover-MY's code
|
It works for me.
|
|
|
|
|
08/19/2015, 17:14
|
#69
|
elite*gold: 157
Join Date: Feb 2012
Posts: 1,590
Received Thanks: 603
|
Quote:
Originally Posted by HaMaDa..
Here's the fix of your code
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$200hp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558B EC51894DFC8D4508508B0D64")
$GodMode = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7205E9760B00008B4D90")
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=
$AnimeLover = GUICreate("AnimeLover", 598, 431, 192, 124)
$Pic1 = GUICtrlCreatePic("C:\Users\EMS\Desktop\AnimeLover2 828-3150270_580_600.jpg", 224, 0, 393, 433)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Sp", 40, 16, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Sans")
GUICtrlSetColor(-1, 0x800080)
$Checkbox2 = GUICtrlCreateCheckbox("200HP", 40, 80, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "DejaVu Serif")
GUICtrlSetColor(-1, 0x800080)
$Checkbox3 = GUICtrlCreateCheckbox("Godmode", 40, 224, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Checkbox4 = GUICtrlCreateCheckbox("Inf Ammo", 40, 152, 153, 57)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
$Button1 = GUICtrlCreateButton("Exit", 48, 312, 81, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Franklin Gothic Medium")
GUICtrlSetColor(-1, 0x800080)
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) = 2 Then
_memorywrite($200HP,$open,"2348565979","long")
Else
_memorywrite($200HP,$open,"2348565977","long")
EndIf
Case $Checkbox3
If GUICtrlRead($Checkbox3) = 3 Then
_memorywrite($Godmode,$open,"1995018384","long")
Else
_memorywrite($Godmode,$open,"1994982770","long")
EndIf
Case $Checkbox4
If GUICtrlRead($Checkbox4) = 4 Then
_memorywrite($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","long")
EndIf
EndSwitch
WEnd
; Here's the functions of the scans
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
Here's the fix of your code.
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NoMadMemory.au3>
$InfSp = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"D945F88BE55DC3CCCCCCCCCCCCCC558BEC51894D" )
$InfAmmo = _MemoryScan(_MemoryOpen(ProcessExists("S4Client.ex e")),"7605E9870000008B55E8")
#Region ### START Koda GUI section ### Form=c:\users\ivane\desktop\levani\noname\infsp,am mo...kxf
$Form1_1 = GUICreate("Form1", 615, 437, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("InfSp", 224, 248, 97, 41)
$Button1 = GUICtrlCreateButton("Exit", 176, 312, 225, 81)
$Pic1 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\0875b981b2b1953c9e2d2f5edd94eddb.gif", 472, 0, 140, 132)
$Checkbox2 = GUICtrlCreateCheckbox("Inf Ammo", 224, 208, 89, 41)
$Pic2 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\post_thanks.gif", 464, 384, 137, 41)
$Icon1 = GUICtrlCreateIcon("C:\Users\Ivane\Desktop\levani\N oName\S4 League - Launcher.exe", -1, 0, 0, 105, 97)
$Pic3 = GUICtrlCreatePic("C:\Users\Ivane\Desktop\levani\No Name\f87e879b248a273ecf645f51a45013c5.jpg", 152, 16, 209, 113)
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($InfAmmo,$open,"2280231056","long")
Else
_memorywrite($InfAmmo,$open,"2280195446","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
|
i want test the script but got error , Line 5
#include <NoMadMemory.au3>
error: error opening the file
|
|
|
|
|
08/19/2015, 17:18
|
#70
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by AnimeLover-MY♥
i want test the script but got error , Line 5
#include <NoMadMemory.au3>
error: error opening the file
|
Download nomadmemory and put it in Autoit/Include
|
|
|
|
|
08/19/2015, 17:24
|
#71
|
elite*gold: 157
Join Date: Feb 2012
Posts: 1,590
Received Thanks: 603
|
Quote:
Originally Posted by HaMaDa..
Download nomadmemory and put it in Autoit/Include
|
all copy nomadmemory and paste at autoit?
|
|
|
|
|
08/19/2015, 17:31
|
#72
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by AnimeLover-MY♥
all copy nomadmemory and paste at autoit?
|
No just download nomadmemory and copy the .au3 in include file.
|
|
|
|
|
08/19/2015, 18:19
|
#73
|
elite*gold: 157
Join Date: Feb 2012
Posts: 1,590
Received Thanks: 603
|
Quote:
Originally Posted by HaMaDa..
Download nomadmemory and put it in Autoit/Include
|
i tick the func , but nothing happen
|
|
|
|
|
08/19/2015, 18:32
|
#74
|
elite*gold: 21
Join Date: Jul 2015
Posts: 497
Received Thanks: 632
|
HaMaDa, can u tell me aob for 200 Hp, Mission Clear, Godmode??? ^^ Btw thanks very much for help
|
|
|
|
|
08/19/2015, 18:38
|
#75
|
elite*gold: 37
Join Date: May 2014
Posts: 1,835
Received Thanks: 9,833
|
Quote:
Originally Posted by #XxXAnimeXxX#
HaMaDa, can u tell me aob for 200 Hp, Mission Clear, Godmode??? ^^ Btw thanks very much for help
|
Code:
200 Hp =>> D945FC8BE55DC3CCCCCCCCCCCCCCCCCCCCCCCCCC558BEC51894DFC8D4508508B0D64
Mission =>> 8A80A80000008BE5
Godmode =>> 7205E9760B00008B4D90
|
|
|
|
 |
|
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 02:29.
|
|
![[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}
![[Beatrice]'s Avatar](https://www.elitepvpers.com/forum/customavatars/avatar6192974_57.gif){kind=avatar}
