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

游侠无极限

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

2 X) _6 X  [; j, b; E- j! \' }, \7 s, M试用：
下载下来的是一个压缩包，解开后只有一个可执行文件。运行一下，首先弹出了浏览器窗口，连向了一个网站（可能是软件公司的网站吧），随手关掉。软件的主界面倒是很简捷，最主要的就是“开始消磁”按钮。点击一下，出现了一个进度条在不断的前进，同时还有提示文本出现，就是这些“系统正在做消磁前的准备...”、“系统正在收集电脑的电磁波...”、“系统正在释放融磁电波...”、“系统正在释放融磁电波...”、“系统正在做最后的消磁工作...”。经过这样一番神秘的仪式之后，弹出一个对话框提示“融磁成功，已经成功中和电脑周围磁场?”刹那之间，我对作者的佩服如同滔滔江水连绵不绝，这可是项巨牛x的技术，只靠软件就可以进行消磁了，而且还是电脑周围的电磁波，不知道作者是否申请了专利。怀着最作者的无比崇敬和那份极度的神秘感，我飞快的的把软件给肢解了：）

7 e) C5 L( m5 P/ ^分析：
检测一下，是用Delphi写的，没有加壳。用DeDe载入后，反编译“开始消磁”按钮点击事件对应的代码，复制如下：

0047FF28   53                     push    ebx
' _% D1 T# ^2 V0047FF29   8BD8                   mov     ebx, eax
0047FF2B   33D2                   xor     edx, edx

* Reference to control TFrmRamMain.Panel2 : TPanel
8 W/ {2 D6 b' `|
0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
% N& Q% S8 o# u8 C' Z% N0047FF33   E80CA6FAFF             call    0042A544
0047FF38   B201                   mov     dl, $01
5 C; S: J3 J* e& I; [3 w6 U
* Reference to control TFrmRamMain.Panel1 : TPanel
|
0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]
) M3 |: f5 Z8 ~0 n# F& V
* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
0047FF40   E8FFA5FAFF             call    0042A544

( @5 o* ?6 S9 X6 x# L) v6 F; {3 x* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
& U3 g- _; ?' Y# L- D8 f|
0047FF45   BA7C014800             mov     edx, $0048017C

, J$ t+ f2 g" q* k- ~- Y0 v9 G* Reference to control TFrmRamMain.Label3 : TLabel
) `; N5 |% c- ~! b5 S|
9 C- p7 c: \% Y0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]
/ `: ~( I( |( a3 n  q: q( y
* Reference t controls.TControl.SetText(TControl;TCaption);
|
0047FF50   E807A7FAFF             call    0042A65C

. w# o) D0 E; D+ X0 O6 L  Q8 C* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
|
8 S# \) `: `" n3 x& w* g( y$ w! D0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]
. k* i* K; v; p( |4 L
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx
/ f* I5 f& G: E  ~6 v# Q7 X8 F, m9 S
* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
/ m% m  F- W$ X2 D( o|
' T* a& z, T) J3 s2 n  e0 ~0047FF62   E8D1020000             call    00480238
9 q7 c, G; G  F+ V; _. [: Z
$ j* C6 d% d: j3 S& x% p6 z5 a* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
|
* O) s, n0 a9 G* ^) B( R9 J0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]

! B# l1 x  p1 d9 p2 N: y: n* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
2 \+ D- H$ L. @8 [1 s|
0047FF6D   E8F288FDFF             call    00458864
0047FF72   8BC3                   mov     eax, ebx
3 @3 q6 n+ D. H9 u2 @
1 r: W; d8 P" j( e) F/ O* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
|
0047FF74   E8BF020000             call    00480238

  Z, G1 r% k2 q! Q& z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
|
0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]
9 R- T$ E& o3 @$ P/ z
, g9 R* j7 S" }5 p% _% c* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
' i) K  a5 @% N9 ?2 `8 T|
! Q& P/ h8 z. ~& ~0047FF7F   E8E088FDFF             call    00458864
0047FF84   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
; y2 T( M/ S7 y; w; Z# H|
0047FF86   E8AD020000             call    00480238
6 c0 x' B/ l3 i( S% F6 E+ m% O
6 C4 a. G- V- E' H% {+ C7 q1 e* z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
$ y  c. F7 \/ q) o0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]

* L. q  q! l1 x8 }* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
1 Y* [/ r/ q1 Z2 x- I& j$ B. ]* g|
0047FF91   E8CE88FDFF             call    00458864
0047FF96   8BC3                   mov     eax, ebx
  J0 m7 ^+ d' p2 W* B  Q. Q# T
" [' @1 [3 j# ?! f! Q* Reference to : TFrmRamMain.Delay()
  H6 ~8 C# g& E, P/ |, i|
0047FF98   E89B020000             call    00480238
" I( ~  @; Q0 l/ r9 W
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
7 n" d6 J' g9 c2 B$ f1 d  i) `- w|
+ ^$ N2 T( b; r5 X7 s( \* S0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]
8 l, o* G/ o1 ]6 ]: l5 ^
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
/ _1 l1 ~+ q4 L  c0047FFA3   E8BC88FDFF             call    00458864

1 o% h, ]9 o/ y4 ]1 e* q* Possible String Reference t '系统正在收集电脑的电磁波...'
" v( L* @7 @. v$ S- k( u|
0047FFA8   BAA0014800             mov     edx, $004801A0

7 R& g  ]" E$ {; S- o" Y" ^* Reference to control TFrmRamMain.Label3 : TLabel
, X# \  y& S; M* m' ~1 j, M|
) g. S. v6 _5 A- j$ S( ~( a5 J0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]
2 g8 _; t2 z, T' T* @1 c
9 X! r4 `2 u" A$ b7 c* Reference t controls.TControl.SetText(TControl;TCaption);
0 O, p0 }. C' H|
! E2 K0 |/ Q6 `5 g: _% i0047FFB3   E8A4A6FAFF             call    0042A65C

# [# G# t( j1 }; H8 T/ E: n7 Z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]
; Q7 Z6 g& \2 P! X( E
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
1 r9 d  P( D9 ^' m/ k|
: i# k9 I! B. f: X& v0047FFBE   E8A188FDFF             call    00458864
& }7 F+ ]4 ]- c& F0 ?& B0047FFC3   8BC3                   mov     eax, ebx
) `: k* ~- Y+ ?0 v( |$ ~
. s( h$ b6 l0 }' F. ~2 U4 u* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
. n8 E9 C7 s- \3 J|
0047FFC5   E86E020000             call    00480238
: b! T& e& q- D3 O, A. d
( ~* p3 A  g6 q" r$ R7 m- V" m* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
: w8 C( y& h- S' j4 d! H6 [|
. G- G: c. Z6 i+ |; J% G2 s9 c5 ~0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]

  r( {! H4 u1 x( s6 `, ]/ m* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
$ b  @0 F% H5 M8 }3 G! k7 k|
7 T$ Y/ G* ]  y0047FFD0   E88F88FDFF             call    00458864
0047FFD5   8BC3                   mov     eax, ebx

' H( q- T, Y7 R# ]* Reference to : TFrmRamMain.Delay()
|
0047FFD7   E85C020000             call    00480238

4 u2 v. n$ ^) |' ]# A$ R# A* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
$ a1 T  i' h' Q0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
! I; m7 u9 l$ e|
0047FFE2   E87D88FDFF             call    00458864
0047FFE7   8BC3                   mov     eax, ebx
6 [( j' b- h, H0 e8 {0 i& h6 e
* Reference to : TFrmRamMain.Delay()
|
7 l! Q) f' `- M) n8 X2 Y/ d0047FFE9   E84A020000             call    00480238

# _" Y/ l9 z/ y* |- \* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]

7 Z2 K: P$ G4 m& ]% a. G, m) u* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
2 u" D* z( o$ |: \1 J0 U0047FFF4   E86B88FDFF             call    00458864
6 E* f2 k* }+ U; q* O0047FFF9   8BC3                   mov     eax, ebx

: A: k, D4 C  O4 O: p2 ^: L" R8 u6 y* Reference to : TFrmRamMain.Delay()
7 g% @/ s* }5 j3 P7 R" A0 b" H|
0047FFFB   E838020000             call    00480238

; f$ ^6 L: a. ^+ i# k4 k% g* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
  G% k4 q9 ?  q/ \& b0 J: @|
00480000   8B83F8020000           mov     eax, [ebx+$02F8]
' w; O. e' j; W4 W2 p$ I8 o
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
! N# ~4 h. n& m00480006   E85988FDFF             call    00458864

9 a/ J& {/ ?3 P& t: t* Possible String Reference t '系统正在释放融磁电波...'
* a0 P* h, P% y8 ?+ D|
0048000B   BAC4014800             mov     edx, $004801C4
$ J5 D0 K4 w: N& ~5 H/ b) i5 R
6 H0 D7 Q5 T4 _4 Y: i! o# S* Reference to control TFrmRamMain.Label3 : TLabel
|
00480010   8B83F4020000           mov     eax, [ebx+$02F4]
/ ?5 k; U/ Q/ w1 [1 S
9 U( l5 T0 h* a2 c+ @8 x1 w. v+ @* Reference t controls.TControl.SetText(TControl;TCaption);
- f! X, G1 ~) ]6 q/ i. b# @+ G|
3 R% v' Y' u* @+ x00480016   E841A6FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
0 e- y  z. U" }* y: `, ]( Y- B
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
. F9 Q+ |9 t9 L7 X' q00480021   E83E88FDFF             call    00458864
& N& {/ h: |" d& K; y00480026   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
|
* l/ d& B  c4 j2 [& E9 q00480028   E80B020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
0 Q4 j. E" b; u|
0048002D   8B83F8020000           mov     eax, [ebx+$02F8]

8 X7 E6 b! R8 G# F8 F7 f1 Q9 I* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
4 J8 K6 [9 e4 m1 O" x- ~* _|
00480033   E82C88FDFF             call    00458864
  r0 h/ `; h( a00480038   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
0048003A   E8F9010000             call    00480238
& v1 ]; Q, Z2 D- {  A3 E9 F. n
% o$ B% b  N6 @  @2 [, S* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

, Q9 ~8 n* ]1 ?' S* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
/ z9 M$ {9 u5 `% n( H|
00480045   E81A88FDFF             call    00458864
. x2 E  g$ s& J, n! v3 y) l2 q2 Q0048004A   8BC3                   mov     eax, ebx

3 L  u- O% }( u1 g6 G8 l1 P* Reference to : TFrmRamMain.Delay()
|
0048004C   E8E7010000             call    00480238

* K5 A0 Y& d6 g3 X  y/ ?4 F* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
1 @$ X- O) W( z' [0 g: q|
7 }" B- ~: s# M$ s8 d* c- ?' I00480051   8B83F8020000           mov     eax, [ebx+$02F8]
4 l3 y7 R6 b) I
8 n+ K# ?& O4 c, y4 u6 j5 K; D* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480057   E80888FDFF             call    00458864
0048005C   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
# `) ~* ?0 x$ O|
- ~0 P2 u) U+ r2 f  o0048005E   E8D5010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480063   8B83F8020000           mov     eax, [ebx+$02F8]
  R1 X8 V' a0 `) I
7 ]! J) @5 n% ^, ~6 F' e/ T* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 I2 {9 Y3 H) Z6 ]9 S- b|
: ]! o, j( F# O1 g$ L- N6 J/ t: H8 O& @00480069   E8F687FDFF             call    00458864
) l% g! p" f+ r' ?+ R  q& C+ G" N) A
) i5 W, P. {, l8 E* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0 Y6 k5 I9 m' \00480074   E8EB87FDFF             call    00458864
5 u% m! ~: a9 p8 t- J00480079   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
# ?2 e4 G' d7 T4 f  p7 A0048007B   E8B8010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
* T& N2 P) L( ?. J% U$ c|
: `8 s5 K( d$ o  i. w7 N: c5 J00480080   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
4 T' b* Z* `1 t7 ||
* E$ L+ B8 F' m& [00480086   E8D987FDFF             call    00458864
0048008B   8BC3                   mov     eax, ebx

, {: w6 b9 B# x. G/ m- a  D) Q) d5 d* Reference to : TFrmRamMain.Delay()
: Z9 F$ T! W) }/ L& F; l. X. [|
4 r8 M% s7 z9 A* s0048008D   E8A6010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
% O6 H5 o* F& k1 s9 G( }4 t# T|
6 S4 I" P" I% }2 z8 X00480092   8B83F8020000           mov     eax, [ebx+$02F8]

5 S" S3 H" W) Y4 k8 M. W* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
# s0 A, \- Z4 ]- o0 a3 e( X# U|
00480098   E8C787FDFF             call    00458864
0048009D   8BC3                   mov     eax, ebx

4 T0 V, \5 Q! u" l4 R* Reference to : TFrmRamMain.Delay()
  j) w- g  |6 |9 M|
0048009F   E894010000             call    00480238
+ _, f' p3 t$ w0 o
( Z( C/ a% [5 Q$ e; j* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
( v% r' y# \  y8 q' h  Y* u3 t( g|
004800A4   8B83F8020000           mov     eax, [ebx+$02F8]

6 Q6 \/ q$ x/ S- A* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800AA   E8B587FDFF             call    00458864
004800AF   8BC3                   mov     eax, ebx
) l3 z0 H! B2 a
7 c5 D; ]# r* S1 J7 `* Reference to : TFrmRamMain.Delay()
* l' h7 B5 r8 D+ _|
/ N8 c$ O2 L7 k* x$ ]) q' z004800B1   E882010000             call    00480238
/ O! D5 c$ s% W; N: F% k8 ?0 x
" T$ C# Y' A8 v! b- s5 s* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
; f( I3 ?. N# z+ R; U* M( t" r|
6 o6 y# M4 f/ V  D# H* h$ U004800B6   8B83F8020000           mov     eax, [ebx+$02F8]
0 V/ ~2 L7 @# ~5 }+ K& L% @
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
3 o( G1 Q$ P% p7 X9 d+ C$ K|
004800BC   E8A387FDFF             call    00458864

/ L9 T3 h( b8 E& ]/ E. R9 ^7 |7 z* Possible String Reference t '系统正在做最后的消磁工作...'
# o8 w8 h9 W% _! L1 J9 Y|
004800C1   BAE4014800             mov     edx, $004801E4
8 p! X. J& B: i$ K0 r* \
* Reference to control TFrmRamMain.Label3 : TLabel
, o* s' g' k& {|
004800C6   8B83F4020000           mov     eax, [ebx+$02F4]

4 e) |, J) W$ H% o* _1 m' t* Reference t controls.TControl.SetText(TControl;TCaption);
|
' J) w8 h% @6 E0 z! O" F; L9 H004800CC   E88BA5FAFF             call    0042A65C

9 `: l6 q2 H" H, R; F& K* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
4 C  B5 t' d/ a# @# A2 i004800D1   8B83F8020000           mov     eax, [ebx+$02F8]

$ u3 \" ]  ^' v. M6 v* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
3 D2 t& L& A# G% T3 |004800D7   E88887FDFF             call    00458864
. O+ T) Q; `+ T$ x0 ?( Q004800DC   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
|
004800DE   E855010000             call    00480238
+ ?' V2 I# W. b: X; A8 `
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
; f5 c) d" q9 L) W|
1 G$ ]! _# F6 w2 f8 _004800E3   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
! u6 ~0 U, V' u7 Q! }2 I. ^|
004800E9   E87687FDFF             call    00458864
4 [# ~. Z2 E7 m& j2 |' x; |' y004800EE   8BC3                   mov     eax, ebx
2 H" |$ u$ `- K0 {" a, s6 i# l9 Q
7 X8 x$ `2 M- t# x! [( m9 j, M* Reference to : TFrmRamMain.Delay()
+ |3 [" S0 h$ ~# z+ S+ p$ M4 M|
004800F0   E843010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
5 c2 x9 i1 A: |4 {; t* e2 h$ w|
. [4 y7 P4 W5 s004800F5   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
- T& H9 W9 ^  j" \6 d( ~# G004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
  F9 l2 r: m8 L' Y$ I|
4 U7 Q% j: x3 Y+ m00480102   E831010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
" A( O! ^3 n% u$ N  p' P5 ?1 v|
00480107   8B83F8020000           mov     eax, [ebx+$02F8]
+ {3 n  V0 z/ X! _+ ?: C: M0 c
4 R9 `1 Z; Y% P; m6 v" F! S: ^) O# j* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
# k4 W/ t: P) A! e( W& S. c4 m# U|
( s# ^4 p# W4 Y% J: _% z1 L: N0 f0048010D   E85287FDFF             call    00458864
5 l# {) ~) `9 Q5 k! J/ d; |8 E( @/ G00480112   8BC3                   mov     eax, ebx
9 ?  J$ d( S& A
* Reference to : TFrmRamMain.Delay()
# G% q9 @( n1 l7 h6 o7 s|
00480114   E81F010000             call    00480238
& V- @( G& n: \
8 j+ O. x! U- b5 C2 g& P! L0 Z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
  V7 `% o- R7 i) a4 ]00480119   8B83F8020000           mov     eax, [ebx+$02F8]

& m( ^6 w. e* S/ d* W8 a* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0048011F   E84087FDFF             call    00458864
- C! |  h: Q+ J7 \: W9 B+ V00480124   B8E8030000             mov     eax, $000003E8

# G+ P* p* M4 x' T; F) i  b* D* Reference t system.@RandInt;
|
00480129   E86629F8FF             call    00402A94
0048012E   85C0                   test    eax, eax
00480130   6A40                   push    $40

* Possible String Reference t '电脑消磁圣手'
|
# V) m/ E, B- [  k; N4 ?) D00480132   B900024800             mov     ecx, $00480200
3 d$ y8 y0 C9 S1 E) m2 N
* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
|                                ?
: S2 G, ~4 ?5 @. e. l9 F|
, S$ g  X# a4 k, `+ N00480137   BA10024800             mov     edx, $00480210

0 G" u# W6 W2 k9 Q* Reference to TApplication instance
) y5 j8 C& F5 u( ~- c|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
00480141   8B00                   mov     eax, [eax]

3 W, U+ M9 p2 Q* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
|
" r  T$ v& }- F8 Y% r" q00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
00480148   33D2                   xor     edx, edx
( i* m0 ~# d; w) _* ^' E$ S
* Reference to control TFrmRamMain.Panel1 : TPanel
/ X  e1 \' N% ]  V' b# G) H5 `2 |1 f|
6 {, L( R! t& I+ k0048014A   8B83F0020000           mov     eax, [ebx+$02F0]
6 Q( G, k) n5 }8 e
# r4 ]/ b9 [' @. h; R! \* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
, l3 Z( W# e5 a9 a$ f; W00480150   E8EFA3FAFF             call    0042A544
- w% ^2 n+ m' `/ ^, P: q5 n. d0 I! V00480155   B201                   mov     dl, $01

* Reference to control TFrmRamMain.Panel2 : TPanel
  l# D. a0 e; Y1 n% H8 b|
00480157   8B83FC020000           mov     eax, [ebx+$02FC]

- ^, t2 ?& p: \1 E" b* Reference t controls.TControl.SetVisible(TControl;Boolean);
" X' q! {3 U% `% t8 t* g7 s|
0048015D   E8E2A3FAFF             call    0042A544

* Reference to TFrmAbout instance
|
( G$ q8 Y. `' z00480162   A148264800             mov     eax, dword ptr [$00482648]
00480167   8B00                   mov     eax, [eax]
00480169   8B10                   mov     edx, [eax]
4 O% q& ~! c" F3 N3 }% c
* Reference to method TFrmAbout.ShowModal()
6 ~5 z3 c$ V! U) y1 v|
0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
00480171   5B                     pop     ebx
00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： 004802F8 55 push ebp ' ~* |9 I$ w2 i004802F9 8BEC mov ebp, esp 004802FB 33C9 xor ecx, ecx * k% T6 D7 u+ X8 M: x004802FD 51 push ecx * k$ [+ d+ M+ X; I0 ^4 C004802FE 51 push ecx 004802FF 51 push ecx 00480300 51 push ecx 00480301 51 push ecx 00480302 51 push ecx ' A+ m8 \0 G" k1 h00480303 51 push ecx 00480304 33C0 xor eax, eax 0 q/ d9 O: y$ O4 P' c9 d0 ^00480306 55 push ebp / `3 y$ a! S; x8 D" Q1 u9 E* Possible String Reference t '檫0?脬嬪]? | 00480307 6808044800 push $00480408 s- s+ B; y j' S' m ***** TRY | 0048030C 64FF30 push dword ptr fs:[eax] 0048030F 648920 mov fs:[eax], esp 00480312 8D55F0 lea edx, [ebp-$10] / f! d. G9 b g5 I5 i' ], d) ?* Reference to TApplication instance | ) c, i C' I5 i! a00480315 A148284800 mov eax, dword ptr [$00482848] 0048031A 8B00 mov eax, [eax] * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | Z9 C8 C. t" h& V0048031C E82F97FCFF call 00449A50 ;Who am I? # j+ V: [1 Q8 F. M00480321 8B45F0 mov eax, [ebp-$10] 00480324 8D55F4 lea edx, [ebp-$0C] 0 |5 n+ W7 v1 x X( |* Reference t Unit_00406FD0.Proc_00408110 | 00480327 E8E47DF8FF call 00408110 . S. Q3 M$ t6 d4 u1 I2 Y0048032C 8B45F4 mov eax, [ebp-$0C] 0048032F 50 push eax 00480330 8D55E8 lea edx, [ebp-$18] , \" v/ {$ v( d* Reference to TApplication instance | 00480333 A148284800 mov eax, dword ptr [$00482848] 00480338 8B00 mov eax, [eax] ! c3 i, D( ~* h2 ~# A 3 u8 @: y' d3 {& x% e* }/ a4 J* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; 5 z1 p: k3 o. |" X- W" d$ v| ; _+ h4 c3 T7 ?0 ~4 y0048033A E81197FCFF call 00449A50 ) e" @2 G5 q. j8 g2 G0048033F 8B45E8 mov eax, [ebp-$18] & c- p8 I1 M# x6 B5 U: V) k& v* r00480342 8D55EC lea edx, [ebp-$14] ! U w* O8 A' Y' F) a' d9 Z( | * Reference t Unit_00406FD0.Proc_004080DC & {4 e7 J$ b" I0 Y| 2 q: ] m2 f3 y; z @* [. k00480345 E8927DF8FF call 004080DC 5 k! L+ ]# `" V+ X6 m0048034A 8B55EC mov edx, [ebp-$14] 0048034D 8D45FC lea eax, [ebp-$04] 6 k8 g' {! j& Y* _% w00480350 59 pop ecx 0 w! Y( E0 l4 Y. C7 `; B 4 f2 w7 ?: F2 H* Reference t system.@LStrCat3; , }9 W1 f8 {; L4 A$ H| 00480351 E8CA39F8FF call 00403D20 3 x5 u8 X$ g O0 i& O4 x) f, Z00480356 B201 mov dl, $01 % Q* l: \0 q1 |2 N; C+ y * Reference to class TRegistry | 0 B( X* s$ F. a* f0 f00480358 A174F14700 mov eax, dword ptr [$0047F174] 1 Y/ c7 B* H4 @; d* h 8 i! ~) _3 p4 G8 A8 {1 q/ y8 N( J* Reference t Unit_0047F114.Proc_0047F274 | 0048035D E812EFFFFF call 0047F274 00480362 8945F8 mov [ebp-$08], eax 00480365 33C0 xor eax, eax " N: L! `6 a* P. G% D% I3 N' K+ [; }00480367 55 push ebp 00480368 68DE034800 push $004803DE & d6 _3 k d7 N& g+ C 5 _) A0 ?1 m L p( z- X***** TRY | 8 p2 t Q% v8 x% e+ C1 a0048036D 64FF30 push dword ptr fs:[eax] 00480370 648920 mov fs:[eax], esp / I; Q3 ?/ r# R! X L; q1 I8 J00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] $ ~2 g5 V( j D/ y, O3 _4 a9 Y* Reference t Unit_0047F114.Proc_0047F314 | 0048037B E894EFFFFF call 0047F314 & N8 ]3 `5 S$ {; c# h00480380 B101 mov cl, $01 * Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） 7 A; c. }3 c a' Q| Version\Run' | 2 T9 y3 c$ \9 d" U! ?# Z00480382 BA1C044800 mov edx, $0048041C 00480387 8B45F8 mov eax, [ebp-$08] / D$ Z% S/ P) t* Reference t Unit_0047F114.Proc_0047F378 | 0048038A E8E9EFFFFF call 0047F378 / E* y& s+ w7 k/ C# J0048038F 84C0 test al, al 00480391 7435 jz 004803C8 % Z4 x6 o5 s4 ?( ?0 ?$ r& Y00480393 8D4DE4 lea ecx, [ebp-$1C] : u6 U0 i% C C. f/ E* Possible String Reference t 'JrRClean' / u9 K% E0 z# g! J8 Y/ O4 d| 9 f: I/ s2 |2 ^0 z- O# W00480396 BA54044800 mov edx, $00480454 ! p7 X# V, @$ C' w4 {' N# \0048039B 8B45F8 mov eax, [ebp-$08] / ~/ d/ \% a4 p* Reference t Unit_0047F114.Proc_0047F540 ( J2 F( s2 J; b| 0048039E E89DF1FFFF call 0047F540 004803A3 8B45E4 mov eax, [ebp-$1C] 3 P* ~" a& [, j$ }004803A6 8B55FC mov edx, [ebp-$04] " N6 h1 L+ a) ^9 w5 V4 H* Reference t system.@LStrCmp; | # T5 n& N9 [- N* Z004803A9 E8363AF8FF call 00403DE4 004803AE 7410 jz 004803C0 004803B0 8B4DFC mov ecx, [ebp-$04] 8 k8 p* V5 j0 [% x% g * Possible String Reference t 'JrRClean' - k' o" i, e" p1 b6 h+ @( a| . I% H6 C l0 u& T& x004803B3 BA54044800 mov edx, $00480454 5 P5 k9 X$ u& ~0 S$ L004803B8 8B45F8 mov eax, [ebp-$08] 9 I1 s! h' D, ]1 C- a * Reference t Unit_0047F114.Proc_0047F514 | h: k* J1 ]9 q' i# a004803BB E854F1FFFF call 0047F514 / u- N1 j: Y' m, X/ J# R# K$ y004803C0 8B45F8 mov eax, [ebp-$08] $ j, @2 W3 \6 U M 9 p8 m2 J5 e+ Y3 d/ c* Reference t Unit_0047F114.Proc_0047F2E4 & s& n( x" c4 I) E9 B4 R- m| 004803C3 E81CEFFFFF call 0047F2E4 5 i1 z$ U, H$ p, V/ t7 U004803C8 33C0 xor eax, eax % g) H; O; M( O004803CA 5A pop edx 0 }' j0 y) O4 a# W, y3 p004803CB 59 pop ecx 004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx ****** FINALLY | 004803D0 68E5034800 push $004803E5 004803D5 8B45F8 mov eax, [ebp-$08] " x4 u0 R1 R4 D( F# f' q * Reference t system.TObject.Free(TObject); | 004803D8 E8EF29F8FF call 00402DCC 004803DD C3 ret 6 U! t3 R9 y7 a- G. j ?6 Z ' k+ v2 a8 ~5 P* Reference t system.@HandleFinally; # q+ d* D, d; Y, M4 v7 K* e v* I| u. `+ n# q2 r7 c" Z9 W004803DE E90931F8FF jmp 004034EC 004803E3 EBF0 jmp 004803D5 ****** END 6 h) ?/ K9 t: ]% }$ s| 0 C' J$ f2 b) u, k004803E5 33C0 xor eax, eax : G' V U9 a. K6 ^' w; n004803E7 5A pop edx 004803E8 59 pop ecx ; r7 d8 j( ]4 Z( D' p: [5 I004803E9 59 pop ecx / W0 H M) n4 ~4 h004803EA 648910 mov fs:[eax], edx 6 U* V, N) P# J5 y( ^' A7 s R+ k' A8 W9 z2 o****** FINALLY ! K' w+ y" ?' L* s| ` z @" O% A s8 L9 g5 p, H * Possible String Reference t '嬪]? , i! N) w6 c8 S- c9 j) R: I9 v# u| : f4 D# ^0 Z! N7 O0 ~. G- V: _004803ED 680F044800 push $0048040F 004803F2 8D45E4 lea eax, [ebp-$1C] 004803F5 BA05000000 mov edx, $00000005 ( u/ m7 a" S/ V5 ~1 f* Reference t system.@LStrArrayClr; 6 y' M8 X% j0 |/ `| 004803FA E87936F8FF call 00403A78 , t. {7 w. L' x: u, A/ u004803FF 8D45FC lea eax, [ebp-$04] + [3 O+ P6 t+ {! P0 s* Reference t system.@LStrClr(String;String); | 7 i* S4 X4 ]" c. _00480402 E84D36F8FF call 00403A54 00480407 C3 ret 0 K z' L8 w* y2 g9 s " a+ X/ t6 I9 r* ^1 B) {' {0 K: R$ Q* Reference t system.@HandleFinally; 2 ?+ E- I3 R+ P9 w( B! X% n| 00480408 E9DF30F8FF jmp 004034EC : [" j% q9 \2 M9 A$ y0048040D EBE3 jmp 004803F2 ****** END | 0048040F 8BE5 mov esp, ebp 00480411 5D pop ebp 00480412 C3 ret " k$ o; |3 y: h3 @3 I- Q0 E# C& \ 上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） ! X1 U0 t" }2 w9 `( a( a T. }只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 4 I) _0 s" ^7 s& C结语： ) Q8 }2 D, V1 a上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 % I( ?! g `4 ~- e2 [也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 权当一笑吧，呵呵~~~~~~~~~~~~ % b( r7 p& w- X J$ J+ {+ Y3 U - D6 J) A* N1 u6 \ monkeycz于2004年平安夜 2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

以下是引用hater315在2004-12-25 15:45:00的发言： 看的快睡着了.

% V+ k4 K* T* M4 q% Y3 J ) Y! v% m. ]; V/ q5 v睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

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

3 h4 |: w3 O0 [. ?6 }: b1 T 对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

同感