|
You last visited: Today at 13:10
Advertisement
Need some help with a trainer
Discussion on Need some help with a trainer within the AutoIt forum part of the Coders Den category.
06/08/2010, 17:00
|
#1
|
elite*gold: 0
Join Date: Dec 2009
Posts: 91
Received Thanks: 81
|
Need some help with a trainer
I hope that this is the right section...
If anyone has the source of a trainer similar to this, post it if you wish.
I want to make a trainer for a game.
I have a CT (CE's Cheat Table) containing various addresses/pointers that I've found and I wanted to make a trainer from it.
The functions I need in order to make it are:
-Attaching to the right process... something like this maybe?u
ProcessWait ("mhfo.dll")"
and what if the process is hidden? For example when I try to attach CE to the game, first it says that the memory region is equal to 00000000... after some minutes it changes and I can attach it with CE via the Process List or Window List thing... will it work with AutoIt?
-Being able to change a value by pressing the Set button... the value should change accordingly to the editable number in the bar lol;
-Being able to freeze the values.
This is how the trainer should look like when completed:
Note that I've made this with Koda FormDesigner, awesome tool
Code:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=c:\blabla\koda\forms\test.kxf
$Form1_1 = GUICreate("MHFO Trainer by WAZAAAAA", 340, 140, 193, 133)
GUICtrlCreateInput("100000", 80, 17, 97, 21)
$Button1 = GUICtrlCreateButton("Set", 192, 15, 41, 25, 0)
$Label1 = GUICtrlCreateLabel("Total Health", 8, 19, 62, 17)
$Button2 = GUICtrlCreateButton("Set", 192, 97, 41, 25, 0)
$Input1 = GUICtrlCreateInput("300", 80, 99, 97, 21)
$Label2 = GUICtrlCreateLabel("Resistance", 8, 102, 57, 17)
GUICtrlCreateInput("100", 116, 58, 97, 21)
$Button3 = GUICtrlCreateButton("Set", 225, 56, 41, 25, 0)
$Label3 = GUICtrlCreateLabel("Health Regeneration", 8, 61, 102, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Freeze", 249, 15, 57, 25)
$Checkbox2 = GUICtrlCreateCheckbox("Freeze", 282, 56, 57, 25)
$Checkbox3 = GUICtrlCreateCheckbox("Freeze", 249, 96, 57, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Can somebody shed some light on this?
Thanks in advance.
|
|
|
06/08/2010, 22:11
|
#2
|
elite*gold: 0
Join Date: Nov 2009
Posts: 2,210
Received Thanks: 6,755
|
Example:
Code:
#RequireAdmin
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <NomadMemory.au3>;Just google it :D
#Region ### START Koda GUI section ### Form=c:\blabla\koda\forms\test.kxf
$Form1_1 = GUICreate("MHFO Trainer by WAZAAAAA", 340, 140, 193, 133)
$Input11=GUICtrlCreateInput("100000", 80, 17, 97, 21)
$Button1 = GUICtrlCreateButton("Set", 192, 15, 41, 25, 0)
$Label1 = GUICtrlCreateLabel("Total Health", 8, 19, 62, 17)
$Button2 = GUICtrlCreateButton("Set", 192, 97, 41, 25, 0)
$Input1 = GUICtrlCreateInput("300", 80, 99, 97, 21)
$Label2 = GUICtrlCreateLabel("Resistance", 8, 102, 57, 17)
GUICtrlCreateInput("100", 116, 58, 97, 21)
$Button3 = GUICtrlCreateButton("Set", 225, 56, 41, 25, 0)
$Label3 = GUICtrlCreateLabel("Health Regeneration", 8, 61, 102, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Freeze", 249, 15, 57, 25)
$Checkbox2 = GUICtrlCreateCheckbox("Freeze", 282, 56, 57, 25)
$Checkbox3 = GUICtrlCreateCheckbox("Freeze", 249, 96, 57, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$pid= ProcessExists("S4Client.exe");Example
$Open = _MemoryOpen($pid)
$ReadI1= GUICtrlRead($Input11)
$Adress1=0x00C44444;Example
If $Che=1 Then
Do
Sleep(1000)
MsgBox(0,"","")
_MemoryWrite($Adress1,$Open,$ReadI1,"float");for 4 bytes dword
If BitAND(GUICtrlRead($Checkbox1),$GUI_CHECKED) Then
$Che=1
Else
$Che=0
Endif
Until $Che=0
Else
$ReadAc=_MemoryRead($Adress1,$Open,"float")
_MemoryWrite($Adress1,$Open,$ReadAc,"float");for 4 bytes dword
Endif
Case $Checkbox1
If BitAND(GUICtrlRead($Checkbox1),$GUI_CHECKED) Then
$Che=1
Else
$Che=0
Endif
EndSwitch
WEnd
My old Trainer
Code:
#RequireAdmin
#include <GUIConstantsEx.au3>
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include<NomadMemory.au3>
$Form2 = GUICreate("Password", 253, 65, -1, -1)
GUISetIcon("D:\008.ico")
$PasswordEdit = GUICtrlCreateInput("", 8, 32, 233, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$EnterPassLabel = GUICtrlCreateLabel("Enter password", 88, 12, 77, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $readedit = GUICtrlRead($PasswordEdit)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $PasswordEdit
Global $readedit = GUICtrlRead($PasswordEdit)
If $readedit = "" Then
GUIDelete()
Opt("GUIOnEventMode", 1)
Global Const $AC_SRC_ALPHA = 1
FileInstall("C:\Users\Julius\Desktop\Hacks\Autoit\Hack\Sonic.png",@Scriptdir & "\Bild.png")
Global $pngSrcSettingsBK = "Bild.png"
HotKeySet("{ESC}", "_Exit")
_GDIPlus_Startup()
$hImageSettingsBK = _GDIPlus_ImageLoadFromFile($pngSrcSettingsBK)
$Config_GUI = GUICreate("S4League Hack", 600, 450, -1, -1, $WS_POPUP, BitOR($WS_EX_CONTROLPARENT, $WS_EX_LAYERED))
_SetBitmap($Config_GUI,$hImageSettingsBK, 255)
GUISetState()
$Config_GUI_Ctrl = GUICreate("", 600, 450, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $Config_GUI)
GUISetBkColor(0x585858)
_WinAPI_SetLayeredWindowAttributes($Config_GUI_Ctrl,0x585858)
$LABEL1=GUICTRLCREATELABEL("Wallhack ",300,105,52,17)
$WALL=GUICTRLCREATEINPUT("1000",300,120,89,21)
$LABEL2=GUICTRLCREATELABEL("Cutspeed and LegDMG",130,195,116,17)
$CUTTY=GUICTRLCREATEINPUT("",130,210,89,21)
$LABEL3=GUICTRLCREATELABEL("Crit DMG",24,105,47,17)
$INPUT1=GUICTRLCREATEINPUT("",8,120,89,21)
$LABEL3=GUICTRLCREATELABEL("Sp reg",167,105,47,17)
$SP=GUICTRLCREATEINPUT("",150,120,89,21)
$LABEL4=GUICTRLCREATELABEL("Fly Range",160,5,52,17)
$RANGE=GUICTRLCREATEINPUT("",144,17,89,21)
GUISETSTATE()
GUISetState()
Opt("TrayMenuMode",1)
$chk1 = TrayCreateItem("Ready to Hack")
TrayCreateItem("")
$exit = TrayCreateItem("Exit")
TrayCreateItem("")
TraySetState()
Global $readCutt = GUICtrlRead($CUTTY)
Global $readWall = GUICtrlRead($WALL)
Global $readCrit = GUICtrlRead($INPUT1)
Global $readFly= GUICtrlRead($RANGE)
Global $readsp= GUICtrlRead($SP)
TrayTip("Hier","Bitte hier klicken/Clic here!!!",20)
While 1
$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $exit
Exit
Case $msg = $chk1
GUIDelete()
#RequireAdmin
ToolTip("S4 League starten ...",0,0)
$wait = ProcessWait("S4Client.exe")
Sleep(500)
$PID = ProcessExists("S4Client.exe")
$Open = _MemoryOpen($PID)
;FLOAT
$TELED=0x00C49808
$SP=0x00C49558
$Range = 0x00C49788
$Speedundbein = 0x00C4D678
$DMGCrit = 0x00C4D67C
$DMGCrit1 = 0x00C6D9D4
$lol8=0x00C49819
$lol4=0x00C49818
$Psrange=0x00CD6441
$WriteSP=_MemoryWrite($SP,$Open,$readsp,"float")
$WritePS=_MemoryWrite($Psrange,$Open,0,"float")
$Writelol4=_MemoryWrite($lol4,$Open,1000,"float")
$Writelol8=_MemoryWrite($lol8,$Open,4487681,"dword")
$WriteSpeedundbein=_MemoryWrite($Speedundbein,$Open,$readCutt,"float")
$WriteRange=_MemoryWrite($Range,$Open,$readFly,"float")
$DMGCrit=_MemoryWrite($DMGCrit,$Open,$readCrit,"float")
$DMGCrit1=_MemoryWrite($DMGCrit1,$Open,$readCrit,"float")
$read1111=_MemoryRead($Speedundbein,$Open,"float")
If $read1111 = $readCutt Then
MsgBox(1,"Erfolgreich","Viel spaß/Have fun",0.8)
Exit
Endif
Exit
EndSelect
WEnd
While 1
WEnd
Func _Exit()
_GDIPlus_ImageDispose($hImageSettingsBK)
_GDIPlus_Shutdown()
Exit
EndFunc
Func _SetBitmap($hGUI, $hImageBK, $iOpacity)
Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend
$hScrDC = _WinAPI_GetDC(0)
$hMemDC = _WinAPI_CreateCompatibleDC($hScrDC)
$hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImageBK)
$hOld = _WinAPI_SelectObject($hMemDC, $hBitmap)
$tSize = DllStructCreate($tagSIZE)
$pSize = DllStructGetPtr($tSize)
DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImageBK))
DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImageBK))
$tSource = DllStructCreate($tagPOINT)
$pSource = DllStructGetPtr($tSource)
$tBlend = DllStructCreate($tagBLENDFUNCTION)
$pBlend = DllStructGetPtr($tBlend)
DllStructSetData($tBlend, "Alpha", $iOpacity)
DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
_WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
_WinAPI_ReleaseDC(0, $hScrDC)
_WinAPI_SelectObject($hMemDC, $hOld)
_WinAPI_DeleteObject($hBitmap)
_WinAPI_DeleteDC($hMemDC)
EndFunc ;==>SetBitmap
Endif
EndSwitch
WEnd
|
|
|
02/06/2011, 14:39
|
#3
|
elite*gold: 0
Join Date: Jan 2011
Posts: 57
Received Thanks: 11
|
i dont know how to hack but its so funny if u have goshtmode hack for the secret tunnel in neden-1 how i create my own trainer please reply
|
|
|
All times are GMT +1. The time now is 13:11.
|
|