| View previous topic :: View next topic |
| Author |
Message |
alexNx
Master Cheater
 Reputation: 0
Joined: 23 Nov 2008
Posts: 313
|
 Posted: Mon Feb 16, 2009 4:11 am Post subject: [HELP]Unlimated Attack Memory Edit in Delphi |
 |
|
Hi i was making a new Botting Program in Delphi for maplestory and i cant find any tutorials that can show me how to edit Memory to make Unlimited Attack work.
So if possible links or a source code that has Unlimited attack.
+Rep if helped.
_________________
[BELLOCAN]
Bellocan:
10x Priest 1month banned.
5x Sin Active.
3x Bow Active.
|
|
| Back to top |
|
 |
Zerith
Master Cheater
 Reputation: 1
Joined: 07 Oct 2007
Posts: 468
|
| Posted: Mon Feb 16, 2009 5:48 am Post subject: |
|
|
| WriteProcessMemory().
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Mon Feb 16, 2009 9:42 am Post subject: |
|
|
| You mean bypassed WriteProcessMemory...
|
|
| Back to top |
|
|
alexNx
Master Cheater
Reputation: 0
Joined: 23 Nov 2008
Posts: 313
|
| Posted: Mon Feb 16, 2009 11:43 am Post subject: |
|
|
No i just want to make a Unlimated Attack for godmode also how do you use writememoryprocess().
_________________
[BELLOCAN]
Bellocan:
10x Priest 1month banned.
5x Sin Active.
3x Bow Active.
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Mon Feb 16, 2009 12:37 pm Post subject: |
|
|
| alexNx wrote: | | No i just want to make a Unlimated Attack for godmode also how do you use writememoryprocess(). |
Give me the script and ill convert.
WriteProcessMemory(ProcessHandle,BaseAddress,Buffer,Size,Ret);
|
|
| Back to top |
|
|
alexNx
Master Cheater
Reputation: 0
Joined: 23 Nov 2008
Posts: 313
|
| Posted: Mon Feb 16, 2009 12:50 pm Post subject: |
|
|
Here is the unlimated attack scripts and at the bottom of unlimated attack is my actual source code its .exe i was going to try and make DLL.
Unlimated attack.
| Code: | //Unlimited Attack
//008068B4 //89 03 8B 7D 10 85 FF 74 5E FF B6 ? ? ? ? 8D 46 ? 83 C0 ? 50 E8
// EIP : CSX
[Enable]
registersymbol(CSX)
alloc(CSX,128)
label(CSXReturn)
CSX:
push eax
mov eax,[00992748] //CHARACTER POINTER
mov eax,[eax+204C] //ATTACK COUNTER OFFSET
cmp eax,0000050
pop eax
jg CSXReturn
push eax
mov eax,[00992748] //CHARACTER POINTER
mov eax,[eax+0D90] //pID OFFSET
cmp esi,eax
pop eax
jne CSXReturn
add eax,0a
jmp CSXReturn
CSXReturn:
mov [ebx], eax
jmp 008068B6 //8B 7D 10 85 FF 74 5E FF B6 ? ? ? ? 8D 46 ? 83 C0 ? 50 E8
[Disable]
unregistersymbol(CSX)
dealloc(CSX) |
MY SOURCE CODE:
| Code: |
unit botts;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
GroupBox1: TGroupBox;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Timer1: TTimer;
Timer2: TTimer;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Label7: TLabel;
Timer3: TTimer;
Timer4: TTimer;
Label8: TLabel;
Label9: TLabel;
Label10: TLabel;
Label11: TLabel;
Timer5: TTimer;
Timer6: TTimer;
Label12: TLabel;
Label13: TLabel;
Label14: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
GroupBox2: TGroupBox;
Button1: TButton;
procedure Timer1Timer(Sender: TObject);
procedure Timer2Timer(Sender: TObject);
procedure Timer3Timer(Sender: TObject);
procedure Timer4Timer(Sender: TObject);
procedure Timer5Timer(Sender: TObject);
procedure Timer6Timer(Sender: TObject);
procedure Edit1Change(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
function PostMessageX(
hWnd:HWND;
MSG:UINT;
WPARAM:wParam;
LPARAM:lParam):BOOL;stdcall;
external 'PMX.dll' name 'PostMessageX'
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if odd(GetAsyncKeyState(VK_F1)) then //When u press f1 it will begin
begin
label1.caption:='On';
label1.font.color:=clLime;
Timer2.Enabled:=true;
end;
if odd(GetAsyncKeyState(VK_F2)) then //when u press f2 it will stop
begin
label1.caption:='On';
label1.font.color:=clRed;
Timer2.Enabled:=false;
end;
end;
procedure TForm1.Timer2Timer(Sender: TObject);
var
MS: HWND;
A:DWORD;
begin
A:=MapVirtualKey($5A,0);
A:=A shl 16;
MS := FindWindow('MapleStoryClass', nil);
if MS <>0 then begin
PostMessageX(MS,WM_KEYDOWN, $5A, A);
end;
end;
procedure TForm1.Timer3Timer(Sender: TObject);
begin
if odd(GetAsyncKeyState(VK_F3)) then //When u press f1 it will begin
begin
label2.caption:='On';
label2.font.color:=clLime;
Timer4.Enabled:=true;
end;
if odd(GetAsyncKeyState(VK_F4)) then //when u press f2 it will stop
begin
label2.caption:='On';
label2.font.color:=clRed;
Timer4.Enabled:=false;
end;
end;
procedure TForm1.Timer4Timer(Sender: TObject);
var
MS: HWND;
A:DWORD;
begin
A:=MapVirtualKey($4E,0);
A:=A shl 16;
MS := FindWindow('MapleStoryClass', nil);
if MS <>0 then begin
PostMessageX(MS,WM_KEYDOWN, $4E, A);
end;
end;
procedure TForm1.Timer5Timer(Sender: TObject);
begin
if odd(GetAsyncKeyState(VK_F5)) then //When u press f1 it will begin
begin
label3.caption:='On';
label3.font.color:=clLime;
Timer6.Enabled:=true;
end;
if odd(GetAsyncKeyState(VK_F6)) then //when u press f2 it will stop
begin
label3.caption:='On';
label3.font.color:=clRed;
Timer6.Enabled:=false;
end;
end;
procedure TForm1.Timer6Timer(Sender: TObject);
var
MS: HWND;
A:DWORD;
begin
A:=MapVirtualKey($4D,0);
A:=A shl 16;
MS := FindWindow('MapleStoryClass', nil);
if MS <>0 then begin
PostMessageX(MS,WM_KEYDOWN, $4D, A);
end;
end;
procedure TForm1.Edit1Change(Sender: TObject);
begin
Timer2.Interval := (StrToInt(Edit1.Text));
Timer4.Interval := (StrToInt(Edit1.Text));
Timer5.Interval := (StrToInt(Edit1.Text));
end;
proce |
_________________
[BELLOCAN]
Bellocan:
10x Priest 1month banned.
5x Sin Active.
3x Bow Active.
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Mon Feb 16, 2009 1:59 pm Post subject: |
|
|
| Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code...
|
|
| Back to top |
|
|
Noz3001
I'm a spammer
 Reputation: 26
Joined: 29 May 2006
Posts: 6220
Location: /dev/null
|
| Posted: Mon Feb 16, 2009 2:10 pm Post subject: |
|
|
| dnsi0 wrote: | | Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code... |
What? What uses them?
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Mon Feb 16, 2009 2:18 pm Post subject: |
|
|
Read his auto asm script.
Its converted into a debug register typed script.
|
|
| Back to top |
|
|
wassssup34579
How do I cheat?
![]() Reputation: 0
Joined: 13 Jul 2008
Posts: 3
|
| Posted: Mon Feb 16, 2009 2:50 pm Post subject: |
|
|
| dnsi0 wrote: | | Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code... |
you dont have to. you could just create a dll to inject that does the same exact thing.
|
|
| Back to top |
|
|
dnsi0
I post too much
![]() Reputation: 0
Joined: 04 Jan 2007
Posts: 2674
|
| Posted: Mon Feb 16, 2009 3:13 pm Post subject: |
|
|
| wassssup34579 wrote: | | dnsi0 wrote: | | Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code... |
you dont have to. you could just create a dll to inject that does the same exact thing. |
I know. But the script that he posted requires a debug register. Since you have to set the EIP to the value of CSX. Read his script before posting.
There is a version of UA in Kitterz that doesn't require a debugger.
|
|
| Back to top |
|
|
wassssup34579
How do I cheat?
![]() Reputation: 0
Joined: 13 Jul 2008
Posts: 3
|
| Posted: Mon Feb 16, 2009 4:01 pm Post subject: |
|
|
| dnsi0 wrote: | | wassssup34579 wrote: | | dnsi0 wrote: | | Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code... |
you dont have to. you could just create a dll to inject that does the same exact thing. |
I know. But the script that he posted requires a debug register. Since you have to set the EIP to the value of CSX. Read his script before posting.
There is a version of UA in Kitterz that doesn't require a debugger. |
Use the SetThreadContext api.
|
|
| Back to top |
|
|
smartz993
I post too much
 Reputation: 2
Joined: 20 Jun 2006
Posts: 2013
Location: USA
|
| Posted: Mon Feb 16, 2009 4:41 pm Post subject: |
|
|
| wassssup34579 wrote: | | dnsi0 wrote: | | wassssup34579 wrote: | | dnsi0 wrote: | | Are you kidding me? That uses debug registers. I'm not gonna program a debugger. You should look at kitterz trainer's source code... |
you dont have to. you could just create a dll to inject that does the same exact thing. |
I know. But the script that he posted requires a debug register. Since you have to set the EIP to the value of CSX. Read his script before posting.
There is a version of UA in Kitterz that doesn't require a debugger. |
Use the SetThreadContext api. |
Not while GG is running, sorry.
|
|
| Back to top |
|
|
alexNx
Master Cheater
Reputation: 0
Joined: 23 Nov 2008
Posts: 313
|
| Posted: Mon Feb 16, 2009 5:27 pm Post subject: |
|
|
Im just trying to make a UA the easiest way possible with Delphi.
_________________
[BELLOCAN]
Bellocan:
10x Priest 1month banned.
5x Sin Active.
3x Bow Active.
|
|
| Back to top |
|
|
Noz3001
I'm a spammer
Reputation: 26
Joined: 29 May 2006
Posts: 6220
Location: /dev/null
|
| Posted: Mon Feb 16, 2009 5:50 pm Post subject: |
|
|
| dnsi0 wrote: | Read his auto asm script.
Its converted into a debug register typed script. |
Debug registers (DR0, 1, 2, 3, 4, 5, 6, 7).
|
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
