Hola amigos....veran, siento mucho en tardarme mas de lo que anuncie en publicar las soluciones al crackme y ademas en revivir el post de hace 2 meses, pero tuve varios problemas que no me permitieron hacerlo, desde la falta de tiempo, hasta problemas de conexion con el foro, lo cual no me permitia publicar respuestas. De cualquier forma, ahora que tengo la cobertura para hacerlo lo hago y disculpenme si he echo mal.
Bueno, como dije anteriormente, las unicas dos soluciones ofrecidas fueron las de PeterPunk77 y frankener1986, ambos lo resolvieron con keygen (que como adverti no era nada del otro mundo). Aunque debo decir que ademas de ser PeterPunk77 el primero en enviarme la solucion, tambien creo el keygen con la condicion de "ORO", por lo que aqui esta el source code de su keygen en Delphi:
el compilado lo pueden descargar de aqui:
http://sites.google.com/site/thundercrackslatinos/Home/crackmes-1/Keygen_por_PeterPunk_para_Sticky.rar?attredirects=0&d=1
y la segunda solucion es de frankener1986, aqui esta su keygen tambien:
Bueno, pues nada, felicitar a estos dos amigos por sus soluciones y darle las gracias a todos los que lo intentaron, espero que hayan pasado un momento agradable con este pequeño reto . Un saludo y....vamos a ver cuando sale el tercero ...jeje
Bueno, como dije anteriormente, las unicas dos soluciones ofrecidas fueron las de PeterPunk77 y frankener1986, ambos lo resolvieron con keygen (que como adverti no era nada del otro mundo). Aunque debo decir que ademas de ser PeterPunk77 el primero en enviarme la solucion, tambien creo el keygen con la condicion de "ORO", por lo que aqui esta el source code de su keygen en Delphi:
Código (delphi) [Seleccionar]
var
ruta: string;
parametros: string;
h,h1 : hwnd;
Texto : array[0..496] of Char;
clave: string;
buffsize : dword;
buffer: string;
fecha : tdatetime;
dia, mes, ano: word;
serial : string;
begin
if fileexists(ExtractFilePath(Application.ExeName) + 'sticky.exe') then
ruta := extractfilepath(application.exename) + 'sticky.exe'
else
if opendialog1.Execute() then
ruta := opendialog1.FileName
else
ruta := '';
if ruta <> '' then begin
parametros := ' -LetUsStick';
if not checkbox1.Checked then
parametros := parametros + ' -noSound';
if ShellExecute(Form1.Handle, nil, pchar(ruta), pchar(parametros),
nil, SW_SHOWNORMAL) <= 32 then
Application.MessageBox('No se pudo ejecutar la aplicación', 'Error', MB_ICONEXCLAMATION)
else
begin
sleep(1000);
h := findwindow('notepad',nil);
if h>0 then begin
h1 := FindWindowEx(h,0,'Edit',nil);
SendMessage(h1,WM_GETTEXT,SizeOf(Texto),Integer(@Texto));
if midstr(texto,489,7)='Serial:' then
begin
buffsize := 128;
Setlength (buffer, buffsize);
Getusername (Pchar(buffer), buffsize);
decodedate(date,ano,mes,dia);
fecha := encodedate(ano+15,mes,dia);
clave := pchar(buffer) + ' - ' + formatdatetime('d-m-yyyy', fecha);
setwindowtext(h,pchar(clave));
serial := texto + 'Nunca andes por el camino trazado, pues él te conduce únicamente hacia donde los otros fueron.';
SendMessage(h1,WM_SETTEXT,0,longint(PChar(serial)));
end;
end;
end;
end;
end;
el compilado lo pueden descargar de aqui:
http://sites.google.com/site/thundercrackslatinos/Home/crackmes-1/Keygen_por_PeterPunk_para_Sticky.rar?attredirects=0&d=1
y la segunda solucion es de frankener1986, aqui esta su keygen tambien:
Código (cpp) [Seleccionar]
#include <windows.h>
#include <stdio.h>
#include <time.h>
//...
void gen(void)
{
static char serial[95];
char pre_serial[] = {
0x41, 0x7A, 0x61, 0x6C, 0x6E, 0x6E, 0x61, 0x6B, 0x6A, 0x7C, 0x7F, 0x60, 0x7D,
0x6A, 0x63, 0x6C, 0x6E, 0x62, 0x66, 0x61, 0x60, 0x7B, 0x7D, 0x6E, 0x75, 0x6E,
0x6B, 0x60, 0x23, 0x7F, 0x7A, 0x6A, 0x7C, 0xE6, 0x63, 0x7B, 0x6A, 0x6C, 0x60,
0x61, 0x6B, 0x7A, 0x6C, 0x6A, 0xF5, 0x61, 0x66, 0x6C, 0x6E, 0x62, 0x6A, 0x61,
0x7B, 0x6A, 0x67, 0x6E, 0x6C, 0x66, 0x6E, 0x6B, 0x60, 0x61, 0x6B, 0x6A, 0x63,
0x60, 0x7C, 0x60, 0x7B, 0x7D, 0x60, 0x7C, 0x69, 0x7A, 0x6A, 0x7D, 0x60, 0x61,
0x21, 0x01 };
char index_spaces[ ] = { 0x05, 0x0B, 0x0F, 0x12, 0x19, 0x22, 0x27, 0x2A, 0x2D, 0x35, 0x40, 0x46, 0x4C, 0x50, 0x56 };
char current_index_space = 0;
for(char i=0; i<95; i++)
if(index_spaces[current_index_space]!=i)
{
serial[i] = pre_serial[i-current_index_space]^0x0F;
}
else
{
serial[i] = ' ';
current_index_space++;
}
serial[94]=0;
MessageBox(0, serial, "El serial es el siguiente:", MB_OK);
DWORD sBuf = sizeof(serial);
GetUserName(serial, &sBuf);
SYSTEMTIME st;
GetSystemTime(&st);
sprintf(serial, "%s - %d-%d-%d", serial, st.wDay, st.wMonth, st.wYear+15);
MessageBox(0, serial, "Guarda el notepad con este título:", MB_OK);
}
Bueno, pues nada, felicitar a estos dos amigos por sus soluciones y darle las gracias a todos los que lo intentaron, espero que hayan pasado un momento agradable con este pequeño reto . Un saludo y....vamos a ver cuando sale el tercero ...jeje