| View previous topic :: View next topic |
| Author |
Message |
ello154
Grandmaster Cheater
 Reputation: 0
Joined: 12 Nov 2007
Posts: 822
|
 Posted: Mon Dec 01, 2008 9:08 pm Post subject: [Request] Delphi Tut on making a trainer +Rep |
 |
|
Yea Im new to making trainers and all and I need a tutorial on how to make a Maplestory trainer or Halo CE Trainer any one will do...
For maplestory puting in scripts for VB 6 was weird and didn't work out well
So yea...
Or a basic tut will help to such as a trainer for minesweeper or whatever
not like flash games cause thats to easy =O
And please show me how to like attach a process
Thanks in request
Will give rep to who ever helps me D=
_________________
|
|
| Back to top |
|
 |
hcavolsdsadgadsg
I'm a spammer
![]() Reputation: 26
Joined: 11 Jun 2007
Posts: 5801
|
| Posted: Mon Dec 01, 2008 9:13 pm Post subject: |
|
|
FindWindow / CreateToolHelp32Snapshot to ultimately get a process handle.
OpenProcess
Write/ReadProcessMemory
Look them up on MSDN
|
|
| Back to top |
|
|
ello154
Grandmaster Cheater
Reputation: 0
Joined: 12 Nov 2007
Posts: 822
|
| Posted: Mon Dec 01, 2008 9:16 pm Post subject: |
|
|
| slovach wrote: | FindWindow / CreateToolHelp32Snapshot to ultimately get a process handle.
OpenProcess
Write/ReadProcessMemory
Look them up on MSDN |
Wait where do I go to the FindWindor / CreateToolHelp32Snapshot?
and Whats MSDN do I google it?
Sorry for my noobyness at this stuff D=
_________________
|
|
| Back to top |
|
|
Innovation
Grandmaster Cheater
![]() Reputation: 12
Joined: 14 Aug 2008
Posts: 617
|
| Posted: Mon Dec 01, 2008 10:04 pm Post subject: |
|
|
Rot1 Posted this somewhere (it is an example of memory editing):
| Code: | Procedure InjectPinTyper(Address:Cardinal; nCase:ShortInt); export;
const aInject:Array [0..2] of byte = ($0F, $83, $6C); //Modifies 1 BYTE, 85 to 83
aEject:Array [0..2] of byte = ($0F, $85, $6C);
Access = PROCESS_VM_WRITE or PROCESS_VM_OPERATION;
Begin
hWindow:=FindWindow('MapleStoryClass', nil);
if hWindow<>0 then
case nCase of
1: //Inject PT
Try
GetWindowThreadProcessId(hWindow, @PID);
hProcess:=OpenProcess(Access, FALSE, PID);
WriteProcessMemory(hProcess, Ptr(Address), @aInject, sizeof(aInject), lpBytes);
CloseHandle(hProcess);
except
ShowMessageFmt('GetLastError Code: %.d', [IntToStr(GetLastError())]);
End;
2: //Eject PT
Try
GetWindowThreadProcessId(hWindow, @PID);
hProcess:=OpenProcess(Access, FALSE, PID);
WriteProcessMemory(hProcess, Ptr(Address), @aEject, sizeof(aEject), lpBytes);
CloseHandle(hProcess);
except
ShowMessageFmt('GetLastError Code: %.d', [IntToStr(GetLastError())]);
End;
End;
End; |
MSDN:
http://msdn.microsoft.com/en-us/default.aspx
|
|
| Back to top |
|
|
kb3z0n
Grandmaster Cheater
![]() Reputation: 0
Joined: 13 Mar 2007
Posts: 542
|
| Posted: Tue Dec 02, 2008 12:00 am Post subject: |
|
|
Use FindWindow, GetWindowThreadProcessID,OpenProcess,Read/WriteProcessMemory.
If you want a c++ tut, pm me.
|
|
| Back to top |
|
|
ello154
Grandmaster Cheater
Reputation: 0
Joined: 12 Nov 2007
Posts: 822
|
| Posted: Tue Dec 02, 2008 6:16 pm Post subject: |
|
|
| kb3z0n wrote: | Use FindWindow, GetWindowThreadProcessID,OpenProcess,Read/WriteProcessMemory.
If you want a c++ tut, pm me. |
Yea Ok since Theres like no delphi tuts I guess
_________________
|
|
| Back to top |
|
|
hcavolsdsadgadsg
I'm a spammer
![]() Reputation: 26
Joined: 11 Jun 2007
Posts: 5801
|
| Posted: Tue Dec 02, 2008 6:24 pm Post subject: |
|
|
| It's the exact same concept, just the syntax is different.
|
|
| Back to top |
|
|
kitterz
Grandmaster Cheater Supreme
![]() Reputation: 0
Joined: 24 Dec 2007
Posts: 1268
|
| Posted: Tue Dec 02, 2008 6:31 pm Post subject: |
|
|
If you don't know what Findwindow is, and MSDN for that matter, I suggest learning the language before making a trainer.
_________________
|
|
| Back to top |
|
|
ello154
Grandmaster Cheater
Reputation: 0
Joined: 12 Nov 2007
Posts: 822
|
| Posted: Tue Dec 02, 2008 6:45 pm Post subject: |
|
|
| kitterz wrote: | | If you don't know what Findwindow is, and MSDN for that matter, I suggest learning the language before making a trainer. |
Lol ok let me look in the stickies
_________________
|
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
