下载完整的网站--Teleport pro 1.40注册机
软件大小:674KB软件语言:英文
软件类别:国外软件/共享版/离线浏览
运行环境:Win9x/Me/NT/2000
破解工具:OllyICE 1.10
下载地址:http://www.onlinedown.net/soft/6044.htm
功能介绍:
Teleport Pro所能做的,不仅仅是离线浏览某个网页(让你离线快速浏览某个网页的内容当然是它的一项重要功能),它可以从Internet的任何地方抓回你想要的任何文件,它可以在你指定的时间自动登录到你指定的网站下载你指定的内容,你还可以用它来创建某个网站的完整的镜象,作为创建你自己的网站的参考。
==========================================
0040D5D2|.E8 A9F10200 call 0043C780 ; eax=文件名是否改变
0040D5D7|.59 pop ecx
0040D5D8|.85C0 test eax, eax
0040D5DA|.59 pop ecx
0040D5DB|.74 13 je short 0040D5F0 ;没改变,则跳
0040D5DD|.53 push ebx ; /Arg3
0040D5DE|.53 push ebx ; |Arg2
0040D5DF|.68 D0884800push004888D0 ;|Arg1= 004888D0 ASCII
"This program's name has been changed; please rename the program to its original name."
0040D5E4|.E8 225A0400 call 0045300B ; \pro.0045300B
0040D5E9|.6A 02 push 2
0040D5EB|.E8 1A780200 call 00434E0A
0040D5F0|>A1 64884800 mov eax,
...
0040D63A|.3B30 cmp esi,
0040D63C|.5E pop esi
0040D63D|.74 13 je short 0040D652
;如果文件未被修改,则跳
0040D63F|.53 push ebx ; /Arg3
0040D640|.53 push ebx ; |Arg2
0040D641|.68 78884800 push 00488878
; |Arg1 = 00488878 ASCII "This program has been altered, possibly by a
virus; program execution will stop now."
0040D646|.E8 C0590400 call 0045300B ; \pro.0045300B
0040D64B|.6A 03 push 3
0040D64D|.E8 B8770200 call 00434E0A
0040D652|>834D FC FF or dword ptr , FFFFFFF>
...
0044A8D4 .F>call ;Get(Name,SN)
0044A8DA .C>mov dword ptr , 1
0044A8E1 .E>jmp short 0044A90A
0044A8E3 .B>mov eax, 0044A907
0044A8E8 .C>retn
...
0042E4F0/$5>push edi
0042E4F1|.8>mov edi, ;edi=Name
0042E4F5|.8>test edi, edi
0042E4F7|.7>je short <Error1>
0042E4F9|.5>push edi
0042E4FA|.E>call <eax=GetLength(Name)>
0042E4FF|.5>pop ecx
0042E500|.E>jmp short 0042E504
0042E502 >|>3>xor eax, eax
0042E504|>8>cmp eax, 5 ;len(Name)>=5则跳
0042E507|.7>jnb short 0042E50D
0042E509|.3>xor eax, eax
0042E50B|.5>pop edi
0042E50C|.C>retn
0042E50D|>5>push ebx
0042E50E|.5>push esi
0042E50F|.B>mov esi, 5DFEE4A4 ;esi=x=5dfee4a4
0042E514|.3>xor ebx, ebx ;ebx=0
0042E516|>8>/test edi, edi ;edi=Address(Name)
0042E518|.7>|je short 0042E523
0042E51A|.5>|push edi
0042E51B|.E>|call <eax=GetLength(Name)> ;eax=length(Name)=7
0042E520|.5>|pop ecx ;ecx=name
0042E521|.E>|jmp short 0042E525
0042E523|>3>|xor eax, eax
0042E525|>8>|add eax, -4
0042E528|.3>|cmp ebx, eax
0042E52A|.7>|jnb short 0042E538
0042E52C|.3>|xor esi, ;esi==x=x or Name,i=0..4..8..
0042E52F|.F>|test bl, 40
0042E532|.7>|je short 0042E535
0042E534|.4>|inc ebx
0042E535|>4>|inc ebx
0042E536|.^ E>\jmp short 0042E516
0042E538|>8>mov eax, esi
0042E53A|.5>pop esi
0042E53B|.5>pop ebx
0042E53C|.5>pop edi
0042E53D\.C>retn
下面是注册函数:
Function GetSerial(ch:String):string;
var x,k:dword;
i:integer;
ch,c:string;
begin
c:='';
if length(ch)>=5 then begin
x:=$5DFEE4A4;
for i:=1 to length(ch)-4 do begin
c:=midstr(CH,i,4);
k:=ord(pchar(c))
+(ord(pchar(c)) shl 8)
+(ord(pchar(c)) shl 16)
+(ord(pchar(c)) shl 24);
x:=x xor k;
end;
c:=inttostr(x);
end ;
result:=c;
end;
我的注册信息如下:
Name:=SPC_CLL SN:=228698340 可能是猫的基础差.
所以以为楼主兄弟的分析不祥细...PO:LK<>:"><{}Po 我只贴了程序自检验代码和注册码的计算过程,其他的就忽略了。
至于这些代码是怎么找到的,那就要兄弟们练习了。
总要给兄弟们一些思考的空间啊! 學習學習~ 学习下
页:
[1]