[转帖]“电脑消磁圣手”的消磁“秘术”

游侠无极限

“电脑消磁圣手”的消磁“秘术”

1 p: l  ^. H( h5 C* }! k前言：
平安夜的晚上，在网上随处溜达，偶尔看到一款名叫《电脑消磁圣手》的软件，是某公司开发的（具体是什么公司大家自己去看吧，我就不说出来了，免得麻烦）。据软件中的说明“本系统一直在国外市场上销售，效果很好，最近把系统翻译成中文版，免费提供给国内的朋友使用。”，至于软件的作用，又有如下的说明：“本系统非常适合在电脑前长时间工作的人，能够高效的清除电脑产生的电磁波，对工作者的身体起到了保健的工作。本系统根据电脑产生的电磁波，自动产生融磁波，中和电脑产生的磁波。由于电脑在不停的释放电磁波，建议您每隔一个小时进行一次消磁工作。”听起来十分诱人，于是就down了下来把玩一番。最新版本好像是6。3版（升级了好多次了吧）。

- x& k  ]2 Z/ m6 Q" c: Z' s5 I试用：
; p2 [$ y6 m* L  d9 ~+ d, X" G1 u下载下来的是一个压缩包，解开后只有一个可执行文件。运行一下，首先弹出了浏览器窗口，连向了一个网站（可能是软件公司的网站吧），随手关掉。软件的主界面倒是很简捷，最主要的就是“开始消磁”按钮。点击一下，出现了一个进度条在不断的前进，同时还有提示文本出现，就是这些“系统正在做消磁前的准备...”、“系统正在收集电脑的电磁波...”、“系统正在释放融磁电波...”、“系统正在释放融磁电波...”、“系统正在做最后的消磁工作...”。经过这样一番神秘的仪式之后，弹出一个对话框提示“融磁成功，已经成功中和电脑周围磁场?”刹那之间，我对作者的佩服如同滔滔江水连绵不绝，这可是项巨牛x的技术，只靠软件就可以进行消磁了，而且还是电脑周围的电磁波，不知道作者是否申请了专利。怀着最作者的无比崇敬和那份极度的神秘感，我飞快的的把软件给肢解了：）
) f1 ], s/ {9 n7 ]
分析：
8 J" c6 C/ q! q: m0 {8 g& ]2 H检测一下，是用Delphi写的，没有加壳。用DeDe载入后，反编译“开始消磁”按钮点击事件对应的代码，复制如下：
2 W) i+ Q5 f9 I$ m; O  R7 H
) Q0 Y) D5 E3 P' Q4 Z0047FF28   53                     push    ebx
6 U  ?9 c1 l5 [! d0047FF29   8BD8                   mov     ebx, eax
+ n! O. P, f: M( U! q, b6 m0047FF2B   33D2                   xor     edx, edx
0 B( G8 t$ Z2 z, S7 |2 \
* Reference to control TFrmRamMain.Panel2 : TPanel
|
0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
5 I1 [( j: ?  P' s. _7 P4 e  `|
0047FF33   E80CA6FAFF             call    0042A544
0 f+ m" p  N* b0047FF38   B201                   mov     dl, $01
$ J3 }! I/ X: [
* Reference to control TFrmRamMain.Panel1 : TPanel
6 O' y0 y- X) [# n|
1 z5 ~8 H9 e7 w0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]
7 @  r; u) C& h  H( }& X
+ T" _% W' \" A  e* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
0047FF40   E8FFA5FAFF             call    0042A544

& m. V. I' ]2 s+ o* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
|
0047FF45   BA7C014800             mov     edx, $0048017C

8 |; M7 D. F( u* O1 P* Reference to control TFrmRamMain.Label3 : TLabel
|
0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
- ^. c4 k4 r/ I6 c1 H  J|
/ i4 L- Z" r9 J3 V0 ~0047FF50   E807A7FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
6 ^: c2 W: Q' S3 M# [|
0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
|
# [2 w2 w7 Z/ d, Z  i! T0047FF62   E8D1020000             call    00480238

, K6 _0 A) a' H/ W. y1 a0 w( R* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
* k) f: }! n# v7 b5 k7 V) q4 `, t7 }|
- ]; p  r* l* H0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]

) d* o5 ]! q( o; ~9 i0 ]* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
4 I7 W' g, s0 V. N/ D) {% r, E|
- p/ {* i$ J/ r! [0047FF6D   E8F288FDFF             call    00458864
0047FF72   8BC3                   mov     eax, ebx
, t! h! a- x, M4 ~! o/ e: t3 N9 L
* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
3 o4 C8 Q9 E. ~, d8 O2 v% j|
0047FF74   E8BF020000             call    00480238

+ Q* ]( K- m# h2 z5 ?* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
' \( l% Z0 _% l. ^|
0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]

0 g' S* {1 r- C* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
# X$ m8 G) O+ O" m% `- l0047FF7F   E8E088FDFF             call    00458864
0047FF84   8BC3                   mov     eax, ebx

* U7 w2 I5 B& h9 ^  l# h* Reference to : TFrmRamMain.Delay()
|
0047FF86   E8AD020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
" K7 M& K1 T7 `: Z( X! X0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
) A: a4 b  x/ f* _- _+ w7 b# E|
: `5 j5 ^( t1 ?1 C2 @0047FF91   E8CE88FDFF             call    00458864
7 e4 V% Q2 m% I+ B  Q' U6 @/ o0047FF96   8BC3                   mov     eax, ebx
- [8 y8 s1 [  ^; X8 q* }& V
) o/ A4 b' @+ D& ~1 r* Reference to : TFrmRamMain.Delay()
! |$ C, u0 b9 y! I! h3 _3 @4 `|
0047FF98   E89B020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]

. d. J/ A- y$ y6 m" A* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
3 i4 M% ?/ n6 M( l" r2 p0047FFA3   E8BC88FDFF             call    00458864

" b$ C3 g; W) i/ R* S, k0 i* Possible String Reference t '系统正在收集电脑的电磁波...'
/ G7 H6 O& D8 I|
/ r! j) B& @6 F0047FFA8   BAA0014800             mov     edx, $004801A0

* Reference to control TFrmRamMain.Label3 : TLabel
|
0 Y4 Q- W* K/ P; z; v; G0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]
$ M( L% R3 o% Z8 [9 \" E% D
* Reference t controls.TControl.SetText(TControl;TCaption);
0 Y6 M' ]8 u' E- c! W|
" U4 [( Z/ l. Z2 G4 w( R0047FFB3   E8A4A6FAFF             call    0042A65C

- M6 m( R7 i# ^- v2 Z; D& Z) d* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
$ b2 C* N* g. [2 t|
0 C6 d0 h( f1 h7 O8 l, w* Y0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]
5 {& Y6 _- W  B% B
6 `; s+ G) @% T2 o% ?/ `* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FFBE   E8A188FDFF             call    00458864
0047FFC3   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
|
0047FFC5   E86E020000             call    00480238
' \: J0 A& G1 F/ B8 W$ `1 v
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
( c* z) k% U* B1 x+ \+ o|
0 i1 b4 t. f% F. j' p6 [* h/ z3 n0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]
& r9 \) W7 i' Z- h. Z4 }
# M( D6 _* n. I" [7 p& Z" ^" ?* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
% t% J/ h- m2 w" U|
' C7 l# d- X+ J( P3 E0 z9 t6 q0047FFD0   E88F88FDFF             call    00458864
+ R% w" I, L. J- p6 c' L0047FFD5   8BC3                   mov     eax, ebx
( W2 P% y7 J7 o4 ^
& k+ X7 M0 M# ?3 B5 e6 E* Reference to : TFrmRamMain.Delay()
$ v# w4 l+ U- Q2 B4 T5 P9 k! k|
0047FFD7   E85C020000             call    00480238

9 ?" ^/ z6 }* [$ ^5 r7 ~* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
5 t- h5 @) l* y3 n" S, x2 H  o: E& T|
0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
' f1 s4 |2 I3 E+ d" w8 m) H; j
7 @0 e9 E' Q. ]) o* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
, H- `$ O- [# {|
0047FFE2   E87D88FDFF             call    00458864
0047FFE7   8BC3                   mov     eax, ebx
. @4 H9 w* L/ Z, j( C6 O8 t
% Y) ~- g+ P6 e7 Y  o9 v* Reference to : TFrmRamMain.Delay()
|
0047FFE9   E84A020000             call    00480238
9 C3 n3 c/ v2 e6 v7 k
8 ?/ f7 V  R* p4 a  \* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]

. t/ ~9 I5 C+ o* z* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
! \! [: a: f# W|
6 p- Q; k. k# d. H8 `0 q0047FFF4   E86B88FDFF             call    00458864
8 G+ q: z8 k$ m. G* P6 L' @0047FFF9   8BC3                   mov     eax, ebx
! C% _, ]* x0 F
- x: j9 ^8 w. J# k3 @5 C4 w* Reference to : TFrmRamMain.Delay()
|
0047FFFB   E838020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0 R/ i$ u5 R4 i  _$ |% _00480000   8B83F8020000           mov     eax, [ebx+$02F8]
( D* p6 I8 f5 t- \6 z& }5 J
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480006   E85988FDFF             call    00458864
, o# P+ V( ?7 P8 M  Z2 o0 g- w2 t  z
2 F( E" l* V, t. p- O5 C+ i# L2 s* Possible String Reference t '系统正在释放融磁电波...'
& a# D( C/ Y& z! Q|
0048000B   BAC4014800             mov     edx, $004801C4

  g7 W. t  [) L' [; J! }* Reference to control TFrmRamMain.Label3 : TLabel
|
00480010   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
$ b8 y# F! H1 F% X% \- r|
00480016   E841A6FAFF             call    0042A65C
, ^  W5 O) a7 b2 U+ Y  R( o7 g
) t! b% `' c$ P) D* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
/ Z$ j5 Z8 L* P. Q1 t4 }; Y, Z|
0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
, {9 n5 A% v6 d3 u  e
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480021   E83E88FDFF             call    00458864
& M& S6 ~4 f! M. B, P+ |2 n00480026   8BC3                   mov     eax, ebx
& s2 C, ^: `+ @- U
* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
, E( ]9 V* h$ x* M( {$ M4 C8 k# S|
00480028   E80B020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
2 G$ ]. N* w$ W0048002D   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
1 r* K7 C! j; Q, c3 z2 L; @; s/ w00480033   E82C88FDFF             call    00458864
00480038   8BC3                   mov     eax, ebx

, U3 e) ~+ n5 \# o0 X$ e: Q! d* Reference to : TFrmRamMain.Delay()
|
% Y' b, q) a/ f0048003A   E8F9010000             call    00480238
) w3 D+ k1 \  }2 F9 X
* X# G: X5 [, R, Z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
/ W: b" F+ ?" y5 q+ X! N* k4 J|
* ~8 N! J: ]4 Q* J5 G/ o0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480045   E81A88FDFF             call    00458864
0048004A   8BC3                   mov     eax, ebx
! \+ H# g' @& o$ v. J( ]
6 e( r+ n: p3 k" L3 _# [* Reference to : TFrmRamMain.Delay()
|
0048004C   E8E7010000             call    00480238

! [) [+ K8 c! A% _& ]1 `* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480051   8B83F8020000           mov     eax, [ebx+$02F8]
8 o' l9 W+ i) ]3 v
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
: V7 E/ ?3 d$ R( h& E& M00480057   E80888FDFF             call    00458864
0048005C   8BC3                   mov     eax, ebx
. W- \0 H+ P, ~
* Reference to : TFrmRamMain.Delay()
|
& `! l8 X7 r9 Q9 U7 z1 i0048005E   E8D5010000             call    00480238

% g6 [: I5 e% t/ k8 s* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
" X/ W" a2 t, c+ B, P4 }0 G|
00480063   8B83F8020000           mov     eax, [ebx+$02F8]
8 |+ q' m. w, C1 Y3 b7 z! H2 B
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480069   E8F687FDFF             call    00458864

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

& L! _) c, {* |  y5 J, `/ u% Z/ U. }* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
) f; y5 [6 r, `- o|
00480074   E8EB87FDFF             call    00458864
00480079   8BC3                   mov     eax, ebx
/ X% J2 q$ ~( ?. |
' S8 ^% N7 s7 q! R5 h. o* Reference to : TFrmRamMain.Delay()
|
6 e' K# J3 u: m$ V; Q1 @0048007B   E8B8010000             call    00480238
, M$ N0 z5 Q6 B
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480080   8B83F8020000           mov     eax, [ebx+$02F8]
- @/ ]" ?0 \- K. w2 z
4 O/ _0 b, a# j* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
3 `' U" W# @! L/ G2 x2 A/ n1 Z3 Y6 f' E|
: s8 c4 V9 F6 S# \00480086   E8D987FDFF             call    00458864
0048008B   8BC3                   mov     eax, ebx

( h% d, F! _- @( L4 e- h* Reference to : TFrmRamMain.Delay()
' U- J( x* }% ^. C+ E9 k( ~0 G|
0048008D   E8A6010000             call    00480238
  z5 [4 n0 k# B( W" c! ~
/ X7 j2 `1 p( O9 x8 C! s8 ]) F/ g* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
6 _1 k5 o0 f8 z. b- R" T6 j& n00480092   8B83F8020000           mov     eax, [ebx+$02F8]

7 t& M- Q' D6 Y0 ?: M( ?; M* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 P$ K* \* q) v& U. Z|
00480098   E8C787FDFF             call    00458864
, m3 }/ l5 h" ], O# d& w/ L1 d0048009D   8BC3                   mov     eax, ebx
7 D$ ^6 }, K: t) a/ X; c% ~
  J( `* t. Q0 Z+ |* Reference to : TFrmRamMain.Delay()
" K1 P. p" L: ~( O; K  a3 e|
0048009F   E894010000             call    00480238
. y. t: o$ r8 H% I( b2 i1 u
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800A4   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
$ t1 K8 Q! }. V" j0 i9 i0 v6 i|
" Y+ ~" y9 f) P8 F004800AA   E8B587FDFF             call    00458864
& ^; J9 B) E9 [004800AF   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
004800B1   E882010000             call    00480238

: `# `/ j0 V. V2 I* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800B6   8B83F8020000           mov     eax, [ebx+$02F8]
$ B9 k- c9 r% P8 R! T( ^; Y6 Y% C0 h
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800BC   E8A387FDFF             call    00458864

& G% c. O! a: b1 N* Possible String Reference t '系统正在做最后的消磁工作...'
; N2 M9 b/ n9 t1 X$ P|
004800C1   BAE4014800             mov     edx, $004801E4

& h. P; y$ i4 G- X7 a! z  ^* Reference to control TFrmRamMain.Label3 : TLabel
|
004800C6   8B83F4020000           mov     eax, [ebx+$02F4]

9 [& t9 C( ?- t, z; o/ A* S* Reference t controls.TControl.SetText(TControl;TCaption);
& y, t1 Z% O& U4 E|
8 \6 E: j. O9 X4 \004800CC   E88BA5FAFF             call    0042A65C

; w* `. x! H. e/ H( p* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
' Z% x" \6 R$ V1 y) M004800D1   8B83F8020000           mov     eax, [ebx+$02F8]
* |* x; Z- _/ `/ ~. @# ~
! Q+ @+ K2 W, X+ n* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
8 I5 G0 G# I( O004800D7   E88887FDFF             call    00458864
( N5 i) c; S$ M* [4 z004800DC   8BC3                   mov     eax, ebx
. |; P- A$ w) r) L! b7 w: i7 u4 x
* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
, ?& _& a- L. r% i/ G|
/ N1 \" n( t+ A004800DE   E855010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
/ \% T* H9 T9 P1 E. G|
6 w" G, x4 e- m7 G  P; k004800E3   8B83F8020000           mov     eax, [ebx+$02F8]
9 a/ @, O& O: a3 ?$ O' g# j( m
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
' v7 F( N4 h. _2 i8 A* I|
004800E9   E87687FDFF             call    00458864
004800EE   8BC3                   mov     eax, ebx

$ W" e5 m# u: c8 q) ~+ R6 h* Reference to : TFrmRamMain.Delay()
|
7 m3 s+ K$ y& w( D004800F0   E843010000             call    00480238
: @, D. w, X3 a9 A- q( N
- B3 U! ]# ?% D* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
% T1 J9 D  R4 O, N5 i  K004800F5   8B83F8020000           mov     eax, [ebx+$02F8]

6 O; F+ `; A* n( k: {/ y0 J* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
& ~3 b) A) }+ H2 D6 t|
004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx

& ?3 n2 i6 I! P; q/ B7 q: |! {1 b* Reference to : TFrmRamMain.Delay()
, u- Q/ z. W" ~( x|
00480102   E831010000             call    00480238
1 h! w' Y  o# O+ y# w4 b
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
2 a, t$ {5 T. Z7 }+ L, }7 L|
* b- Y5 m6 E' ], I" O. ]7 d00480107   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
" j1 a- o" p2 S0048010D   E85287FDFF             call    00458864
00480112   8BC3                   mov     eax, ebx
. S7 {3 E% j! o/ D) g( _( g( d1 Q
/ ~9 A4 K) Q9 g8 K* Reference to : TFrmRamMain.Delay()
& h* E* R+ m- r1 N6 d, X|
00480114   E81F010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480119   8B83F8020000           mov     eax, [ebx+$02F8]
& k& e0 @. Y$ a* p3 }# F
" }" A3 I6 ^$ T3 @* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
  @: I+ j$ W2 z" [) X|
0048011F   E84087FDFF             call    00458864
. @) B( r3 z( @8 p0 }00480124   B8E8030000             mov     eax, $000003E8

/ f& G- [4 K' A/ D0 ]* Reference t system.@RandInt;
|
00480129   E86629F8FF             call    00402A94
0048012E   85C0                   test    eax, eax
00480130   6A40                   push    $40

* Possible String Reference t '电脑消磁圣手'
" w9 q6 v$ s; m+ S5 m/ P& s|
00480132   B900024800             mov     ecx, $00480200

# E- N# W: e" Q/ {% y2 a* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
2 r5 T/ D3 I& H- L, ~4 P|                                ?
|
) G" {9 c5 B6 n- d% }6 R! Q00480137   BA10024800             mov     edx, $00480210

1 Z1 k, F8 [; X: L) Z* Reference to TApplication instance
1 S# G1 t1 Q3 Z% @|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
00480141   8B00                   mov     eax, [eax]
6 i0 Y8 |+ N. L; t
% z8 g- N6 n. l& m- w* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
  M' ^# v1 w" W  @& _/ G|
00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
* b5 ~/ L, O6 f: B00480148   33D2                   xor     edx, edx
4 n+ H1 P& @$ k$ _1 X* s
* Reference to control TFrmRamMain.Panel1 : TPanel
$ H1 C* R- K) [|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]

* `4 x* L% n/ e# K* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
00480150   E8EFA3FAFF             call    0042A544
6 O) ^* r  f0 b/ u00480155   B201                   mov     dl, $01
5 g/ v7 y9 n5 R* x2 }4 |
2 h9 X% @; n, ~( x$ h* Reference to control TFrmRamMain.Panel2 : TPanel
# p9 F  f4 ?1 ~- \' m|
- ]) n' ?! [1 m' N00480157   8B83FC020000           mov     eax, [ebx+$02FC]

4 X0 H6 j8 ]% J$ p3 Q, `* Reference t controls.TControl.SetVisible(TControl;Boolean);
2 N- f" v, ]3 e. j( ~/ Z|
: o" I3 [4 }! Q! L9 V, S/ y0048015D   E8E2A3FAFF             call    0042A544

1 O! O" l: e% m8 d  Z* Reference to TFrmAbout instance
: H0 b" ?+ I/ N6 a* p. h) o|
00480162   A148264800             mov     eax, dword ptr [$00482648]
- P5 P) p( e5 [% x00480167   8B00                   mov     eax, [eax]
) {& Q+ A' f  O5 u+ {  m00480169   8B10                   mov     edx, [eax]
4 M2 Y" X& z5 M7 S& e& t' o6 _
6 z2 J0 i) s$ S. f* Reference to method TFrmAbout.ShowModal()
/ w0 d& |  \) R+ i2 Y|
0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
. r3 z9 X) l# R, e" y0 q. g3 O00480171   5B                     pop     ebx
0 k3 s$ n; j1 S1 l( B) ]00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： 004802F8 55 push ebp 004802F9 8BEC mov ebp, esp 004802FB 33C9 xor ecx, ecx 004802FD 51 push ecx 004802FE 51 push ecx 004802FF 51 push ecx ! k. K. e. o' Z: F00480300 51 push ecx 00480301 51 push ecx / A1 E2 E6 v& v- N# ]00480302 51 push ecx / { p2 t1 A2 R00480303 51 push ecx / I- \+ S$ G5 _" J0 Y4 x7 R2 M00480304 33C0 xor eax, eax ( p0 K. P% H$ e( w5 i00480306 55 push ebp * Possible String Reference t '檫0?脬嬪]? | * w* L A K: F00480307 6808044800 push $00480408 ***** TRY | 0048030C 64FF30 push dword ptr fs:[eax] 2 B: P7 \) f6 o l' Z2 f0048030F 648920 mov fs:[eax], esp 00480312 8D55F0 lea edx, [ebp-$10] $ f7 T3 n. h/ p& f$ U, ?9 R* Reference to TApplication instance | ; k& ?( ?8 g4 Y! }3 j9 H O! H0 z/ x00480315 A148284800 mov eax, dword ptr [$00482848] + N6 y3 p( _- _0048031A 8B00 mov eax, [eax] + J+ L7 J5 C4 D: H, t ^/ V . R% I4 \$ W# p. B8 }+ A( G* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 1 \$ j! G% I) u0048031C E82F97FCFF call 00449A50 ;Who am I? ' b) C2 N, [; e3 R00480321 8B45F0 mov eax, [ebp-$10] 00480324 8D55F4 lea edx, [ebp-$0C] * Reference t Unit_00406FD0.Proc_00408110 | 00480327 E8E47DF8FF call 00408110 0048032C 8B45F4 mov eax, [ebp-$0C] ' s4 F# i" t+ }' r0048032F 50 push eax 00480330 8D55E8 lea edx, [ebp-$18] / ^1 g( K: ?% s! ?+ Q* Reference to TApplication instance | 00480333 A148284800 mov eax, dword ptr [$00482848] 6 h8 H) L. j& m% m2 X+ P00480338 8B00 mov eax, [eax] 3 ?4 o9 p1 E8 D M8 W . z1 x7 E" x( z' F& m0 j* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 9 x" k& n. {& E' l& ]! {' Y7 _0048033A E81197FCFF call 00449A50 % h7 d& N0 h9 Y# }2 ]# w, K0048033F 8B45E8 mov eax, [ebp-$18] 00480342 8D55EC lea edx, [ebp-$14] * Reference t Unit_00406FD0.Proc_004080DC | 00480345 E8927DF8FF call 004080DC 0048034A 8B55EC mov edx, [ebp-$14] 0048034D 8D45FC lea eax, [ebp-$04] % X( s2 D8 R j' E( V1 O00480350 59 pop ecx 1 Z. c$ J o# P * Reference t system.@LStrCat3; 0 m( D) C0 ]$ Y0 j6 j| 9 m$ m' c- S4 }) N4 ?! ^8 y00480351 E8CA39F8FF call 00403D20 3 E; J4 b- ]2 H00480356 B201 mov dl, $01 8 w* U7 ~. c' |/ u3 o% P* Reference to class TRegistry | 9 G# Z# ^- I3 [/ Y9 g Z00480358 A174F14700 mov eax, dword ptr [$0047F174] 6 }9 i% {; B; z8 D! a * Reference t Unit_0047F114.Proc_0047F274 | 0048035D E812EFFFFF call 0047F274 8 H; \) Z7 z" w' S/ u00480362 8945F8 mov [ebp-$08], eax $ }& I/ o6 x) ?0 l, E5 v5 k00480365 33C0 xor eax, eax ' g* R$ y. H# O. z5 ?8 o3 q$ V00480367 55 push ebp 7 ~, i. O. D3 f1 |$ |) x0 g00480368 68DE034800 push $004803DE / b$ v0 x9 y6 G' m% r" r/ M' M) c ***** TRY | & t% O4 y6 v& g- \0 G" b1 V0048036D 64FF30 push dword ptr fs:[eax] 00480370 648920 mov fs:[eax], esp " b- c1 x) p+ Y( a* X7 M5 ]00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F314 | 1 @* T1 V+ {0 Y4 J7 [' b' K0048037B E894EFFFFF call 0047F314 1 e, K; K$ u- `3 P5 |0 y00480380 B101 mov cl, $01 * Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） | Version\Run' + @; s8 n; I+ m: Z- D| 00480382 BA1C044800 mov edx, $0048041C 00480387 8B45F8 mov eax, [ebp-$08] 0 @' N9 o/ u! o! q; ? ; E3 r, J) z9 \5 D. ]0 e0 i1 P* Reference t Unit_0047F114.Proc_0047F378 1 z# k/ s; ~/ ~2 \3 k S| , J# q, D; \: M4 ]0048038A E8E9EFFFFF call 0047F378 ( E( a/ Y7 Y9 k8 o: _) d4 g- Z0048038F 84C0 test al, al 00480391 7435 jz 004803C8 00480393 8D4DE4 lea ecx, [ebp-$1C] : i# ` F9 o l. U5 i4 s1 o * Possible String Reference t 'JrRClean' | 00480396 BA54044800 mov edx, $00480454 0048039B 8B45F8 mov eax, [ebp-$08] 6 m' s. [* l7 o+ u! l 9 R: t/ g2 E3 H1 l n* Reference t Unit_0047F114.Proc_0047F540 E/ K7 b1 @/ Z9 F* T( \1 N+ a| 6 h( t! D- `, y, X7 f3 j0048039E E89DF1FFFF call 0047F540 8 I- t4 A0 y* m8 Z004803A3 8B45E4 mov eax, [ebp-$1C] ( o. ]) b3 M: ^. f: z: ^5 y( l004803A6 8B55FC mov edx, [ebp-$04] ' w* n8 A: ]' ^, Y* Reference t system.@LStrCmp; ! r; s% ^0 y, x2 G& ?7 H0 f) P| 004803A9 E8363AF8FF call 00403DE4 / y& h, T% k I; i+ l c004803AE 7410 jz 004803C0 ( Y+ ^4 @, y) ^+ k F* D- N: E004803B0 8B4DFC mov ecx, [ebp-$04] * Possible String Reference t 'JrRClean' 5 ?7 r+ k' Y" W# r( ]/ y| * b& W8 b: i& _* D004803B3 BA54044800 mov edx, $00480454 004803B8 8B45F8 mov eax, [ebp-$08] - J+ Y+ ]; ]' h* Reference t Unit_0047F114.Proc_0047F514 | ( }. H. D8 x, L9 A/ B ^004803BB E854F1FFFF call 0047F514 004803C0 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F2E4 | 004803C3 E81CEFFFFF call 0047F2E4 ' D; ?6 r+ c# J3 F; d004803C8 33C0 xor eax, eax 5 p. Z$ }! w2 f. b* ^& n8 Z( Z004803CA 5A pop edx 1 M. b& e! B6 |0 l7 t, W9 v4 x5 Z004803CB 59 pop ecx - z! r3 r3 I! `* ~. d2 s" u% \4 N004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx ****** FINALLY ; h) Q8 @: l! t) d| 004803D0 68E5034800 push $004803E5 8 F2 o+ ]2 o0 S004803D5 8B45F8 mov eax, [ebp-$08] ' Q3 `2 W% v( l& B$ x # Y2 b& L' I3 x7 ~5 f4 z/ m* w, P. x* Reference t system.TObject.Free(TObject); | 004803D8 E8EF29F8FF call 00402DCC - V& k% w6 B1 m! w+ }004803DD C3 ret 0 q0 Z5 f- b H; D% H% `4 Y5 o4 f / q6 N& C1 ^* L, w4 d * Reference t system.@HandleFinally; ; e) d1 M( u. t' _$ w" f3 t| $ x- {# Q6 W4 m7 n8 f0 u004803DE E90931F8FF jmp 004034EC 004803E3 EBF0 jmp 004803D5 ) b8 ~7 E- q1 Q% R3 h! M ****** END # s5 J4 R$ \# u4 I" T7 l| 9 r% V: o% X. Z/ u5 H6 ~8 Z004803E5 33C0 xor eax, eax 004803E7 5A pop edx 1 V6 @7 b( g1 J& m: |# P' m* B; J' ?004803E8 59 pop ecx 3 |% n% e9 D- T4 I+ B% z+ w004803E9 59 pop ecx 004803EA 648910 mov fs:[eax], edx B) N7 J4 Z8 {, W ' Z/ W# |2 b; I% ]****** FINALLY | - w; Y' k( g/ g' Q% J * Possible String Reference t '嬪]? 8 d8 H& i+ `) @- K8 ]| 004803ED 680F044800 push $0048040F 004803F2 8D45E4 lea eax, [ebp-$1C] 004803F5 BA05000000 mov edx, $00000005 6 h. U. P+ q% N% k7 H* Reference t system.@LStrArrayClr; | 004803FA E87936F8FF call 00403A78 004803FF 8D45FC lea eax, [ebp-$04] ; R9 c+ C; q D3 f 1 }) a- o3 `' Y0 t# z5 Y* Reference t system.@LStrClr(String;String); | 00480402 E84D36F8FF call 00403A54 0 {, \6 q/ | F% X+ e! y+ T9 M00480407 C3 ret 3 C F* Z; O0 N 5 |& k- m) s) E0 D% E0 i; a6 ^% W3 ^. q* Reference t system.@HandleFinally; ' Y% {8 Q* i, v3 Y' h! Z) U! e( ]| 00480408 E9DF30F8FF jmp 004034EC 0048040D EBE3 jmp 004803F2 ' a( {% A6 c/ k; F/ K; t- a ****** END | & H0 Z8 X5 _- Y3 I5 L/ F# W' q+ v0048040F 8BE5 mov esp, ebp 00480411 5D pop ebp 1 h$ ~# M5 R) S/ q: u2 c00480412 C3 ret + V. T% o, K- C! ]% Z) ]上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） 只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 6 d7 B( ^) W: R7 m! f0 N5 `& z0 F( D结语： 上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 权当一笑吧，呵呵~~~~~~~~~~~~ ' K' J8 h0 e- X 2 S" z% ^# `' ?* k& _( I5 [8 a7 L) s C3 ~) V2 _" U, B monkeycz于2004年平安夜 2004年12月24日

大家如果是用VC什么开发的话，可以用用Sleep（）

煎饼

delay

hater315

看的快睡着了.

煎饼

以下是引用hater315在2004-12-25 15:45:00的发言： % ?+ ^; @3 f! ?' T看的快睡着了.

8 c0 ~. w; S5 H. {% q& N % N& Z6 z2 {8 a+ E; Y 睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

还好，不过不喜欢DELPHI，用VC的逆向后最好读了。

游侠无极限

Delphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

Eagle

以下是引用游侠无极限在2004-12-26 22:03:00的发言： Delphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

/ I2 [9 j0 h, r8 `- _$ Q# X' s 对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

干嘛一定要用专用的反汇编工具啊？VC的你直接用W32DASM或OD就行了。

煎饼

都是高手,偶闪

fimqad

以下是引用煎饼在2004-12-25 15:49:00的发言：
.


睡就睡了吧,这个就是睡觉代码

; N5 f% V. C* G; e

同感