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.

fazendo um trainer simples maya e fenix


Posts Recomendados

Trainer Exclusivo Novo Metodo by Asskiller

 

Muita gente , fica procurando como fazer um trainer e blabla , porem sem ter nenhum conhecimento basico sobre Delphi , irei fazer esse tuto a pedidos.Porem pessoal , estude um pouco antes de partir direto para o Delphi. ^^

 

Requerimentos para o Tutorial :

QUOTE

Delphi 7

Inteligencia

Conhecimento Basico do Delphi

 

 

Abre o Delphi - Cria 1 Form

 

QUOTE

Adicione 1 Timer e 1 Checkbox 1 Label

 

 

Clique no Timer e renomeia para GBTimer , Altere o Interval do Timer para 250

 

Clique 2 Vezes no Timer e Adicione

 

Antes Declare perto de Private.

 

QUOTE

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

Trainer: TTrainer;

Bytes: DWORD;

 

 

QUOTE

var

wHandle: hwnd;

hProcess: integer;

pId: integer;

Value: integer;

 

 

Explicando :

 

wHandle: é aonde vai ficar a identificação da janela do GunBound

hProcess: é aonde vai ficar a identificação do nosso processo no trainer

pId: é aonde vai ficar a identificação do GunBound

Value : Valor a ser freezado

 

 

Apos isso , adicione o seguinte codigo , abaixo de var.

 

QUOTE

begin

wHandle := FindWindow('Softnyx',nil);

GetWindowThreadProcessId(wHandle,@pId);

if wHandle <> 0 then begin;

hProcess := OpenProcess(PROCESS_ALL_ACCESS,False,pId);

lblpid.Caption := IntToStr(pId);

if opMaya.Checked = True then

begin;

Value:=126;

WriteProcessMemory(hProcess,Pointer($000000),Addr(Value),1,Bytes);

end;

CloseHandle(hProcess);

 

 

Explicando :

QUOTE

wHandle := FindWindow('Softnyx',nil);

 

Ira achar a Janela do Jogo [ Gunbound]

 

QUOTE

lblpid.Caption := IntToStr(pId);

 

 

Aqui quando o gunbound for aberto , ira mostrar o PID da Janela , e isso ira mostrar numa Label , se voce quiser renomeia a Label para outro nome e altere.

QUOTE

Value:=126;

 

 

Valor do Mobile Maya

QUOTE

WriteProcessMemory(hProcess,Pointer($000000),Addr(Value),1,Bytes);

 

 

Usei o famoso WriteProcessMemory , adicionando um Pointer ao adress.

Que logico o adress voces irao pegar , nao irei dar mesmo sendo do Maya.

 

Obs : E facil pegar o adress do Maya ^^.

 

 

 

Creditos : dragonbilon

Agradecimentos :~~Bullenuxs~~

Link para o comentário
Compartilhar em outros sites

Olha lra, vlws a intenção mais esse não é o lugar certo, o lugar certo é Duvidas/Tutorias, depois jah ha varios topicos desses lah, e pelo jeito, muito mais bem explicados e organizados, intão, @~Reported.

Link para o comentário
Compartilhar em outros sites

Mesmo estando no lugar errado vou aproveitar para perguntar: FUNCIONA EM WINDOWS VISTA?

 

Eu quero saber porque todos, eu disse T.O.D.O.S. os hacks postados aqui e em outros foruns n funcionam aqui, e todas pessoas de vista q conheço tb n conseguem usar e as de X.P. conseguem! Então responde pf!

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.