FullShot is a professional screen capture (print screen) application designed for any Windows user who needs an effortless, effective way to take screenshots of Windows screens. It's perfect for capturing on-screen images you want to include in manuals, training handouts, presentations, marketing materials, and web pages. FullShot allows you to take screen shots of various regions, documents, or even specific windows on your desktop using a combination of technologies like hotkeys and snapshot buttons. You can also use FullShot to edit and annotate images before printing them directly to any printers connected to your PC.
下载:http://www.inbit.com/fullshot.html
====================================================================
00406999 83F8 0E cmp eax,0E ;序列号长度为14位
0040699C 0F85 BA020000 jnz Setup.00406C5C
004069A2 803E 59 cmp byte ptr ds:[esi],59 ;第1位必须为Y
004069A5 0F85 B1020000 jnz Setup.00406C5C
004069AB 8A4E 01 mov cl,byte ptr ds:[esi+1] ;第2位区分是个人版，个人升级版
;专业版，专业升级版，企业版企业升级版
004069AE 80F9 42 cmp cl,42 ;B为Standard Edition, Single User License
004069B1 74 1D je short Setup.004069D0
004069B3 80F9 45 cmp cl,45 ;E为Standard Edition, Upgrade License
004069B6 74 18 je short Setup.004069D0
004069B8 80F9 46 cmp cl,46 ;F为Professional Edition, Site License
004069BB 74 13 je short Setup.004069D0
004069BD 80F9 4A cmp cl,4A ;J为Professional Edition, Upgrade License
004069C0 74 0E je short Setup.004069D0
004069C2 80F9 4C cmp cl,4C ;L为Enterprise Edition, Site License
004069C5 74 09 je short Setup.004069D0
004069C7 80F9 4E cmp cl,4E ;N为Enterprise Edition, Upgrade License
004069CA 0F85 8C020000 jnz Setup.00406C5C
004069D0 8A56 02 mov dl,byte ptr ds:[esi+2] ; 第3位以下几位一样在0-9之间
004069D3 80FA 39 cmp dl,39
004069D6 0F8F 80020000 jg Setup.00406C5C
004069DC 80FA 30 cmp dl,30
004069DF 0F8C 77020000 jl Setup.00406C5C
004069E5 8A46 03 mov al,byte ptr ds:[esi+3] ; 第4位
004069E8 3C 39 cmp al,39
004069EA 0F8F 6C020000 jg Setup.00406C5C
004069F0 3C 30 cmp al,30
004069F2 0F8C 64020000 jl Setup.00406C5C
004069F8 8A46 04 mov al,byte ptr ds:[esi+4] ; 第5位
004069FB 3C 39 cmp al,39
004069FD 0F8F 59020000 jg Setup.00406C5C
00406A03 3C 30 cmp al,30
00406A05 0F8C 51020000 jl Setup.00406C5C
00406A0B 8A46 06 mov al,byte ptr ds:[esi+6] ; 第7位
00406A0E 3C 39 cmp al,39
00406A10 0F8F 46020000 jg Setup.00406C5C
00406A16 3C 30 cmp al,30
00406A18 0F8C 3E020000 jl Setup.00406C5C
00406A1E 8A46 07 mov al,byte ptr ds:[esi+7] ; 第8位
00406A21 3C 39 cmp al,39
00406A23 0F8F 33020000 jg Setup.00406C5C
00406A29 3C 30 cmp al,30
00406A2B 0F8C 2B020000 jl Setup.00406C5C
00406A31 8A46 09 mov al,byte ptr ds:[esi+9] ; 第10位
00406A34 3C 39 cmp al,39
00406A36 0F8F 20020000 jg Setup.00406C5C
00406A3C 3C 30 cmp al,30
00406A3E 0F8C 18020000 jl Setup.00406C5C
00406A44 8A46 0A mov al,byte ptr ds:[esi+A] ; 第11位
00406A47 3C 39 cmp al,39
00406A49 0F8F 0D020000 jg Setup.00406C5C
00406A4F 3C 30 cmp al,30
00406A51 0F8C 05020000 jl Setup.00406C5C
00406A57 8A46 0C mov al,byte ptr ds:[esi+C] ; 第13位
00406A5A 3C 39 cmp al,39
00406A5C 0F8F FA010000 jg Setup.00406C5C
00406A62 3C 30 cmp al,30
00406A64 0F8C F2010000 jl Setup.00406C5C
00406A6A 8A46 0D mov al,byte ptr ds:[esi+D] ; 第14位
00406A6D 3C 39 cmp al,39
00406A6F 0F8F E7010000 jg Setup.00406C5C
00406A75 3C 30 cmp al,30
00406A77 0F8C DF010000 jl Setup.00406C5C
00406A7D 8A5E 05 mov bl,byte ptr ds:[esi+5] ; 第6位
00406A80 80FB 5A cmp bl,5A
00406A83 0F8F D3010000 jg Setup.00406C5C
00406A89 80FB 41 cmp bl,41
00406A8C 0F8C CA010000 jl Setup.00406C5C
00406A92 8A46 08 mov al,byte ptr ds:[esi+8] ; 第9位
00406A95 3C 5A cmp al,5A
00406A97 884424 13 mov byte ptr ss:[esp+13],al
00406A9B 0F8F BB010000 jg Setup.00406C5C
00406AA1 3C 41 cmp al,41
00406AA3 0F8C B3010000 jl Setup.00406C5C
00406AA9 8A46 0B mov al,byte ptr ds:[esi+B] ; 第12位
00406AAC 3C 5A cmp al,5A ;取值范围
00406AAE 0F8F A8010000 jg Setup.00406C5C
00406AB4 3C 41 cmp al,41
00406AB6 0F8C A0010000 jl Setup.00406C5C
00406ABC 80F9 42 cmp cl,42 ;B则第3位取1，7，8，9
00406ABF 75 18 jnz short Setup.00406AD9
00406AC1 80FA 31 cmp dl,31
00406AC4 74 13 je short Setup.00406AD9
00406AC6 80FA 37 cmp dl,37
00406AC9 74 0E je short Setup.00406AD9
00406ACB 80FA 38 cmp dl,38
00406ACE 74 09 je short Setup.00406AD9
00406AD0 80FA 39 cmp dl,39
00406AD3 0F85 83010000 jnz Setup.00406C5C
00406AD9 80F9 45 cmp cl,45 ;E则第3位2
00406ADC 75 09 jnz short Setup.00406AE7
00406ADE 80FA 32 cmp dl,32
00406AE1 0F85 75010000 jnz Setup.00406C5C
00406AE7 80F9 46 cmp cl,46 ;F则第3位3，7，8，9
00406AEA 75 18 jnz short Setup.00406B04
00406AEC 80FA 33 cmp dl,33
00406AEF 74 13 je short Setup.00406B04
00406AF1 80FA 37 cmp dl,37
00406AF4 74 0E je short Setup.00406B04
00406AF6 80FA 38 cmp dl,38
00406AF9 74 09 je short Setup.00406B04
00406AFB 80FA 39 cmp dl,39
00406AFE 0F85 58010000 jnz Setup.00406C5C
00406B04 80F9 4A cmp cl,4A ;J则第3位取4
00406B07 75 09 jnz short Setup.00406B12
00406B09 80FA 34 cmp dl,34
00406B0C 0F85 4A010000 jnz Setup.00406C5C
00406B12 80F9 4C cmp cl,4C ;L则第3位
00406B15 75 18 jnz short Setup.00406B2F ; 第2位=L(企业安装版)
00406B17 80FA 35 cmp dl,35 ; 第3位比较，为5，7，8，9中一位
00406B1A 74 13 je short Setup.00406B2F
00406B1C 80FA 37 cmp dl,37
00406B1F 74 0E je short Setup.00406B2F
00406B21 80FA 38 cmp dl,38
00406B24 74 09 je short Setup.00406B2F
00406B26 80FA 39 cmp dl,39
00406B29 0F85 2D010000 jnz Setup.00406C5C
00406B2F 80F9 4E cmp cl,4E ;N则第3位取6
00406B32 75 09 jnz short Setup.00406B3D
00406B34 80FA 36 cmp dl,36
00406B37 0F85 1F010000 jnz Setup.00406C5C
00406B3D 33C0 xor eax,eax
00406B3F 8A46 04 mov al,byte ptr ds:[esi+4] ; 第5位
00406B42 50 push eax
00406B43 E8 B8FCFFFF call Setup.00406800 ;字符转换为数字
00406B48 8BD0 mov edx,eax
00406B4A 33C0 xor eax,eax
00406B4C 8A46 03 mov al,byte ptr ds:[esi+3] ; 第4位
00406B4F 895424 1C mov dword ptr ss:[esp+1C],edx
00406B53 50 push eax
00406B54 E8 A7FCFFFF call Setup.00406800 ;字符转换为数字
00406B59 8BE8 mov ebp,eax ;
00406B5B 8D0492 lea eax,dword ptr ds:[edx+edx*4]
00406B5E 8D4445 00 lea eax,dword ptr ss:[ebp+eax*2]
00406B62 99 cdq
00406B63 B9 16000000 mov ecx,16 ;mod $16
00406B68 F7F9 idiv ecx
00406B6A 83C4 08 add esp,8
00406B6D 3A9A 58CC4300 cmp bl,byte ptr ds:[edx+43CC58] ;余数查表"ABCDEFGHKLMNPQRSTUVWXY"得到结果
00406B73 0F85 E3000000 jnz Setup.00406C5C
00406B79 33C0 xor eax,eax
00406B7B 8A46 07 mov al,byte ptr ds:[esi+7] ; 第8位
00406B7E 50 push eax
00406B7F E8 7CFCFFFF call Setup.00406800 ;字符转换为数字
00406B84 8BD0 mov edx,eax
00406B86 33C0 xor eax,eax
00406B88 8A46 06 mov al,byte ptr ds:[esi+6] ; 第7位
00406B8B 895424 18 mov dword ptr ss:[esp+18],edx
00406B8F 50 push eax
00406B90 E8 6BFCFFFF call Setup.00406800 ;字符转换为数字
00406B95 8BF8 mov edi,eax
00406B97 8D1492 lea edx,dword ptr ds:[edx+edx*4]
00406B9A 8D0457 lea eax,dword ptr ds:[edi+edx*2]
00406B9D 99 cdq
00406B9E B9 16000000 mov ecx,16 ;mod $16
00406BA3 F7F9 idiv ecx
00406BA5 8A4424 1B mov al,byte ptr ss:[esp+1B]
00406BA9 83C4 08 add esp,8
00406BAC 3A82 58CC4300 cmp al,byte ptr ds:[edx+43CC58] ;余数查表"ABCDEFGHKLMNPQRSTUVWXY"得到结果
00406BB2 0F85 A4000000 jnz Setup.00406C5C
00406BB8 33C0 xor eax,eax
00406BBA 8A46 0A mov al,byte ptr ds:[esi+A] ; 第11位
00406BBD 50 push eax
00406BBE E8 3DFCFFFF call Setup.00406800 ;字符转换为数字
00406BC3 8BD8 mov ebx,eax
00406BC5 33C0 xor eax,eax
00406BC7 8A46 09 mov al,byte ptr ds:[esi+9] ; 第10位
00406BCA 50 push eax
00406BCB E8 30FCFFFF call Setup.00406800 ;字符转换为数字
00406BD0 8BF0 mov esi,eax
00406BD2 8D0C9B lea ecx,dword ptr ds:[ebx+ebx*4]
00406BD5 8D044E lea eax,dword ptr ds:[esi+ecx*2]
00406BD8 99 cdq
00406BD9 B9 16000000 mov ecx,16 ;mod $16
00406BDE F7F9 idiv ecx
00406BE0 8B4C24 38 mov ecx,dword ptr ss:[esp+38]
00406BE4 8A41 0B mov al,byte ptr ds:[ecx+B] ; 第12位
00406BE7 83C4 08 add esp,8
00406BEA 3A82 58CC4300 cmp al,byte ptr ds:[edx+43CC58] ;余数查表"ABCDEFGHKLMNPQRSTUVWXY"得到结果
00406BF0 75 6A jnz short Setup.00406C5C
00406BF2 33C0 xor eax,eax
00406BF4 8A41 02 mov al,byte ptr ds:[ecx+2] ; 第8位
00406BF7 50 push eax
00406BF8 E8 03FCFFFF call Setup.00406800 ;字符转换为数字
00406BFD 0FAF7C24 18 imul edi,dword ptr ss:[esp+18] ; EDI=实际为第7位*第8位)
00406C02 0FAF6C24 1C imul ebp,dword ptr ss:[esp+1C] ; ebp=(实际为第4位*第5位)
00406C07 0FAFF3 imul esi,ebx ; 第10位*第11位
00406C0A 03C6 add eax,esi ; +第3位
00406C0C 03C7 add eax,edi
00406C0E 03C5 add eax,ebp
00406C10 99 cdq
00406C11 B9 64000000 mov ecx,64 ;mod $64
00406C16 F7F9 idiv ecx
00406C18 52 push edx
00406C19 8D5424 24 lea edx,dword ptr ss:[esp+24]
00406C1D 68 A0E94200 push Setup.0042E9A0
00406C22 52 push edx
00406C23 E8 59CC0000 call Setup.00413881 ;把最后结果进行处理为10进制即最后两位注册码
00406C28 8B4424 40 mov eax,dword ptr ss:[esp+40]
00406C2C 8A48 0C mov cl,byte ptr ds:[eax+C]
00406C2F 8A5424 2C mov dl,byte ptr ss:[esp+2C]
00406C33 83C4 10 add esp,10
00406C36 3ACA cmp cl,dl
00406C38 75 22 jnz short Setup.00406C5C
00406C3A 8A50 0D mov dl,byte ptr ds:[eax+D]
00406C3D 3A5424 1D cmp dl,byte ptr ss:[esp+1D]
00406C41 75 19 jnz short Setup.00406C5C
00406C43 5F pop edi
00406C44 5E pop esi
00406C45 5D pop ebp
00406C46 B8 01000000 mov eax,1
00406C4B 5B pop ebx
00406C4C 8B4C24 18 mov ecx,dword ptr ss:[esp+18]
00406C50 334C24 1C xor ecx,dword ptr ss:[esp+1C]
00406C54 83C4 1C add esp,1C
00406C57 E9 8ACB0000 jmp Setup.004137E6
====================================================================
第一位必须为Y
第2位分别对应不同的字符"BEFJLN"
第3位分别对应不同版本下的取值"1,2,3,4,5,6,7,8,9"
第4，5，7，8，10，11位任意数字
第6位为(第5位数字*5*2+第4位) mod &16 结果查表"ABCDEFGHKLMNPQRSTUVWXY"
第9位为(第8位数字*5*2+第7位) mod &16 结果查表"ABCDEFGHKLMNPQRSTUVWXY"
第12位为)第10为数字*5*2+第9位) mod &16 结果查表"ABCDEFGHKLMNPQRSTUVWXY"
第13，14为(第3位+第4位*第5位+第7位*第8位+第10位*第11位) MOD &64，然后转换为10进制,如果小于10则前面补0
====================================================================
因为不会算法，东拼西凑的看了点delphi资料，凑出这个注册机来，谁笑话我我跟谁急！
你们只可以当笑话或者笨蛋的典型来看待这个，OK？
----------------------------------------------------------------
;Delhi source
var
m:integer;
begin
s1:='ABCDEFGHKLMNPQRSTUVWXYZ';
s2:='BEFJLN';
s3:='0123456789';
s4:='5789';
s5:='1789';
s6:='3789';
sn:='000000000000';
if suiComboBox1.text='Standard Edition, Single User License' then
begin
sn[2]:=s2[1];
sn[3]:=s5[random(4)+1];
end;
if suiComboBox1.text='Standard Edition, Upgrade License' then
begin
sn[2]:=s2[2];
sn[3]:='2';
end;
if suiComboBox1.text='Professional Edition, Site License' then
begin
sn[2]:=s2[3];
sn[3]:=s6[random(4)+1];
end;
if suiComboBox1.text='Professional Edition, Upgrade License' then
begin
sn[2]:=s2[4];
sn[3]:='4';
end;
if suiComboBox1.text='Enterprise Edition, Site License' then
begin
sn[2]:=s2[5];
sn[3]:=s4[random(4)+1];
end;
if suiComboBox1.text='Enterprise Edition, Upgrade License' then
begin
sn[2]:=s2[6];
sn[3]:='6';
end;
sn[4]:=s3[random(10)+1];
sn[5]:=s3[random(10)+1];
sn[7]:=s3[random(10)+1];
sn[8]:=s3[random(10)+1];
sn[10]:=s3[random(10)+1];
sn[11]:=s3[random(10)+1];
sn[6]:=s1[(strtoint(sn[5])*10+strtoint(sn[4])) mod $16+1];
sn[9]:=s1[(strtoint(sn[8])*10+strtoint(sn[7])) mod $16+1];
sn[12]:=s1[(strtoint(sn[11])*10+strtoint(sn[10])) mod $16+1];
m:=(strtoint(sn[3])+strtoint(sn[4])*strtoint(sn[5])+strtoint(sn[7])*strtoint(sn[8])+strtoint(sn[10])*strtoint(sn[11])) mod $64;
if m<10 then
s:='0'+inttostr(m)
else
s:=inttostr(m);
edit1.Text:='Y'+sn[2]+sn[3]+sn[4]+sn[5]+sn[6]+sn[7]+sn[8]+sn[9]+sn[10]+sn[11]+sn[12]+s;
end;