Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Como Criar Um Hacker [Combat Arms BR]


ReiKaual
 Compartilhar

Posts Recomendados

Como Criar Um Hacker Usando C++

 

Hoje irei ensinar como criar seu primeiro hacker de Combat Arms

 

 

Primeiro você precisa de alguns programas:

 

Themida ( Para usar na DLL do hacker )

C++ 32 Bits

C++ 64 Bits

SDK June

 

Para começar você baixa uma base.

 

INFIN3xus

 

Após você ter feito o download, você extrai e abre a base.

 

t7fv5y.jpg

 

Quando você abri - la, você clica em itens

 

azgao7.jpg

 

Você muda o título para qualquer nome que você queira.

 

33vgdbd.jpg

 

Após isso você aperta F7 para compilar o hacker.

E para finalizar, você abre o Themida e usa ele no hacker.

 

Tutorial para usar Themida

 

1* Quando estiver aberto o programa, você clica em uma pastinha do Themida que se encontra na linha do Imput FileName.

 

143gsht.jpg

 

2* Selecione a sua DLL, e clique em Protect e pronto!!

A sua DLL está protegida.

 

r7vwhd.jpg

 

 

Entendendo Um Pouco Mais

 

Para adiciona uma função no hacker é muito fácil.

Vamos adicionar a função do Glitch Mode.

Para adicionar é muito fácil.

Primeiro você pega o código do hacker e adiciona no seu console.

 

if(glitch)

Comando("BaseMoveAccel 90000.0000000");

Comando("StartAccel 90000.0000000");

Comando("MaxAccel 90000.0000000");

Comando("AccelInc 90000.0000000");

Comando("WalkVel 90000.0000000");

Comando("FRunVel 90000.000000");

Comando("BRunVel 90000.000000");

Comando("SRunVel 90000.000000");

} else {

Comando("BaseMoveAccel 3000.000000");

Comando("StartAccel 500.000000");

Comando("MaxAccel 3000.000000");

Comando("AccelInc 6000.000000");

Comando("WalkVel 70.000000");

Comando("FRunVel 285.000000");

Comando("BRunVel 285.000000");

Comando("SRunVel 285.000000");

}

 

314v81w.jpg

 

Depois você declara a função.

 

2vab51h.jpg

 

E por último você adiciona a função ao menu.

 

AdicionarItem(" Glitch Mode", Opt_on_off, &glitch, 2, MENUITEM)

 

2znzkll.jpg

 

pronto!! Você adicionou uma função ao seu hacker!!!

 

Mudando A Cor Do Menu

 

Para mudar a cor do menu que eu postei, você abre dentro do hacker o Menu.cpp e muda ali onde estão as cores, " InfinityBlue", " InfinityLightBlue ", " Green ", " White "...

 

2mnrul1.jpg

 

Colocando Novas Cores Em Seu Menu

 

Primeiro, você abre o Base.h

 

2lo6jjc.jpg

 

 

epois, você baixa um programa que mostra os códigos das cores.

 

ColorConverter

 

Você abre ele, coloca a cor que você deseja e aperta em converter, ai você seleciona a cor e aperta em OK, dai você copia o primeiro código.

 

x4jj9j.jpg

 

Aperta Control C e aperta Control V no Menu.cpp e pronto!!!

 

5o8ax.jpg

 

Como Criar Um Injector Para Seu Hacker

 

A injeção de dll pelo método simples consiste em:

 

1 - Pegar o ***ress da API LoadLibraryA. Essa API carrega uma DLL no processo que a chamou. O ***ress dessa API é o mesmo em todos os processos.

2 - Abrir o processo que se quer injetar a dll, com privilégios de acesso total.

3 - Alocar memória no processo alvo para guardar o caminho da DLL a ser injetada.

4 - Escrever no endereço alocado o caminho da DLL.

5 - Criar uma thread no processo alvo, com parametro sendo o ponteiro pra string alocada no processo alvo que contem o caminho da dll.

6 - Aguardar o termino da thread criada.

7 - Fazer a limpeza.

 

Download do projeto pronto:

 

É necessário se cadastrar para acessar o conteúdo.

 

Agora vamos programar.

 

1 - Inicie um novo projeto no Delphi.

Adicione os seguintes componentes com as devidas propriedades no ****:

 

object *****1: T*****

Left = 8

Top = 8

Width = 47

Height = 13

Caption = 'Processo:'

end

object Edit1: TEdit

Left = 8

Top = 24

Width = 121

Height = 21

TabOrder = 0

end

object *****2: T*****

Left = 136

Top = 8

Width = 20

Height = 13

Caption = 'DLL'

end

object Edit2: TEdit

Left = 136

Top = 24

Width = 121

Height = 21

TabOrder = 1

end

object Button1: TButton

Left = 264

Top = 32

Width = 57

Height = 17

Caption = 'Carregar'

TabOrder = 2

end

object OpenDialog1: TOpenDialog

Left = 152

Top = 56

end

object Timer1: TTimer

Enabled = False

Interval = 10

Left = 120

Top = 56

end

object Button2: TButton

Left = 8

Top = 56

Width = 105

Height = 25

Caption = 'Aguardar Processo'

TabOrder = 3

end

 

001r.png

 

2 - Vá ao Code Explorer (View/Code Explorer) e declare a unit TlHelp32:

 

002gr.png

 

3 - Declare a seguinte função acima de "end.":

 

function GetPID(ProcessName: string): DWORD;

var MyHandle: THandle;

Struct: TProcessEntry32;

begin

Result:=0;

try

MyHandle:=CreateToolHelp32SnapShot(TH32CS_SNAPPROCESS, 0);

Struct.dwSize:=Sizeof(TProcessEntry32);

if Process32First(MyHandle, Struct) then

if Struct.szExeFile=ProcessName then

begin

Result:=Struct.th32ProcessID;

Exit;

end;

while Process32Next(MyHandle, Struct) do

if Struct.szExeFile=ProcessName then

begin

Result:=Struct.th32ProcessID;

Exit;

end;

except on exception do

Exit;

end;

end;

 

003dz.png

 

4 - Declare esta função logo abaixo da função declarada acima:

 

function InjectDll(PID:DWORD; sDll:string):Boolean;

var

hLib: Pointer;

hThread: THandle;

pMod: Pointer;

hOpen: THandle;

dWritten: Cardinal;

ThreadID: Cardinal;

begin

Result := FALSE;

hOpen := OpenProcess(PROCESS_ALL_ACCESS, FALSE, PID);

if hOpen <> INVALID_HANDLE_VALUE then

begin

hLib := GetProc***ress(GetModuleHandle(PChar('kernel32.dll')), PChar('LoadLibraryA'));

pMod := VirtualAllocEx(hOpen, nil, Length(sDll) + 1, MEM_COMMIT or MEM_RESERVE, PAGE_EXECUTE_READWRITE);

if WriteProcessMemory(hOpen, pMod, @sDll[1], Length(sDll), dWritten) then

Result := TRUE;

hThread := CreateRemoteThread(hOpen, nil, 0, hLib, pMod, 0, ThreadID);

WaitForSingleObject(hThread, INFINITE);

CloseHandle(hOpen);

CloseHandle(hThread);

end;

end;

 

5 - Agora volte ao **** (F12) e dê dois cliques no botão "Carregar". Então insira este algoritmo no evento OnClick dele:

 

if not OpenDialog1.Execute then Exit;

Edit2.Text:=OpenDialog1.FileName;

 

005la.png

 

6 - Volte ao **** (F12) e dê dois cliques no botão "Aguardar Processo". No evento OnClick dele insira este código

 

Timer1.Enabled:=True;

 

006w.png

 

7 - Volte ao **** (F12) e dê dois cliques sobre o "Timer1". No evento OnClick dele insira este algorítmo:

 

var PID: DWORD;

begin

Timer1.Enabled:=False;

PID:=GetPID(Edit1.Text);

if PID=0 then

begin

Timer1.Enabled:=True;

Exit;

end;

Timer1.Enabled:=False;

if InjectDll(PID, Edit2.Text) then

MessageBoxA(Handle, 'DLL injetada com sucesso!', 'DLL Injector', MB_ICONEXCLAMATION+MB_SYSTEMMODAL)

else

MessageBoxA(Handle, 'Erro ao injetar DLL.', 'DLL Injector', MB_ICONERROR+MB_SYSTEMMODAL);

 

007z.png

 

- Compile o projeto (F9) e seja feliz.

 

Modo de usar:

 

1 - Insira o nome do processo.

2 - Carregue a DLL a ser injetada.

3 - Clique em aguardar processo.

4 - Inicie o processo e a DLL será injetada.

 

Créditos

 

luis3232

ChaosMagician

InfiN3XUS

Delphi

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

Se Estiver Na Area Errada Por Favor Mova Não Feche o Topico

 

Amigo Olhe Os Agradecimentos E Se Tiver Mesmo O Vidio Passe Para Eu Colocar !!!!

 

@EDIT Amigo Se Tiver Mesmo Esse Vidio Seria Bem Diferente Porque Tem Muitos Metodos De Faser Um Hacker !!! De Uma Olhadinha Antes Valew

 

@Edit Pessoal Jaja Criarei Um Novo Topico De Como Editar Arquivos dll e Exe !!!

Link para o comentário
Compartilhar em outros sites

  • Velha Guarda Ex-Staffer

Amigo seu tutorial está muito bom,

Como você sabe área seria C++

Aki é para postagem de cheats

E sseu tópico ja é existente.

Membro - Steel Member - Bronze Member - Silver Member - Gold Member - Banido - Sapphire Member - [E] Estagiário - Combat Arms - Platinum Member - Diamond Member - Elite Member - Velha Guarda

Link para o comentário
Compartilhar em outros sites

Por Favor Movam Aki Please

 

[Topico] Movido Obrigado Sasuke !!

 

Eu Sei Que Esiste Mais Coloquei Da Minha Maneira Se Tem Um Igual Use a Ferramente De Busca e Me mostre Se Ta igual !!!

 

Cara cade a base INFIN3xus ???

 

themida ta patched no CABR !!!

 

Engano Seu Amigo Themida Não Esta Patched se Irforme Mais !!!

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois...

Caro deneslima,

 

Evite comentar em tópicos cujo último post tem mais de 15 dias.

 

Isso traz tópicos velhos de volta a primeira página,desorganizando a área.

 

Qualquer dúvida sobre as regras gerais do fórum, leia:

 

 

 

Tópico Trancado

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.