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

游侠无极限

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

* Reference to control TFrmRamMain.Panel2 : TPanel
! C/ {* t2 z' h0 X0 w1 K7 N+ B|
: u) u' P. _  x$ d7 t0 ~0047FF2D   8B83FC020000           mov     eax, [ebx+$02FC]

6 m# }7 ?  P. P6 T* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
0047FF33   E80CA6FAFF             call    0042A544
0047FF38   B201                   mov     dl, $01

* Reference to control TFrmRamMain.Panel1 : TPanel
|
2 w6 @8 W1 _% x) m* ~2 N0047FF3A   8B83F0020000           mov     eax, [ebx+$02F0]

* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
0047FF40   E8FFA5FAFF             call    0042A544
) f- J9 {! n' S  O
* Possible String Reference t '系统正在做消磁前的准备...'     ;提示文本，准备好了
( g/ S# m3 {; c# k8 t|
0047FF45   BA7C014800             mov     edx, $0048017C
6 q. O: E& K/ C' ~. l, ?. l2 U
* Reference to control TFrmRamMain.Label3 : TLabel
+ z2 f8 G' L& k5 L2 Y% B8 \7 I  }|
0047FF4A   8B83F4020000           mov     eax, [ebx+$02F4]

* Reference t controls.TControl.SetText(TControl;TCaption);
|
0047FF50   E807A7FAFF             call    0042A65C

. Z0 b4 K/ d' j- K* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条开始动了
|
3 ^* I6 Q( k( D  `  C0047FF55   8B83F8020000           mov     eax, [ebx+$02F8]
! U. o6 \& |% {1 y
9 ^. f% j9 X* @% d+ e* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF5B   E80489FDFF             call    00458864
0047FF60   8BC3                   mov     eax, ebx
8 {9 y) @: c* W2 Y, B
7 e+ t  ^6 P- P; j* Reference to : TFrmRamMain.Delay()                            ;核心代码？~~~~~！！！！！！牛x，这样就可以“中和电脑周围磁场”，佩服佩服~~~~~~
  [% T: o7 Y6 P' T+ R|
0047FF62   E8D1020000             call    00480238
) g7 r7 t3 A- U2 |
/ x, y5 ~- r3 K2 N% ^! h' J  F* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;进度条继续在动
$ b  N2 {1 K! d/ c1 S: E- |# L9 j|
0047FF67   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
# t: @/ m0 O! Y7 H& Z2 D6 {7 w0047FF6D   E8F288FDFF             call    00458864
0047FF72   8BC3                   mov     eax, ebx
8 }  B: `1 ^- l
* Reference to : TFrmRamMain.Delay()                            ;休息一下，不知道从何方招来的神圣正在提我们消磁：）
  R8 \9 x( T  D" U; S" O|
0047FF74   E8BF020000             call    00480238

4 V; a" A+ U2 p/ P8 I% w. R* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar  ;继续动
|
, v8 m' H5 C, Y+ @7 _0 p! `- ?0047FF79   8B83F8020000           mov     eax, [ebx+$02F8]
& w/ {+ ~. i- H6 O( K
3 }& z$ O6 c4 k  p3 @* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF7F   E8E088FDFF             call    00458864
0047FF84   8BC3                   mov     eax, ebx
2 r% Y( ]. G& N- ~# w) z
* Reference to : TFrmRamMain.Delay()
2 i8 N1 C" f5 ]3 d, R3 r! W% S& a|
+ Y2 b  s2 n7 \0 P0047FF86   E8AD020000             call    00480238
0 j2 {, |: ?+ [& n5 d
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
' [, ]9 t  G# N6 c0047FF8B   8B83F8020000           mov     eax, [ebx+$02F8]
% E# r# i! F  B. Q+ v- r
% o; ]! \: K+ s4 p# y) ?* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0047FF91   E8CE88FDFF             call    00458864
0047FF96   8BC3                   mov     eax, ebx
; Y/ o+ J! ]$ R7 Z8 L; ^- P" U
5 ~3 v2 [( b; i* Reference to : TFrmRamMain.Delay()
|
0047FF98   E89B020000             call    00480238

8 m- b3 T& ^0 W9 W9 K* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
6 ^1 K* ]% N8 o( }. Y. \/ o0047FF9D   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
! ]8 H3 Z( g; l7 v- i|
( \6 r7 _# K# ]+ j0047FFA3   E8BC88FDFF             call    00458864
1 t6 L7 M1 ^- ^* w+ X( r
; F9 k8 Q& f! \6 U8 o* Possible String Reference t '系统正在收集电脑的电磁波...'
|
0047FFA8   BAA0014800             mov     edx, $004801A0

* Reference to control TFrmRamMain.Label3 : TLabel
3 V7 @; K( |+ w5 G% F' v|
0047FFAD   8B83F4020000           mov     eax, [ebx+$02F4]
0 I/ S$ c9 A, T5 U% q2 |; B
* Reference t controls.TControl.SetText(TControl;TCaption);
: j  ]* x8 ~# Z! v& v8 i|
) b9 }4 O" V/ R% ]  H4 ^9 `0047FFB3   E8A4A6FAFF             call    0042A65C
  R  o; i1 }+ S
$ w" L: u% z+ K5 u: x% n* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0047FFB8   8B83F8020000           mov     eax, [ebx+$02F8]

& n% `$ l* D5 m# z) S* L# V- `* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
; |, S- a; t1 b. [|
* ~$ z, k6 v/ p- B$ Q0047FFBE   E8A188FDFF             call    00458864
; B+ c" y3 j3 b2 p& R# n0 Q0047FFC3   8BC3                   mov     eax, ebx
) b' B6 ]0 W- L% _3 y
* Reference to : TFrmRamMain.Delay()                             ;根据提示，这句应该是收集电磁波的代码。
|
0047FFC5   E86E020000             call    00480238
! E" d$ l6 k' X, r
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
: @& f; ?6 J2 ]9 b& ||
& H; w: y2 `  s9 e9 E8 b0047FFCA   8B83F8020000           mov     eax, [ebx+$02F8]

$ j8 s8 ^8 R. [% u* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
+ j( q. `  X# H" w9 |0047FFD0   E88F88FDFF             call    00458864
4 |8 u: G& d! {* ]& i( [  k3 E0047FFD5   8BC3                   mov     eax, ebx
; F! z0 |& @5 p3 S6 _  T9 r
3 i) f1 C) I6 [+ b& T* Reference to : TFrmRamMain.Delay()
|
2 q. U6 F7 B8 N( _6 a, _0047FFD7   E85C020000             call    00480238

4 L! t) [: i4 Y/ }1 N* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
, x& P& B/ W$ h" I|
! ?/ V3 h3 |% w& m8 ^0047FFDC   8B83F8020000           mov     eax, [ebx+$02F8]
0 c# q# t) X. Y+ d* C  S  t
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
! h4 \0 p, f. Q/ F, j! E3 ]* M( A|
1 Y, L9 ~+ z. j0047FFE2   E87D88FDFF             call    00458864
+ T0 R6 |9 J8 s" W: U0047FFE7   8BC3                   mov     eax, ebx
$ V1 h' m! t% S# i. K0 W  K
* Reference to : TFrmRamMain.Delay()
|
0047FFE9   E84A020000             call    00480238

$ \% }* }. K6 q4 ~7 t* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
# i! q9 a$ @  ~6 S! q: F|
- q* `1 O1 B8 O/ s  {7 U3 R$ `0047FFEE   8B83F8020000           mov     eax, [ebx+$02F8]
. D2 ]' N# r2 W$ }) s
0 o1 q9 Y0 S4 \6 I$ g, u* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
$ l8 A2 W" e: y$ {+ M& Q|
0047FFF4   E86B88FDFF             call    00458864
. W% i& S9 R/ r0 u. \0047FFF9   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
$ c( D! d* a9 B9 A/ \|
" N3 h  q. o( ~: c" e- l8 j0047FFFB   E838020000             call    00480238

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

& `* w  b& Q: }. G' z$ {. r* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
( `  f3 q! U5 A|
6 C: T' l- `0 ]: K, x00480006   E85988FDFF             call    00458864

* Possible String Reference t '系统正在释放融磁电波...'
. |9 B* r7 b3 J7 K( s( A, {/ Y|
) d; ^( U* J! h. o+ s0048000B   BAC4014800             mov     edx, $004801C4

% l( @5 A. X2 w. |8 I  {' Z* Reference to control TFrmRamMain.Label3 : TLabel
0 ^+ h) L3 R4 B2 H# m1 x  [2 h|
* M" x' e" p+ [" G( Z00480010   8B83F4020000           mov     eax, [ebx+$02F4]

, F/ }0 s( q  O( A* Reference t controls.TControl.SetText(TControl;TCaption);
|
00480016   E841A6FAFF             call    0042A65C

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
4 i- c. n3 Q: R0048001B   8B83F8020000           mov     eax, [ebx+$02F8]

5 w, P+ L# n0 z: i5 M( L% k* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480021   E83E88FDFF             call    00458864
' g" y# a  ^: i& @* Q1 l, h6 p  r00480026   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()                             ;消磁的核心代码，这项技术大家可要记牢了，不可乱用，说不定作者申请专利了呢：）
$ @! ~' M6 p  S& k" p4 O; w|
00480028   E80B020000             call    00480238
% c" V3 {* L! a- ^; a+ ~- h4 c
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
0048002D   8B83F8020000           mov     eax, [ebx+$02F8]
4 ]  i4 j% j% F
0 d$ a; d8 G; f, `1 P* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
; c* C9 `( U/ }# V& L00480033   E82C88FDFF             call    00458864
, ?  x8 ?- w0 l* n$ a. N00480038   8BC3                   mov     eax, ebx

* Reference to : TFrmRamMain.Delay()
|
0048003A   E8F9010000             call    00480238
& S. y# K1 |8 }( }* b
& m& t. p3 C) z# J, l+ s/ T* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
# U0 s9 a+ C% B# I) X0048003F   8B83F8020000           mov     eax, [ebx+$02F8]

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

5 s( Z5 }0 v2 C3 s: V% `' u* Reference to : TFrmRamMain.Delay()
4 g, t/ l% P- W|
0048004C   E8E7010000             call    00480238
" [) Y7 @  Q$ Q0 B7 C4 r
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
  B4 v) M0 ]( F6 [: i|
00480051   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
' U" u; X9 Z; A6 D1 g|
% n( a$ }$ g7 [. x3 {9 e00480057   E80888FDFF             call    00458864
* y: a' S$ A, \2 g+ e; h: o( f# O0048005C   8BC3                   mov     eax, ebx

1 O8 I( H& j$ E1 k1 l0 g* Reference to : TFrmRamMain.Delay()
$ S" A# ^% j9 q) t$ U" s- X9 N|
0048005E   E8D5010000             call    00480238

& {6 A  u' t' P( }+ N, h& j/ A* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
# C, _" a5 M1 X' \00480063   8B83F8020000           mov     eax, [ebx+$02F8]

9 Q. F% q5 j- o- m* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 ]3 y1 T( R6 k0 V8 }: Z" d4 q6 F|
00480069   E8F687FDFF             call    00458864
/ i, Y! v7 |& \8 \& E1 T  ?
. ^0 I3 h1 L3 ~6 N* [7 ~* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
7 g  |4 R/ n6 r7 x8 ?  Q/ C2 g|
9 J* k) D8 x& W! y# Q8 ^0048006E   8B83F8020000           mov     eax, [ebx+$02F8]

" ~* ^) H" C8 R* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
9 d* P  j. \" ?. g00480074   E8EB87FDFF             call    00458864
2 b; u! ~" Y* [4 g9 m* F00480079   8BC3                   mov     eax, ebx

  v( ]; a5 F# w' t" K& j" l- K* Reference to : TFrmRamMain.Delay()
|
( e1 A# O5 z* Z$ C0048007B   E8B8010000             call    00480238
; i; V; x3 L( a. i$ ^" e+ _
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480080   8B83F8020000           mov     eax, [ebx+$02F8]

6 p  {1 w- k4 R( a8 e, C* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480086   E8D987FDFF             call    00458864
0048008B   8BC3                   mov     eax, ebx
7 E$ o" E6 |  a5 o' N. B# S
( Q! ]( f2 y/ ]* Reference to : TFrmRamMain.Delay()
& g5 p: O9 `8 I1 x* G( @* e  ]|
5 i% h- a! \! s( U6 L( P! P0048008D   E8A6010000             call    00480238

% n$ }' W3 l) S0 @4 {1 H$ t; x$ \4 t* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
% p8 A; T0 z- d|
00480092   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
00480098   E8C787FDFF             call    00458864
0 z3 n: c. O- |+ s( v4 X: J' N0048009D   8BC3                   mov     eax, ebx
( y8 H+ d& C# V6 m. L- H
' {( |. h' a7 {; r4 E; B* Reference to : TFrmRamMain.Delay()
|
6 _1 p; D* Z8 X9 R% @! |0048009F   E894010000             call    00480238
: Q9 h" Z3 Y# A
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
2 n% ^' Y9 }5 x- k( O( V|
' o/ q, a7 P; g9 N5 v. ?004800A4   8B83F8020000           mov     eax, [ebx+$02F8]

* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
5 m& ?  H- e  T$ X  b4 Y' ~0 ||
6 ]# C  T/ e9 r2 ~! a  {+ V3 a, G004800AA   E8B587FDFF             call    00458864
  j! k/ o, H3 v1 R+ W; d004800AF   8BC3                   mov     eax, ebx

5 Z: }+ i3 g+ q- m( A: Y! `* Reference to : TFrmRamMain.Delay()
|
4 y8 l5 ~" c9 t# c; S004800B1   E882010000             call    00480238

* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
& \% ?) S6 a& M8 |004800B6   8B83F8020000           mov     eax, [ebx+$02F8]

  n. q- l" e' n/ n; y7 y* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
: t( I) {$ I$ R( {1 ~4 S004800BC   E8A387FDFF             call    00458864

0 j% j6 t+ @3 v. f" k9 s* Possible String Reference t '系统正在做最后的消磁工作...'
|
004800C1   BAE4014800             mov     edx, $004801E4

* Reference to control TFrmRamMain.Label3 : TLabel
|
) g! A) t) ^$ d. b+ _& X3 S' @8 ^7 @004800C6   8B83F4020000           mov     eax, [ebx+$02F4]
8 b( J0 b. \. }& M5 A( g( ?3 j
) C2 Z9 v  |3 y- J4 I* Reference t controls.TControl.SetText(TControl;TCaption);
( k2 \" w7 w1 B) F|
004800CC   E88BA5FAFF             call    0042A65C
/ L, y; x3 C' ^, Q) R
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
( t6 S4 c, ?0 v7 t9 U- N4 {; R|
004800D1   8B83F8020000           mov     eax, [ebx+$02F8]

- W- y9 i4 ?: N6 E: p! W8 t! m% g* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
0 s# @) l! J) b( ?' P* a; ||
004800D7   E88887FDFF             call    00458864
004800DC   8BC3                   mov     eax, ebx
+ F1 S( {+ s% n) {  Y+ z
$ l# Z3 [! u8 p$ B- s* Reference to : TFrmRamMain.Delay()                              ;我就不说什么了吧：）
|
0 ]- j+ P- o4 B8 _004800DE   E855010000             call    00480238
3 k! A- q4 L3 d2 Z  T$ I
* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
" c; N) o( i, F! y$ Z6 E004800E3   8B83F8020000           mov     eax, [ebx+$02F8]

# X7 d3 y' o( b! T- ^* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
8 c4 x( G& z2 k' I|
004800E9   E87687FDFF             call    00458864
$ k3 z; C* p; a# c4 K- w! M' T004800EE   8BC3                   mov     eax, ebx
! S2 |& N9 O9 X
3 d( s' U. @& z' h3 H9 T* Reference to : TFrmRamMain.Delay()
|
7 D1 O* Q9 R: t& {004800F0   E843010000             call    00480238
  `) X) O& F5 v
0 j& o" q1 y$ ?4 c, Z* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
5 I- z1 I/ \3 v004800F5   8B83F8020000           mov     eax, [ebx+$02F8]
. y; @4 N* z) M- k+ q9 }
* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
5 G/ E" L+ h5 T/ a  z( L|
+ {9 E& b9 o4 B8 v( f2 [  \004800FB   E86487FDFF             call    00458864
00480100   8BC3                   mov     eax, ebx
% N7 H8 @& T1 l7 U3 h; W6 Y
+ F8 P6 R3 z1 J: V6 X& z% v* Reference to : TFrmRamMain.Delay()
|
00480102   E831010000             call    00480238
7 Q* q% ^2 m3 d
7 N. ?- R, ^- e6 h+ `7 w* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
+ ?; _% e* t/ x; y) z: X00480107   8B83F8020000           mov     eax, [ebx+$02F8]
7 X0 x9 o* _7 U. t4 x* \. }
2 G, m3 A: s- j, [* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
, E( _# A* J- i9 `" M4 `|
0048010D   E85287FDFF             call    00458864
00480112   8BC3                   mov     eax, ebx
, U2 y: w7 q; r+ [# @
1 {& k6 Y5 q  I8 x* Reference to : TFrmRamMain.Delay()
, m2 |0 Z( v2 e|
( M& n/ F' e* Z) ~- O5 y00480114   E81F010000             call    00480238

( _; M- U# ^: N8 L  f5 u% {* Reference to control TFrmRamMain.ProgressBar1 : TProgressBar
|
00480119   8B83F8020000           mov     eax, [ebx+$02F8]

/ b$ N9 a" L9 y* Reference t comctrls.TProgressBar.StepIt(TProgressBar);
|
0048011F   E84087FDFF             call    00458864
4 P6 l4 H6 g8 q! f6 Y+ P0 V: E00480124   B8E8030000             mov     eax, $000003E8

6 [6 U5 V$ o4 M6 Q* Reference t system.@RandInt;
|
00480129   E86629F8FF             call    00402A94
( C' Q. ?7 F6 _' l( T7 n. j& \0048012E   85C0                   test    eax, eax
" h0 ~# i* w) l8 @( M4 g00480130   6A40                   push    $40
0 H: l& S* C% A% c# }' }5 r
5 Z, d" c2 N* D7 R* Possible String Reference t '电脑消磁圣手'
|
' v' g$ Y1 @% k+ s9 s1 y# D4 P2 p+ M00480132   B900024800             mov     ecx, $00480200

& v# r' `9 g' ]) i! ]  p* Possible String Reference t '融磁成功，已经成功中和电脑周围磁场?
, {1 l. R8 D( E  a. b|                                ?
# N4 O6 \+ M! c* P, v|
00480137   BA10024800             mov     edx, $00480210
) X1 Q' Z9 Y% r
4 D3 Y) G& R0 p6 [$ n( ]8 T. ?* Reference to TApplication instance
|
0048013C   A148284800             mov     eax, dword ptr [$00482848]
00480141   8B00                   mov     eax, [eax]
5 k1 p' Z* T" L# I
- F8 U5 q0 m- U7 S* Reference t forms.TApplication.MessageBox(TApplicationCharChar;Longint):Integer;
+ r1 f4 g$ K7 B3 I9 A! l|
2 }# Q, E& ]6 C, G& x) Q% z$ U00480143   E89895FCFF             call    004496E0                  ;大功告成，消磁成功！！！
% o0 r1 G' G( _2 U% j5 x00480148   33D2                   xor     edx, edx
' |1 z( i: |, F+ Z3 |  B( d& y
9 Y- n" N# L  t0 m* Reference to control TFrmRamMain.Panel1 : TPanel
) y- ^, U& L! k( n|
0048014A   8B83F0020000           mov     eax, [ebx+$02F0]
# t5 M9 x% R  T8 H) j
* Reference t controls.TControl.SetVisible(TControl;Boolean);
/ B2 l5 p* T* B* z  a5 Y: J# Q4 S|
00480150   E8EFA3FAFF             call    0042A544
) b+ d! p) d6 ^00480155   B201                   mov     dl, $01

* Reference to control TFrmRamMain.Panel2 : TPanel
|
00480157   8B83FC020000           mov     eax, [ebx+$02FC]

3 m' o# ]  Y& K! t# }- \1 F% f* Reference t controls.TControl.SetVisible(TControl;Boolean);
|
7 }: F: o4 k" k& j, Q) a0 g. b; K0048015D   E8E2A3FAFF             call    0042A544

* Reference to TFrmAbout instance
|
) d, T2 @3 [7 d' k00480162   A148264800             mov     eax, dword ptr [$00482648]
# a" b5 a3 k/ J- y00480167   8B00                   mov     eax, [eax]
00480169   8B10                   mov     edx, [eax]

* Reference to method TFrmAbout.ShowModal()
  V! f' _; K& ?0 w( U% U4 v6 V5 U|
0048016B   FF92D8000000           call    dword ptr [edx+$00D8]         ;关于窗口露一小脸，是介绍公司的。如此精深的技术，倘不见一下那只下蛋的鸡，岂不是太可惜了么：）
6 U( Z( R( F$ N& `+ s6 o2 ^/ z00480171   5B                     pop     ebx
00480172   C3                     ret

游侠无极限

上面就是“消磁圣手”的核心代码。逆向了这么重要的代码心里甚是不安。软件的开发公司千万不要告我啊！不过已经看了，再多看一点也无妨吧。谁知这一看不要紧，又发现了软件作者的体贴之处，请看下面的代码，是窗体创建事件对应的代码： ( m- k2 j5 v+ O: ~ 004802F8 55 push ebp 004802F9 8BEC mov ebp, esp " n) i5 _! X& b' ` m+ g004802FB 33C9 xor ecx, ecx # H! G1 y! ]$ y! G [2 R% c004802FD 51 push ecx U3 W9 s6 |: @004802FE 51 push ecx 9 }1 d2 p) [- O. o004802FF 51 push ecx 00480300 51 push ecx 00480301 51 push ecx 5 S/ ~+ i5 Q* I" e3 K00480302 51 push ecx 00480303 51 push ecx # K/ H6 E4 f/ q4 F5 P$ W; T00480304 33C0 xor eax, eax 00480306 55 push ebp - K3 s5 X' z! Y. Q+ ^* Possible String Reference t '檫0?脬嬪]? 4 T, q. ^) B* `/ @, c: H| - w7 y4 f: k. Q00480307 6808044800 push $00480408 7 U0 }: q K" j: e% g8 a% A$ R, s 3 k7 T0 V& ]9 Q/ f* A- o***** TRY ( n0 t! `* W. y6 |# T! X| 0048030C 64FF30 push dword ptr fs:[eax] 7 k5 {% J/ X3 l( |$ V8 e0048030F 648920 mov fs:[eax], esp " K( `" ?" B6 A7 C/ O. v00480312 8D55F0 lea edx, [ebp-$10] * ]& m2 v1 L: K- j: Q g* Reference to TApplication instance 9 ^, R' d# P) l| 0 R7 \4 b+ b. s6 V00480315 A148284800 mov eax, dword ptr [$00482848] 0048031A 8B00 mov eax, [eax] % T$ I9 N4 Y$ l8 _* Reference t forms.TApplication.GetExeName(TApplication):AnsiString; | 4 W( b; ^* P! W0048031C E82F97FCFF call 00449A50 ;Who am I? 00480321 8B45F0 mov eax, [ebp-$10] : {% K+ L2 u; Z# r8 c! ?4 L$ U, F) q& c00480324 8D55F4 lea edx, [ebp-$0C] . ?' c+ ?8 S! q. d( ], X& i * Reference t Unit_00406FD0.Proc_00408110 | 00480327 E8E47DF8FF call 00408110 9 n5 m. c( {& o0048032C 8B45F4 mov eax, [ebp-$0C] 2 R0 i+ U% ?" n4 h0048032F 50 push eax " q. B+ P R2 g' R00480330 8D55E8 lea edx, [ebp-$18] 3 K2 M. k' F$ V8 ~7 E ! R/ z: C# \9 A: O0 v& U: a* Reference to TApplication instance 8 S* P- W: L- F" n; M; @# p| 00480333 A148284800 mov eax, dword ptr [$00482848] 00480338 8B00 mov eax, [eax] ; V* {' n/ P; Q * Reference t forms.TApplication.GetExeName(TApplication):AnsiString; e. W$ _) B0 Z. @4 O3 v5 l| 0048033A E81197FCFF call 00449A50 0048033F 8B45E8 mov eax, [ebp-$18] 00480342 8D55EC lea edx, [ebp-$14] ! X% l. ]' Q4 v* P2 X # ~, a2 e- `5 Z- Y* Reference t Unit_00406FD0.Proc_004080DC 6 R% q" Q4 A7 k# D+ o| 00480345 E8927DF8FF call 004080DC % j' }8 e, m. q. r! t2 b0048034A 8B55EC mov edx, [ebp-$14] 0048034D 8D45FC lea eax, [ebp-$04] 0 w3 I. s M: R1 E& h00480350 59 pop ecx 6 J$ D& `7 M F2 p' \* h+ j $ r. l# o0 i7 a+ H7 i8 o4 |+ @) f5 f( {* Reference t system.@LStrCat3; * U! P) l- c2 }| 00480351 E8CA39F8FF call 00403D20 ; l& p! u0 I& }( z$ ~# A00480356 B201 mov dl, $01 1 p6 y* R6 H4 [+ N) d* Reference to class TRegistry | 00480358 A174F14700 mov eax, dword ptr [$0047F174] * Reference t Unit_0047F114.Proc_0047F274 | 5 p& n, Q2 [9 h; I0048035D E812EFFFFF call 0047F274 5 w/ S! P+ L6 {0 ]* [9 f0 T00480362 8945F8 mov [ebp-$08], eax 00480365 33C0 xor eax, eax ( [6 Q: [ J6 p7 w1 ~5 _; }) j00480367 55 push ebp 00480368 68DE034800 push $004803DE ***** TRY | 0 T+ ?$ L& h# A, t& ?2 f Y0048036D 64FF30 push dword ptr fs:[eax] ( \ c7 L i3 y5 T$ [' i$ j00480370 648920 mov fs:[eax], esp % O8 u* i/ _% J' ?00480373 BA02000080 mov edx, $80000002 00480378 8B45F8 mov eax, [ebp-$08] * A5 G5 b7 G4 T2 R6 ^* Reference t Unit_0047F114.Proc_0047F314 ' l. C: v# L& F' ~! R| Z/ p3 i: |8 G* ?0048037B E894EFFFFF call 0047F314 6 D+ V0 ]4 A9 F' A3 ^: }: V00480380 B101 mov cl, $01 6 E9 c* l$ R7 x( V' o+ H * Possible String Reference t '\SOFTWARE\Microsoft\Windows\Current ;这个地方好熟悉，为什么我的毒霸不报警呢：） + z0 K, T( @: u, k| Version\Run' | 00480382 BA1C044800 mov edx, $0048041C * P7 ~. U3 M; P9 J/ u00480387 8B45F8 mov eax, [ebp-$08] 1 H0 Z$ z; T1 e: \* Reference t Unit_0047F114.Proc_0047F378 # C' _ r7 i2 h0 g1 J, H+ D9 \& Y| 9 J- k6 n4 y! I! H1 X' p0 y0048038A E8E9EFFFFF call 0047F378 0048038F 84C0 test al, al 1 l$ w) s- ^/ w! v00480391 7435 jz 004803C8 + B/ e' \5 l; T2 a00480393 8D4DE4 lea ecx, [ebp-$1C] # x( K9 i% F+ k( c; ~; Q- {* Possible String Reference t 'JrRClean' : {4 a7 B0 ^9 J( F+ Z- Z| 00480396 BA54044800 mov edx, $00480454 + [' s/ R2 K% Y4 A. C0048039B 8B45F8 mov eax, [ebp-$08] ) O+ T' r9 |, P * Reference t Unit_0047F114.Proc_0047F540 | 0048039E E89DF1FFFF call 0047F540 004803A3 8B45E4 mov eax, [ebp-$1C] 3 T# D* V' ?6 L# `004803A6 8B55FC mov edx, [ebp-$04] : {' F9 z4 k. V9 E* Reference t system.@LStrCmp; 4 j* `! x* X K' s; b| + k; `; v; I n. i2 a; J: w004803A9 E8363AF8FF call 00403DE4 004803AE 7410 jz 004803C0 004803B0 8B4DFC mov ecx, [ebp-$04] + [, V0 Y/ p) G0 B- d ) g, v7 W7 U4 G. H! z# f( w* Possible String Reference t 'JrRClean' 9 _/ Z% z1 }* R. t1 ?| 1 ]5 R+ `% t& @ X# _# J004803B3 BA54044800 mov edx, $00480454 4 w0 V9 D8 V2 l5 [; N$ _004803B8 8B45F8 mov eax, [ebp-$08] * Reference t Unit_0047F114.Proc_0047F514 | 004803BB E854F1FFFF call 0047F514 004803C0 8B45F8 mov eax, [ebp-$08] $ {& H" ]/ \1 x/ b8 M' \ , Y4 P- [5 R% n6 a3 I1 k/ K* Reference t Unit_0047F114.Proc_0047F2E4 1 c2 ?9 h/ ^8 e# T, G G6 Q4 a& X| 004803C3 E81CEFFFFF call 0047F2E4 6 v8 C: ]- G- f+ I \2 j004803C8 33C0 xor eax, eax 004803CA 5A pop edx 004803CB 59 pop ecx 9 p) a5 Z; U/ b8 C004803CC 59 pop ecx 004803CD 648910 mov fs:[eax], edx # R( I; n) o& a8 r- u x3 b- `$ p N0 O }- E) L****** FINALLY 9 z* j& G7 R j) s8 r| 004803D0 68E5034800 push $004803E5 004803D5 8B45F8 mov eax, [ebp-$08] & U' K" K6 D% T! ^4 I * Reference t system.TObject.Free(TObject); | 004803D8 E8EF29F8FF call 00402DCC " h+ ~' w# p, B3 [$ m3 n004803DD C3 ret / y1 A0 q" c8 w+ l6 R5 S 2 A# Y0 p" D' U+ J c c1 t" S j6 s; r* Reference t system.@HandleFinally; / ?7 w* M+ r* P& i! ~ g| : J' L, @7 m& a. ~4 o2 L: p004803DE E90931F8FF jmp 004034EC % O; G/ \3 o1 T% t004803E3 EBF0 jmp 004803D5 ****** END | # q: j! }4 Z) B( N004803E5 33C0 xor eax, eax 004803E7 5A pop edx 6 q- i4 K5 D+ b9 Y004803E8 59 pop ecx 004803E9 59 pop ecx 004803EA 648910 mov fs:[eax], edx 8 B9 `, V/ a, b$ z9 i # [0 Z: E' ]( a: J% O0 N. D# F****** FINALLY $ G' @& i: m2 Z S| 0 A! L( J3 c' { * Possible String Reference t '嬪]? | 8 _4 z' u9 u$ q004803ED 680F044800 push $0048040F 3 l) Q# @4 C' S1 D7 w004803F2 8D45E4 lea eax, [ebp-$1C] 004803F5 BA05000000 mov edx, $00000005 $ Y7 x6 j; J# t3 Q0 P 5 {' c& ]6 q# t+ x3 v$ A8 t* Reference t system.@LStrArrayClr; * o1 ^0 D( b" Z5 { u W1 O| / |( z0 X& U: ~# ?; s0 r" v- u8 X004803FA E87936F8FF call 00403A78 004803FF 8D45FC lea eax, [ebp-$04] : R. |5 U- w J- s+ r9 D* Reference t system.@LStrClr(String;String); # P6 ]) u, {# y9 P2 _. U: b9 H( r| % w8 e& O% s0 ]00480402 E84D36F8FF call 00403A54 00480407 C3 ret ; N2 \3 k( v# u* c+ h6 P9 C* Reference t system.@HandleFinally; | # h) l g. o, q! i A* B" l00480408 E9DF30F8FF jmp 004034EC ' Z% k6 g4 E4 M4 ?0048040D EBE3 jmp 004803F2 ! Z u% ~" F: k' r ( I n8 x0 u! I****** END | 0048040F 8BE5 mov esp, ebp 00480411 5D pop ebp 00480412 C3 ret 0 Y$ |# P3 n& j8 v* S3 f) _ & n5 c. P. [7 c0 W3 ^0 x/ }上面的代码我就不用多解释了吧？要知道电磁波辐射在开机的时候是最强的，所以“体贴”的作者就把“消磁圣手”加入了启动项中，这样每次启动的时候就能够自动消磁了，真是“人性化”阿~~~~~~当然，每次启动的除了“消磁圣手”，还有宣传的网站：） 只是苦了我又要清理启动项了。为什么98的注册表编辑器不能保存上一次打开的位置阿。 结语： 上面大部分都是废话，能看到这个地方辛苦了大家，真是不好意思。 # Q1 {; m( z/ o( a/ }3 N也许这只是一个开玩笑的程序，或者是有些精深的地方我没有领悟到。没有别的意思，只是闲得无聊。也希望作者没有别的意思，还希望作者在下一版升级的时候加入“取消开机启动”的选项。 / Z9 K% V& A' \4 p. Q& C2 g3 Y' t' v权当一笑吧，呵呵~~~~~~~~~~~~ . {+ z4 s5 }* E ; k# a6 U# `8 F" _8 F 4 O \5 ~7 u, D; p! u1 Kmonkeycz于2004年平安夜 2 Z9 { {3 \6 |' Q( E5 P2 P2004年12月24日

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

煎饼

delay

hater315

看的快睡着了.

煎饼

以下是引用hater315在2004-12-25 15:45:00的发言： / O7 j& I. b7 t. N看的快睡着了.

1 {+ ?& K9 n, `) t: D( T 8 ]; a6 T4 o% A- t( c3 P 睡就睡了吧,这个就是睡觉代码

天马星空

看不懂 俺是代码白痴

Eagle

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

游侠无极限

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

Eagle

以下是引用游侠无极限在2004-12-26 22:03:00的发言： , Y2 D F- t' g) X# X/ a# i6 l' DDelphi的用DeDe反汇编最爽了，连我这菜鸟也能比较看明白点了

; [7 I6 B& n2 K+ B# s 对于要读懂是好，但真要跟踪一个数据，那就有点麻烦了。它的变量的存取方式对于我来说有点乱。

小笨狗

VC反编译有么？？

Eagle

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

煎饼

都是高手,偶闪

fimqad

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


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

, o+ r5 t. g# m& A4 H$ C

同感