frmat89s8253.pas

酷鱼下载线源程序

unit Frmat89s8253;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  Tat89s8253otherFrm=class(TForm)
    BitBtn2: N.A.;
    GroupBox1: N.A.;
    lb1: N.A.;
    lb2: N.A.;
    lb3: N.A.;
    GroupBox2: N.A.;
    f3: N.A.;
    f2: N.A.;
    f1: N.A.;
    Button1: N.A.;
    Button2: N.A.;
    Button3: N.A.;
    Button4: N.A.;
    procedure FormCreate(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure Button3Click(Sender : TObject);
    procedure Button2Click(Sender : TObject);
    procedure Button4Click(Sender : TObject);
    procedure FormClose(Sender : TObject);
    procedure _PROC_004F00D0(Sender : TObject);
    procedure _PROC_004F0190(Sender : TObject);
    procedure _PROC_004F03BD(Sender : TObject);
    procedure _PROC_004F03EC(Sender : TObject);
    procedure _PROC_004F03F4(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  at89s8253otherFrm: Tat89s8253otherFrm;

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

implementation

{$R *.DFM}

procedure Tat89s8253otherFrm.FormCreate(Sender : TObject);
begin
(*
004F00A8   53                     push    ebx
004F00A9   8BD8                   mov     ebx, eax
004F00AB   A180725000             mov     eax, dword ptr [$00507280]
004F00B0   8B00                   mov     eax, [eax]
004F00B2   8B8090050000           mov     eax, [eax+$0590]

|
004F00B8   E82F4DFAFF             call    00494DEC
004F00BD   8BC3                   mov     eax, ebx

* Reference to : Tat89s8253otherFrm._PROC_004F00D0()
|
004F00BF   E80C000000             call    004F00D0
004F00C4   8BC3                   mov     eax, ebx

* Reference to : Tat89s8253otherFrm._PROC_004F0190()
|
004F00C6   E8C5000000             call    004F0190
004F00CB   5B                     pop     ebx
004F00CC   C3                     ret

*)
end;

procedure Tat89s8253otherFrm.Button1Click(Sender : TObject);
begin
(*

* Reference to : Tat89s8253otherFrm._PROC_004F00D0()
|
004F0250   E87BFEFFFF             call    004F00D0
004F0255   C3                     ret

*)
end;

procedure Tat89s8253otherFrm.Button3Click(Sender : TObject);
begin
(*

* Reference to : Tat89s8253otherFrm._PROC_004F0190()
|
004F0258   E833FFFFFF             call    004F0190
004F025D   C3                     ret

*)
end;

procedure Tat89s8253otherFrm.Button2Click(Sender : TObject);
begin
(*
004F0260   53                     push    ebx
004F0261   56                     push    esi
004F0262   8BF0                   mov     esi, eax
004F0264   B3E7                   mov     bl, $E7
004F0266   8B8608030000           mov     eax, [esi+$0308]
004F026C   8B10                   mov     edx, [eax]
004F026E   FF92C4000000           call    dword ptr [edx+$00C4]
004F0274   84C0                   test    al, al
004F0276   7403                   jz      004F027B
004F0278   80E3FB                 and     bl, $FB
004F027B   8B860C030000           mov     eax, [esi+$030C]
004F0281   8B10                   mov     edx, [eax]
004F0283   FF92C4000000           call    dword ptr [edx+$00C4]
004F0289   84C0                   test    al, al
004F028B   7403                   jz      004F0290
004F028D   80E3FD                 and     bl, $FD
004F0290   8B8610030000           mov     eax, [esi+$0310]
004F0296   8B10                   mov     edx, [eax]
004F0298   FF92C4000000           call    dword ptr [edx+$00C4]
004F029E   84C0                   test    al, al
004F02A0   7403                   jz      004F02A5
004F02A2   80E3FE                 and     bl, $FE
004F02A5   A180725000             mov     eax, dword ptr [$00507280]
004F02AA   8B00                   mov     eax, [eax]
004F02AC   8B8090050000           mov     eax, [eax+$0590]
004F02B2   8B10                   mov     edx, [eax]
004F02B4   FF5204                 call    dword ptr [edx+$04]
004F02B7   6A00                   push    $00
004F02B9   6A00                   push    $00
004F02BB   A180725000             mov     eax, dword ptr [$00507280]
004F02C0   8B00                   mov     eax, [eax]
004F02C2   8B8090050000           mov     eax, [eax+$0590]
004F02C8   8BCB                   mov     ecx, ebx
004F02CA   B2AC                   mov     dl, $AC
004F02CC   8B18                   mov     ebx, [eax]
004F02CE   FF5328                 call    dword ptr [ebx+$28]
004F02D1   A180725000             mov     eax, dword ptr [$00507280]
004F02D6   8B00                   mov     eax, [eax]
004F02D8   8B8090050000           mov     eax, [eax+$0590]
004F02DE   8B10                   mov     edx, [eax]
004F02E0   FF5208                 call    dword ptr [edx+$08]

* Possible String Reference to: '命令完成！'
|
004F02E3   B800034F00             mov     eax, $004F0300

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004F02E8   E8DF0EF5FF             call    004411CC
004F02ED   8BC6                   mov     eax, esi

* Reference to : Tat89s8253otherFrm._PROC_004F00D0()
|
004F02EF   E8DCFDFFFF             call    004F00D0
004F02F4   5E                     pop     esi
004F02F5   5B                     pop     ebx
004F02F6   C3                     ret

*)
end;

procedure Tat89s8253otherFrm.Button4Click(Sender : TObject);
begin
(*
004F030C   53                     push    ebx
004F030D   56                     push    esi
004F030E   8BF0                   mov     esi, eax
004F0310   B38F                   mov     bl, $8F
004F0312   8B8608030000           mov     eax, [esi+$0308]
004F0318   8B10                   mov     edx, [eax]
004F031A   FF92C4000000           call    dword ptr [edx+$00C4]
004F0320   84C0                   test    al, al
004F0322   7403                   jz      004F0327
004F0324   80E3FB                 and     bl, $FB
004F0327   8B860C030000           mov     eax, [esi+$030C]
004F032D   8B10                   mov     edx, [eax]
004F032F   FF92C4000000           call    dword ptr [edx+$00C4]
004F0335   84C0                   test    al, al
004F0337   7403                   jz      004F033C
004F0339   80E3FD                 and     bl, $FD
004F033C   8B8610030000           mov     eax, [esi+$0310]
004F0342   8B10                   mov     edx, [eax]
004F0344   FF92C4000000           call    dword ptr [edx+$00C4]
004F034A   84C0                   test    al, al
004F034C   7403                   jz      004F0351
004F034E   80E3FE                 and     bl, $FE
004F0351   A180725000             mov     eax, dword ptr [$00507280]
004F0356   8B00                   mov     eax, [eax]
004F0358   8B8090050000           mov     eax, [eax+$0590]