Jump to content

Turbine o seu Perfil

Confira a atualização e participe do clube!
Clique e saiba mais

Junte-se ao Clube de Membros VIP

Tenha destaque e diversos benefícios!
Confira Aqui

Acesse nosso Discord

Conheça nossos canais interativos
Confira Aqui
Notícia
  • Adquira já o seu VIP!
I~Johnnie

c++ Criando Hack BPT (C++ BUILDER DELPHI 2010)

Recommended Posts

separa_texto.png?sbsr=e4c3218b136bcef3ac61e0ef8c9bc70a961&lgfp=3000

Fala galera, I~Johnnie novamente, tentando dar uma movimentada no fórum, e hoje vim trazer um tutorial não diferente mas par um jogo diferente, que ainda movimenta muita gente e é a porta de entrada, para muitos inciarem nos cheats, como exemplo :
Mr S0beit
,
DarkCoder
,
AceStriker
,
Lipinf
, etc, etc. Normalmente, os hacks para Priston são feitos em Delphi. Então esse tutorial é um pouco diferente...

Vamos ao que interessa. Será usado o C++ Builder, ele vem junto com o Delphi 2010, mas os codes são os mesmos.

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

1º Passo

File > New > VCL form Application - c++ builder

Ficando assim :

zkDHMks.png

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

2º Passo.

Em seguida, coloque isso :

1 Timer

2 Button

1 Edit

3 Checkbox

2 Group Box(opcional)

se você tiver no C++ comum, adicione os componente, do seu jeito,

no exemplo, ficou assim:

WNvQBnp.png

Agora vamos Na Group Box1 no Object Inspector Caption Mudamos ela Para "Meu Primeiro Trainer em c++ \ o /"

Na GroupBox2 Iremos Mudar a caption Para "Regens"

Vamos no Checkbox1 E Colocamos a Caption para HP

Vamos no Checkbox2 E Colocamos a Caption para MP

Vamos no Checkbox3 E Colocamos a Caption para RES

Vamos No Edit1 E vamos em Text e apagamos oque esta escrito

Vamos no Button2 E Colocamos a Caption para Mudar Skin

Vamos no Button1 E Colocamos a Caption para Abrir NPC

Agora Clickamos no Form Principal e Mudamos a Caption Para "Meu Trainer '-'"

Explicando um pouco o Code :

HWND hWnd = FindWindow(0, "Priston Tale"); << Captura a Handle da Janela    {[/color][/font][/center]

[font=Tahoma][color=#0080ff]
[center]DWORD process_ID;  << Declaração do PID em DWORD
GetWindowThreadProcessId(hWnd, &process_ID); <<< Captura o PID
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, process_ID); << Abre o Processo
{
DWORD Valor = 1;  << Declaração do Valor da Addres  DWORD (4Bytes)
            tipo da address    ADDRESS
                 \/         \/
if(WriteProcessMemory(hProcess, (DWORD*)0xFFFFFFFF, &Valor, 4, NULL)){
}[/center]

CloseHandle(hProcess); << Fecha a Handle 

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

 

3º Passo.

 

Clicamos duas vezes no Form(formulário), e adicionamos o seguinte código:

BOOL SetPrivilege([/color][/font][/center]

[font=Tahoma][color=#0080ff]
[center]HANDLE hToken,
LPCTSTR lpszPrivilege,
BOOL bEnablePrivilege
)
{
TOKEN_PRIVILEGES tp;
LUID luid;

if (!LookupPrivilegeValue(
NULL,
lpszPrivilege,
&luid))
{
return FALSE;
}

tp.PrivilegeCount = 1;
tp.Privileges[0].Luid = luid;
if (bEnablePrivilege)
tp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
else
tp.Privileges[0].Attributes = 0;


if (!AdjustTokenPrivileges(
hToken,
FALSE,
&tp,
sizeof(TOKEN_PRIVILEGES),
(PTOKEN_PRIVILEGES)NULL,
(PDWORD)NULL))

{
return FALSE;

}

if (GetLastError() == ERROR_NOT_ALL_ASSIGNED) {
return FALSE;
}
return TRUE;

[/center]

}

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

 

Ainda no form, clique duas vezes em PROCEDURE, e entre "{ }" adicione :

 

HANDLE currentProcessToken;[/color][/font][/center]

[font=Tahoma][color=#0080ff]
[center]OpenProcessToken(GetCurrentProcess(), TOKEN_ALL_ACCESS, &currentProcessToken);[/center]

SetPrivilege(currentProcessToken, TEXT("SetDebugPrivilege"), True);

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

Clique duas vezes sobre o timer, e adicione o seguinte :

HWND hWnd = FindWindow(0, "Priston Tale"); {
DWORD process_ID;
GetWindowThreadProcessId(hWnd, &process_ID);
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, process_ID);
{
if (CheckBox1->Checked) {
Single Regen = 60;
if(WriteProcessMemory(hProcess, (Single*)0xFFFFFFFF, &Regen, 4, NULL));
}{
}
{
if (CheckBox2->Checked) {
Single Regen = 60;
if(WriteProcessMemory(hProcess, (Single*)0xFFFFFFFF, &Regen, 4, NULL));}
{
if (CheckBox3->Checked){
Single Regen = 60;
if(WriteProcessMemory(hProcess, (Single*)0xFFFFFFFF, &Regen, 4, NULL));
}{
}
CloseHandle(hProcess);
}
}}}

[center][font=Tahoma][img=http://www.4shared.com/download/iiYNvzamba/VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000][/font][/center]
 

Agora Vamos em Nossos Button1 entre {} e Colocamos o Seguinte Codigo .


HWND hWnd = FindWindow(0, "Priston Tale"); {
DWORD process_ID;
GetWindowThreadProcessId(hWnd, &process_ID);
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, process_ID);
{
DWORD Valor = 1;
if(WriteProcessMemory(hProcess, (DWORD*)0xFFFFFFFF, &Valor, 4, NULL)){
}
CloseHandle(hProcess);
}
}

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

Agora, no button 2 (entre "{ }")

HWND hWnd = FindWindow(0, "Priston Tale"); {
DWORD process_ID;
GetWindowThreadProcessId(hWnd, &process_ID);
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, process_ID);
{
String Valor = Edit1->Text;
if(WriteProcessMemory(hProcess, (DWORD*)0xFFFFFFFF, &Valor, 4, NULL)){
}
CloseHandle(hProcess);
}
}

VdzmY.png?sbsr=5e8218eb7ab54196cdc67db2973dc09b961&lgfp=3000

E no button 1 (entre "{ }")

HWND hWnd = FindWindow(0, "Priston Tale"); {
DWORD process_ID;
GetWindowThreadProcessId(hWnd, &process_ID);
HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, process_ID);
{
DWORD Valor =1;
if(WriteProcessMemory(hProcess, (DWORD*)0xFFFFFFFF, &Valor, 4, NULL)){
}
CloseHandle(hProcess);
}
}

 

Agradeça, não cai o dedo :D

Créditos :

T3N, I~Johnnie.

 

  • Like 1

A Jedi uses the Force for knowledge and defense, never for attack.

-Yoda, Master.

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.

×
×
  • Create New...