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

游侠无极限

“电脑消磁圣手”的消磁“秘术”
- V; o! z& N: b% X7 c( c
8 B- |4 A- ]2 i: N) ~" e前言：
平安夜的晚上，在网上随处溜达，偶尔看到一款名叫《电脑消磁圣手》的软件，是某公司开发的（具体是什么公司大家自己去看吧，我就不说出来了，免得麻烦）。据软件中的说明“本系统一直在国外市场上销售，效果很好，最近把系统翻译成中文版，免费提供给国内的朋友使用。”，至于软件的作用，又有如下的说明：“本系统非常适合在电脑前长时间工作的人，能够高效的清除电脑产生的电磁波，对工作者的身体起到了保健的工作。本系统根据电脑产生的电磁波，自动产生融磁波，中和电脑产生的磁波。由于电脑在不停的释放电磁波，建议您每隔一个小时进行一次消磁工作。”听起来十分诱人，于是就down了下来把玩一番。最新版本好像是6。3版（升级了好多次了吧）。
" w: j- {  ?" ]/ e
2 ^, _: u$ P7 m# r6 X试用：
1 G2 K! q) P" l; Y0 q2 \' {# u下载下来的是一个压缩包，解开后只有一个可执行文件。运行一下，首先弹出了浏览器窗口，连向了一个网站（可能是软件公司的网站吧），随手关掉。软件的主界面倒是很简捷，最主要的就是“开始消磁”按钮。点击一下，出现了一个进度条在不断的前进，同时还有提示文本出现，就是这些“系统正在做消磁前的准备...”、“系统正在收集电脑的电磁波...”、“系统正在释放融磁电波...”、“系统正在释放融磁电波...”、“系统正在做最后的消磁工作...”。经过这样一番神秘的仪式之后，弹出一个对话框提示“融磁成功，已经成功中和电脑周围磁场?”刹那之间，我对作者的佩服如同滔滔江水连绵不绝，这可是项巨牛x的技术，只靠软件就可以进行消磁了，而且还是电脑周围的电磁波，不知道作者是否申请了专利。怀着最作者的无比崇敬和那份极度的神秘感，我飞快的的把软件给肢解了：）
) x0 L( |- T: S8 Q7 M/ I8 p( Z8 \4 q  e
分析：
检测一下，是用Delphi写的，没有加壳。用DeDe载入后，反编译“开始消磁”按钮点击事件对应的代码，复制如下：
; P$ w, K0 b- b- ]- p  E
+ }! H+ U) y" t4 U0047FF28   53                     push    ebx
' t, O- ~- X  X3 ^1 L! a0047FF29   8BD8                   mov     ebx, eax
0047FF2B   33D2                   xor     edx, edx
9 @6 z" S$ d/ ?7 c
* Reference to control TFrmRamMain.Panel2 : TPanel
1 ~% E% z$ f, ]& Z3 |7 a|
- C) {: K+ H: X5 m0 E- [; |$ u( @! E0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]

/ w# Y, r. ?/ u% K# p$ S* Reference t controls.TControl.SetVisible(TControl;Boolean);
! W1 p: O  ^, |. Q|
0047FF33   E80CA6FAFF             call    0042A544
* f2 T! k$ v& ?8 E0 L6 n* }  b0047FF38   B201                   mov     dl, $01

* Reference to control TFrmRamMain.Panel1 : TPanel
  L( ^" C3 p/ I; g- u|
0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]
4 A3 w) G% y* f! Y% Y5 }
* Reference t controls.TControl.SetVisible(TControl;Boolean);
% w( A8 ^% Q: \/ c% U3 n, [3 ]& V0 e|
8 j! H# K; _* r0 @5 n2 O! q0047FF40   E8FFA5FAFF             call    0042A544

2 O. N1 `" i8 H$ v/ Q9 r# X* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
|
& d2 s4 ~- Y! w8 J$ J0047FF45   BA7C014800             mov     edx, $0048017C

* Reference to control TFrmRamMain.Label3 : TLabel
|
0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]
  f0 n& B  Q& L/ u2 L1 t
5 H% S! A; L6 D( X! x; M1 A* Reference t controls.TControl.SetText(TControl;TCaption);
|
1 b" D" Y3 g6 T9 \2 Z) `' z! s+ r! L0047FF50   E807A7FAFF             call    0042A65C
# P6 i; F: T4 u, ~1 C
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
|
4 e0 D+ n! \' J. n( r1 @0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]
9 d3 u! k3 w. j  m6 ?
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
/ `' G8 h9 K; e|
0047FF5B   E80489FDFF             call    00458864
5 J0 k7 D; a" R) \6 Y9 o& h0 t& w0047FF60   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
|
  h; V0 z7 _2 t! l* M" R0047FF62   E8D1020000             call    00480238
  {4 r) Y. S  `3 e
% n5 g7 b0 S3 ]3 x: o* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
|
9 e+ n7 I: _% X1 A1 z0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]
$ o2 y5 t# n5 t, d" s+ C* f6 e
/ P3 }: g2 t/ M) Q* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
* E0 m. Y' d5 }0047FF6D   E8F288FDFF             call    00458864
0047FF72   8BC3                   mov     eax, ebx
% l+ Q) W7 I7 _: z2 i
* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
|
0047FF74   E8BF020000             call    00480238

& ?9 j+ D2 a& m! P* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
|
0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]

, f. m$ ^) B$ m; U. f" x* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF7F   E8E088FDFF             call    00458864
0047FF84   8BC3                   mov     eax, ebx
4 ~' B9 P( a$ W" R5 }5 [
* Reference to : TFrmRamMain.Delay()
|
0047FF86   E8AD020000             call    00480238
$ ?' g. k  {9 R
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
* `4 q2 F# Q, `- V" c* r2 R% Y|
0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]
, }$ D4 U3 V9 f4 B& x
$ a4 v* h# ~7 B' @7 \" F* m) _* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
7 C; a2 c1 ~. }1 p|
& L% A) `+ p4 |7 X$ v0 B0047FF91   E8CE88FDFF             call    00458864
. d' q9 r6 j) S  x1 s4 H/ P; v$ h0047FF96   8BC3                   mov     eax, ebx

& |: K7 O# U& A/ Z4 A0 b* Reference to : TFrmRamMain.Delay()
|
0047FF98   E89B020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
+ @! U6 J; z. n: [|
0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
3 q, W3 A& ~: S1 A1 B0047FFA3   E8BC88FDFF             call    00458864
- q( m& W" m0 h5 Q' p- \
, W3 q& b7 L7 U' d0 \/ p- i* Possible String Reference t '系统正在收集电脑的电磁波...'
" S5 H. f: D. h) ~) R8 q|
0047FFA8   BAA0014800             mov     edx, $004801A0

. P5 d, f% b: v/ C. C& m9 \* Reference to control TFrmRamMain.Label3 : TLabel
+ P4 f: g. r$ B|
2 t* x$ U0 W3 S0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
|
# d: j1 t4 X: V. G9 |# S0047FFB3   E8A4A6FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
8 g! H, u; @! M4 b- h|
, a5 t6 W7 c: n* a: s) R0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]
$ c2 m) N; y. ]! V( i
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
/ M( P. w9 J) @; _# F$ P|
. u  P9 y6 Q! `, c0047FFBE   E8A188FDFF             call    00458864
+ r% u  p5 F$ x8 T; B5 l0047FFC3   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
|
6 w4 u0 B0 {5 A0047FFC5   E86E020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
" f, u/ e9 T3 C% @2 i2 v  d0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]
1 b) I. a1 F& x1 M6 C
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
# P# _' \. P/ E) w! ~, N% a|
0047FFD0   E88F88FDFF             call    00458864
0047FFD5   8BC3                   mov     eax, ebx

0 e8 k! q, l8 m( E* Reference to : TFrmRamMain.Delay()
5 A7 N2 V; _9 [|
0047FFD7   E85C020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
% E, ^' S2 Q0 c2 K7 N
2 |5 F- C; n7 X' B' e2 }* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
3 K' `& H- Y2 j+ T( G( d0 m( j) l0047FFE2   E87D88FDFF             call    00458864
0047FFE7   8BC3                   mov     eax, ebx
  u! D8 O" G. y+ V
) m1 I, J  `$ m+ _. _* Reference to : TFrmRamMain.Delay()
|
4 [7 Y2 m- R- `' k6 m0 X8 Z% q0047FFE9   E84A020000             call    00480238
5 B3 N4 e9 H- G6 X2 P2 l* k
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
& k; `& J9 B. q0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]

6 z5 B; c; b$ t* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
, Z1 b$ w; E, X5 f: n' N$ v% k" E0047FFF4   E86B88FDFF             call    00458864
0047FFF9   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
0047FFFB   E838020000             call    00480238

. r' C- G3 \0 K% T' l8 a* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480000   8B83F8020000           mov     eax, [ebx+$02F8]
# h( u: Y; ~! o
! r# j4 h1 \4 R: K/ w* n* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
  ^1 Y5 m' Z+ q- ^! ]3 A|
00480006   E85988FDFF             call    00458864

4 z+ S7 o2 O+ S* N9 j, g, A* Possible String Reference t '系统正在释放融磁电波...'
& l5 A7 Q, {9 G/ ?. h6 ~|
$ k5 M: Z. m, V2 [1 g( ^0048000B   BAC4014800             mov     edx, $004801C4
! D& p- j- e! W) k( p, n
* Reference to control TFrmRamMain.Label3 : TLabel
|
00480010   8B83F4020000           mov     eax, [ebx+$02F4]
. l: T. B% a6 x$ G9 n& C
. G: u' H& N$ v  g+ k- I* Reference t controls.TControl.SetText(TControl;TCaption);
|
00480016   E841A6FAFF             call    0042A65C

" n: G7 U: s: Q# V, ]* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
1 a& q: l. e6 u: X+ |: o|
  S: W: a+ M8 \5 o% f9 P! Y# m& ~8 r3 Y0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
6 F) Y0 ?$ c, O" [5 N
% e& ?, q. A9 A. R2 S, H* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
, v) t$ {5 y/ T& T: _* @& Q9 K|
00480021   E83E88FDFF             call    00458864
00480026   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
|
1 {5 ]+ W9 A! c" M# K: E) l00480028   E80B020000             call    00480238

5 j" O) V, ^7 X/ t4 e* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
' k% F3 `' }! c+ y5 e3 Z; [* e9 F0048002D   8B83F8020000           mov     eax, [ebx+$02F8]
+ @$ \! h! Q# `3 l* a
, k, C) r. @/ b! b9 a* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
( g. V' N1 R5 N* K) Y  H* R' h7 n+ Q, A|
00480033   E82C88FDFF             call    00458864
00480038   8BC3                   mov     eax, ebx

+ o0 \2 V6 J6 q$ [4 S% }; f/ O7 s: t* Reference to : TFrmRamMain.Delay()
5 G% x3 I, _0 g& X" n|
% a  L% X5 h! X0 w: l+ j4 m0 q0048003A   E8F9010000             call    00480238
  `. u+ X! X8 g$ y. P
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
5 @8 l8 E1 F+ v" Z2 d0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

1 F2 P$ ^) {+ o; R6 Z4 @* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0 z& M0 T- i! q* a+ k& B3 O00480045   E81A88FDFF             call    00458864
* N# y9 s% d! X3 M. Z0048004A   8BC3                   mov     eax, ebx
, h1 k; b  @. Q1 s
( e) M  w' A; u( N- ]3 O) [  \3 I* Reference to : TFrmRamMain.Delay()
|
: L7 l$ g' z/ N6 c. a7 Z0048004C   E8E7010000             call    00480238
9 w0 {4 ^* G- t8 ?) O' E3 L5 M
- @2 Y# O4 h, [* Y& \( {* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480051   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480057   E80888FDFF             call    00458864
& o7 I/ K- L. a, U0048005C   8BC3                   mov     eax, ebx
7 l. r2 e# |* u+ }6 B% y
" Y1 D' q7 B  y" P; r+ `2 X' {, i" t* Reference to : TFrmRamMain.Delay()
: I- P9 P; l' ^- E) H% f|
% g4 P8 U, M4 |  _* j( `$ t, D# [0048005E   E8D5010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
! ]$ d5 k4 w; S- h|
( z5 {; N0 \3 ]0 k$ B00480063   8B83F8020000           mov     eax, [ebx+$02F8]
6 R3 a. d7 L0 |" K& \" e
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
, B+ g5 G  Q/ t3 h( i7 y|
( U3 L8 B* ^6 G2 i; `) o00480069   E8F687FDFF             call    00458864
8 i' Z/ M) \, D/ }  Z8 w  N
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
: j! \- B! J% e+ w- W1 x|
00480074   E8EB87FDFF             call    00458864
) Z1 W3 d, x8 a) r; N9 N  F00480079   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
2 j. P6 K& ]0 G8 T9 |% N% s|
" n- [" H' h9 p: D9 e2 F. u7 c0048007B   E8B8010000             call    00480238
$ s8 ]% `3 y8 j0 b8 T
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
6 \4 d% m; ?$ H' G00480080   8B83F8020000           mov     eax, [ebx+$02F8]

& q- n% r- U, B' N+ b$ B( h! C* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
# ]& L# ]" F7 p  m; k) I7 a|
8 x, \. g# _; Y& f7 b00480086   E8D987FDFF             call    00458864
0048008B   8BC3                   mov     eax, ebx
! {! N" W5 R- ^0 P9 j
* Reference to : TFrmRamMain.Delay()
4 {# b+ M! X* b7 L$ P- {|
0048008D   E8A6010000             call    00480238
" _% s# a  f  O& y
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
+ e) [4 C! J; I  M# ~00480092   8B83F8020000           mov     eax, [ebx+$02F8]
2 l( V0 M  K' N& p
* _7 ^' c& B- J) N7 g, X6 V; @* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
& L5 e/ i$ T1 h! w" V3 i" X! i00480098   E8C787FDFF             call    00458864
) k+ B( t2 [0 [0048009D   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
; c$ S& F0 A1 f4 D/ k|
0048009F   E894010000             call    00480238
4 r' ~2 y# O8 X
3 d) S; m7 n+ a- L5 @# O* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
: M3 i3 e0 j, d1 v3 q- a4 d5 W004800A4   8B83F8020000           mov     eax, [ebx+$02F8]
: k0 k6 j0 Z! u5 Q& P
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
4 ~6 B7 V6 @0 `2 @5 p004800AA   E8B587FDFF             call    00458864
# c$ D% Y3 E" j4 M) e) u( a' P004800AF   8BC3                   mov     eax, ebx
" ~2 k3 T% S% S' j! j4 l  D
9 r7 y. {- j- e) L3 f$ W* Reference to : TFrmRamMain.Delay()
|
2 ~. c( }1 R, W( M) K004800B1   E882010000             call    00480238
3 t8 V8 V: b" }" M/ m
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
; s; j6 f& L, o  n$ R|
) y5 ?  t  q& ~/ K+ w  E0 M004800B6   8B83F8020000           mov     eax, [ebx+$02F8]

- h; Z- E' L& u" ~/ G$ O* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 `. T, W- z& h  y/ A0 l|
/ q# f# W! H( ?6 [7 K004800BC   E8A387FDFF             call    00458864
0 k9 k1 g) c: T" U  ~- _
/ v; a. c. w1 c$ L% C# s" M* Possible String Reference t '系统正在做最后的消磁工作...'
|
+ D4 C! O8 \+ [1 C6 P) R1 D004800C1   BAE4014800             mov     edx, $004801E4
9 g5 c/ @% _6 X) M+ W
* s8 D' y, U' y; g3 p* Reference to control TFrmRamMain.Label3 : TLabel
1 |6 {' F8 T7 p. u" x|
9 o# y( \/ t- m2 @( h! Q, b% F004800C6   8B83F4020000           mov     eax, [ebx+$02F4]

. Q: d, x4 @4 h7 B% M( v  |4 p* Reference t controls.TControl.SetText(TControl;TCaption);
, I  ^0 H4 Q) u$ h4 p1 o4 I|
004800CC   E88BA5FAFF             call    0042A65C
, ]- s4 R2 P4 s1 I7 L3 H/ B0 v
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
004800D1   8B83F8020000           mov     eax, [ebx+$02F8]
1 \5 Z# b, A5 O% h- o  `, @
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800D7   E88887FDFF             call    00458864
# f  v, {9 O$ N3 u4 O! D$ |004800DC   8BC3                   mov     eax, ebx
" N  b" q) l9 a" h3 }7 g& ]
+ o% y- Y3 k$ g* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
2 X) L* L7 B" r1 K|
004800DE   E855010000             call    00480238
, F! E5 Q& `6 \4 u$ [9 E' J3 t
; c, D; @# M7 H* Y5 ~* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
% B4 |0 _& v) `' m- G6 j8 d5 ?004800E3   8B83F8020000           mov     eax, [ebx+$02F8]

! H7 K3 S0 T* d* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
  N4 G  ~+ ]  ^5 o& j. z# W! @004800E9   E87687FDFF             call    00458864
9 V2 q; }6 h5 X+ w* T004800EE   8BC3                   mov     eax, ebx
# d  K+ l1 j3 B0 ], I4 r
9 |# \* N7 m! c3 Z; y+ _9 D* Reference to : TFrmRamMain.Delay()
0 r9 k" H7 \: E: P6 l# W! V# V|
+ v) ]  Q! v7 |! _2 \004800F0   E843010000             call    00480238
: c( H- g, n4 s. v* ]& g$ D
& n$ j0 w! W7 T* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
6 F% q9 r2 c) F( y|
6 B3 P) s! V5 q% Z! z% s004800F5   8B83F8020000           mov     eax, [ebx+$02F8]
) _- X6 |- g3 G" _0 G$ H
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
( }! o; f  H5 f: O! X004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx
6 H9 X2 k  ~! s7 D
* Reference to : TFrmRamMain.Delay()
/ d# V; {* o; R0 k8 T|
00480102   E831010000             call    00480238
, K( N! q- F8 p* [3 y5 K
. I9 F" x+ @. u( z& h( {/ _* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480107   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
% I; Z: S" B' r- o( S|
. I/ Q) J2 z) X# j) m3 W0048010D   E85287FDFF             call    00458864
00480112   8BC3                   mov     eax, ebx
5 z$ {: K% z% p7 w" X9 O
* Reference to : TFrmRamMain.Delay()
|
00480114   E81F010000             call    00480238
5 \  M7 x& D2 R. `/ d
: X. H; g9 J, [1 P6 v- g0 `8 }* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
! x! R8 _) S& B|
' x6 p1 s9 G+ J4 P; x! g; B8 X2 u) X00480119   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0048011F   E84087FDFF             call    00458864
  O3 x4 U" [. o$ m/ n. V* W3 {7 @; n" U  j00480124   B8E8030000             mov     eax, $000003E8
) O4 E. v( Z  f1 N. r( P4 o
* Reference t system.@RandInt;
1 Z5 }: r+ E3 d' y( H|
00480129   E86629F8FF             call    00402A94
0048012E   85C0                   test    eax, eax
, Q: k; s/ D& ^00480130   6A40                   push    $40
" c( Z' x2 i  T# |( R& e
( c. i- B& B0 {, {) |* Possible String Reference t '电脑消磁圣手'
|
- q9 @1 g) M+ X2 O. V+ Q, j00480132   B900024800             mov     ecx, $00480200
$ H6 G0 A4 j3 t  q& q- s% P
* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
+ m# e. p" }6 `3 b5 y, X; ]|                                ?
  l5 L8 ?- G5 Q$ x2 ]|
7 w5 z: o3 n. k/ Y$ D* {5 }00480137   BA10024800             mov     edx, $00480210

1 u2 X1 l6 ^2 m6 s* Reference to TApplication instance
3 n& V( X7 P% w; J' C3 D|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
0 N- F' `5 p7 H( ^. ?' w. s00480141   8B00                   mov     eax, [eax]
6 n$ a/ o0 f" g& K% ^6 A- c2 B
& t8 [/ b$ o% u. @3 [* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
|
00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
00480148   33D2                   xor     edx, edx
4 r( b* R% U& h9 ]) d* O4 ~& A
  C' i7 E5 |5 w  j# J* Reference to control TFrmRamMain.Panel1 : TPanel
, W$ ?+ B7 Y& V+ {% I0 V: M|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]

0 z( p' n& Z  [* Q% v4 r) t7 v* Reference t controls.TControl.SetVisible(TControl;Boolean);
; ^" v2 E. Z; k0 c|
00480150   E8EFA3FAFF             call    0042A544
00480155   B201                   mov     dl, $01

( Y% c" X" ]" d4 j8 O7 x! A* Reference to control TFrmRamMain.Panel2 : TPanel
|
2 e1 c, R5 E. I6 B: E  d00480157   8B83FC020000           mov     eax, [ebx+$02FC]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
) I( }5 j: B: y& \! J0048015D   E8E2A3FAFF             call    0042A544
0 p9 S/ \  \6 ~6 F- f6 d$ o
% _+ d6 S3 _8 ]/ R4 }8 `* Reference to TFrmAbout instance
|
00480162   A148264800             mov     eax, dword ptr [$00482648]
7 r$ Q4 w/ v# ]) D00480167   8B00                   mov     eax, [eax]
. v. Y( J; V8 ?. f. I0 z0 n00480169   8B10                   mov     edx, [eax]
; P' y8 O$ R) H0 x
* Reference to method TFrmAbout.ShowModal()
4 h/ G6 i* X7 r/ B" t! ?|
! O! Z0 x  I8 e5 J; k/ v0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
00480171   5B                     pop     ebx
00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： ) Q6 D$ [6 ~/ {' [ B% y 004802F8 55 push ebp ' _* G* G5 g$ T, @- P! n004802F9 8BEC mov ebp, esp . l: G! K& Z- T+ Z* B) |004802FB 33C9 xor ecx, ecx 5 |+ R2 R: q% x9 U4 A9 j+ j6 a004802FD 51 push ecx , a# `# _; [/ _# x004802FE 51 push ecx : w0 F& }! }; P: z7 U4 T) x9 y004802FF 51 push ecx * c2 I/ ?9 T% ]9 L/ K+ J9 H2 z% [00480300 51 push ecx 00480301 51 push ecx ( @# B9 k* G# C2 T00480302 51 push ecx 00480303 51 push ecx 00480304 33C0 xor eax, eax ; A& r$ G0 {% l* l. X8 F3 q00480306 55 push ebp ) j6 m, f6 [" A" k$ z/ d/ Y+ g5 q ' K3 z1 }$ M) H* Possible String Reference t '檫0?脬嬪]? ; p5 b7 S' Z; @; u| $ t: Q+ N& H* V% x7 l4 ]0 {7 C00480307 6808044800 push $00480408 3 W' q9 ?) ]8 w! i. ?+ k# U3 P % s+ y4 |" v* T3 }$ S4 z( n***** TRY 8 p$ G2 F7 l! J2 p r1 C| + k$ Q9 U: ~! a$ [9 ^8 H3 j' |3 q! O0048030C 64FF30 push dword ptr fs:[eax] 0048030F 648920 mov fs:[eax], esp 00480312 8D55F0 lea edx, [ebp-$10] $ ^5 x. _9 M0 R) }3 K : d d$ p/ J u5 B2 p Y* Reference to TApplication instance | 00480315 A148284800 mov eax, dword ptr [$00482848] 0048031A 8B00 mov eax, [eax] ) K, J! x, s W" u * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 0048031C E82F97FCFF call 00449A50 ;Who am I? 00480321 8B45F0 mov eax, [ebp-$10] ( k$ a( h/ T, R) C2 c# s00480324 8D55F4 lea edx, [ebp-$0C] 9 y& ^, b& u( s1 Z, N* Reference t Unit_00406FD0.Proc_00408110 - \. C$ b# V6 }| % z- E2 A! i o5 T- j00480327 E8E47DF8FF call 00408110 % b7 ]1 l7 L7 D/ M) w" o5 _. C7 C% Y* ^6 `0048032C 8B45F4 mov eax, [ebp-$0C] 0048032F 50 push eax d, \$ }. g$ y% f' O; A5 _00480330 8D55E8 lea edx, [ebp-$18] * Reference to TApplication instance | 6 X( \! E5 D _* _5 G: U; a3 {1 L" T00480333 A148284800 mov eax, dword ptr [$00482848] , e- F/ W4 O7 P) d4 s+ p( J. e* ]00480338 8B00 mov eax, [eax] * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; 2 k. u ~. p* U| 0048033A E81197FCFF call 00449A50 ) g9 e0 p* C' b b0048033F 8B45E8 mov eax, [ebp-$18] ; R& _9 Z+ j, Z00480342 8D55EC lea edx, [ebp-$14] 5 P. h& w! t( @( P4 C * Reference t Unit_00406FD0.Proc_004080DC {1 k$ e7 `& j& M) J2 p8 n| 00480345 E8927DF8FF call 004080DC 0048034A 8B55EC mov edx, [ebp-$14] 0048034D 8D45FC lea eax, [ebp-$04] 00480350 59 pop ecx * Reference t system.@LStrCat3; ) w- R. f8 m; i4 T| - g Y& E7 \4 h# Y2 N5 I00480351 E8CA39F8FF call 00403D20 00480356 B201 mov dl, $01 * b* I" _0 N2 O+ W* Reference to class TRegistry | 00480358 A174F14700 mov eax, dword ptr [$0047F174] 6 X/ X, D1 b$ a& o% c - A: o H3 @$ b, Q {+ s# Z3 q7 E* Reference t Unit_0047F114.Proc_0047F274 4 I& Z8 M+ T( x' ^ n: l| 3 Y1 F/ Y u6 r$ K0048035D E812EFFFFF call 0047F274 * E( k! \& E% G7 j! u+ p$ H00480362 8945F8 mov [ebp-$08], eax 00480365 33C0 xor eax, eax ' A: `. Z+ @, Y8 I0 O! C00480367 55 push ebp K, W% l+ [& h6 a3 i% Z: g00480368 68DE034800 push $004803DE % ^1 z; |9 H( w4 O***** TRY 7 {6 f) o ?7 i8 t7 }5 S+ s! ^| 2 W! o$ W+ S/ V: j1 k$ D0048036D 64FF30 push dword ptr fs:[eax] 00480370 648920 mov fs:[eax], esp 00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F314 | 0048037B E894EFFFFF call 0047F314 ! v- C, Z4 p6 m6 d6 U, a00480380 B101 mov cl, $01 1 I0 v C+ w! C5 [0 | 1 t2 D; T- f- m/ G# N2 L* Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） 7 F9 I- O) V" z8 e' `/ ` E| Version\Run' | 00480382 BA1C044800 mov edx, $0048041C 00480387 8B45F8 mov eax, [ebp-$08] B! F: d& O \/ X' D/ K1 } * Reference t Unit_0047F114.Proc_0047F378 | % T2 s- k7 w# V8 J% P( |. F3 ^0048038A E8E9EFFFFF call 0047F378 0048038F 84C0 test al, al 2 Z2 V8 P$ K4 |/ j% X2 z7 h# m00480391 7435 jz 004803C8 00480393 8D4DE4 lea ecx, [ebp-$1C] , k( w: Z8 b* K$ g! | % V+ q. H6 \' h- O. C* Possible String Reference t 'JrRClean' | , p& e+ E: B; Q0 j' S2 A. H00480396 BA54044800 mov edx, $00480454 0048039B 8B45F8 mov eax, [ebp-$08] # l7 L8 `$ c& N a, D* Reference t Unit_0047F114.Proc_0047F540 4 f3 l! G/ a- t# V0 V) d* y| " H& {( \* A3 c0048039E E89DF1FFFF call 0047F540 004803A3 8B45E4 mov eax, [ebp-$1C] 004803A6 8B55FC mov edx, [ebp-$04] * Reference t system.@LStrCmp; # @% l% A! P( w( ]- x9 D- w| 8 M" z, J3 i. N) {5 J/ v/ C; s004803A9 E8363AF8FF call 00403DE4 8 r. M1 t' F, H6 ?004803AE 7410 jz 004803C0 004803B0 8B4DFC mov ecx, [ebp-$04] * Possible String Reference t 'JrRClean' | 004803B3 BA54044800 mov edx, $00480454 % A5 d) y1 O( ~4 `; K5 K004803B8 8B45F8 mov eax, [ebp-$08] # w' Y) ^4 `0 a5 V! v4 y$ z * Reference t Unit_0047F114.Proc_0047F514 0 ?* a( F5 I/ T0 l5 T0 [| x" @! D5 R/ l* c- p004803BB E854F1FFFF call 0047F514 `+ N; }' o* i+ a" Z4 B004803C0 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F2E4 | 4 ]. A! H* K5 E004803C3 E81CEFFFFF call 0047F2E4 004803C8 33C0 xor eax, eax Y: x( g$ ~# _0 X004803CA 5A pop edx 004803CB 59 pop ecx ) R& R. f2 M0 S, h' o004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx 4 G7 l# |) L- o& L3 L) B****** FINALLY ( l6 q8 L2 r# z9 P5 F| 0 o( k4 E: x) N004803D0 68E5034800 push $004803E5 / g3 I+ G" l$ |$ a% F+ S004803D5 8B45F8 mov eax, [ebp-$08] ) H2 |+ a; S' v, t; \% Q) D * Reference t system.TObject.Free(TObject); | ' }; a3 a% u8 ]! L: M z004803D8 E8EF29F8FF call 00402DCC 1 y+ a& h; v8 o004803DD C3 ret 3 m; d2 c7 C2 K! K ! k& D7 X* l. ^8 S * Reference t system.@HandleFinally; | 004803DE E90931F8FF jmp 004034EC " q: m7 Q7 I& w7 u: b004803E3 EBF0 jmp 004803D5 ****** END | 3 Q" C9 h2 Y2 f% ` t) ~004803E5 33C0 xor eax, eax ) b' o) m3 z+ Z7 _: e004803E7 5A pop edx $ X5 I% i3 ]0 ]4 t' F004803E8 59 pop ecx 004803E9 59 pop ecx # {- A6 l/ M7 n* W0 u004803EA 648910 mov fs:[eax], edx ****** FINALLY 0 Z5 S7 ` p2 r" H3 a$ \7 ?| * Possible String Reference t '嬪]? | $ S+ k; Z# W( U004803ED 680F044800 push $0048040F ' C* _* H2 b4 Z( p8 `% n004803F2 8D45E4 lea eax, [ebp-$1C] % v" h+ L: e# R1 A004803F5 BA05000000 mov edx, $00000005 * Reference t system.@LStrArrayClr; | 1 C' ?% c, ~& |" @6 }8 P# U; T004803FA E87936F8FF call 00403A78 004803FF 8D45FC lea eax, [ebp-$04] * Reference t system.@LStrClr(String;String); : ]/ k. s1 R; @+ T* h g. L| 00480402 E84D36F8FF call 00403A54 & |% n, p9 n% n' Y00480407 C3 ret , B& l, Q, z8 Z2 a. j( M& d2 \3 r % Y# Q1 `6 f6 T* Reference t system.@HandleFinally; " s" P6 w- D5 Q: l| . |$ M5 q! n U3 ]; l% f+ q# N00480408 E9DF30F8FF jmp 004034EC 0048040D EBE3 jmp 004803F2 ****** END " l( J% t' o2 q, m3 x| 0048040F 8BE5 mov esp, ebp 00480411 5D pop ebp 8 A/ z6 E3 I* D+ t! v00480412 C3 ret 上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） 7 u- e _8 a& D . l }4 k5 h+ R; T# w. K! n只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 结语： 上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 - `0 L9 J, h; `- n, _. m/ b, Y% D2 t也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 权当一笑吧，呵呵~~~~~~~~~~~~ ; y$ `8 j6 g" x8 j$ v + X( ~4 Q9 I7 T8 e/ x, }) } 7 S% g* T$ w& {& `monkeycz于2004年平安夜 2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

以下是引用hater315在2004-12-25 15:45:00的发言： / C1 ]/ ]* b5 i6 s. h3 ?6 L7 Z看的快睡着了.

- _4 u* T2 g9 B5 v) p- o7 m* v( t$ D 9 W3 Z. A d5 Q. Y7 A 睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

以下是引用游侠无极限在2004-12-26 22:03:00的发言： 8 ]7 o/ e. Y9 I; ZDelphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

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

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

' ~- d2 |5 I$ H& q2 H

同感