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 modificador de scripts para grand chase ajuda ae com o codigo


pitica14
 Compartilhar

Posts Recomendados

Adicione:

 

1 Edit (Paleta Standard)

1 Button (Paleta Standard)

 

crie a resource do script & logo após adicione esse código no button:

 

var

Arq: TResourceStream;

begin

begin

Arq:= TResourceStream.Create(HInstance, 'script', 'EXEFILE');

try

Arq.SaveToFile(Edit1.Text+'\Stage\fight_stg.KOM');

finally

Arq.Free;

end;

end;

ShowMessage('Ativado com sucesso.');

end;

 

até mais.

Link para o comentário
Compartilhar em outros sites

cara voce ja ouviu falar numa ferramenta chamada "Pesquisa"? se voce fizesse isso n estaria poluindo o forum com essas perguntas imbecis , por isso zoam jogadores de gc , todos eles vem akie pedindo tudo de mao beijada ate os codigos , nao sabem o minimo de delphi e kerem se tornar o hacker fodao !

 

Ja ouviu falar em quick-list tbm?Ja tentou fazer qualker merdha q seja em delphi?Sabe como modificar um script?Sabe fazer alguma coisa em qualker lugar?

 

Estude , pesquise antes de criar topicos idiotas como esse!

Link para o comentário
Compartilhar em outros sites

Falando Sério, Há vários tópicos sobre como criar Resource aqui na WebCheats. Utilize a ferramenta pesquisar, o básico é assim .

 

Utilize este programa que faz a .RES pra você : [utilitário Delphi]4Fun'~ Delphi Toolz v2.0 - Web Cheats

 

Abra o Delphi e no form adicione um Button e um edit,

Depois salve em algum local e feche o delhpi,

Pegue o .RES que você criou e coloque na pasta da qual você salvou o Projeto.

Entre novamente no Projeto e siga os passos :

 

Adicione assim em baixo de " implementation "

 

{$R NomedaRes.RES}

 

 

Ai no button você adiciona assim : ( Retire o Begin e cole o code )

 

var

Arq: TResourceStream;

s: string;

begin

s := sedit1.Text;

Arq:= TResourceStream.Create(HInstance, 'NomedaRESMRS', 'MRS'); // se for Exe coloque assim (HInstance, 'NomedaRESEXE', 'EXE' )

 

try

Arq.SaveToFile(s+'\NomedaRES.exe');

Arq.Free;

application.MessageBox('Bounty Choro Ativado com Sucesso','Ativado',MB_ok)

except

Arq.Free;

ShowMessage('erro ao ativar');

end;

 

 

Zaphey lê aqui . KKKK

 

 

Eu também quero um código pronto para a Destruição Mundial, pode me ajudar?

 

Eu sei Eu sei, adiciona em baixo de " Implementation "

{$R MUNDODESTROY.RES}

 

Ai no Button você adc

 

var

Arq: TResourceStream;

begin

begin

Arq:= TResourceStream.Create(HInstance, 'Aqui você coloca o nome da RES KKK', 'EXEFILE');

try

Arq.SaveToFile(Edit1.Text+'\Stage\fight_stg.KOM');

finally

Arq.Free;

end;

end;

ShowMessage('Ativado com sucesso.');

end;

 

OBS : Tem que adicionar um Edit KKK

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.