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

游侠无极限

“电脑消磁圣手”的消磁“秘术”
! e. ~  ?# X6 s' z5 m
前言：
平安夜的晚上，在网上随处溜达，偶尔看到一款名叫《电脑消磁圣手》的软件，是某公司开发的（具体是什么公司大家自己去看吧，我就不说出来了，免得麻烦）。据软件中的说明“本系统一直在国外市场上销售，效果很好，最近把系统翻译成中文版，免费提供给国内的朋友使用。”，至于软件的作用，又有如下的说明：“本系统非常适合在电脑前长时间工作的人，能够高效的清除电脑产生的电磁波，对工作者的身体起到了保健的工作。本系统根据电脑产生的电磁波，自动产生融磁波，中和电脑产生的磁波。由于电脑在不停的释放电磁波，建议您每隔一个小时进行一次消磁工作。”听起来十分诱人，于是就down了下来把玩一番。最新版本好像是6。3版（升级了好多次了吧）。
! U2 x; |+ B+ ]; ]; }3 S3 O
试用：
- H  [  q- T  G+ p9 _3 p下载下来的是一个压缩包，解开后只有一个可执行文件。运行一下，首先弹出了浏览器窗口，连向了一个网站（可能是软件公司的网站吧），随手关掉。软件的主界面倒是很简捷，最主要的就是“开始消磁”按钮。点击一下，出现了一个进度条在不断的前进，同时还有提示文本出现，就是这些“系统正在做消磁前的准备...”、“系统正在收集电脑的电磁波...”、“系统正在释放融磁电波...”、“系统正在释放融磁电波...”、“系统正在做最后的消磁工作...”。经过这样一番神秘的仪式之后，弹出一个对话框提示“融磁成功，已经成功中和电脑周围磁场?”刹那之间，我对作者的佩服如同滔滔江水连绵不绝，这可是项巨牛x的技术，只靠软件就可以进行消磁了，而且还是电脑周围的电磁波，不知道作者是否申请了专利。怀着最作者的无比崇敬和那份极度的神秘感，我飞快的的把软件给肢解了：）
. O+ _9 n1 I8 a; G
分析：
" K3 a/ q" X. l1 b- U" w检测一下，是用Delphi写的，没有加壳。用DeDe载入后，反编译“开始消磁”按钮点击事件对应的代码，复制如下：
  b  v% b! V( y
0047FF28   53                     push    ebx
0047FF29   8BD8                   mov     ebx, eax
+ V9 x% a$ E/ z$ j9 g) y0047FF2B   33D2                   xor     edx, edx
+ K* i9 p" w; w# N# q& u
* Reference to control TFrmRamMain.Panel2 : TPanel
|
0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]
; m6 q  q4 b. r% L" e# s
  E" n" M) s9 I" I/ I* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
1 B* y. \/ D5 Y0 X; o( y0047FF33   E80CA6FAFF             call    0042A544
0047FF38   B201                   mov     dl, $01
7 f% k/ A' A7 u9 M) J  R, J* q
& O, e% m& |* A3 @- N4 H$ Z* Reference to control TFrmRamMain.Panel1 : TPanel
|
& \6 [6 j1 T+ O/ b' V1 x0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]
4 i) M" f: i! S9 r: M# B  S
* Reference t controls.TControl.SetVisible(TControl;Boolean);
0 I  _5 o. Y1 x' u1 ], P/ [0 K1 \  ^|
2 @" }, C4 f3 V: G9 s6 x, P0047FF40   E8FFA5FAFF             call    0042A544
" |7 o1 C& z# S( Y0 m$ @' n
9 m; E- T( r) `! W7 {: b* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
3 @1 t; S" @( \) d2 n$ b|
$ n& y3 _" z$ W- S0047FF45   BA7C014800             mov     edx, $0048017C
3 ~9 t# g! e4 B5 X7 ?) }
* Reference to control TFrmRamMain.Label3 : TLabel
|
) \; a7 W& p1 M0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]

" W! j5 @1 q2 ]( W* Reference t controls.TControl.SetText(TControl;TCaption);
! W* I8 n6 o% J|
0047FF50   E807A7FAFF             call    0042A65C
0 u$ d5 b3 B- C1 D, L: h
0 C) [4 S0 u0 k* I* m* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
8 y; {) v& Y, R: @" p6 _2 l# V/ M) e|
0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]

' U4 U3 [  s9 v* V7 V. m  p* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
. n" x6 P: k/ ^& `/ K0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx

- r* Q  ~' ]9 ?, f* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
|
0047FF62   E8D1020000             call    00480238

% P! w/ g* I& b# F* |% U5 u* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
- h5 F, u7 a6 W$ s+ H|
- p2 A4 Z7 k! Y1 e6 I7 y0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
- I( {( Z) ]' P) K4 c& x9 a0047FF6D   E8F288FDFF             call    00458864
0047FF72   8BC3                   mov     eax, ebx
! {* @. w5 _2 z; h! f
+ W" X+ K" L8 g( G( ?; L" n# `% J* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
|
0047FF74   E8BF020000             call    00480238

- A4 a- d! y: Z  D& e/ \* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
% E2 C2 n3 k. f- ~' V4 y0 ?1 ?|
0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]

! s, P; Z" p3 j* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
" ?- p4 F7 {; ~9 c; z|
0047FF7F   E8E088FDFF             call    00458864
; T( S8 N% h3 q! o4 X0047FF84   8BC3                   mov     eax, ebx
+ \+ Q7 H2 E: j6 ^% M
7 W/ I/ r! t  @% @+ Q: U/ x* Reference to : TFrmRamMain.Delay()
3 t, X/ ^' b; k% j1 ~- q|
0047FF86   E8AD020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
+ ?* E$ J6 v3 m6 ]' _0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]

% ?$ `$ t9 e  ?* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
6 V0 h) b! u2 D% g: ]8 \2 v|
0047FF91   E8CE88FDFF             call    00458864
0047FF96   8BC3                   mov     eax, ebx
! f1 U0 }0 L; [% |2 H
* Reference to : TFrmRamMain.Delay()
% P0 C/ E6 H4 f5 S|
0047FF98   E89B020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]
1 e# z  h0 `$ B* J2 I
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
2 R1 O8 D$ `$ R( g6 b|
% v; d9 F  ]6 A0047FFA3   E8BC88FDFF             call    00458864

! J: ^7 U% O/ C; A3 w* Possible String Reference t '系统正在收集电脑的电磁波...'
( l6 B) v! U* D& u5 Q|
& G; ?* y" W, \9 T7 K4 _+ b% S( ^0047FFA8   BAA0014800             mov     edx, $004801A0

* Reference to control TFrmRamMain.Label3 : TLabel
. Q1 E7 Q9 `2 v9 e& N/ W! z|
0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
+ n, v$ [9 a% K8 A6 O|
0047FFB3   E8A4A6FAFF             call    0042A65C
( F4 o2 `# p8 O; T% J
% ]* f& h- L! H* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
" J0 U; y0 b+ s|
: v& O8 T; t( \* d/ h5 X& K) Z0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FFBE   E8A188FDFF             call    00458864
0047FFC3   8BC3                   mov     eax, ebx
! T& f" c" L7 z: T( u
2 h4 k! h6 m. |/ W9 l" y/ l* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
|
0047FFC5   E86E020000             call    00480238
, t' R6 m# D9 G) e1 ~! b
- |  V4 y, ^2 [$ F7 w/ L. m6 l. d* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
% s* @9 e/ Y" n% M3 b|
0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]

# M6 P! P, |9 L& t7 B: L7 u; z* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
% V, `, c0 V* D% P) E, U! I4 u  O|
0047FFD0   E88F88FDFF             call    00458864
) k" f; @, g! A% x3 Y; R3 g3 z0047FFD5   8BC3                   mov     eax, ebx

7 x1 v% q2 a; j5 [( W* Reference to : TFrmRamMain.Delay()
|
# u, X. A6 i1 M# ]2 `+ q% w0047FFD7   E85C020000             call    00480238
/ B$ O6 Y- q& x4 q
% e! d% L; D0 H+ h* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
8 B! t; f7 D! k" n+ B* w$ T1 I( U) ^; t( r
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FFE2   E87D88FDFF             call    00458864
0047FFE7   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
- `% ]3 E6 F. r( d& t0047FFE9   E84A020000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
3 B) S8 ]! j% W: P|
0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]
9 d' r) P; Y+ d2 u; K& p+ E" k8 m. N
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
$ A" `3 G; ?9 J' m9 U3 \|
- [) m: c- }- J$ X0 q+ y6 ~0047FFF4   E86B88FDFF             call    00458864
0 |3 r. l! N) s2 q0 }0047FFF9   8BC3                   mov     eax, ebx

8 B' \  g% z. X0 o$ J' [  t* Reference to : TFrmRamMain.Delay()
$ U) I9 y* }- E' p|
5 W1 y0 G! i- z. g. T7 C5 v* u0047FFFB   E838020000             call    00480238

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

% P- \# q6 X1 b* v* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
3 [: J3 E$ b: D( Y  a1 [* q( q|
9 |  A$ J, U7 F9 p1 D9 d00480006   E85988FDFF             call    00458864
- q/ H6 P- r% U( E6 F. M
+ ?' _& L- \2 s" f* Possible String Reference t '系统正在释放融磁电波...'
$ C0 Z) ]7 X0 a& L. r! f) N1 X|
7 i3 p: p6 M( S% p0048000B   BAC4014800             mov     edx, $004801C4
! g! @* B5 E- J
* Reference to control TFrmRamMain.Label3 : TLabel
; V& x- |5 @# H0 ?) H|
* Y4 \' h! c6 W3 }' X, c8 N00480010   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
" ?" ^0 N, Y! Q3 b6 M1 S& l* {|
8 G( G0 h, e* V9 ~, X00480016   E841A6FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
  X( F! p1 Q- K0048001B   8B83F8020000           mov     eax, [ebx+$02F8]
  d# Q! A0 i' i
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
3 [' w2 n- x: \' g|
" c3 h/ s; y- L% `5 A00480021   E83E88FDFF             call    00458864
00480026   8BC3                   mov     eax, ebx

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

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
4 b, \9 n9 N6 r6 \' P9 {0048002D   8B83F8020000           mov     eax, [ebx+$02F8]
7 N* J/ b# g9 v
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
7 k" f: ^/ L) O: b|
4 U! y+ w7 K0 E$ H0 S7 F00480033   E82C88FDFF             call    00458864
00480038   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
0048003A   E8F9010000             call    00480238
' ~4 q/ X; r+ a" s# p5 Q. q
/ x* \$ n+ U0 c& M$ f6 x* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
- e, x: V# e% L+ g6 b8 s  A& `7 f- _|
* t4 l3 Z/ N0 J2 P3 ?; ?0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480045   E81A88FDFF             call    00458864
0048004A   8BC3                   mov     eax, ebx

- e( J7 n' Y8 N  Y2 z( c* Reference to : TFrmRamMain.Delay()
|
7 N( ]' V- K# l0048004C   E8E7010000             call    00480238

% l) l" V4 g4 U* S! {% Q1 C; W* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
; G9 S. P  e) e, M( f* [- F  V1 R00480051   8B83F8020000           mov     eax, [ebx+$02F8]

  i$ j- \9 o9 O( F5 ^* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
' Q& e$ Q# L7 s) y) ]|
00480057   E80888FDFF             call    00458864
! a" k1 r8 `8 J! O$ T) e0048005C   8BC3                   mov     eax, ebx

) U; g4 e, O9 l; O! l* C* Reference to : TFrmRamMain.Delay()
|
0048005E   E8D5010000             call    00480238

" {+ e# Y3 t* X3 F3 O4 U* x$ |* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
' ?, U. G- S: y6 Y% I00480063   8B83F8020000           mov     eax, [ebx+$02F8]
- |7 a1 K- _+ H; n1 E0 m
% d) _- D# z9 l. h* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480069   E8F687FDFF             call    00458864

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
5 i/ m* m9 }5 c% U# ]) o|
0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

  t: |  [$ Z1 I2 X8 e3 H: m* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
" u% ~; e' Y! v: t|
00480074   E8EB87FDFF             call    00458864
6 C* d, \% k1 a( G1 v00480079   8BC3                   mov     eax, ebx

' M, {  J( E3 T+ t9 `& f* Reference to : TFrmRamMain.Delay()
# O7 @& k0 y0 J& ?8 k. m6 g3 z|
0 Z* ^5 w9 |6 d" w3 Z, N0048007B   E8B8010000             call    00480238
) O) }, {( b/ ~& [, |
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
- }% n3 V* G4 E( ?% z* Z3 K" R0 {|
6 g& z. A5 O9 Y7 _0 ~+ v5 g00480080   8B83F8020000           mov     eax, [ebx+$02F8]
' y6 \9 H8 e/ l2 L8 |0 n, A
1 c! V1 O9 J( `  I, x* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
# i: U$ ~* ]3 R/ ~5 a+ `- y00480086   E8D987FDFF             call    00458864
# N* }  m. d* @! a" M0048008B   8BC3                   mov     eax, ebx
5 R! d% J* \5 p6 e7 F6 e
/ x7 u. k, d3 c, Y0 X* Reference to : TFrmRamMain.Delay()
|
$ E1 x  V' \* _3 a0048008D   E8A6010000             call    00480238

& N9 }; l; F  X* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
" @" }" H# d# Y0 V. ~4 W|
00480092   8B83F8020000           mov     eax, [ebx+$02F8]
- A& X5 H. Y! G+ Z5 J; P- U
2 o1 {3 t6 s, i2 C) ]4 ]- i* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
1 _. C+ E( `- I1 W4 a1 ?00480098   E8C787FDFF             call    00458864
0048009D   8BC3                   mov     eax, ebx

' ~. x4 C# }) F* Reference to : TFrmRamMain.Delay()
|
0048009F   E894010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
8 S& b# Y9 }# v, r- B3 o/ A1 C004800A4   8B83F8020000           mov     eax, [ebx+$02F8]
# m. z# c* t4 P
" I0 C4 I* B; ^' t# A6 V8 O% U" r* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
3 x7 |' r# n- ^6 v+ o) `|
/ l  K5 j$ h0 c  J" T, j004800AA   E8B587FDFF             call    00458864
% O) z' w( X0 P; f9 s" e004800AF   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
  E, D8 ^  \6 s+ t; P& f' V  M0 I|
004800B1   E882010000             call    00480238

4 ^5 k$ R9 H/ ]9 F, F* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
8 S- L4 C, Z& g7 B" ~004800B6   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
004800BC   E8A387FDFF             call    00458864
" l- J8 g# f, ?( A9 z% T' N* P
* Possible String Reference t '系统正在做最后的消磁工作...'
|
004800C1   BAE4014800             mov     edx, $004801E4
9 h  n1 m$ S7 Y
* Reference to control TFrmRamMain.Label3 : TLabel
- j, i/ o7 M0 e6 E* b5 G|
004800C6   8B83F4020000           mov     eax, [ebx+$02F4]
4 q7 `0 o9 E1 G6 k
* Reference t controls.TControl.SetText(TControl;TCaption);
; J7 ]# P$ O+ `4 r8 }4 U|
2 s$ \9 f6 t- O6 y# c004800CC   E88BA5FAFF             call    0042A65C
( [' C' c* N1 r/ A: q) n
* U8 O0 f4 d. w/ }" m/ B* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
, S+ K. Y. W9 c+ Y- V3 B|
/ a# W$ }5 e. C+ S; Z004800D1   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 M0 A9 U0 a0 R8 D$ }/ d; D|
004800D7   E88887FDFF             call    00458864
/ G) i! |& X* x" P) ~, c004800DC   8BC3                   mov     eax, ebx

4 r2 M, \: v$ G$ J# n! v/ h* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
|
004800DE   E855010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
1 {, ]& `6 ?- B, e# N|
004800E3   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
/ w, ~! a: b: n004800E9   E87687FDFF             call    00458864
004800EE   8BC3                   mov     eax, ebx
, b7 B* \/ a& p# I( ?
: l" p8 X$ e- G/ S. q% n6 L+ C* Reference to : TFrmRamMain.Delay()
|
- ]5 R, g# F+ Z004800F0   E843010000             call    00480238
* k/ K8 h( c- \0 {
# }; i$ m8 U' Q+ P, T& u+ D* r  |; i% o* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
5 C6 {: R( l1 w7 M  d" A7 d004800F5   8B83F8020000           mov     eax, [ebx+$02F8]

' v2 Y3 t% v! p' s* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
  L$ Y& F" y) F|
) p0 A. ]. D1 A1 b" r0 h/ I004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx
( I$ n& k9 |& D- T) |1 e( I
* Reference to : TFrmRamMain.Delay()
|
00480102   E831010000             call    00480238
: k8 [. s& R5 W* M
( }" d9 u' ]% B  O* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480107   8B83F8020000           mov     eax, [ebx+$02F8]

+ I/ X5 r" H9 t* ?9 C7 `- d* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
& R2 Z2 m# {) T2 Y|
0048010D   E85287FDFF             call    00458864
, R0 N" A- X1 Y( Y: A00480112   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
00480114   E81F010000             call    00480238
0 w4 r2 Z# q1 H% j$ q4 t0 _
/ b1 n# {4 E5 z0 {: k! a! U* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480119   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
2 ^4 F2 v( p7 T7 _! V|
0048011F   E84087FDFF             call    00458864
00480124   B8E8030000             mov     eax, $000003E8
; b( U- f- X8 t* O9 L. c& t2 g
% \2 X+ |; y7 i) W  t5 K* Reference t system.@RandInt;
|
00480129   E86629F8FF             call    00402A94
0048012E   85C0                   test    eax, eax
) C/ H  `9 {* u  L1 {6 [00480130   6A40                   push    $40
. w2 F1 H! v" Q  A# Y+ e3 u  v8 C% F
7 u" \' @* n5 _7 @3 ]) x/ j9 I/ x1 V* Possible String Reference t '电脑消磁圣手'
. ]/ D  Q8 A& ]6 a|
8 C# S# a7 _9 p: F- G# E: a00480132   B900024800             mov     ecx, $00480200
' V% Y# M0 x3 P1 ]8 F7 I& p* S7 N
* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
|                                ?
|
* o$ b* O0 H1 c; g00480137   BA10024800             mov     edx, $00480210
2 f  ^; g( y" a$ p, |3 T
& s' W+ _9 R) u7 E- T6 o* Reference to TApplication instance
: W, B  [, [! w' e: d|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
. u( U; H1 t. [9 [# Y) u7 u) r$ w00480141   8B00                   mov     eax, [eax]
! F& G7 S) H0 N) }1 |; \
8 ]1 \  W& H4 P- t7 i  {! N* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
|
00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
4 E- d  q+ n8 M00480148   33D2                   xor     edx, edx
) Q7 g' X- b# x' Y- I) q) {
* Reference to control TFrmRamMain.Panel1 : TPanel
& ^$ z" o0 r' ^; S% k0 w|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]
- O/ P& s8 C: w! R2 h! X
1 b5 s6 C1 h  g; ], z* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
3 z" s. W5 l: p! b00480150   E8EFA3FAFF             call    0042A544
00480155   B201                   mov     dl, $01
7 |+ n) W1 d$ q8 [  u3 Y
# ^" H  a: m' V# m+ \2 C* Reference to control TFrmRamMain.Panel2 : TPanel
7 i! S0 m* a& p' A% S0 C|
00480157   8B83FC020000           mov     eax, [ebx+$02FC]

& f, d/ O6 b! B/ a$ h5 j* D* Reference t controls.TControl.SetVisible(TControl;Boolean);
" |3 P. ?' `0 O|
0048015D   E8E2A3FAFF             call    0042A544

6 V) q$ `1 n3 h8 c: o* Reference to TFrmAbout instance
|
00480162   A148264800             mov     eax, dword ptr [$00482648]
- d# p/ V0 H. Y' l: p% X00480167   8B00                   mov     eax, [eax]
% f9 v; y, d0 @; |( ]) F00480169   8B10                   mov     edx, [eax]

; p8 k. l9 S- e1 u) k1 |( s  w* Reference to method TFrmAbout.ShowModal()
# {- ]0 N) c  ^' r; P|
( k- @+ G! @6 R  t0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
5 E8 u) i( O: y  \6 R, i00480171   5B                     pop     ebx
% M* k: j" q1 N7 v00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： 3 }# N0 B* N7 G- X5 {) ` ' \2 H4 r& {; T$ u004802F8 55 push ebp 004802F9 8BEC mov ebp, esp 004802FB 33C9 xor ecx, ecx " f P. r a" c2 e! T: y1 K004802FD 51 push ecx 5 t" W! S# o. ~0 Q% c004802FE 51 push ecx 004802FF 51 push ecx 8 F% A6 J9 b4 |1 G8 ~, u00480300 51 push ecx 2 z/ C. T0 A) Q: ?& j. P00480301 51 push ecx ) ^6 Q2 s+ u( d/ ^% y2 |8 x1 z00480302 51 push ecx 8 O% @$ U2 e e* H# d00480303 51 push ecx W3 M4 D% L4 Z- A* H00480304 33C0 xor eax, eax 00480306 55 push ebp 3 {; S: [9 C* z1 w, ` * Possible String Reference t '檫0?脬嬪]? | - v1 {- x. T: G! G- B; `00480307 6808044800 push $00480408 ) K. F* O# _1 o, Z* _# T1 \; V7 ?& C 7 T. q, }1 B, E0 J; c2 C2 ?***** TRY | 4 ]: L% N* T: s3 g0048030C 64FF30 push dword ptr fs:[eax] 4 q* x& E+ D, F0048030F 648920 mov fs:[eax], esp " r! p2 `8 n3 D' L+ G2 l00480312 8D55F0 lea edx, [ebp-$10] 8 V% ~, x" N8 L$ i * Reference to TApplication instance | 4 g$ w& l& O- Q* V3 O6 O00480315 A148284800 mov eax, dword ptr [$00482848] , S7 _% M2 f3 E' k3 J0048031A 8B00 mov eax, [eax] - y. k, M, @3 `' I. T* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 0048031C E82F97FCFF call 00449A50 ;Who am I? ; t2 P6 E) w8 b3 w( ?5 Q. p9 k( E00480321 8B45F0 mov eax, [ebp-$10] 00480324 8D55F4 lea edx, [ebp-$0C] , }3 T% k( p& p! b; O d( y / ^. R" V/ C* Q! T0 R8 G0 D* Reference t Unit_00406FD0.Proc_00408110 | - X2 V: @) h, A5 A/ t! V0 p+ L! A00480327 E8E47DF8FF call 00408110 " H( g5 V4 t0 ~9 J- O3 v/ ]0048032C 8B45F4 mov eax, [ebp-$0C] 0048032F 50 push eax , P3 E" Z6 I+ V- o- d00480330 8D55E8 lea edx, [ebp-$18] ( k I0 p: W" C4 I8 p( {; H* Reference to TApplication instance % D, i- O, j8 S+ V1 {1 P| 00480333 A148284800 mov eax, dword ptr [$00482848] 2 F4 G8 V9 @' A7 V" n. N00480338 8B00 mov eax, [eax] $ K: o1 U1 ]2 d7 e# u* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 0048033A E81197FCFF call 00449A50 0048033F 8B45E8 mov eax, [ebp-$18] 00480342 8D55EC lea edx, [ebp-$14] 0 G* E' r2 F+ K- `7 }. U8 Z) B/ d* Reference t Unit_00406FD0.Proc_004080DC | $ _8 b1 o; v* w8 u- Y/ s6 ~00480345 E8927DF8FF call 004080DC 5 ? Z+ H6 Z0 M4 z$ F$ |0048034A 8B55EC mov edx, [ebp-$14] * g& m3 ?- \/ R$ @0048034D 8D45FC lea eax, [ebp-$04] 3 ]! K4 n R9 h7 j9 `00480350 59 pop ecx " X. f v3 l! m# j, I/ t ! b. l+ Z/ q# _) I7 S* Reference t system.@LStrCat3; 3 o7 x$ F3 \5 J, H: e# f6 [| 8 m, @! A+ F& e. \5 n6 W00480351 E8CA39F8FF call 00403D20 ' n+ a# K+ M N00480356 B201 mov dl, $01 * X) Q) [4 Q3 A1 Z1 l M 7 j+ C% E$ B& R* Reference to class TRegistry 6 S, f! O! L. D3 F- m9 r( Q* @| * w: ?" w: @( ]9 t; U00480358 A174F14700 mov eax, dword ptr [$0047F174] ' B3 p3 K1 @8 d x/ h ; M* T# \8 S1 \! A( x9 D* Reference t Unit_0047F114.Proc_0047F274 | 0048035D E812EFFFFF call 0047F274 00480362 8945F8 mov [ebp-$08], eax v# \, y' N" H# S00480365 33C0 xor eax, eax # X3 k+ b+ \( E6 C& @/ B6 R( `00480367 55 push ebp B8 @) v9 E6 l' x. u00480368 68DE034800 push $004803DE 8 m( K7 F5 p- S/ y9 ^7 q8 d3 p ***** TRY | 0048036D 64FF30 push dword ptr fs:[eax] 2 Z' n% ^( [! M* a2 F1 b. }/ u00480370 648920 mov fs:[eax], esp 00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] - B- a+ S( k0 W q4 _4 t; U * Reference t Unit_0047F114.Proc_0047F314 . a2 r& Q1 Y' l; y. j| 0048037B E894EFFFFF call 0047F314 00480380 B101 mov cl, $01 " r! b# O* |/ V0 C9 a% c8 A/ Z' }: w C3 E" l* Q$ o$ c0 h* Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） ( P) |# m/ q+ b2 O, ]5 \| Version\Run' ! ?1 Q. l8 f8 i( u1 S2 l| & x& ^) _. x2 i+ Q! [# k00480382 BA1C044800 mov edx, $0048041C 7 }2 @- @+ S/ ^* I00480387 8B45F8 mov eax, [ebp-$08] # Z8 P; m% G) r- h7 H/ i* O * Reference t Unit_0047F114.Proc_0047F378 | " F* u7 t+ O! c* u0048038A E8E9EFFFFF call 0047F378 0048038F 84C0 test al, al " `, A) X. c9 `" O9 U, U00480391 7435 jz 004803C8 L. l$ w* T+ V! F5 r: e- m2 k00480393 8D4DE4 lea ecx, [ebp-$1C] : _' S7 y. S; } ( m- M; n7 {. c6 m$ u% V( Z* Possible String Reference t 'JrRClean' | 00480396 BA54044800 mov edx, $00480454 ) n1 u4 w6 v0 ?, t" S0048039B 8B45F8 mov eax, [ebp-$08] 9 [ V( c0 e: {. b& `# [! L* W L * Reference t Unit_0047F114.Proc_0047F540 | 0048039E E89DF1FFFF call 0047F540 004803A3 8B45E4 mov eax, [ebp-$1C] 6 \' c$ R+ \2 \# F- {& m& P: w; Y004803A6 8B55FC mov edx, [ebp-$04] . U3 b& F" v2 Y4 w. T- k7 g ) y: Y% O; R' ~0 s# t( }' c* ^1 d* Reference t system.@LStrCmp; ( a& m0 T) c4 }| 004803A9 E8363AF8FF call 00403DE4 004803AE 7410 jz 004803C0 - `0 ~3 M1 X, V$ I7 H. f6 \2 Y2 }004803B0 8B4DFC mov ecx, [ebp-$04] 0 {( f8 s$ p8 k$ M9 O1 o- K * Possible String Reference t 'JrRClean' ( N" z* L9 E( M2 a| * L" h: K8 ~: i+ H' L/ ~004803B3 BA54044800 mov edx, $00480454 " D5 V+ t* B) _+ Q" h/ Q3 t, Z6 ^' f' L004803B8 8B45F8 mov eax, [ebp-$08] $ J3 j6 V7 \/ ?* L2 t) N" z8 K * Reference t Unit_0047F114.Proc_0047F514 | & j. i. D4 `/ W6 l" T004803BB E854F1FFFF call 0047F514 % F2 z W+ L! R% z. k) N; ?004803C0 8B45F8 mov eax, [ebp-$08] ( i% B& R. P$ S2 U; D5 c * Reference t Unit_0047F114.Proc_0047F2E4 | ' Q" @. O2 ~/ i004803C3 E81CEFFFFF call 0047F2E4 , r5 \1 t. S' B0 C/ I004803C8 33C0 xor eax, eax 004803CA 5A pop edx | @! G0 Z3 B; u9 Q2 p004803CB 59 pop ecx 004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx 3 O& p9 T; S% O/ R****** FINALLY | 004803D0 68E5034800 push $004803E5 004803D5 8B45F8 mov eax, [ebp-$08] 9 J- o( \+ g8 D+ H$ j; d; [ * Reference t system.TObject.Free(TObject); . O7 |* V% `: ^' A, u5 l2 \1 J4 ]| 004803D8 E8EF29F8FF call 00402DCC - `/ L0 i' F* Q/ e004803DD C3 ret 2 C$ Z& y, ^6 x1 R7 b0 E g * Reference t system.@HandleFinally; 3 s% C5 g; b" i+ T& {| 0 Y, B* [, L( H0 O( H7 c4 o7 z004803DE E90931F8FF jmp 004034EC 9 ]9 u: w: d! Y( A( ]004803E3 EBF0 jmp 004803D5 ****** END . k% x9 Z8 \! l| 004803E5 33C0 xor eax, eax + [" m0 n2 n" F' f004803E7 5A pop edx % {! t% f) \5 E- t* v. ~004803E8 59 pop ecx 004803E9 59 pop ecx 004803EA 648910 mov fs:[eax], edx 4 D1 W5 t( d6 a: s7 h3 P% t ****** FINALLY 1 E* b+ U( o# x| 0 H y+ z1 m' T& A7 K4 c: I . f3 d) i0 e0 H* Possible String Reference t '嬪]? | / ^/ B: R- W0 D' V/ |004803ED 680F044800 push $0048040F ) v' ~9 e% F4 v/ s004803F2 8D45E4 lea eax, [ebp-$1C] + O7 P: ]+ p' Y9 X! U! h004803F5 BA05000000 mov edx, $00000005 9 S, Z" w/ @0 E+ w7 @& p. B' T5 O* Reference t system.@LStrArrayClr; | 9 i4 |" h& z" h) C1 c' \004803FA E87936F8FF call 00403A78 004803FF 8D45FC lea eax, [ebp-$04] + S# t* E j+ V* Reference t system.@LStrClr(String;String); | $ @3 m' k: ~7 Q3 `. ~00480402 E84D36F8FF call 00403A54 00480407 C3 ret * x& ^/ D ]* q * Reference t system.@HandleFinally; % j& `1 R9 S& M| 00480408 E9DF30F8FF jmp 004034EC 1 C) _. v: r K1 l4 J" o0048040D EBE3 jmp 004803F2 ****** END ! N. Z- {+ ~: e| % A' X) G. c) u I( X* I& z0048040F 8BE5 mov esp, ebp " p* I' U, s$ V: u* P0 r5 ~00480411 5D pop ebp 00480412 C3 ret 1 q$ U/ S3 k! k, d |# V8 F- E 上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） 7 h# E& q' q3 g8 y' r) } 只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 结语： 上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 权当一笑吧，呵呵~~~~~~~~~~~~ 0 Z, T& X3 J, l( @( F , ?* f* D% `! ? ~- \; D# I, v monkeycz于2004年平安夜 2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

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

& ?' o# h9 X- ]: B* p 睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

以下是引用游侠无极限在2004-12-26 22:03:00的发言： 5 }, r' x; q0 Q+ e0 O! nDelphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

1 g2 i' S' \& Z3 D* C , h0 Z, Z' W: q3 N" l+ b对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

" }3 ~/ e4 k" M* h- |7 b6 U' e" `8 k

同感