Code Source des mes trainers

    Publicités

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

Feb 14, 2011
752
0
922
26
Alpes Maritimes : 06
spmonde.com
Je laisse pas les value car sinon des kikou vont les prendre et s'amusé à prêt trop d'abus si vous voulé value Superman go me demander je vous montrerais la preuve

Speedy Hack :

#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$FORM1 = GUICreate("Speedy Hack", 228, 29, 267, 430)
GUISetFont(8, 800, 0, "Comic Sans MS")
GUISetBkColor(11393254)
$BUTTON1 = GUICtrlCreateButton("Start", 147, 1, 75, 23)
GUICtrlSetFont(-1, 8, 400, 0, "13_Misa")
$CHECKBOX1 = GUICtrlCreateCheckbox("Speed Hack", 5, 1, 129, 25)
GUICtrlSetFont(-1, 11, 400, 0, "13-Misa")
GUICtrlSetColor(-1, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$NMSG = GUIGetMsg()
Switch $NMSG
Case $GUI_EVENT_CLOSE
Exit
Case $BUTTON1
_START()
EndSwitch
WEnd
Func _START()
ToolTip("Ouvrez S4 League", 0, 0)
ProcessWait("S4Client.exe")
ProcessClose("Aegis.exe")
ProcessClose("Aegis64.exe")
$PID = ProcessExists("S4Client.exe")
Sleep(500)
$CHANGE = _MEMORYOPEN($PID)
If GUICtrlRead($CHECKBOX1) = 1 Then
Go chercher value toi même
EndIf
Exit
EndFunc

c'est normale qui y a pas 0x . Mais il marche comme même
Quand j'essaye avec laucher il y a un beug
:/ mais bon sans laucher il marche comme même


Choco Trainer v0.5

PHP:
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_outfile_type=a3x
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

Func _MEMORYOPEN($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $if_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', $if_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 _MemoryRead($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 _MEMORYWRITE($iv_Address, $ah_Handle, $v_Data, $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
    Else
        DllStructSetData($v_Buffer, 1, $v_Data)
        If @Error Then
            SetError(6)
            Return 0
        EndIf
    EndIf

    DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

    If Not @Error Then
        Return 1
    Else
        SetError(7)
        Return 0
    EndIf

EndFunc

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Choco Trainer v0.5", 324, 234, 302, 218)
$GroupBox1 = GUICtrlCreateGroup("", 0, 0, 305, 185)
$Image1 = GUICtrlCreatePic("C:\Documents and Settings\Administrateur\Mes documents\Mes images\avatar78221_14.gif", 8, 16, 105, 97)
$Label1 = GUICtrlCreateLabel("Product Name", 144, 16, 72, 17)
$Label5 = GUICtrlCreateLabel("Choco Trainer", 224, 16, 71, 17)
GUICtrlCreateLabel("", 200, 40, 4, 4)
$Label3 = GUICtrlCreateLabel("Version v0.5", 144, 40, 66, 17)
$Group1 = GUICtrlCreateGroup("Cheat Spéciaux", 128, 64, 161, 121)
$Radio1 = GUICtrlCreateRadio("1 Hit", 136, 88, 49, 17)
$Radio2 = GUICtrlCreateRadio("Speed Hack", 136, 112, 81, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Ammo", 136, 136, 65, 17)
$Checkbox2 = GUICtrlCreateCheckbox("No Blast", 136, 160, 73, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label4 = GUICtrlCreateLabel("Created by Mr.T4k0r", 8, 128, 101, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Start", 8, 192, 89, 33)
$Button2 = GUICtrlCreateButton("Exit", 112, 192, 97, 33)
$Button3 = GUICtrlCreateButton("Crédit", 232, 192, 81, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1

	$nMsg = GUIGetMsg()
		Switch $nMsg

		Case -3
			Exit

		Case $BUTTON1
			_HACK()

		Case $BUTTON3
			MsgBox(0, "Credit", "Choco Trainer™ créer par Mr.T4k0r" & @CRLF & "Version v0.5" & @CRLF & "Copyright 2011")

		Case $BUTTON2
			Exit

	EndSwitch
WEnd

Func _HACK()
		GUISetState(@SW_HIDE)
		ToolTip("Ouvrez S4 League", 0, 0)
		$PID = ProcessWait("S4Client.exe")
		ProcessClose("Aegis.exe")
		ProcessClose("Aegis64.exe")
		$CHANGE = _MEMORYOPEN($PID)
		Sleep(400)

		If GUICtrlRead($RADIO1) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($RADIO2) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX1) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX2) = 1 Then
			Go chercher value toi même
		EndIf

	Exit

EndFunc

Yumi & T4k0r Trainer :

PHP:
#include <GuiButton.au3>
#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("YuMi  T4k0r Trainer v1", 740, 489, 410, 169)
GUISetBkColor(0xFF0000)
$Edit1 = GUICtrlCreateEdit("", 496, -40, 9, 521)
GUICtrlSetData(-1, "Edit1")
GUICtrlSetBkColor(-1, 0x000000)
$Edit2 = GUICtrlCreateEdit("", 0, 408, 721, 9)
GUICtrlSetData(-1, "Edit2")
GUICtrlSetBkColor(-1, 0x000000)
$Checkbox1 = GUICtrlCreateCheckbox("Inf Ammo", 512, 56, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox2 = GUICtrlCreateCheckbox("1 Hit Kill", 512, 96, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox3 = GUICtrlCreateCheckbox("Speed Hack", 512, 136, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox4 = GUICtrlCreateCheckbox("No Intro", 512, 176, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox5 = GUICtrlCreateCheckbox("No Blast", 512, 216, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox6 = GUICtrlCreateCheckbox("Wallviwer", 512, 256, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox7 = GUICtrlCreateCheckbox("No lazer", 512, 296, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox8 = GUICtrlCreateCheckbox("No Hours", 512, 336, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Checkbox9 = GUICtrlCreateCheckbox("No Slang", 512, 376, 217, 25)
GUICtrlSetFont(-1, 15, 800, 0, "Script MT Bold")
$Button2 = GUICtrlCreateButton("Exit", 24, 424, 137, 57)
GUICtrlSetFont(-1, 20, 800, 0, "Snap ITC")
$Button3 = GUICtrlCreateButton("Credits", 192, 424, 121, 57)
GUICtrlSetFont(-1, 20, 800, 0, "Snap ITC")
$Button1 = GUICtrlCreateButton("Start", 344, 424, 105, 57)
GUICtrlSetFont(-1, 20, 800, 0, "Snap ITC")
$Pic1 = GUICtrlCreatePic("yumibackground.jpg", 0, 0, 497, 409, BitOR($GUI_SS_DEFAULT_PIC,$WS_CLIPSIBLINGS))
$Input1 = GUICtrlCreateInput("Veuillez entrez le mot de passe", 528, 424, 169, 21)
$Button4 = GUICtrlCreateButton("Valider", 552, 456, 137, 25)
$Groupe1 = GUICtrlCreateGroup("Fonction", 504, 24, 193, 385)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_GUICTRLBUTTON_ENABLE($CHECKBOX2, False)
_GUICTRLBUTTON_ENABLE($CHECKBOX3, False)
_GUICTRLBUTTON_ENABLE($CHECKBOX7, False)
$motdepasse='CoLoNeL'
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $Button4

			  If GUICtrlRead($Input1) = $motdepasse Then
                _GUICtrlButton_Enable($Checkbox2)
                _GUICtrlButton_Enable($Checkbox3)
				_GUICtrlButton_Enable($Checkbox7)
				 MsgBox(0, "Yumi & T4k0r Trainer ", "Mot de passe Correct :D !", 0, 0)
		Else
                MsgBox(0, "Yumi T4k0r Trainer", "Dommage ! Mauvais mot de passe")
            EndIf
		Case -3
			Exit

		Case $BUTTON1
			_HACK()

		Case $BUTTON3
			MsgBox(0, "Credit", "Yumi & T4k0r Trainer v1™ créer par Mr.T4k0r et Yumi" & @CRLF & "Version v1" & @CRLF & "Copyright 2011")

		Case $BUTTON2
			Exit

	EndSwitch
WEnd

Func _HACK()
		GUISetState(@SW_HIDE)
		ToolTip("Ouvrez S4 League", 0, 0)
		$PID = ProcessWait("S4Client.exe")
		ProcessClose("Aegis.exe")
		ProcessClose("Aegis64.exe")
		$CHANGE = _MEMORYOPEN($PID)
		Sleep(400)

		If GUICtrlRead($CHECKBOX1) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX2) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX3) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX4) = 1 Then
			Go chercher value toi même
		EndIf
        If GUICtrlRead($CHECKBOX5) = 1 Then
		Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX6) = 1 Then
			Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX7) = 1 Then
                       Go chercher value toi même
		EndIf

		If GUICtrlRead($CHECKBOX8) = 1 Then
			Go chercher value toi même
		EndIf
		If GUICtrlRead($CHECKBOX9) = 1 Then
			Go chercher value toi même
		EndIf
	Exit

EndFunc

Choco Trainer v1.1

PHP:
#include <NomadMemory.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GuiButton.au3>
#Region ### START Koda GUI section ### Form=C:\Form1_1.kxf
$Form1_1 = GUICreate("Choco Trainer v1.1", 419, 317, 351, 132)
$PageControl1 = GUICtrlCreateTab(8, 8, 396, 256)
$TabSheet1 = GUICtrlCreateTabItem("Cheat Normale")
$Checkbox1 = GUICtrlCreateCheckbox("0 Accuracy", 24, 48, 73, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox2 = GUICtrlCreateCheckbox("No slang", 24, 96, 57, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox3 = GUICtrlCreateCheckbox("No hours", 24, 144, 65, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox6 = GUICtrlCreateCheckbox("Inf Ammo", 184, 56, 65, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox7 = GUICtrlCreateCheckbox("No Blast", 184, 96, 57, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox8 = GUICtrlCreateCheckbox("No intro", 184, 144, 73, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox9 = GUICtrlCreateCheckbox("No Sector", 24, 184, 73, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox10 = GUICtrlCreateCheckbox("Wallviewer", 184, 184, 81, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox16 = GUICtrlCreateCheckbox("Arcade Clear", 24, 216, 89, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox15 = GUICtrlCreateCheckbox("Sp Skill Inf", 184, 216, 89, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet2 = GUICtrlCreateTabItem("Les Ghost")
$Checkbox11 = GUICtrlCreateCheckbox("Ghost Y", 40, 88, 73, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox12 = GUICtrlCreateCheckbox("Ghost X", 280, 88, 97, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox13 = GUICtrlCreateCheckbox("Ghost Z", 160, 184, 65, 41)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet3 = GUICtrlCreateTabItem("Cheat avec mot de passe")
GUICtrlSetState(-1,$GUI_SHOW)
$Checkbox4 = GUICtrlCreateCheckbox("1 Hit", 32, 72, 49, 81)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("Speed Hack", 216, 96, 97, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Input1 = GUICtrlCreateInput("***********", 96, 200, 153, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button4 = GUICtrlCreateButton("Unlock", 264, 200, 105, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox14 = GUICtrlCreateCheckbox("No Lazer", 104, 48, 89, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("")
$Button1 = GUICtrlCreateButton("Start", 166, 272, 75, 25)
$Button2 = GUICtrlCreateButton("Exit", 246, 272, 75, 25)
$Button3 = GUICtrlCreateButton("Crédit", 328, 272, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_GUICTRLBUTTON_ENABLE($CHECKBOX4, False)
_GUICTRLBUTTON_ENABLE($CHECKBOX5, False)
_GUICTRLBUTTON_ENABLE($CHECKBOX14, False)
$motdepasse='Cherche Toujours'
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $Button4

			  If GUICtrlRead($Input1) = $motdepasse Then
                _GUICtrlButton_Enable($Checkbox4)
                _GUICtrlButton_Enable($Checkbox5)
				_GUICtrlButton_Enable($Checkbox14)
				 MsgBox(0, "Choco Trainer", "Mot de passe Correct :D !", 0, 0)
		Else
                MsgBox(0, "Choco Trainer", "Dommage ! Mauvais mot de passe")
            EndIf

		Case $GUI_EVENT_CLOSE
			Exit
		Case $BUTTON1
			_CHEAT()
		Case $BUTTON3
			MsgBox(0, "Credit", "Choco Trainer™ v1.1 créer par Mr.T4k0r" & @CRLF & "Copyright 2011")
		Case $BUTTON2
			Exit
	EndSwitch
WEnd
Func _CHEAT()
	ToolTip("En attente d'S4League ...", 0, 0)
	$PID = ProcessWait("S4Client.exe")
	ProcessClose("Aegis.exe")
	ProcessClose("Aegis64.exe")
	ToolTip("Chargement des values...", 0, 0)
	$CHANGE = _MEMORYOPEN($PID)
	Sleep(400)
	
	If GUICtrlRead($CHECKBOX1) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX2) = 1 Then
       Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX3) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX4) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX5) = 1 Then
	    Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX6) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX7) = 1 Then
        Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX8) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX9) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX10) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX11) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX12) = 1 Then
		Cherche tout seul
	EndIf
	If GUICtrlRead($CHECKBOX13) = 1 Then
		Cherche tout seul
	EndIf
		If GUICtrlRead($CHECKBOX14) = 1 Then
		Cherche tout seul
    EndIf
	    If GUICtrlRead($CHECKBOX16) = 1 Then
		Cherche tout seul
	EndIf
	    If GUICtrlRead($CHECKBOX15) = 1 Then
		Cherche tout seul
	EndIf	
	Exit

EndFunc
 
Last edited: