CRACKME V3.0

Commentaire de Delphiprog le 02/08/2002 21:57:00 administrateur CS

Et le crack, ça se fume ?
Parce qu'on attend toujours le source... :-O

Commentaire de DelphiCool le 02/08/2002 23:49:12 administrateur CS

SalutComme tu n'as pas fournit d'exe, et que la taille de compilation ne sera jamais la meme sur tout les PC, voici un patch un peu batard.


program patch;

uses sysutils, Classes, windows;


var Oct :array[1..10]of byte = ($75,$1A,$B8,$6C,$65,$45,$00,$E8,$67,$8A);
    i, taille :integer;
    CherchOct:array[1..10]of byte;
    Fs :TFileStream;
    patchOct:array[1..2]of byte = ($90,$90);

const exe = 'CrackMe.exe';




  begin
   if FileExists(exe) = false Then exit;

  
      Fs := TFileStream.Create(exe, fmOpenReadWrite);
       Taille := Fs.Size;

   for i := 0 to Taille -10 do
    begin
     Fs.Seek(i, soFromBeginning);
      Fs.Read(CherchOct, 9);

      If (CherchOct[1] = Oct[1]) and (CherchOct[2] = Oct[2]) and
         (CherchOct[3] = Oct[3]) and (CherchOct[4] = Oct[4]) and
         (CherchOct[5] = Oct[5]) and (CherchOct[5] = Oct[5]) and
         (CherchOct[6] = Oct[6]) and (CherchOct[6] = Oct[6]) and
         (CherchOct[7] = Oct[7]) and (CherchOct[8] = Oct[8]) and
         (CherchOct[9] = Oct[9])   Then
       begin
        Fs.Seek(i, soFromBeginning);
        Fs.Write(patchOct, 2);
        Fs.Free;
        MESSAGEBOX(0, 'Je viens de patcher l''exe, merci.','',0);
        exit;

       end;


    end;
    Fs.Free;
      MESSAGEBOX(0, 'Déja patché, ou ce n''est pas le bon exe.','',0);

end.

Commentaire de DelphiCool le 03/08/2002 00:13:08 administrateur CS

pour de ce qui est de comment j'ai fait

au pif, ça te va comme réponse ;-)

pour compiler le projet, ci dessustu creer un fichier texte, tu y comme le source
et tu renomme en patch.dpr

puis tu compile
il fait un peu plus de 100 Ko non packé.
Et je le trouve long

Commentaire de koko le 03/08/2002 10:35:49

DelphiCool > ton exe, quand je le lance il me dit : Déjà patché, ou ce n'est pas le bon exe.

Commentaire de DelphiCool le 03/08/2002 21:42:03 administrateur CS

//DelphiCool > ton exe, quand je le lance il me dit : Déjà patché, ou ce n'est pas le bon exe.

C'est le problemec'est que j'ai compilé le crackme avec D6 ent,si tu l'as compilé avec autre chose, les octets doivent etre differents.
donc comme il ne trouve pas les octets qu'ils cherche, il te dit qu'il est deja patché ou autre.

PS : Amokers, ce n'est pas un forum de cracking ici.
Le savoir ya rien de tel, mais chaque chose à sa place s'il te plait
Merci

Commentaire de AMokers le 04/08/2002 00:18:36

je c po regarde la source moi ce que je c c que g delphi 6 Entreprise

Commentaire de pleejulien le 16/02/2003 16:27:56

DelphiCoo << changer des octets pour que le pass soit toujours bon, c'est la maniere la plus simple de contourner les protections...
Mais ca devient rapidement obselete si plusieurs tests se font à des positions du programme differentes (ca demande de faire les modifications à chacuns de ces endroits)

Par ailleurs il est vrai que c'est pas un endroit pour parler cracking etant donné le status illegal du sujet
D'autre part, AMokers, à 16 ans, je voies pas comment on peut posseder D6 Ent... 1 moins d'etre l'heureux fils d'un riche papa... j'eviterais donc de trop l'etaler si tel n'est pas le dernier cas ;-)