my problem please any one pro answer me

[REDAPRO]

closed

[mlukac89]

Problem is here

If GUICtrlRead($checkbox1) = 1

If GUICtrlRead($checkbox1) == $GUI_CHECKED
 ;run code
endif

and variables u use there $OPEN = _MemoryOpen ($PID)
and in code u use $open with small letters

so finaly you need to edit this

[code]

; $OPEN = _MemoryOpen ($PID)
$open = _MemoryOpen ($PID)

and all if statements where is = 1

If GUICtrlRead($checkbox1) = 1 Then
_memorywrite("0x00527924", $open, "2348565979 ", "long")
EndIf

replace with == $GUI_CHECKED

If GUICtrlRead($checkbox1) == $GUI_CHECKED Then
_memorywrite("0x00527924", $open, "2348565979 ", "long")
EndIf

[mlukac89]

No change this too

; Opt("TraySetState(2)",0) comment this line on top it gives error

then change _memorywrite to _MemoryWrite

then should work, because lower case letters you wrote is wrong and in NomadMemory is like this _MemoryWrite


U can see in your script you have function _Hack() and if you call it in
Case $Button1
_hack() ; will not work
_Hack() ; will work


Open NomadMemory.au3 and look names of functions

[lolkop]

Originally Posted by mlukac89

_memorywrite to _MemoryWrite

lowercase == upercase in autoit...

example:

$a = "i'm the content of $a"
MsgBox(0, "Content of $A", $A)
$A = "i'm the content of $A"
MsgBox(0, "Content of $a", $a)
A()

Func a()
	MsgBox(0, "Info", "content: a")
EndFunc

[mlukac89]

Ok here is all code copy and paste it it must work

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#include <Sound.au3>

WinSetState("REDAPRO","", @SW_HIDE)
Opt("TrayIconHide",1)

$Form1 = GUICreate("S4l Hack By REDAPRO", 598, 573, 211, 114)
$Checkbox1 = GUICtrlCreateCheckbox(" Speed Hack (walk) ", 216, 432, 209, 17)
$Checkbox2 = GUICtrlCreateCheckbox("0 gravity", 216, 456, 225, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Inf Sp ", 216, 408, 193, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Instant Respawn" , 216, 360, 169, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Wall jump Teleport " , 216, 384, 177, 17)

$Button1 = GUICtrlCreateButton("Start Hack !", 216, 488, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Exit", 0, 536, 153, 33, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Credits :By REDAPRO ", 344, 488, 209, 41)

$Label2 = GUICtrlCreateLabel("Fb:/Reda Gad", 160, 544, 204, 17)

$Pic1 = GUICtrlCreatePic("E:\s4 league\Autoit\My s4 League Hack\S4 league hack By REDAPRO\Dont Delete (2).jpg", 0, 0, 593, 289)
$Pic2 = GUICtrlCreatePic("E:\s4 league\Autoit\My s4 League Hack\S4 league hack By REDAPRO\Dont Delete (3).jpg", 0, 288, 209, 249)

$handle = _SoundOpen(@ScriptDir & "\Kalimba.mp3")
_SoundPlay($handle)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

MsgBox(4096, "Steps !", "1- Open hack .. 2- choose what you want ..3- click on hack ..4- open a working byppass ...5- opens s4 league ..6- Have Fun !", 0)

While 1
	
	$nMsg = GUIGetMsg()
	
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			_Hack() 
		Case $Button2
			Exit
	EndSwitch

WEnd


Func _Hack()
	
GUISetState(@SW_HIDE);
ToolTip("Start S4 League!",0,0)
$WAIT = ProcessWait("S4Client.exe")
$PID = ProcessExists("S4Client.exe")
ToolTip("S4 League Found !Thanks to REDAPRO"); up at the corner
Sleep(500)

$open = _MemoryOpen ($PID)

	If GUICtrlRead($checkbox1) == $GUI_CHECKED Then
		_MemoryWrite("0x005FA4F4", $open, "2240611178 ", "long")
	EndIf

	If GUICtrlRead($checkbox2) == $GUI_CHECKED Then
		_MemoryWrite("0x008E926E", $open, "1166868842 ", "long")
	EndIf

	If GUICtrlRead($checkbox3) == $GUI_CHECKED Then
		_MemoryWrite("0x0048C822", $open, "2348565979 ", "long")
	EndIf

	If GUICtrlRead($checkbox4) == $GUI_CHECKED Then
		_MemoryWrite("0x005F6FE3", $open, "989874827 ", "long")
	EndIf

	If GUICtrlRead($checkbox5) == $GUI_CHECKED Then
		_MemoryWrite("0x0048CD39", $open, "3641722331 ", "long")
	EndIf

EndFunc

Originally Posted by lolkop

lowercase == upercase in autoit...

example:

$a = "i'm the content of $a"
MsgBox(0, "Content of $A", $A)
$A = "i'm the content of $A"
MsgBox(0, "Content of $a", $a)
A()

Func a()
	MsgBox(0, "Info", "content: a")
EndFunc

but still is better to do it right way because if he want to learn some other language he will have problem with that

[mlukac89]

Did you try it ?

[mlukac89]

Lol, just compile it and run and try in game i dont have game to test but i posted you code above. I see you have 4 topic started about this, did you even try to run it or what ?

[mlukac89]

Are u sure you have right adresses, if they are valid then this piece of code if wrong

GUISetState(@SW_HIDE);
ToolTip("Start S4 League!",0,0)
$WAIT = ProcessWait("S4Client.exe")
$PID = ProcessExists("S4Client.exe") ; DONT DELETE THIS LINE
ToolTip("S4 League Found !Thanks to REDAPRO"); up at the corner
Sleep(500)

it wait untill process is started then write memory before is game loaded.

So delete that, first run game, then run script, choose options and press start then it will inject this in game

[mlukac89]

Here is script last time from me, look my code and make your same or copy paste

Run game first, run script as admin, choose options, press Start hack !

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#include <Sound.au3>

WinSetState("REDAPRO","", @SW_HIDE)
Opt("TrayIconHide",1)

$Form1 = GUICreate("S4l Hack By REDAPRO", 598, 573, 211, 114)
$Checkbox1 = GUICtrlCreateCheckbox(" Speed Hack (walk) ", 216, 432, 209, 17)
$Checkbox2 = GUICtrlCreateCheckbox("0 gravity", 216, 456, 225, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Inf Sp ", 216, 408, 193, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Instant Respawn" , 216, 360, 169, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Wall jump Teleport " , 216, 384, 177, 17)

$Button1 = GUICtrlCreateButton("Start Hack !", 216, 488, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Exit", 0, 536, 153, 33, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Credits :By REDAPRO ", 344, 488, 209, 41)

$Label2 = GUICtrlCreateLabel("Fb:/Reda Gad", 160, 544, 204, 17)

$Pic1 = GUICtrlCreatePic("E:\s4 league\Autoit\My s4 League Hack\S4 league hack By REDAPRO\Dont Delete (2).jpg", 0, 0, 593, 289)
$Pic2 = GUICtrlCreatePic("E:\s4 league\Autoit\My s4 League Hack\S4 league hack By REDAPRO\Dont Delete (3).jpg", 0, 288, 209, 249)

$handle = _SoundOpen(@ScriptDir & "\Kalimba.mp3")
_SoundPlay($handle)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

MsgBox(4096, "Steps !", "1- Open hack .. 2- choose what you want ..3- click on hack ..4- open a working byppass ...5- opens s4 league ..6- Have Fun !", 0)

While 1

	$nMsg = GUIGetMsg()

	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			If ProcessExists("S4Client.exe") Then
				_Hack()
			Else
				MsgBox(0, "Error", "Game is not running !")
			EndIf
		Case $Button2
			Exit
	EndSwitch

WEnd


Func _Hack()

;~ GUISetState(@SW_HIDE);
;~ ToolTip("Start S4 League!",0,0)
;~ $WAIT = ProcessWait("S4Client.exe")
;~ ToolTip("S4 League Found !Thanks to REDAPRO"); up at the corner
;~ Sleep(500)

$PID = ProcessExists("S4Client.exe")

$open = _MemoryOpen ($PID)

	If GUICtrlRead($checkbox1) == $GUI_CHECKED Then
		_MemoryWrite("0x005FA4F4", $open, "2240611178 ", "long")
	EndIf

	If GUICtrlRead($checkbox2) == $GUI_CHECKED Then
		_MemoryWrite("0x008E926E", $open, "1166868842 ", "long")
	EndIf

	If GUICtrlRead($checkbox3) == $GUI_CHECKED Then
		_MemoryWrite("0x0048C822", $open, "2348565979 ", "long")
	EndIf

	If GUICtrlRead($checkbox4) == $GUI_CHECKED Then
		_MemoryWrite("0x005F6FE3", $open, "989874827 ", "long")
	EndIf

	If GUICtrlRead($checkbox5) == $GUI_CHECKED Then
		_MemoryWrite("0x0048CD39", $open, "3641722331 ", "long")
	EndIf

EndFunc

[mlukac89]

First learn english, the learn to explain problem and use code tags and dont start 5 topics with same problem

I told you copy my code and it will work -> problem solved



Im out of this topic

[lolkop]

in order to find the problem, u'll have to use some errorhandling code. cut of the **** for testing purposes and start with a single lined script...

WriteProcessMemory(OpenProcess(ProcessExists("S4Client.exe")), 0x528679, 1593591259, "long")

Func OpenProcess($pid)
	Local $x = DllCall('kernel32.dll', 'int', 'OpenProcess', 'int', 0x1F0FFF, 'int', 1, 'int', $pid)
	Local $e = GetLastError()
	If $e<>0 Then MsgBox(16, "Error", "OpenProcess("&$pid&")"&@CRLF&"Error: "&$e)
	Return $x[0]
EndFunc
Func WriteProcessMemory($process_hwnd, $adress, $data, $type = 'dword')
	Local $struct= DllStructCreate($type)
	DllStructSetData($struct, 1, $data)
	DllCall('kernel32.dll', 'int', 'WriteProcessMemory', 'int', $process_hwnd, 'int', $adress, 'int', DllStructGetPtr($struct), 'int', DllStructGetSize($struct), 'int', 0)
	Local $e = GetLastError()
	If $e<>0 Then MsgBox(16, "Error", "WriteProcessMemory("&$process_hwnd&', 0x'&Hex($adress)&', '&$data&', '&$type&")"&@CRLF&"Error: "&$e)
EndFunc
Func GetLastError()
	Local $x = DllCall('kernel32.dll', 'int', 'GetLastError')
	Return $x[0]
EndFunc

if there ain't no errors poping up, you've used the wrong adress to patch...