⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 hooktoolres.pas

📁 BLUE源码 BLUE源码 BLUE源码
💻 PAS
📖 第 1 页 / 共 2 页
字号:
unit HookToolRes;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TFrmHookCheck=class(TForm)
    GroupBox1: TGroupBox;
    CheckBoxWalk: TCheckBox;
    GroupBox2: TGroupBox;
    LabelWalkIntrt: TLabel;
    SpinEditWalk: TSpinEdit;
    CheckBoxRun: TCheckBox;
    GroupBox3: TGroupBox;
    Label1: TLabel;
    SpinEditRun: TSpinEdit;
    CheckBoxHit: TCheckBox;
    GroupBox4: TGroupBox;
    Label2: TLabel;
    SpinEditHit: TSpinEdit;
    CheckBoxSpell: TCheckBox;
    GroupBox5: TGroupBox;
    Label3: TLabel;
    SpinEditSpell: TSpinEdit;
    Label4: TLabel;
    SpinEditWalkCount: TSpinEdit;
    SpinEditHitCount: TSpinEdit;
    Label5: TLabel;
    SpinEditRunCount: TSpinEdit;
    Label6: TLabel;
    SpinEditSpellCount: TSpinEdit;
    Label7: TLabel;
    GroupBox6: TGroupBox;
    CheckBoxDoubleRun: TCheckBox;
    CheckBoxDoubleMagic: TCheckBox;
    CheckBoxDoubleAttack: TCheckBox;
    Label9: TLabel;
    SpinEditIncErrorCount: TSpinEdit;
    BitBtnVSetup: TBitBtn;
    BitBtnOK: TBitBtn;
    BitBtnCancel: TBitBtn;
    SpinEditDecErrorCount: TSpinEdit;
    Label10: TLabel;
    CheckBoxUnitActCtrl: TCheckBox;
    CheckBoxKick: TCheckBox;
    CheckBoxCheck: TCheckBox;
    EditErrMsg: TEdit;
    CheckBoxWarning: TCheckBox;
    procedure BitBtnOKClick(Sender : TObject);
    procedure CheckBoxWalkClick(Sender : TObject);
    procedure BitBtnVSetupClick(Sender : TObject);
    procedure SpinEditWalkChange(Sender : TObject);
    procedure CheckBoxCheckClick(Sender : TObject);
    procedure BitBtnCancelClick(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  FrmHookCheck: TFrmHookCheck;

{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure TFrmHookCheck.BitBtnOKClick(Sender : TObject);
begin
(*
0048818C   55                     push    ebp
0048818D   8BEC                   mov     ebp, esp
0048818F   6A00                   push    $00
00488191   53                     push    ebx
00488192   56                     push    esi
00488193   8BD8                   mov     ebx, eax
00488195   8B3554314C00           mov     esi, [$004C3154]
0048819B   33C0                   xor     eax, eax
0048819D   55                     push    ebp
0048819E   6816834800             push    $00488316

***** TRY
|
004881A3   64FF30                 push    dword ptr fs:[eax]
004881A6   648920                 mov     fs:[eax], esp
004881A9   8B8308030000           mov     eax, [ebx+$0308]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
004881AF   E868D3FFFF             call    0048551C
004881B4   8986160E0300           mov     [esi+$30E16], eax
004881BA   8B8328030000           mov     eax, [ebx+$0328]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
004881C0   E857D3FFFF             call    0048551C
004881C5   8986260E0300           mov     [esi+$30E26], eax
004881CB   8B8318030000           mov     eax, [ebx+$0318]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
004881D1   E846D3FFFF             call    0048551C
004881D6   89861E0E0300           mov     [esi+$30E1E], eax
004881DC   8B8338030000           mov     eax, [ebx+$0338]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
004881E2   E835D3FFFF             call    0048551C
004881E7   89862E0E0300           mov     [esi+$30E2E], eax
004881ED   8B83FC020000           mov     eax, [ebx+$02FC]
004881F3   8B10                   mov     edx, [eax]
004881F5   FF92C8000000           call    dword ptr [edx+$00C8]
004881FB   8886360E0300           mov     [esi+$30E36], al
00488201   8B831C030000           mov     eax, [ebx+$031C]
00488207   8B10                   mov     edx, [eax]
00488209   FF92C8000000           call    dword ptr [edx+$00C8]
0048820F   8886380E0300           mov     [esi+$30E38], al
00488215   8B830C030000           mov     eax, [ebx+$030C]
0048821B   8B10                   mov     edx, [eax]
0048821D   FF92C8000000           call    dword ptr [edx+$00C8]
00488223   8886370E0300           mov     [esi+$30E37], al
00488229   8B832C030000           mov     eax, [ebx+$032C]
0048822F   8B10                   mov     edx, [eax]
00488231   FF92C8000000           call    dword ptr [edx+$00C8]
00488237   8886390E0300           mov     [esi+$30E39], al
0048823D   8B8340030000           mov     eax, [ebx+$0340]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488243   E8D4D2FFFF             call    0048551C
00488248   89861A0E0300           mov     [esi+$30E1A], eax
0048824E   8B8344030000           mov     eax, [ebx+$0344]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488254   E8C3D2FFFF             call    0048551C
00488259   89862A0E0300           mov     [esi+$30E2A], eax
0048825F   8B834C030000           mov     eax, [ebx+$034C]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488265   E8B2D2FFFF             call    0048551C
0048826A   8986220E0300           mov     [esi+$30E22], eax
00488270   8B8354030000           mov     eax, [ebx+$0354]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488276   E8A1D2FFFF             call    0048551C
0048827B   8986320E0300           mov     [esi+$30E32], eax
00488281   8B8370030000           mov     eax, [ebx+$0370]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488287   E890D2FFFF             call    0048551C
0048828C   89863A0E0300           mov     [esi+$30E3A], eax
00488292   8B8380030000           mov     eax, [ebx+$0380]

* Reference to : TTimerSpeedButton._PROC_0048551C()
|
00488298   E87FD2FFFF             call    0048551C
0048829D   89863E0E0300           mov     [esi+$30E3E], eax
004882A3   8B8390030000           mov     eax, [ebx+$0390]
004882A9   8B10                   mov     edx, [eax]
004882AB   FF92C8000000           call    dword ptr [edx+$00C8]
004882B1   8886420E0300           mov     [esi+$30E42], al
004882B7   8D55FC                 lea     edx, [ebp-$04]
004882BA   8B8394030000           mov     eax, [ebx+$0394]

* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
004882C0   E8DFF0FBFF             call    004473A4
004882C5   8B55FC                 mov     edx, [ebp-$04]
004882C8   8D868F0D0300           lea     eax, [esi+$30D8F]

* Reference to: System.@LStrAsg(void;void;void;void);
|
004882CE   E8A5C3F7FF             call    00404678
004882D3   8B8398030000           mov     eax, [ebx+$0398]
004882D9   8B10                   mov     edx, [eax]
004882DB   FF92C8000000           call    dword ptr [edx+$00C8]
004882E1   8886430E0300           mov     [esi+$30E43], al
004882E7   A1E82F4C00             mov     eax, dword ptr [$004C2FE8]
004882EC   8B00                   mov     eax, [eax]

|
004882EE   E8DD440000             call    0048C7D0
004882F3   33D2                   xor     edx, edx
004882F5   8B8378030000           mov     eax, [ebx+$0378]
004882FB   8B08                   mov     ecx, [eax]
004882FD   FF5164                 call    dword ptr [ecx+$64]
00488300   33C0                   xor     eax, eax
00488302   5A                     pop     edx
00488303   59                     pop     ecx
00488304   59                     pop     ecx
00488305   648910                 mov     fs:[eax], edx

****** FINALLY
|
00488308   681D834800             push    $0048831D
0048830D   8D45FC                 lea     eax, [ebp-$04]

* Reference to: System.@LStrClr(void;void);
|
00488310   E80FC3F7FF             call    00404624
00488315   C3                     ret


* Reference to: System.@HandleFinally;
|
00488316   E961BCF7FF             jmp     00403F7C
0048831B   EBF0                   jmp     0048830D

****** END
|
0048831D   5E                     pop     esi
0048831E   5B                     pop     ebx
0048831F   59                     pop     ecx
00488320   5D                     pop     ebp
00488321   C3                     ret

*)
end;

procedure TFrmHookCheck.CheckBoxWalkClick(Sender : TObject);
begin
(*
00488324   53                     push    ebx
00488325   56                     push    esi
00488326   57                     push    edi
00488327   8BF2                   mov     esi, edx
00488329   8BD8                   mov     ebx, eax
0048832B   8BBBFC020000           mov     edi, [ebx+$02FC]
00488331   3BF7                   cmp     esi, edi
00488333   7532                   jnz     00488367
00488335   8BC7                   mov     eax, edi
00488337   8B10                   mov     edx, [eax]
00488339   FF92C8000000           call    dword ptr [edx+$00C8]
0048833F   8BD0                   mov     edx, eax
00488341   8B8308030000           mov     eax, [ebx+$0308]
00488347   8B08                   mov     ecx, [eax]
00488349   FF5164                 call    dword ptr [ecx+$64]
0048834C   8B83FC020000           mov     eax, [ebx+$02FC]
00488352   8B10                   mov     edx, [eax]
00488354   FF92C8000000           call    dword ptr [edx+$00C8]
0048835A   8BD0                   mov     edx, eax
0048835C   8B8340030000           mov     eax, [ebx+$0340]
00488362   8B08                   mov     ecx, [eax]
00488364   FF5164                 call    dword ptr [ecx+$64]
00488367   8BBB1C030000           mov     edi, [ebx+$031C]
0048836D   3BF7                   cmp     esi, edi
0048836F   7532                   jnz     004883A3
00488371   8BC7                   mov     eax, edi
00488373   8B10                   mov     edx, [eax]
00488375   FF92C8000000           call    dword ptr [edx+$00C8]
0048837B   8BD0                   mov     edx, eax
0048837D   8B8328030000           mov     eax, [ebx+$0328]
00488383   8B08                   mov     ecx, [eax]
00488385   FF5164                 call    dword ptr [ecx+$64]
00488388   8B831C030000           mov     eax, [ebx+$031C]
0048838E   8B10                   mov     edx, [eax]
00488390   FF92C8000000           call    dword ptr [edx+$00C8]
00488396   8BD0                   mov     edx, eax
00488398   8B8344030000           mov     eax, [ebx+$0344]
0048839E   8B08                   mov     ecx, [eax]
004883A0   FF5164                 call    dword ptr [ecx+$64]
004883A3   8BBB0C030000           mov     edi, [ebx+$030C]
004883A9   3BF7                   cmp     esi, edi
004883AB   7532                   jnz     004883DF
004883AD   8BC7                   mov     eax, edi
004883AF   8B10                   mov     edx, [eax]
004883B1   FF92C8000000           call    dword ptr [edx+$00C8]
004883B7   8BD0                   mov     edx, eax
004883B9   8B8318030000           mov     eax, [ebx+$0318]
004883BF   8B08                   mov     ecx, [eax]
004883C1   FF5164                 call    dword ptr [ecx+$64]
004883C4   8B830C030000           mov     eax, [ebx+$030C]
004883CA   8B10                   mov     edx, [eax]
004883CC   FF92C8000000           call    dword ptr [edx+$00C8]
004883D2   8BD0                   mov     edx, eax
004883D4   8B834C030000           mov     eax, [ebx+$034C]
004883DA   8B08                   mov     ecx, [eax]
004883DC   FF5164                 call    dword ptr [ecx+$64]
004883DF   8BBB2C030000           mov     edi, [ebx+$032C]
004883E5   3BF7                   cmp     esi, edi
004883E7   7532                   jnz     0048841B
004883E9   8BC7                   mov     eax, edi
004883EB   8B10                   mov     edx, [eax]
004883ED   FF92C8000000           call    dword ptr [edx+$00C8]
004883F3   8BD0                   mov     edx, eax
004883F5   8B8338030000           mov     eax, [ebx+$0338]

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -