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

游侠无极限

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

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

9 t6 P& {6 ?4 m) \0 C0047FF28   53                     push    ebx
9 _6 r9 [9 |9 i6 F1 s# }0047FF29   8BD8                   mov     ebx, eax
0047FF2B   33D2                   xor     edx, edx
, l' C$ I+ w1 W! ]
/ K3 I: x, E- S* Reference to control TFrmRamMain.Panel2 : TPanel
|
; k  w; K, J; |3 r. R: v0 a0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]

3 R& ?2 e& V% i, R( o+ |8 E- X. y* Reference t controls.TControl.SetVisible(TControl;Boolean);
% k7 W6 g1 h! N2 T1 w" o* @|
0047FF33   E80CA6FAFF             call    0042A544
0047FF38   B201                   mov     dl, $01

& _0 ~% i' o3 k* Reference to control TFrmRamMain.Panel1 : TPanel
|
0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]
8 E( }. Y. o: O+ I  c3 R
* Reference t controls.TControl.SetVisible(TControl;Boolean);
4 ~" p% H, _4 N; Q0 N|
0047FF40   E8FFA5FAFF             call    0042A544
' k5 f  T0 E% a. Y  M1 o# o
* b0 W/ S5 s- x8 K. q  m8 y* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
|
! y3 d) \% s- U: b0047FF45   BA7C014800             mov     edx, $0048017C
- y2 t3 a5 W1 a6 l$ M5 E
* Reference to control TFrmRamMain.Label3 : TLabel
|
7 u& d4 ~$ {! D5 w4 Y& o. |$ _0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
|
0047FF50   E807A7FAFF             call    0042A65C
0 k' A( Y& u3 @5 q# L) W
7 h  Z: {3 D0 j* w7 _$ k/ C7 [' H8 E* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
" y; o# k& V* q2 N: `|
0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]

. j2 w* R2 `$ n* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
/ {, q8 G' x2 q- N6 J- R|
0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx

+ f) L' k8 k$ \! `" Y( P1 J* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
|
2 L' R% l7 B/ ~% P  D0047FF62   E8D1020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
|
4 @% z0 R1 g: l2 \3 V0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]
& a+ h& T; P  Q) v0 c
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
, Y, |# _( q9 k8 x2 d0047FF6D   E8F288FDFF             call    00458864
- G/ f$ B' d8 p7 b. w0047FF72   8BC3                   mov     eax, ebx
1 {& @7 Z8 t, ], M
* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
|
0047FF74   E8BF020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
1 L2 u& E/ O/ Y+ l7 }8 t|
( Z% R$ k6 {. p. S) t( P2 u0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]
) V- I1 J6 g- Q% {
% y  f0 _" ^3 f* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
5 T+ d* b/ p7 n$ Y) O0047FF7F   E8E088FDFF             call    00458864
; g" A; N7 x+ v6 @' O0047FF84   8BC3                   mov     eax, ebx
+ H5 C  I4 K5 h' @
* Reference to : TFrmRamMain.Delay()
+ S* b/ Y- m4 V|
0047FF86   E8AD020000             call    00480238
& U8 n( [% f3 L% d
: ?% Z6 j0 @  N1 P: f& i3 e* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
9 ?3 H; O1 [! D  U# c0 @, J0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]
7 W5 G+ B& R+ A& D
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
+ {. H/ n4 s9 s8 W4 g|
) G; _: k; H5 M) S) X0047FF91   E8CE88FDFF             call    00458864
0047FF96   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
7 n2 g6 l9 F" J: X1 e- U|
0047FF98   E89B020000             call    00480238

4 [) ?9 E" [# q$ d1 H: ^. Z# w2 U- j* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
  Z3 V: z9 }. a8 q; B0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]
  v4 b% U- G1 l, T. ~/ D5 y) S5 @
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 w: j6 @: [( O  i6 B6 i6 u|
0047FFA3   E8BC88FDFF             call    00458864

5 d% F8 [- l8 P4 m* j. [; O* Possible String Reference t '系统正在收集电脑的电磁波...'
7 v( i) M$ Y! k& u* n, V; ~5 G|
0047FFA8   BAA0014800             mov     edx, $004801A0
& p1 u# U$ _. X
2 q) A: H, y+ Y* Reference to control TFrmRamMain.Label3 : TLabel
|
' }3 t! S; @: t2 @: T3 m# |0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
3 I$ H/ Z0 l9 f  N) D% _9 B# R) d' @|
9 K- ~- {& ~% v4 U. l7 N% W0047FFB3   E8A4A6FAFF             call    0042A65C

# j) r& b7 [7 J, t% e: n* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]
4 R: ~8 t- c( E1 [
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
( [' O' C* c# B# B( ^0 d) I! l|
& d* L, X" s: x0047FFBE   E8A188FDFF             call    00458864
* b4 _5 R  T- P' v" d1 A) s7 A0047FFC3   8BC3                   mov     eax, ebx

$ |, \1 U) I. M3 Y0 L* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
2 c8 P8 m4 F" Y|
0047FFC5   E86E020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
8 X) q3 T* u' d$ S2 y* F, e; V. R|
* a' r7 v  |2 H& I0 Q, }1 g  z0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]
* n& S& [) T& v' _" |8 k3 k$ S7 [
7 a; Q) y& t/ v0 e4 e4 M4 q* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FFD0   E88F88FDFF             call    00458864
0 @0 T* j- u0 u0047FFD5   8BC3                   mov     eax, ebx
0 W7 L- P2 K. v! @4 v- a
* c% S1 \7 v( |* Reference to : TFrmRamMain.Delay()
|
% j( c: e) i# I; F3 ^0047FFD7   E85C020000             call    00480238

. J" a4 h( l# J0 s% ?* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
, h* Z% I' k9 u. ~2 K" N|
0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
0 a9 w' h5 \' ~! ?7 \+ f5 g$ {
8 K  G% A/ [8 F- P# A5 W/ f* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
# k( w- M4 ~" H7 \|
" `! y5 X9 z8 g0047FFE2   E87D88FDFF             call    00458864
0047FFE7   8BC3                   mov     eax, ebx
& Z* Y: N- Q3 Y, r
* Reference to : TFrmRamMain.Delay()
, j: n9 _) a, h  ~+ F8 ]* r|
& U& f- w& i  y: ?" P0047FFE9   E84A020000             call    00480238
0 ?  C$ i6 c  D$ L- T' w
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
1 R- x; _/ G  s4 V: Y' \0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]

3 l: _. ^1 ?( w, S* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
7 m9 E: D" ~2 C  Y$ z/ ?0 t# P|
0047FFF4   E86B88FDFF             call    00458864
0047FFF9   8BC3                   mov     eax, ebx
1 E  h4 a7 }& r0 d' j. P9 z  U0 v9 m- {" ]
9 {/ P. G  C0 G2 X* Reference to : TFrmRamMain.Delay()
! k' T9 z5 C! I|
. O6 r6 g6 N! |$ \0047FFFB   E838020000             call    00480238
% n+ a' G/ Q, N- D2 n3 N4 s
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480000   8B83F8020000           mov     eax, [ebx+$02F8]
, ?! X6 J0 o0 H# B: \+ y. i9 D
4 p. p/ p* v6 d! r) [& h" [0 ?6 S* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 n" k! M5 @5 p' `' F% a|
* p) N& q* X8 Q& H& C- ^00480006   E85988FDFF             call    00458864

7 l. I4 V( {9 U/ z0 M* Possible String Reference t '系统正在释放融磁电波...'
|
  p5 o. Z. h' @$ `$ L8 |0048000B   BAC4014800             mov     edx, $004801C4
6 T3 C1 s! e! [3 z1 H
2 z  D9 y! E+ J, @5 h* Reference to control TFrmRamMain.Label3 : TLabel
* @: a; m- w5 @, e5 d3 X' y+ _|
00480010   8B83F4020000           mov     eax, [ebx+$02F4]
5 j1 r; Y* r) |
  P& f+ \: l+ X  n% C# g* Reference t controls.TControl.SetText(TControl;TCaption);
|
4 }9 @9 v/ p; Q1 f! k6 ~00480016   E841A6FAFF             call    0042A65C
! s6 k/ E# G# K$ ?0 a" _
" r( C6 b0 V. }' X) w* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
) w  H! r4 h- U" E|
0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
5 t! k" t" A% @: u: d
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
/ c0 g( c6 {. v! p# w% `# C|
- G& A; ~  _- u- o- C7 X, u00480021   E83E88FDFF             call    00458864
00480026   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
7 P8 F" Z! G! m- a  p$ o2 G: B  g+ F8 j|
+ A  C$ t' `2 m0 s# [' q$ T00480028   E80B020000             call    00480238
& o5 y/ F, C5 e( j( U! V
& C+ H! u1 H2 o6 x3 i) d; ~" h; y9 K* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
% A) P2 P/ j! v; E' Q4 _+ a8 {|
, E! D6 ~. x0 I6 T- p+ l+ f. v1 ^0048002D   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
% [$ z1 M, w( r: \& C00480033   E82C88FDFF             call    00458864
00480038   8BC3                   mov     eax, ebx
8 I3 W8 _8 H" h! P# L
7 ~- K7 f, `6 C* Reference to : TFrmRamMain.Delay()
1 N1 q3 L6 r; `6 W2 x|
0048003A   E8F9010000             call    00480238
1 T- s  Q: N) s  y
$ t4 U0 n' \8 s& a" K* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
' b& X* |! I3 j; K9 f; q/ r6 L|
8 h4 K; }0 B  y9 z" A) Y# B0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
1 Y/ q: V$ b' W, Y6 D|
00480045   E81A88FDFF             call    00458864
; p" ~; V. n1 t' S0048004A   8BC3                   mov     eax, ebx
0 t8 d/ U, F: Z  n& Y. x
* Reference to : TFrmRamMain.Delay()
|
, X+ _- R/ c7 C% }. ]3 I" m3 Z0048004C   E8E7010000             call    00480238
- r+ {4 n' Z7 r$ z( q* ~; D
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480051   8B83F8020000           mov     eax, [ebx+$02F8]

7 G; X* q+ L* W$ ?* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
1 R7 |" `( A  f" o0 t- W00480057   E80888FDFF             call    00458864
; V* G6 X1 X7 T# h! t: j. Q0048005C   8BC3                   mov     eax, ebx
1 q; @. s3 W5 E) `3 q5 S
* Reference to : TFrmRamMain.Delay()
2 w( _/ P2 B- l|
8 K1 P( C0 ^- T" x' C0 O0 y0048005E   E8D5010000             call    00480238
6 y2 v3 s) V( e% q* j
( G& Y5 q* S1 s1 v5 p6 k$ q5 q* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480063   8B83F8020000           mov     eax, [ebx+$02F8]
4 a) m+ E( |( g* \9 R: q0 ^
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
6 v4 i' m8 \, L0 O" g- M|
* g  t6 t; C% _; t00480069   E8F687FDFF             call    00458864
3 R8 @4 \* @2 s. R& F2 W/ D
# s( Z2 u- E' I: K7 u* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
3 d& W5 F+ y6 B# ~  R$ G0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

: R2 Z7 `4 p! j+ e$ V% E( {# l* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
& ^6 t+ Z" Y" f. X  L|
00480074   E8EB87FDFF             call    00458864
00480079   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
* M4 n$ b9 |/ g' `9 W$ d4 l+ p4 Q. O0048007B   E8B8010000             call    00480238
9 X/ Q/ h$ w5 o* }4 Y" f
" B4 D  d4 ^. W* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
& Q: g' M, d( f. D00480080   8B83F8020000           mov     eax, [ebx+$02F8]
/ k% @, E7 f. F/ T$ _! e
1 F* r* S( ?/ b! i& Z* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
6 S  D* {; S8 X# t- y7 l00480086   E8D987FDFF             call    00458864
0048008B   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
+ j) m1 v2 S# s# s|
) L, n) ^; D$ @' P1 x2 w+ a0048008D   E8A6010000             call    00480238
3 \2 {- }% J# K9 U- A2 K- I! \! D9 C
3 I1 m) t, n. L0 {* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
/ B5 ?0 k5 C* t|
00480092   8B83F8020000           mov     eax, [ebx+$02F8]
4 R2 T* G; K, {# t4 }9 j4 _
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
* N$ [+ e1 N( b|
00480098   E8C787FDFF             call    00458864
4 G# Z* h$ C/ s- r0 \, O0048009D   8BC3                   mov     eax, ebx
+ P1 I' f) H( Z% y/ C9 b
* Reference to : TFrmRamMain.Delay()
|
' Y2 K1 L# z6 z% |2 P* m0048009F   E894010000             call    00480238

+ m' c) Z0 i- W( A( k8 P* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800A4   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
: E& P& C6 t# m2 o! M. Y1 E|
004800AA   E8B587FDFF             call    00458864
004800AF   8BC3                   mov     eax, ebx
2 c( c- o5 Q" \4 N# {1 M$ z7 a% v+ P
* Reference to : TFrmRamMain.Delay()
, u) r7 m% u  m& J& p5 Q; V|
004800B1   E882010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800B6   8B83F8020000           mov     eax, [ebx+$02F8]
2 G8 |5 X7 z, B' W
; _+ B; H. s; x4 P. {2 y1 y$ o' T3 X  @* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
% n( Q, }+ i' v+ }|
1 \9 C* N9 R3 P5 a$ e004800BC   E8A387FDFF             call    00458864

* Possible String Reference t '系统正在做最后的消磁工作...'
|
004800C1   BAE4014800             mov     edx, $004801E4
8 U/ I: j# r4 p. |" X. R( N% H  v! t' T( Q
* Reference to control TFrmRamMain.Label3 : TLabel
|
004800C6   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
) e& x2 K2 D5 a0 @  b9 o% _|
( o" C1 F! s) ~8 c2 Q& ~! ^004800CC   E88BA5FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
$ _, s, Y4 G) A6 }|
! s& C6 b! }) ^7 o004800D1   8B83F8020000           mov     eax, [ebx+$02F8]

& s$ b0 h! f6 P, V* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 E' C7 `$ U, u, T) I) o7 X' s|
004800D7   E88887FDFF             call    00458864
; }9 q* P. a  t004800DC   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
|
0 ]& n9 U; o& Q2 Y& v* c" Y004800DE   E855010000             call    00480238

- |! m1 W" C1 ~/ i( f* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
9 Y: T$ X/ c. O  K  N8 {) M|
004800E3   8B83F8020000           mov     eax, [ebx+$02F8]
8 ?) s, T8 H6 R2 m4 C! u3 f8 _
( m4 K0 D6 E# V; u6 Z* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800E9   E87687FDFF             call    00458864
7 [% Z: D* K* @004800EE   8BC3                   mov     eax, ebx

- U1 C9 Y4 _; ]$ `, D* h* Reference to : TFrmRamMain.Delay()
$ A& M! R5 Q& J+ ~, u4 k8 G- Q$ o  Z|
4 N# [8 e) ~" i( Z$ e# T. B004800F0   E843010000             call    00480238
5 d* p/ S9 L, ~, _2 m& }& j3 s
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
( L& y- V7 f/ k6 g|
004800F5   8B83F8020000           mov     eax, [ebx+$02F8]
, u. F4 Q1 L$ x, t, ]$ J6 _
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800FB   E86487FDFF             call    00458864
2 u4 b" j) `/ R! G4 r00480100   8BC3                   mov     eax, ebx
" p9 ~7 A0 \1 J" I  l
* Reference to : TFrmRamMain.Delay()
( Z6 P/ V. t* |1 C& w$ l4 p- x% C|
4 e, j; m- Z; j7 J& W% q$ A3 z00480102   E831010000             call    00480238
/ d0 y" P. M: z
" Z% _. n! n2 a. c+ i* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
% ~8 }1 _6 g9 w* f+ B8 T+ l00480107   8B83F8020000           mov     eax, [ebx+$02F8]

2 o+ C; @1 Q8 v5 v1 E1 P4 ]* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
5 `& @5 L4 x  Q|
0048010D   E85287FDFF             call    00458864
# t; |$ ]7 y* p# @) ~. q8 B; L00480112   8BC3                   mov     eax, ebx

$ j4 l% a: m: K# l* Reference to : TFrmRamMain.Delay()
|
00480114   E81F010000             call    00480238
& v6 ~; [6 i% b1 B3 n
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
% a! N' ?& S. ?|
* Z  ~/ r2 \+ C$ y3 H00480119   8B83F8020000           mov     eax, [ebx+$02F8]
/ E6 Y+ F$ A$ A! v9 w0 M
9 V* @) A% }' D7 ~7 ~* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
7 `! T7 [6 u4 D; S0 o|
9 E+ v, B; w: b7 r+ }5 Q0048011F   E84087FDFF             call    00458864
) q/ ^  _1 r, V) x) D00480124   B8E8030000             mov     eax, $000003E8

* Reference t system.@RandInt;
|
$ O+ c( T1 p8 I) b+ F' Y+ D/ E+ d* p00480129   E86629F8FF             call    00402A94
) v3 A+ ^, l4 X' L( a0048012E   85C0                   test    eax, eax
1 r! S6 S; [+ C  b+ s00480130   6A40                   push    $40
6 J) m/ w, W( U8 s" _# n$ Z
! T/ w2 u9 L) ^, g3 S+ a5 d* Possible String Reference t '电脑消磁圣手'
|
1 x1 N' ?. N! s/ ^( l/ @, o2 R$ X0 y00480132   B900024800             mov     ecx, $00480200

* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
. n9 l4 D8 }3 ~/ H' C|                                ?
2 K, `4 x) @0 J9 Q8 l. b|
9 w' V; D& P7 P8 T- E1 ?# M$ p00480137   BA10024800             mov     edx, $00480210

( O( D3 C& r, z& T. l% ~; k  i. H* Reference to TApplication instance
8 o( `; b6 D$ v  m* M1 }|
, P4 j9 h9 H" f: h& n$ W2 L0048013C   A148284800             mov     eax, dword ptr [$00482848]
00480141   8B00                   mov     eax, [eax]

* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
- X* X/ s; a' X  D( J/ G' b|
00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
00480148   33D2                   xor     edx, edx
7 e$ f* ?) j7 y. {
* Reference to control TFrmRamMain.Panel1 : TPanel
( H1 F$ g- r7 N+ V. X" i5 x+ Y|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
1 H: v& B# v- T; O5 W8 l0 T. {  ||
00480150   E8EFA3FAFF             call    0042A544
00480155   B201                   mov     dl, $01

" ?- c/ t. R0 r% o$ E' G3 e* Reference to control TFrmRamMain.Panel2 : TPanel
1 A8 k5 ^8 ]4 M! L|
00480157   8B83FC020000           mov     eax, [ebx+$02FC]
  j) _( n, L* k; T# c
* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
9 k4 o9 f8 G- i2 f/ _0048015D   E8E2A3FAFF             call    0042A544

* Reference to TFrmAbout instance
|
00480162   A148264800             mov     eax, dword ptr [$00482648]
00480167   8B00                   mov     eax, [eax]
00480169   8B10                   mov     edx, [eax]
8 X1 C& J$ x: k2 C% p
* Reference to method TFrmAbout.ShowModal()
|
3 Q/ f' S: P6 G) I/ h; I# }+ g* L0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
00480171   5B                     pop     ebx
( M4 r1 k% [! R( M00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： ; }* P# R+ Z$ L! w; j. g- i+ r5 R ' c2 N" {; P# w/ j. L004802F8 55 push ebp 004802F9 8BEC mov ebp, esp 004802FB 33C9 xor ecx, ecx 004802FD 51 push ecx 004802FE 51 push ecx ( e5 B! M2 z! I0 \004802FF 51 push ecx " S% b4 y1 ~4 x) ?6 E4 ?00480300 51 push ecx 00480301 51 push ecx 5 L/ Z6 H6 O) H3 ~- [00480302 51 push ecx 6 g% e- Z; K8 T6 \ R/ ]00480303 51 push ecx 00480304 33C0 xor eax, eax 00480306 55 push ebp * Possible String Reference t '檫0?脬嬪]? | 00480307 6808044800 push $00480408 ***** TRY , d4 t" C* p- u5 g| 0048030C 64FF30 push dword ptr fs:[eax] . k* E4 I J' z; \/ P$ a0 d0048030F 648920 mov fs:[eax], esp 00480312 8D55F0 lea edx, [ebp-$10] 5 f0 t5 s4 O" P0 J5 b8 d" O* Reference to TApplication instance | 00480315 A148284800 mov eax, dword ptr [$00482848] * }3 H* H! i- A6 w$ c2 p0048031A 8B00 mov eax, [eax] * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 0048031C E82F97FCFF call 00449A50 ;Who am I? ! @4 y, \" U* i0 r# d7 X00480321 8B45F0 mov eax, [ebp-$10] 5 V8 c I8 j1 ^+ v$ x4 a00480324 8D55F4 lea edx, [ebp-$0C] 1 c6 [6 ~3 `$ W * Reference t Unit_00406FD0.Proc_00408110 & X1 J8 b3 T; r% O| # f* P8 u& n# X00480327 E8E47DF8FF call 00408110 ' @6 ^0 c) A% O1 y0048032C 8B45F4 mov eax, [ebp-$0C] 0048032F 50 push eax 00480330 8D55E8 lea edx, [ebp-$18] ; z1 u$ A5 ]1 }* i, m* Reference to TApplication instance + B1 Y4 |) _/ _& r| 3 k& I$ D, p1 Y( Q+ R00480333 A148284800 mov eax, dword ptr [$00482848] 00480338 8B00 mov eax, [eax] ( m* R: e4 n* h * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; T% Q" G: @. I, h2 J4 \| " m/ v$ p" J# A: S2 [$ T' \0048033A E81197FCFF call 00449A50 ! z& Q( Y# l; A- ~) _) O0048033F 8B45E8 mov eax, [ebp-$18] + A1 W1 Z; a* {2 u- ?) G0 r00480342 8D55EC lea edx, [ebp-$14] * Reference t Unit_00406FD0.Proc_004080DC 7 ~/ M7 K3 b' F$ Q| 00480345 E8927DF8FF call 004080DC 0048034A 8B55EC mov edx, [ebp-$14] : I4 t% t, o( _/ c0048034D 8D45FC lea eax, [ebp-$04] / Z' C Q! d' a/ F00480350 59 pop ecx : s' L" Y/ R; j5 k' e * Reference t system.@LStrCat3; - p* F& M/ n+ E" s3 }6 k| 00480351 E8CA39F8FF call 00403D20 6 K% M' w4 e! Z1 Z00480356 B201 mov dl, $01 ; r) Z& s! ^& g * Reference to class TRegistry | ' h/ g- t& k+ B% \( y! o% P x00480358 A174F14700 mov eax, dword ptr [$0047F174] * Reference t Unit_0047F114.Proc_0047F274 ! ?5 U$ y: Q3 o3 R2 B- a* w5 I, T| + p: }) _) P! }/ k0048035D E812EFFFFF call 0047F274 ! t& E' V" l0 [' \4 j8 v00480362 8945F8 mov [ebp-$08], eax ! j d9 I/ }6 A00480365 33C0 xor eax, eax % E( J( a3 X4 m7 R# z00480367 55 push ebp 00480368 68DE034800 push $004803DE / v$ M# l! ]% A' k6 ?; R' T***** TRY | 0048036D 64FF30 push dword ptr fs:[eax] 8 `. y2 `" q. f7 E$ C) l' p+ `' g00480370 648920 mov fs:[eax], esp ' p }+ s3 d% }* D00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] 9 a* b! ?, t! {- J5 x$ f * Reference t Unit_0047F114.Proc_0047F314 | 6 [# P4 H* Y, H4 ?* T0048037B E894EFFFFF call 0047F314 00480380 B101 mov cl, $01 ) T) ^0 L( o+ E) O * Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） | Version\Run' + C. n6 k( I9 Z: R2 _| , c3 N; A1 @+ H00480382 BA1C044800 mov edx, $0048041C 00480387 8B45F8 mov eax, [ebp-$08] 3 s8 J3 r3 x; e0 j5 |) [ & T' Y# i+ }. B: }4 G/ e* Reference t Unit_0047F114.Proc_0047F378 $ O8 v# W: k6 \3 k& @| 4 P$ }. z0 z/ H2 Y' s% ^* U8 S0048038A E8E9EFFFFF call 0047F378 8 l' G8 ]+ [, B5 a0048038F 84C0 test al, al 00480391 7435 jz 004803C8 2 l" J* T. a9 R00480393 8D4DE4 lea ecx, [ebp-$1C] 7 o. W* g/ d+ \* i! N1 @- u+ o * Possible String Reference t 'JrRClean' | / o# @, J) n- ^4 A00480396 BA54044800 mov edx, $00480454 ) y/ c8 y& i6 |, r, x' x0048039B 8B45F8 mov eax, [ebp-$08] ; T% Q3 ^% Q! q$ [4 z! @7 I7 A3 x : C( s- w/ _/ u/ x: ?2 z2 N& v' t* Reference t Unit_0047F114.Proc_0047F540 | 7 V, k) i& R- h" Q3 j! w0048039E E89DF1FFFF call 0047F540 004803A3 8B45E4 mov eax, [ebp-$1C] 6 N$ c; J! L% ]8 i/ V% j004803A6 8B55FC mov edx, [ebp-$04] 0 Y7 g0 r8 O% \* _$ K. N* Reference t system.@LStrCmp; $ L, }5 s3 ~; s) u/ ]| & M+ ~' D( g; o: _/ g004803A9 E8363AF8FF call 00403DE4 / X/ V3 k+ j/ _$ h i. h004803AE 7410 jz 004803C0 004803B0 8B4DFC mov ecx, [ebp-$04] % ~# ^, q* `$ w x ! B( X8 c$ G+ p* Possible String Reference t 'JrRClean' . B. y9 x% ~/ |/ ]/ L2 f; e1 _| 004803B3 BA54044800 mov edx, $00480454 $ m/ C2 } Z1 [8 \ P2 i004803B8 8B45F8 mov eax, [ebp-$08] ' r: K: R, L3 b7 ?0 K) k6 E & V: l, e7 k3 h& v5 x0 B, I* Reference t Unit_0047F114.Proc_0047F514 | 004803BB E854F1FFFF call 0047F514 & T+ b% `4 m! {( i# q/ Q/ V! y004803C0 8B45F8 mov eax, [ebp-$08] ; u8 i9 I z$ n * Reference t Unit_0047F114.Proc_0047F2E4 | 004803C3 E81CEFFFFF call 0047F2E4 004803C8 33C0 xor eax, eax 004803CA 5A pop edx ' ^$ H- }8 F* }% R5 W& i3 V004803CB 59 pop ecx ; @9 V$ b( ]. ?6 Y004803CC 59 pop ecx 2 z* F+ X: |% o3 x+ f004803CD 648910 mov fs:[eax], edx $ o" U2 Y b. n; b3 ] - v+ K, L9 }. G: @****** FINALLY % e" e" x( ]8 q! G| 004803D0 68E5034800 push $004803E5 004803D5 8B45F8 mov eax, [ebp-$08] ! n1 R6 p3 U- _4 n3 | * Reference t system.TObject.Free(TObject); | 004803D8 E8EF29F8FF call 00402DCC ) q0 P4 O5 h1 j# \% [" Z9 p: a004803DD C3 ret 3 q' w% h) A$ k9 d _7 X4 I$ f0 H* Reference t system.@HandleFinally; | 6 Z0 z! @8 J2 w( |- y$ g004803DE E90931F8FF jmp 004034EC 9 d) z d2 S' Y8 G004803E3 EBF0 jmp 004803D5 9 s, p, D8 a( w ) Z$ V) K2 Y/ \/ k: j& A, d6 t****** END 5 t" v" f# t) i1 }8 z5 }| 004803E5 33C0 xor eax, eax ; Z, h" Z9 N& k+ n( K$ a( M004803E7 5A pop edx 004803E8 59 pop ecx 004803E9 59 pop ecx 004803EA 648910 mov fs:[eax], edx & `; P3 N9 }4 n. S1 q3 }; E ****** FINALLY 7 x3 B! X6 M8 X }* D% m' || * Possible String Reference t '嬪]? : h' ^% ?- U0 T. b8 [ || ( N R2 f. }( T* \004803ED 680F044800 push $0048040F ( }: ? U! K, `/ c9 R; m, ~004803F2 8D45E4 lea eax, [ebp-$1C] 004803F5 BA05000000 mov edx, $00000005 ' y7 V, W8 l* U! \7 v ?2 x! y# H' U ( j* e; @4 i) H1 B6 T* Reference t system.@LStrArrayClr; # i/ \9 P' G8 r| 004803FA E87936F8FF call 00403A78 004803FF 8D45FC lea eax, [ebp-$04] ! ~# `8 B0 B8 r( L5 a* Reference t system.@LStrClr(String;String); ) v1 P5 N7 ~$ {, Y/ h| 9 l+ Q* T( R- d3 S. y' n00480402 E84D36F8FF call 00403A54 00480407 C3 ret 5 M( r* M2 T1 L8 H" Z' c 3 V. u( z F1 G7 b 2 z. j: j- X, D# p: c( ]$ G" Z# Y* Reference t system.@HandleFinally; 9 W" V$ c9 U" K$ w| ) [4 U& x( ?; D- U& l- C8 v00480408 E9DF30F8FF jmp 004034EC " ^& h+ J* O4 P% M7 V* v0048040D EBE3 jmp 004803F2 / \9 C% U' I0 n. G ****** END | 0048040F 8BE5 mov esp, ebp 7 f; }8 L7 O% r' I4 `. j00480411 5D pop ebp + J4 @) ^9 G7 Q) t: M; z7 [5 W: ^00480412 C3 ret " W6 s5 z% J2 |0 e 上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） ' b: C, P& p4 X 只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 2 B$ F- \0 x5 }8 Y # q/ m8 ^4 V8 K' O2 \6 a! W结语： & P3 M: ]2 m, C/ L# M上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 $ o7 s- f! c# F0 \5 E也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 & N L: w o' | D' F1 [, S权当一笑吧，呵呵~~~~~~~~~~~~ : x$ a. k* `3 W7 M " U% i6 h$ M" a" r* u( _* S ; p4 _$ ?) D$ o" o# r 9 i! _0 r, c( h8 o2 o monkeycz于2004年平安夜 7 @1 Y0 e( ~! I2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

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

5 d* m7 k! H1 H9 N% o# g$ Q ! b6 _0 S( M* I - [ E6 L b' ?& x, u睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

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

( d1 P6 _7 ~3 d6 D0 W: t2 F ] 5 L, x4 |: i; Q9 X* n# H" L 对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

同感