slippppppppp Grandmaster Cheater
Reputation: 0
Joined: 08 Aug 2006 Posts: 929
|
Posted: Fri Aug 24, 2007 10:54 pm Post subject: Basic CrackMe/KeygenMe making |
|
|
IM DOING IT IN DELPHI.
Yes i know, the phailure language, and i can care less about it.
So here we go .
Messaging
When you hit enter, and you either get a goodboy, or a badboy message. When you open that crackme with olly, you can search for string references, and if you did a "showmessage" to show CONGRATZ ect, you will see that congrats in the string references, and that person can just change the jmp or the eax value, so it any serial/password would work. Now, we dont want that, so the best thing to do in my opinion, is to just open up a form that says congrats.
Click File>new>form
Name your Form, goodboy.
Now what i did was, put a button on the form, and make it big enough to fit the form size, and for the caption, call it CONGRATS.
double click button1 and put
Now, do the same exact thing as aboe, but name the form badboy, and put a button, caption it "HAHA or w.e you call phailure" , and put the same coding in the button.
Save the forms.
Name Based serials
Now have 2 edit boxes, im not so sure exactly how to find a serial if the name is in alphabetical text, so just say you made the name in #'s.
Now lets declare "Id" as String, and "Idint" as an integer. Now, make sure you declare:
Now, you cant add, subtract, divide, mult ect with a string right?
So we use the strtoint() command.
Code: |
Idint := strtoint( ID );
|
Now for the easy part, you want to mess with the id and make it a random serial, like how if you use 123, the serial for it is 812391, ect. Now here is the part, you do this:
Code: |
idint := idint+idint;
or
idint := idint*idint;
or
idint := idint-idint;
or
idint := idint/idint , i forgot how to do the division sign XD, |
Finalization
Now you cant make an edit box check to see if a int is inputed in it, becuz it will come up with an error saying " error blablabla Tstring and int or however it says it, so you convert it back:
Code: |
ID := inttostr( Idint );
|
Then you compare the edit box, as so like this:
Code: |
if edit2.text=Idint then
begin
goodboy.showmodal;/// shows the goodboy form.
end;
if edit2.text=Idint=false then
begin
badboy.showmodal;//// shows the badboy form.
end;
thats about it to a crackme/keygenme | [/u]
|
|