Windows文件隐藏专家 V4.9 算法注册机 By 芊芊 ★

dzbbs

感谢楼主提供！！！支持原创~

Squn

原帖由 破解爱好者 于 2009-2-25 22:37 发表
建议分享算法过程和注册机的制作过程！/:001

注册码第一段=机器码+38094
注册码第二段=第一段+73239
注册码第三段=第一段+第二段+25266
:loveliness:

var
  nNum : Int64;
begin
try
   nNum := StrToInt(Edit1.Text);
except
   Exit;
end;
  nNum := nNum + 38094;
  Edit2.Text := IntToStr(nNum);
  nNum := nNum + 73239;
  Edit3.Text := IntToStr(nNum);
  nNum := nNum + nNum - 73239 + 25266;
  Edit4.Text := IntToStr(nNum);
end;

:loveliness:

sunpengfang

收下了啊~~  谢谢！

linghangzhe

感谢分享，很好用。