frmmega103other.pas

酷鱼下载线源程序

unit FrmMega103other;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  Tmega103otherFrm=class(TForm)
    GroupBox1: N.A.;
    Mode1: N.A.;
    Mode2: N.A.;
    BitBtn1: N.A.;
    BitBtn2: N.A.;
    GroupBox2: N.A.;
    FB6: N.A.;
    FB5: N.A.;
    LB2: N.A.;
    LB1: N.A.;
    FB4: N.A.;
    FB3: N.A.;
    BitBtn3: N.A.;
    Button1: N.A.;
    procedure BitBtn1Click(Sender : TObject);
    procedure Button1Click(Sender : TObject);
    procedure BitBtn3Click(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure FormClose(Sender : TObject);
    procedure _PROC_004EC905(Sender : TObject);
    procedure _PROC_004EC934(Sender : TObject);
    procedure _PROC_004EC93C(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  mega103otherFrm: Tmega103otherFrm;

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

implementation

{$R *.DFM}

procedure Tmega103otherFrm.BitBtn1Click(Sender : TObject);
begin
(*
004EC644   53                     push    ebx
004EC645   56                     push    esi
004EC646   8BD8                   mov     ebx, eax
004EC648   A180725000             mov     eax, dword ptr [$00507280]
004EC64D   8B00                   mov     eax, [eax]
004EC64F   8B8090050000           mov     eax, [eax+$0590]
004EC655   8B10                   mov     edx, [eax]
004EC657   FF5204                 call    dword ptr [edx+$04]
004EC65A   8B83F4020000           mov     eax, [ebx+$02F4]
004EC660   8B10                   mov     edx, [eax]
004EC662   FF92C4000000           call    dword ptr [edx+$00C4]
004EC668   84C0                   test    al, al
004EC66A   741A                   jz      004EC686
004EC66C   6A00                   push    $00
004EC66E   6A00                   push    $00
004EC670   A180725000             mov     eax, dword ptr [$00507280]
004EC675   8B00                   mov     eax, [eax]
004EC677   8B8090050000           mov     eax, [eax+$0590]
004EC67D   B1FD                   mov     cl, $FD
004EC67F   B2AC                   mov     dl, $AC
004EC681   8B30                   mov     esi, [eax]
004EC683   FF5628                 call    dword ptr [esi+$28]
004EC686   8B83F8020000           mov     eax, [ebx+$02F8]
004EC68C   8B10                   mov     edx, [eax]
004EC68E   FF92C4000000           call    dword ptr [edx+$00C4]
004EC694   84C0                   test    al, al
004EC696   741A                   jz      004EC6B2
004EC698   6A00                   push    $00
004EC69A   6A00                   push    $00
004EC69C   A180725000             mov     eax, dword ptr [$00507280]
004EC6A1   8B00                   mov     eax, [eax]
004EC6A3   8B8090050000           mov     eax, [eax+$0590]
004EC6A9   B1F9                   mov     cl, $F9
004EC6AB   B2AC                   mov     dl, $AC
004EC6AD   8B18                   mov     ebx, [eax]
004EC6AF   FF5328                 call    dword ptr [ebx+$28]
004EC6B2   A180725000             mov     eax, dword ptr [$00507280]
004EC6B7   8B00                   mov     eax, [eax]
004EC6B9   8B8090050000           mov     eax, [eax+$0590]
004EC6BF   8B10                   mov     edx, [eax]
004EC6C1   FF5208                 call    dword ptr [edx+$08]

* Possible String Reference to: '命令已完成！'
|
004EC6C4   B8DCC64E00             mov     eax, $004EC6DC

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004EC6C9   E8FE4AF5FF             call    004411CC
004EC6CE   5E                     pop     esi
004EC6CF   5B                     pop     ebx
004EC6D0   C3                     ret

*)
end;

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

|
004EC6EC   E893000000             call    004EC784
004EC6F1   C3                     ret

*)
end;

procedure Tmega103otherFrm.BitBtn3Click(Sender : TObject);
begin
(*
004EC6F4   53                     push    ebx
004EC6F5   56                     push    esi
004EC6F6   8BF0                   mov     esi, eax
004EC6F8   B3BF                   mov     bl, $BF
004EC6FA   8B8608030000           mov     eax, [esi+$0308]
004EC700   8B10                   mov     edx, [eax]
004EC702   FF92C4000000           call    dword ptr [edx+$00C4]
004EC708   84C0                   test    al, al
004EC70A   7403                   jz      004EC70F
004EC70C   80E3F7                 and     bl, $F7
004EC70F   8B8618030000           mov     eax, [esi+$0318]
004EC715   8B10                   mov     edx, [eax]
004EC717   FF92C4000000           call    dword ptr [edx+$00C4]
004EC71D   84C0                   test    al, al
004EC71F   7403                   jz      004EC724
004EC721   80E3FD                 and     bl, $FD
004EC724   8B861C030000           mov     eax, [esi+$031C]
004EC72A   8B10                   mov     edx, [eax]
004EC72C   FF92C4000000           call    dword ptr [edx+$00C4]
004EC732   84C0                   test    al, al
004EC734   7403                   jz      004EC739
004EC736   80E3FE                 and     bl, $FE
004EC739   A180725000             mov     eax, dword ptr [$00507280]
004EC73E   8B00                   mov     eax, [eax]
004EC740   8B8090050000           mov     eax, [eax+$0590]
004EC746   8B10                   mov     edx, [eax]
004EC748   FF5204                 call    dword ptr [edx+$04]
004EC74B   6A00                   push    $00
004EC74D   6A00                   push    $00
004EC74F   A180725000             mov     eax, dword ptr [$00507280]
004EC754   8B00                   mov     eax, [eax]
004EC756   8B8090050000           mov     eax, [eax+$0590]
004EC75C   8BCB                   mov     ecx, ebx
004EC75E   B2AC                   mov     dl, $AC
004EC760   8B18                   mov     ebx, [eax]
004EC762   FF5328                 call    dword ptr [ebx+$28]
004EC765   A180725000             mov     eax, dword ptr [$00507280]
004EC76A   8B00                   mov     eax, [eax]
004EC76C   8B8090050000           mov     eax, [eax+$0590]
004EC772   8B10                   mov     edx, [eax]
004EC774   FF5208                 call    dword ptr [edx+$08]
004EC777   8BC6                   mov     eax, esi

|
004EC779   E806000000             call    004EC784
004EC77E   5E                     pop     esi
004EC77F   5B                     pop     ebx
004EC780   C3                     ret

*)
end;

procedure Tmega103otherFrm.FormCreate(Sender : TObject);
begin
(*
004EC8E0   53                     push    ebx
004EC8E1   8BD8                   mov     ebx, eax
004EC8E3   A180725000             mov     eax, dword ptr [$00507280]
004EC8E8   8B00                   mov     eax, [eax]
004EC8EA   8B8090050000           mov     eax, [eax+$0590]

|
004EC8F0   E8F784FAFF             call    00494DEC
004EC8F5   8BC3                   mov     eax, ebx

|
004EC8F7   E888FEFFFF             call    004EC784
004EC8FC   5B                     pop     ebx
004EC8FD   C3                     ret

*)
end;

procedure Tmega103otherFrm.FormClose(Sender : TObject);
begin
(*
004EC900   C60102                 mov     byte ptr [ecx], $02
004EC903   C3                     ret

*)
end;

procedure Tmega103otherFrm._PROC_004EC905(Sender : TObject);
begin
(*
004EC905   8BEC                   mov     ebp, esp
004EC907   33C0                   xor     eax, eax
004EC909   55                     push    ebp

* Possible String Reference to: '椴y