closed
my problem please any one pro answer me
02/18/2014 23:21
REDAPRO#1
02/18/2014 23:25
mlukac89#2
Problem is here
and variables u use there $OPEN = _MemoryOpen ($PID)
and in code u use $open with small letters :D
so finaly you need to edit this
[code]
; $OPEN = _MemoryOpen ($PID)
$open = _MemoryOpen ($PID)
and all if statements where is = 1
replace with == $GUI_CHECKED
Code:
If GUICtrlRead($checkbox1) = 1
Code:
If GUICtrlRead($checkbox1) == $GUI_CHECKED ;run code endif
and in code u use $open with small letters :D
so finaly you need to edit this
[code]
; $OPEN = _MemoryOpen ($PID)
$open = _MemoryOpen ($PID)
and all if statements where is = 1
Code:
If GUICtrlRead($checkbox1) = 1 Then
_memorywrite("0x00527924", $open, "2348565979 ", "long")
EndIf
Code:
If GUICtrlRead($checkbox1) == $GUI_CHECKED Then
_memorywrite("0x00527924", $open, "2348565979 ", "long")
EndIf
02/19/2014 21:57
mlukac89#3
No change this too :D
; 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
; 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
02/19/2014 22:09
lolkop#4
lowercase == upercase in autoit...Quote:
_memorywrite to _MemoryWrite
example:
Code:
$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
02/19/2014 22:29
mlukac89#5
Ok here is all code copy and paste it it must work
Code:
#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:[Only registered and activated users can see links. Click Here To Register...]/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
but still is better to do it right way because if he want to learn some other language he will have problem with that :pQuote:
example:
Code:$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
02/19/2014 22:43
mlukac89#6
Did you try it ?
02/19/2014 22:57
mlukac89#7
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 ?
02/19/2014 23:55
mlukac89#8
Are u sure you have right adresses, if they are valid then this piece of code if wrong
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
Code:
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)
So delete that, first run game, then run script, choose options and press start then it will inject this in game
02/20/2014 00:11
mlukac89#9
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 !
Run game first, run script as admin, choose options, press Start hack !
Code:
#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:[Only registered and activated users can see links. Click Here To Register...]/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
02/20/2014 00:25
mlukac89#10
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
[Only registered and activated users can see links. Click Here To Register...]
Im out of this topic :mad:
I told you copy my code and it will work -> problem solved
[Only registered and activated users can see links. Click Here To Register...]
Im out of this topic :mad:
02/20/2014 00:38
lolkop#11
in order to find the problem, u'll have to use some errorhandling code. cut of the crap for testing purposes and start with a single lined script...
if there ain't no errors poping up, you've used the wrong adress to patch...
Code:
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