Aide AutoIt

    Publicités

Users Who Are Viewing This Thread (Total: 0, Members: 0, Guests: 0)

Status
Not open for further replies.
Ace²

Ace²

Membre
Aug 14, 2012
55
0
211
Bonjour/Bonsoir​

Je voulais me lancer dans la programmation de cheat, j'ai commence avec S4 league.
Avec ce Tutoriel : http://www.cheat-gam3.com/1-cours-pour-debutant/tuto-cree-cheat-s4league-40487/
Et Pour les Values Ici :http://www.cheat-gam3.com/150-cheat/value-pour-trainer-s4league-m-j-regulierement-95332/

J'ai donc repris le tutoriel pour l'instant je débute j'ai voulu ne mettre que Sp Infini donc j'ai changé l'adresse, le type de CamHack avec celle de Sp Infini et mis en quoi je voulais la modifier.

Seulement lorsque je compile et lance le programme il se ferme au bout de quelque secondes ...

Voici le Script :
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 313, 125, 192, 124)
$Start = GUICtrlCreateButton("Start", 88, 16, 209, 81)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 16, 48, 17, 17)
$SP = GUICtrlCreateLabel("SP", 48, 48, 18, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case $GUI_EVENT_CLOSE
Exit
Case $Start
cheat()
Exit

EndSwitch
WEnd

Func cheat()
ToolTip("En Attente d'S4League", 0, 0)
ProcessWait("S4Client.exe")
$PID = ProcessExists("S4Client.exe")
Sleep(500)
$OPEN = _MEMORYOPEN($PID)
_processsuspend("Aegis.exe")
_processsuspend("Aegis64.exe")
_processsuspend("HGWC.exe")
_processsuspend("S4Client.exe")
_processsuspend("XTrap.xt")
Sleep (2000)
If GUICtrlRead ($checkbox1) = 1 Then
_MEMORYWRITE(0x00472A02 , $OPEN, "2348565979", "4Bytes")
EndIf
_memoryclose(ProcessExists("S4Client.exe"))
_processresume("Aegis.exe")
_processresume("Aegis64.exe")
_processresume("HGWC.exe")
_processresume("S4Client.exe")
_processresume("XTrap.xt")
Exit 0
Endfunc

Func _PROCESSSUSPEND($PROCESS)
$PROCESSID = ProcessExists($PROCESS)
If $PROCESSID Then
$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
$I_SUCESS = DllCall("ntdll.dll", "int", "NtSuspendProcess", "int", $AI_HANDLE[0])
DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
If IsArray($I_SUCESS) Then
Return 1
Else
SetError(1)
Return 0
EndIf
Else
SetError(2)
Return 0
EndIf
EndFunc




Func _PROCESSRESUME($PROCESS)
$PROCESSID = ProcessExists($PROCESS)
If $PROCESSID Then
$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
$I_SUCESS = DllCall("ntdll.dll", "int", "NtResumeProcess", "int", $AI_HANDLE[0])
DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
If IsArray($I_SUCESS) Then
Return 1
Else
SetError(1)
Return 0
EndIf
Else
SetError(2)
Return 0
EndIf
EndFunc
Click to expand...

Si vous pouviez m'indiquer l'erreur.

[RESOLU]

2eme problème :Et si je veut que lorsque quelqu'un lance mon programme il soit redirigé vers un site internet comment dois je faire ?
Merci​
 
Last edited:
R

ragnarock

Membre actif
Mar 22, 2010
194
0
917
J't'ai mis en rouge ce qui fait que ton programme se ferme

Code: 
#RequireAdmin
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 313, 125, 192, 124)
$Start = GUICtrlCreateButton("Start", 88, 16, 209, 81)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 16, 48, 17, 17)
$SP = GUICtrlCreateLabel("SP", 48, 48, 18, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case $GUI_EVENT_CLOSE
Exit
Case $Start
cheat()
[COLOR="Red"]Exit[/COLOR]

EndSwitch
WEnd

Func cheat()
ToolTip("En Attente d'S4League", 0, 0)
ProcessWait("S4Client.exe")
$PID = ProcessExists("S4Client.exe")
Sleep(500)
$OPEN = _MEMORYOPEN($PID)
_processsuspend("Aegis.exe")
_processsuspend("Aegis64.exe")
_processsuspend("HGWC.exe")
_processsuspend("S4Client.exe")
_processsuspend("XTrap.xt")
Sleep (2000)
If GUICtrlRead ($checkbox1) = 1 Then
_MEMORYWRITE(0x00472A02 , $OPEN, "2348565979", "4Bytes")
EndIf
_memoryclose(ProcessExists("S4Client.exe"))
_processresume("Aegis.exe")
_processresume("Aegis64.exe")
_processresume("HGWC.exe")
_processresume("S4Client.exe")
_processresume("XTrap.xt")
[COLOR="Red"]Exit 0[/COLOR]
Endfunc

Func _PROCESSSUSPEND($PROCESS)
$PROCESSID = ProcessExists($PROCESS)
If $PROCESSID Then
$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
$I_SUCESS = DllCall("ntdll.dll", "int", "NtSuspendProcess", "int", $AI_HANDLE[0])
DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
If IsArray($I_SUCESS) Then
Return 1
Else
SetError(1)
Return 0
EndIf
Else
SetError(2)
Return 0
EndIf
EndFunc




Func _PROCESSRESUME($PROCESS)
$PROCESSID = ProcessExists($PROCESS)
If $PROCESSID Then
$AI_HANDLE = DllCall("kernel32.dll", "int", "OpenProcess", "int", 2035711, "int", False, "int", $PROCESSID)
$I_SUCESS = DllCall("ntdll.dll", "int", "NtResumeProcess", "int", $AI_HANDLE[0])
DllCall("kernel32.dll", "ptr", "CloseHandle", "ptr", $AI_HANDLE)
If IsArray($I_SUCESS) Then
Return 1
Else
SetError(1)
Return 0
EndIf
Else
SetError(2)
Return 0
EndIf
EndFunc
 
Ace²

Ace²

Membre
Aug 14, 2012
55
0
211
Problème résolu il faut mettre"Long" au lieu de "4Bytes" grâce a celuiqui
 
Votre publicité ici !
Status
Not open for further replies.
Top Bottom