[教程资料]NOD32密码获取器delphi 源码（ 加密算法 ） [复制链接]

关于NOD32的获取器 都被和谐了 发个测试写的delphi 版本的密码加密算法
测试用 代码有点乱 将就着看吧 没啥技术含量
只是看的 网上有解密 没加密的算法

复制代码

1. const
2. mask:array[0..19]of Byte = ($61,$D6,$D4,$E9,$DD,$F0,$FB,$F2,$5B,$64,$35,$AD,$B7,$C8,$19,$75,$EC,$31,$2B,$BC);
4. var
5.   src,des,dess: string;
6.   i,size,j: integer;
7.   buf: PByteArray;
8. begin
9.   src := edit2.Text;// 要转化的字符串
10.   des := '';
11.   size := Length(src);
12.   edit4.Text := inttostr(size);
13.   GetMem(buf, size);
14.   i := 1;
15.   while i  < size do
16.   begin
17.     des:=IntToHex(Ord(src),2);
18.     dess := dess + IntToHex(Ord(src),2) + ' ';
19.     buf[i-1] :=Byte(des);
20.     buf :=Byte(mask);
21.     Inc(i, 2);
22.   end;
23.   j := 0;
24. while j < 19 do
25.   begin
26.   Edit3.text :=  Edit3.text + IntToHex(buf[j] xor mask[j],1) + '  ';
27.   Edit3.text :=  Edit3.text + IntToHex(mask[j+1],1) + '  ';
28.   Inc(j, 2);
29. end;
30.   edit1.Text := dess; //转化后的字符串
31. end;

加个ID获取的正则 也就网上流传的那些NOD32IDXXX软件了

360直接搞定了，免费一年的

NOD32用户可以试试了