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

游侠无极限

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

前言：
' Q3 K: O* H9 M) P/ ~平安夜的晚上，在网上随处溜达，偶尔看到一款名叫《电脑消磁圣手》的软件，是某公司开发的（具体是什么公司大家自己去看吧，我就不说出来了，免得麻烦）。据软件中的说明“本系统一直在国外市场上销售，效果很好，最近把系统翻译成中文版，免费提供给国内的朋友使用。”，至于软件的作用，又有如下的说明：“本系统非常适合在电脑前长时间工作的人，能够高效的清除电脑产生的电磁波，对工作者的身体起到了保健的工作。本系统根据电脑产生的电磁波，自动产生融磁波，中和电脑产生的磁波。由于电脑在不停的释放电磁波，建议您每隔一个小时进行一次消磁工作。”听起来十分诱人，于是就down了下来把玩一番。最新版本好像是6。3版（升级了好多次了吧）。
# m* b4 n* Q% T+ l0 A" p% x
试用：
下载下来的是一个压缩包，解开后只有一个可执行文件。运行一下，首先弹出了浏览器窗口，连向了一个网站（可能是软件公司的网站吧），随手关掉。软件的主界面倒是很简捷，最主要的就是“开始消磁”按钮。点击一下，出现了一个进度条在不断的前进，同时还有提示文本出现，就是这些“系统正在做消磁前的准备...”、“系统正在收集电脑的电磁波...”、“系统正在释放融磁电波...”、“系统正在释放融磁电波...”、“系统正在做最后的消磁工作...”。经过这样一番神秘的仪式之后，弹出一个对话框提示“融磁成功，已经成功中和电脑周围磁场?”刹那之间，我对作者的佩服如同滔滔江水连绵不绝，这可是项巨牛x的技术，只靠软件就可以进行消磁了，而且还是电脑周围的电磁波，不知道作者是否申请了专利。怀着最作者的无比崇敬和那份极度的神秘感，我飞快的的把软件给肢解了：）

分析：
检测一下，是用Delphi写的，没有加壳。用DeDe载入后，反编译“开始消磁”按钮点击事件对应的代码，复制如下：
5 u# R2 c9 c8 p+ C4 f9 u' d  P
1 @! S  H' o# w+ Y& a7 O$ ^0047FF28   53                     push    ebx
/ s2 H- A% V+ u( @7 V. v4 f0047FF29   8BD8                   mov     ebx, eax
2 v- G) y4 }* G) I" W0047FF2B   33D2                   xor     edx, edx
0 {" y4 E) S4 k# ]" T
* Reference to control TFrmRamMain.Panel2 : TPanel
6 }2 \, ~# {8 o$ n: E5 ]' @|
0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]
7 d* E9 `7 }3 L. B
* Reference t controls.TControl.SetVisible(TControl;Boolean);
' |* m2 m$ j/ I9 `8 x9 i' d; Z|
0047FF33   E80CA6FAFF             call    0042A544
3 ?/ [. J2 t* \6 Q) t: V/ F0047FF38   B201                   mov     dl, $01
! a4 x% C% a2 Y9 e9 y* l
* Reference to control TFrmRamMain.Panel1 : TPanel
|
# E' m) Y. P& F0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
$ x& V/ O0 i3 e|
0047FF40   E8FFA5FAFF             call    0042A544

# ~. S9 ~) q, `) X# P8 s* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
|
0047FF45   BA7C014800             mov     edx, $0048017C
5 E% i! ^% [( l
8 b2 X6 Q$ B5 P6 ?. U* B* Reference to control TFrmRamMain.Label3 : TLabel
' N: F) e5 b2 V|
0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]
+ O, \- ~+ e- N( K% U
* Reference t controls.TControl.SetText(TControl;TCaption);
: z. o. W& v# d: z, W0 T6 e8 m|
; L$ V( M1 _$ i! |; D0047FF50   E807A7FAFF             call    0042A65C
: `4 a. t$ @1 {. D1 T
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
6 w, e! w0 v4 Y8 Y8 a* ]. ~) C|
- t7 \* ]4 g' n0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 d" m2 k0 o: m7 N|
0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx

; V7 `6 f4 y( f( q( w. ^' z* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
; U! _/ G% \. S4 K1 G) L3 M|
) V  y/ A, A5 X2 h3 |0047FF62   E8D1020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
|
7 c7 x& o4 }+ S9 ~: I' ~0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]
: G; [6 K1 Y) z$ N. s; z7 z
) i8 B2 A0 L5 x! L" K. b7 u* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
1 T# W9 X3 y! x/ V: L) ]! `+ S0047FF6D   E8F288FDFF             call    00458864
6 d0 j4 b. L- m- y" O9 W0047FF72   8BC3                   mov     eax, ebx
# z7 J8 Y: ]2 I& ^
2 U: Y$ c% z9 b1 M) ?% N* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
' q" C- c* J  I  t: T- T# K; |7 K|
0047FF74   E8BF020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
6 L- W' d$ P, h" _|
5 D$ v" G& ^& D9 _2 g  `- i' q0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
! Q9 V2 }  ^+ H, Z4 `5 A0047FF7F   E8E088FDFF             call    00458864
0 O; T6 D# c4 g3 y0047FF84   8BC3                   mov     eax, ebx
, W- @. S" Z) [9 x  y7 z
$ n  g+ y* O$ ~* Reference to : TFrmRamMain.Delay()
|
8 h' H/ R. i9 l- m: W0047FF86   E8AD020000             call    00480238

$ V2 f1 ]3 U9 H/ j- f* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
  N3 G+ p9 c" w+ O4 \9 \|
2 [7 L: k' Z: u$ ]0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]
& f/ V. R: z9 n% U
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
5 t, `$ z% A% Y" `  ~8 S/ F|
0047FF91   E8CE88FDFF             call    00458864
0 N" E  W, a8 \; t0047FF96   8BC3                   mov     eax, ebx
+ {: m4 ~' L- L! Q; k
* Reference to : TFrmRamMain.Delay()
2 n* p4 U$ E+ ]: L, a|
0047FF98   E89B020000             call    00480238
) @4 m, B7 S' j8 `2 u
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]
% X* f% d4 u* w- h$ A: L' @2 B
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FFA3   E8BC88FDFF             call    00458864
7 ]. L- m3 V% l+ t& W
* Possible String Reference t '系统正在收集电脑的电磁波...'
|
0047FFA8   BAA0014800             mov     edx, $004801A0

* Reference to control TFrmRamMain.Label3 : TLabel
|
0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]
4 d. v, R- G" A1 |0 L
* Reference t controls.TControl.SetText(TControl;TCaption);
|
8 X! E- z" W' |+ z) k6 U$ N, N0047FFB3   E8A4A6FAFF             call    0042A65C

) y+ B8 f: l' }6 [. @* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
4 S- v6 r6 |/ i3 Z. u0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]
1 }8 A, q: _* p* k2 o8 C8 s
' E/ [& O1 u9 k! g* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 b$ ]' u% B6 p|
0047FFBE   E8A188FDFF             call    00458864
4 x! O1 g" v" Y$ i0047FFC3   8BC3                   mov     eax, ebx
% i/ Y  ]- k/ X+ L; r
* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
|
0047FFC5   E86E020000             call    00480238
- v+ q9 t* c! X3 v
( s- s4 W1 A. I* V4 b# A( _* J* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
( M2 a! S0 [7 R! Y1 m9 N|
/ j8 b( Q+ b. g' `1 _8 Q0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]
2 q8 {5 Y3 A" F+ ?" @  i8 n
) U# J: A, b0 v- {4 Z5 V* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 h. V/ F  }1 D: x. C* X* U  c|
0047FFD0   E88F88FDFF             call    00458864
0047FFD5   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
. N' _, V+ s5 I4 K9 J|
+ R3 Y# W4 T! H. r) \4 o" J- S- u0047FFD7   E85C020000             call    00480238
( K) }8 p# {6 {% s3 F
& m7 U8 i# h% n6 S* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
" L& }, Y7 P  S- }& j' h|
" n7 V" O& {' }3 I0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
* }  y7 q: l: X# B, O
, f7 b6 }( F% |" u* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
3 w& r& X+ X& n5 |' g" o0 D4 f) k0047FFE2   E87D88FDFF             call    00458864
. z% e1 W5 k6 _: U0 S& h' h0047FFE7   8BC3                   mov     eax, ebx

5 v( F9 d1 Z+ }, [7 H* Reference to : TFrmRamMain.Delay()
|
: U$ p% a7 ~' n3 U0047FFE9   E84A020000             call    00480238
7 O# R" M; A. ?( o$ p) H: u
- F4 {$ X6 l, y! `* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]

; |" X4 G' {, G) X( z8 M* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
' u, U, |" y& R( t: b0047FFF4   E86B88FDFF             call    00458864
, H+ P& t) L  X2 X$ a1 V1 H0047FFF9   8BC3                   mov     eax, ebx
& X/ W0 K' V$ Q7 Y+ N
* Reference to : TFrmRamMain.Delay()
|
/ f# l. T  c% x; h: A0047FFFB   E838020000             call    00480238

3 Q2 v% [. d) z' k  z4 k: [8 P* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
1 m6 e! V( ^1 g2 r" [0 [7 \|
00480000   8B83F8020000           mov     eax, [ebx+$02F8]
0 P$ s9 s% q% M$ M
* M. }; m. W& O/ x9 C* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
# X7 D4 G8 m. p3 X' U1 I) v00480006   E85988FDFF             call    00458864

" }$ M0 A0 k6 l/ }, t* Possible String Reference t '系统正在释放融磁电波...'
- W/ U! V5 x7 z3 K5 _|
0 p- N$ K* O1 `$ ]- ]0048000B   BAC4014800             mov     edx, $004801C4

& [. F3 o5 m1 M2 z7 r3 Q- g; t1 C& s* Reference to control TFrmRamMain.Label3 : TLabel
. J! N' B& _' s|
00480010   8B83F4020000           mov     eax, [ebx+$02F4]

- x! O0 t! l) x. A& b2 M  a* Reference t controls.TControl.SetText(TControl;TCaption);
|
& [8 R: t( F0 [# z5 G00480016   E841A6FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
. i7 Q0 U. \7 i9 W2 q6 g+ ^  R3 g|
0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
. ~' ?% F- e2 \& [
* j; n  ^# a9 y* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
5 J$ t! m1 u9 ^+ ?. ]( d' F9 a|
00480021   E83E88FDFF             call    00458864
00480026   8BC3                   mov     eax, ebx

& @; f- \' z& ]( D. L, D0 \* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
|
00480028   E80B020000             call    00480238

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

$ G' V5 O% a7 U  `- z* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
" @4 E# v3 t' ^' ^# f! A: X|
* K" A; x1 I4 E00480033   E82C88FDFF             call    00458864
5 x) H2 v: S; r00480038   8BC3                   mov     eax, ebx
+ w7 e, E7 ^7 V4 u9 ~
* Reference to : TFrmRamMain.Delay()
2 J, x3 L/ o; E|
0048003A   E8F9010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
, v' w- ]( V* a# o! i|
0048003F   8B83F8020000           mov     eax, [ebx+$02F8]
+ O* z9 X" D! m) U& G& @, {8 |
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
, L# Z/ @( w; T) ?3 j* a|
00480045   E81A88FDFF             call    00458864
0048004A   8BC3                   mov     eax, ebx
  p( Y& y( Y2 b( G& Y; C. \; }+ }
* Reference to : TFrmRamMain.Delay()
! S4 w! E- a/ W6 l|
; j4 J( B4 d- V/ G3 H" Q$ y( h0048004C   E8E7010000             call    00480238

2 |- f! m( H9 g) v1 \: {* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
9 c5 m4 e2 |2 ?00480051   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
7 g( {8 A6 r& v) r, U) m* i5 o00480057   E80888FDFF             call    00458864
: p$ J- g: a; \1 {" P) w0048005C   8BC3                   mov     eax, ebx

/ t% e5 J. m" u( f- o" Q' n6 a* Reference to : TFrmRamMain.Delay()
* E) c) }$ L7 Q% O% [% ^( a|
0048005E   E8D5010000             call    00480238

% K: N  h% c, r% D3 o4 k" k* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
  W7 U( Q/ ~! K; C1 J+ y' G00480063   8B83F8020000           mov     eax, [ebx+$02F8]
0 S$ j  L* ]' A; g* m8 `% d& x
7 y/ `3 z9 {* t% Z$ P* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480069   E8F687FDFF             call    00458864
9 v, K0 D5 L: ?
3 Y4 l5 o- x8 g, k6 Z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
8 K, d2 ?9 i) D! c  Y. ?7 b|
( \4 b; P, p1 ~9 F5 J, E7 T0048006E   8B83F8020000           mov     eax, [ebx+$02F8]
: o) S! E2 H; ]5 g$ o" J
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
% [" ]- V2 }' `, z$ h- b# `# ^|
00480074   E8EB87FDFF             call    00458864
00480079   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
' F" `& u- [  m# y6 H0048007B   E8B8010000             call    00480238
4 S7 x9 X: c7 _" r# V
. s9 }0 h* e: I" z0 v* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
: |) O% N2 [$ S9 U: J; L|
00480080   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
" b; P% s% ~2 k  O1 Y2 Y|
6 q2 ?: d8 ~% e00480086   E8D987FDFF             call    00458864
% }0 ~0 j6 D9 ~/ J4 |3 v  |4 L# E; |0048008B   8BC3                   mov     eax, ebx
' z: H" a, m' @; S
- x6 D; _, a: k6 K6 q* Reference to : TFrmRamMain.Delay()
9 E# K: q: y) j/ B- w|
0048008D   E8A6010000             call    00480238

6 N0 H& c+ z; F* |$ T* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
! l' }! w8 ?+ j00480092   8B83F8020000           mov     eax, [ebx+$02F8]

7 t0 Z2 O6 h. C* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
; _0 S* S8 r0 ]: u0 b|
00480098   E8C787FDFF             call    00458864
6 y0 e2 \8 T7 C( y8 A0048009D   8BC3                   mov     eax, ebx
, V0 i; K0 j9 r% X- c
& \$ u4 b/ ]1 s' Y0 m* Reference to : TFrmRamMain.Delay()
+ P. ~' n( y$ w2 _0 C! ^6 p2 K2 f|
0048009F   E894010000             call    00480238
1 x! S$ p. X0 b3 m- f" m
& x" P3 |1 \1 l' \* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
1 L% e* ~  _0 G& ?. v|
004800A4   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
9 O! U  h1 q7 ]|
004800AA   E8B587FDFF             call    00458864
004800AF   8BC3                   mov     eax, ebx

5 l% D6 d) ^5 k2 x' P1 ?+ Q* M" K* Reference to : TFrmRamMain.Delay()
( k: B- m' Q) `' K# d# f6 N|
+ I5 \& v- F0 _2 |3 L* S% i! Y004800B1   E882010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
& I  i5 U) ?  x9 t! \|
004800B6   8B83F8020000           mov     eax, [ebx+$02F8]
- L+ e5 W, |. Y0 C- J
* r" x9 A6 U$ a  D* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
6 w6 k7 o" v1 J; {$ P, d|
& ~+ L  z) E2 _& s) b9 I2 ^004800BC   E8A387FDFF             call    00458864
5 C% a0 T8 @+ j+ K, x5 o
( k; Z! z$ f0 X+ s: j3 i* Possible String Reference t '系统正在做最后的消磁工作...'
|
" ~& l, d( J  T3 s# o+ T4 T004800C1   BAE4014800             mov     edx, $004801E4

" u2 Y/ K! U1 v* Reference to control TFrmRamMain.Label3 : TLabel
|
6 T% h+ `( M& }1 Q- L6 j004800C6   8B83F4020000           mov     eax, [ebx+$02F4]
3 Q, z$ Z4 j, J0 r8 s
' Q/ C# U- i! x+ a* Reference t controls.TControl.SetText(TControl;TCaption);
8 K  ~9 h6 v5 p3 ]* D  p' g: V|
9 b6 b* P  ~$ ~; M, N8 M, c004800CC   E88BA5FAFF             call    0042A65C
0 C4 f6 w4 [! I  i; @) e: @  |
' O1 `  U* Y9 [3 s8 A3 c. r* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800D1   8B83F8020000           mov     eax, [ebx+$02F8]
! T* c& e" p& s& T
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800D7   E88887FDFF             call    00458864
004800DC   8BC3                   mov     eax, ebx

+ ^+ m( s. \- Y0 e5 }* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
# y8 U0 O5 p* q$ B|
004800DE   E855010000             call    00480238
. a, S& i# P/ q1 _$ i
2 R# b  r. A2 J* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
- z% f8 o* B) [  h) X/ y004800E3   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
4 b- `# p1 _# E9 P2 F|
  @9 L/ c, p; q' }5 @004800E9   E87687FDFF             call    00458864
004800EE   8BC3                   mov     eax, ebx
. w8 x/ O  c6 e4 w2 g$ t. k( Q( F
( ^. a, D- ~7 |1 j3 ]$ y* Reference to : TFrmRamMain.Delay()
|
1 n& i! ]; f0 I% c: `& {3 V& @004800F0   E843010000             call    00480238
; _! s& r; Q3 E: H  M
8 {- H& ?1 `2 A6 |! P1 o* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800F5   8B83F8020000           mov     eax, [ebx+$02F8]
  Y" e3 R; {) e: N' b
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
' c* K) j% @3 M. E|
, n4 W2 w# H; E, z' p2 E004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
00480102   E831010000             call    00480238
' F5 v/ h5 Z. T4 e
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
0 z) r# {" v- E: W3 x* O2 }|
00480107   8B83F8020000           mov     eax, [ebx+$02F8]

- M: ~2 O0 }' |% l5 F* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
" [4 h" f" U# D4 N2 B6 n1 d0048010D   E85287FDFF             call    00458864
00480112   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
" i2 P# L, n( q) l|
00480114   E81F010000             call    00480238
: Q# N" l+ v5 ]
! q- Q5 A  H5 G* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
; m, ~/ I. j$ `|
00480119   8B83F8020000           mov     eax, [ebx+$02F8]
/ w. Z0 e! [9 ?. W# j4 @: [- m
1 O% W+ E' R! X$ A* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
4 a& }  b/ f8 S7 m4 W7 p9 y$ [0048011F   E84087FDFF             call    00458864
& d" y  Q0 A* O3 ]4 {; z00480124   B8E8030000             mov     eax, $000003E8
9 X& ^* A$ I) s2 e8 ]
* Reference t system.@RandInt;
|
00480129   E86629F8FF             call    00402A94
0048012E   85C0                   test    eax, eax
9 M+ c7 [# |7 U4 ^( O, Q00480130   6A40                   push    $40

* Possible String Reference t '电脑消磁圣手'
; [% q* b/ l- r, g0 H|
00480132   B900024800             mov     ecx, $00480200
* `; z; n5 g& t' X6 R: H3 F# V/ R
; \9 w9 X* a9 A3 X* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
4 I/ O! e4 k& C3 L|                                ?
" f* M5 P9 I8 k. E3 l  ]|
00480137   BA10024800             mov     edx, $00480210
7 L. ?3 w" R' H) a6 w+ q8 E9 m! O/ M- Q
* Reference to TApplication instance
; N( P6 C( ?+ {" }5 A|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
7 B# ~3 i5 h( U+ {' e00480141   8B00                   mov     eax, [eax]
  X( z- h  w# j
& ^9 F* _9 S: Y+ Y& m* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
|
$ P. w. `9 z0 m7 `" x+ n! e3 x00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
00480148   33D2                   xor     edx, edx
7 @( }  e2 O' K1 \
5 s% U  Y3 u' Y7 V2 z* Reference to control TFrmRamMain.Panel1 : TPanel
|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]
& x9 m1 ]$ e" F, V: s4 _
6 L* N4 `" z7 |& p& W* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
+ D# m/ f: X5 x3 H1 {, T& R  M00480150   E8EFA3FAFF             call    0042A544
3 ^1 @' n9 n8 U# d( O00480155   B201                   mov     dl, $01

- ?/ F. Z0 G. v+ R) G* Reference to control TFrmRamMain.Panel2 : TPanel
9 J$ O8 q% G' }; k2 Q$ P|
1 Q8 y/ J: k8 C, B+ y% u00480157   8B83FC020000           mov     eax, [ebx+$02FC]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
0048015D   E8E2A3FAFF             call    0042A544
# w" c/ Q  I: M$ x& _2 U2 I
  A: a: r( o: `" ]# _: @* Reference to TFrmAbout instance
|
3 Z- K% S- C7 A# x: h3 d00480162   A148264800             mov     eax, dword ptr [$00482648]
00480167   8B00                   mov     eax, [eax]
00480169   8B10                   mov     edx, [eax]

* Reference to method TFrmAbout.ShowModal()
7 \6 o3 C7 {: r' x, l! b" f* `$ i' O|
' ^! X2 i- R2 L) x2 Q! @# t0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
00480171   5B                     pop     ebx
00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： % v) @$ f( n6 w* F8 g5 @2 H 004802F8 55 push ebp 1 Q# P3 C/ K) T0 v8 V2 N004802F9 8BEC mov ebp, esp 004802FB 33C9 xor ecx, ecx 1 V& t* F: i' q# \0 { |+ x004802FD 51 push ecx # X* v5 k* C T( b# N8 i8 I7 {004802FE 51 push ecx 004802FF 51 push ecx 00480300 51 push ecx 00480301 51 push ecx 00480302 51 push ecx # r: I$ {* {- ~! A( Q$ \8 g00480303 51 push ecx 8 C- o) [8 [; ]% ?; e00480304 33C0 xor eax, eax 7 I" A* x4 X! A: \. E00480306 55 push ebp * Possible String Reference t '檫0?脬嬪]? | # J8 A% L- X! {3 \/ U0 h( D# S6 Y: |00480307 6808044800 push $00480408 $ o: Z$ g- H' Z/ V8 |* `0 a# }! [ : F5 l7 M S! l8 @2 x7 B***** TRY 5 B1 K$ B+ Q6 q4 F# U) k| 0048030C 64FF30 push dword ptr fs:[eax] 0048030F 648920 mov fs:[eax], esp 00480312 8D55F0 lea edx, [ebp-$10] * Reference to TApplication instance | 8 b' e$ w8 j$ B- f5 |: V00480315 A148284800 mov eax, dword ptr [$00482848] 0048031A 8B00 mov eax, [eax] & w/ x: l5 N3 d! |- L* r1 u1 a* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; 1 u6 T4 i& I* w% N| 0048031C E82F97FCFF call 00449A50 ;Who am I? 00480321 8B45F0 mov eax, [ebp-$10] 2 u3 |, s$ C0 x% V00480324 8D55F4 lea edx, [ebp-$0C] 9 q) Y8 L9 [9 Q6 t$ H6 w9 H! w # v+ t/ I1 Z( W% U4 e* Reference t Unit_00406FD0.Proc_00408110 | 00480327 E8E47DF8FF call 00408110 0048032C 8B45F4 mov eax, [ebp-$0C] 0048032F 50 push eax 00480330 8D55E8 lea edx, [ebp-$18] ) D, }: S: T1 q: G9 G * Z8 y! P6 m f" d8 o6 w) }( P* Reference to TApplication instance 2 J& G; j8 u5 T5 @| 00480333 A148284800 mov eax, dword ptr [$00482848] 00480338 8B00 mov eax, [eax] 5 r# ~3 S1 o8 v 0 k1 Z( |1 j( W; I7 N* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; ) ~ W2 I) o# i+ i- a| 0048033A E81197FCFF call 00449A50 9 V6 v. { u+ b* ]& T W0048033F 8B45E8 mov eax, [ebp-$18] 6 L1 Z) x) R5 x1 T00480342 8D55EC lea edx, [ebp-$14] 0 O$ R3 m4 y5 }" `* Reference t Unit_00406FD0.Proc_004080DC | + ]% ]( n5 x9 |0 h00480345 E8927DF8FF call 004080DC L, I: G( T4 Y X) r0048034A 8B55EC mov edx, [ebp-$14] 3 s, L: \( I. U3 j# h0048034D 8D45FC lea eax, [ebp-$04] 00480350 59 pop ecx : y3 P+ B7 K9 L$ `; R0 P. V* Reference t system.@LStrCat3; | 00480351 E8CA39F8FF call 00403D20 2 {" D+ X3 Y! y0 ]) K00480356 B201 mov dl, $01 ( W/ W$ K( p% W/ }; O d1 J* Reference to class TRegistry * H; T0 D: E+ I7 W& u5 r| 00480358 A174F14700 mov eax, dword ptr [$0047F174] - V3 y {8 q% \! N: R' h: q $ Y0 m) o, ]$ n1 H% _6 |5 s* Reference t Unit_0047F114.Proc_0047F274 & j7 x1 H3 n0 U# Y9 Z* r. t| 0048035D E812EFFFFF call 0047F274 M) ~2 [9 ^9 r5 z! C) z/ f00480362 8945F8 mov [ebp-$08], eax k0 W; k+ {( L2 O00480365 33C0 xor eax, eax 00480367 55 push ebp * w6 n% v$ i) r8 q00480368 68DE034800 push $004803DE 7 p+ t& _" o: R0 E: P7 ] 2 l; E- E* w) h& T7 R***** TRY | 0048036D 64FF30 push dword ptr fs:[eax] 00480370 648920 mov fs:[eax], esp 5 P$ j& R4 E6 ~% T; Z0 r9 n00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] * [5 c' {2 A) \) f 3 R- ^& ?; D$ c5 y, w8 u; K/ G( t. {! ~* Reference t Unit_0047F114.Proc_0047F314 ( E' e5 u! `2 a# g& A) S| / D2 x$ O6 H" [' h- U) w2 A5 _0 ]0048037B E894EFFFFF call 0047F314 $ X' z. `" F) G# ~; T* K9 g00480380 B101 mov cl, $01 7 \* `; l( g7 ^" A* Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） 3 i* }! M: t3 _+ u4 I; _7 M| Version\Run' | 00480382 BA1C044800 mov edx, $0048041C - `7 O( {# [! |( _) o00480387 8B45F8 mov eax, [ebp-$08] 8 G3 J) d. U: \5 x* Reference t Unit_0047F114.Proc_0047F378 | 0048038A E8E9EFFFFF call 0047F378 - @1 V: f) E. }; d$ h/ {5 V; T) h0048038F 84C0 test al, al 00480391 7435 jz 004803C8 2 s+ N* Q" C% f- R/ t# q- }( J* _! v00480393 8D4DE4 lea ecx, [ebp-$1C] ( n2 c4 u9 O G2 R* `0 W( R 2 P( c$ W+ o9 x5 F$ p1 T0 \* Possible String Reference t 'JrRClean' | 00480396 BA54044800 mov edx, $00480454 , }. S$ }" x& {% @, e) S# b0048039B 8B45F8 mov eax, [ebp-$08] % f* h9 a: } ~ 2 \' j& A& i4 Z* Y0 \' p/ R& v4 Y* Reference t Unit_0047F114.Proc_0047F540 ) g) u$ W- N. K4 M% g3 ]| 0048039E E89DF1FFFF call 0047F540 % m' Z4 t/ h" k( `! B' L! ~004803A3 8B45E4 mov eax, [ebp-$1C] 004803A6 8B55FC mov edx, [ebp-$04] * Reference t system.@LStrCmp; | # F% S; ~2 K8 L1 X004803A9 E8363AF8FF call 00403DE4 $ G2 n7 |: m$ {9 v" X* V004803AE 7410 jz 004803C0 004803B0 8B4DFC mov ecx, [ebp-$04] % k" ^) [( p1 Z, Z. @' y* M3 } * Possible String Reference t 'JrRClean' 6 Q6 ^1 ^ n2 \( h7 P2 G m |( b| 004803B3 BA54044800 mov edx, $00480454 004803B8 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F514 $ X, A' B8 v; t- x# K| 004803BB E854F1FFFF call 0047F514 004803C0 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F2E4 " v8 |4 X; G9 _9 W e3 u6 m$ C| 004803C3 E81CEFFFFF call 0047F2E4 004803C8 33C0 xor eax, eax 004803CA 5A pop edx 004803CB 59 pop ecx ) C5 J% H$ M* u! a, L004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx 8 m7 X$ n% A0 Z/ x; ^! j: w) a****** FINALLY | 004803D0 68E5034800 push $004803E5 : ~, Y$ I- o( r+ d004803D5 8B45F8 mov eax, [ebp-$08] 4 `6 I O9 M- V$ G. ]# q % ~* C3 B0 }- `$ a) ~* Reference t system.TObject.Free(TObject); 8 d# F5 h+ l4 ]% _, z. S| 004803D8 E8EF29F8FF call 00402DCC 004803DD C3 ret ' O; M: {. S/ \2 v, w5 t/ h) R* Reference t system.@HandleFinally; | 004803DE E90931F8FF jmp 004034EC 004803E3 EBF0 jmp 004803D5 ; N. G3 V3 o) Z5 I# l# [% ?1 a$ T****** END ! o2 @* }7 C/ I| }/ o6 Z# q7 \ }% W* t004803E5 33C0 xor eax, eax 004803E7 5A pop edx * X3 C7 q) H. d004803E8 59 pop ecx X/ Q' P( n) {6 z+ x/ s004803E9 59 pop ecx + u, m+ Q* Q5 u# U; A# e( b004803EA 648910 mov fs:[eax], edx ****** FINALLY | + K9 i7 Q7 w3 v: x$ h * Possible String Reference t '嬪]? | 004803ED 680F044800 push $0048040F 004803F2 8D45E4 lea eax, [ebp-$1C] 004803F5 BA05000000 mov edx, $00000005 & z* Z* d$ o8 J# H+ d) J 0 F& T0 X+ y5 R# ^( U2 o& A1 o* Reference t system.@LStrArrayClr; | / z8 N! V4 d$ }0 a( G' R) \0 n" c! @004803FA E87936F8FF call 00403A78 D. \' g/ N7 a3 k; _004803FF 8D45FC lea eax, [ebp-$04] * U G5 m2 O: @) | # k6 C. j! v8 j! {+ i* Reference t system.@LStrClr(String;String); ) L1 @. }& d' e2 u+ @| 00480402 E84D36F8FF call 00403A54 4 i+ [; m$ c# L00480407 C3 ret 0 [0 ~6 |& }0 l' Z- F * Reference t system.@HandleFinally; 1 X( R% E; |' a+ t| ( `8 q, f& U* n5 W& _( m. B e5 ~00480408 E9DF30F8FF jmp 004034EC B6 ~9 u; a1 J& t! ]4 U- M* ~0048040D EBE3 jmp 004803F2 ****** END | 0048040F 8BE5 mov esp, ebp : m- _: q7 |) L00480411 5D pop ebp 00480412 C3 ret 1 @- Q' [+ C$ T! L. g 1 Q: ]# {5 o/ h4 L& Q7 ?, A: H上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） $ V7 z% U4 d1 s' D/ |% Z1 e只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 结语： 上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 , u7 G1 a+ j4 i1 c+ H权当一笑吧，呵呵~~~~~~~~~~~~ + D7 X; l/ W8 V/ V- m, z c( r4 p! i3 M$ b' f monkeycz于2004年平安夜 2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

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

' o' v$ Y- _+ A0 P睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

以下是引用游侠无极限在2004-12-26 22:03:00的发言： 3 M( r# H% J, |9 rDelphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

% A6 v) o8 Z5 z对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

% C' H- q$ j; C6 ~/ }

同感