![]() |
eXeL@B —› Оффтоп —› ФЛЕЙМ |
Посл.ответ | Сообщение |
|
Создано: 03 октября 2011 23:06 · Личное сообщение · #1 |
|
Создано: 03 октября 2011 23:08 · Поправил: OnLyOnE · Личное сообщение · #2 |
|
Создано: 03 октября 2011 23:29 · Личное сообщение · #3 |
|
Создано: 03 октября 2011 23:31 · Личное сообщение · #4 |
|
Создано: 03 октября 2011 23:33 · Личное сообщение · #5 |
|
Создано: 03 октября 2011 23:40 · Личное сообщение · #6 ARCHANGEL пишет: Оффтоп не отображается на главной, и потому сюда (имхо) почти никто не заходит. Заходят но редко, а чаще и не стоит, всё равно тут темы редко новые бывают, а остальные собирают вокруг себя ограниченое количество людей которые часто заходят и следят за ними. ----- Лучше быть одиноким, но свободным © $me ![]() |
|
Создано: 03 октября 2011 23:44 · Личное сообщение · #7 BoRoV пишет: всё равно тут темы редко новые бывают Ну так потому, что никто не заходит. А вообще мне кейгены интересны только всякими эффектами. Офигенный познавательный алгоритм там встретишь только в одном на тысячу. Проще такие алгоритмы целенаправленно искать в гугле. ----- Stuck to the plan, always think that we would stand up, never ran. ![]() |
|
Создано: 04 октября 2011 02:41 · Личное сообщение · #8 |
|
Создано: 04 октября 2011 02:49 · Личное сообщение · #9 |
|
Создано: 04 октября 2011 02:53 · Личное сообщение · #10 вот кста 5 минут назад запостил на рубике Quick Password Recovery PRO v 1.7.1 function Generate(h,e:string):string; // h = hwid; e = email var i,d:byte; u,t,hw,sn:string; sum_email,sum_sn:dword; begin if (length(h) <> 5) or (length(e)<1) then begin result:= 'Invalid HWID or E-Mail !!!'; exit; end else u:=''; sn:=''; sum_email:=0; sum_sn:=0; //********* hwid ************ hw:=h; i:=5; while i>0 do begin t:=hw[i]; u:=u+t; dec(i); end; for i:=1 to 5 do begin t:=inttostr(strtoint(u[i]) xor i); sn:=sn+t; end; result:=sn; //********* hash ************ hw:=md5(sn+hw); i:=4; sn:=''; while i<8 do begin t:=inttostr(ord(hw[i])); sn:=sn+t; inc(i); end; sn:=copy(sn,1,5); result:=result+sn; //********* summa sn ********** for i:=1 to 5 do begin d:=ord(sn[i]); sum_sn:=sum_sn+d; end; {********* summa e-mail **********} sn:=e; for i:=1 to length(sn)-1 do begin d:=ord(sn[i]); sum_email:=sum_email+d; end; {********* sn & e-mail **********} result:=result+inttostr(sum_sn+sum_email); //return valid_code end; ![]() |
|
Создано: 04 октября 2011 06:19 · Личное сообщение · #11 |
![]() |
eXeL@B —› Оффтоп —› ФЛЕЙМ |