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

📄 frm90can128other.pas

📁 酷鱼下载线源程序
💻 PAS
📖 第 1 页 / 共 2 页
字号:
|
004EA733   B850A74E00             mov     eax, $004EA750

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004EA738   E88F6AF5FF             call    004411CC
004EA73D   8BC6                   mov     eax, esi

|
004EA73F   E8DC040000             call    004EAC20
004EA744   5E                     pop     esi
004EA745   5B                     pop     ebx
004EA746   C3                     ret

*)
end;

procedure Tat90can128otherFrm.Button5Click(Sender : TObject);
begin
(*

|
004EA75C   E83F060000             call    004EADA0
004EA761   C3                     ret

*)
end;

procedure Tat90can128otherFrm.Button6Click(Sender : TObject);
begin
(*
004EA764   53                     push    ebx
004EA765   56                     push    esi
004EA766   8BF0                   mov     esi, eax
004EA768   B3FF                   mov     bl, $FF
004EA76A   8B8648030000           mov     eax, [esi+$0348]
004EA770   8B10                   mov     edx, [eax]
004EA772   FF92C4000000           call    dword ptr [edx+$00C4]
004EA778   84C0                   test    al, al
004EA77A   7403                   jz      004EA77F
004EA77C   80E37F                 and     bl, $7F
004EA77F   8B864C030000           mov     eax, [esi+$034C]
004EA785   8B10                   mov     edx, [eax]
004EA787   FF92C4000000           call    dword ptr [edx+$00C4]
004EA78D   84C0                   test    al, al
004EA78F   7403                   jz      004EA794
004EA791   80E3BF                 and     bl, $BF
004EA794   8B8650030000           mov     eax, [esi+$0350]
004EA79A   8B10                   mov     edx, [eax]
004EA79C   FF92C4000000           call    dword ptr [edx+$00C4]
004EA7A2   84C0                   test    al, al
004EA7A4   7403                   jz      004EA7A9
004EA7A6   80E3DF                 and     bl, $DF
004EA7A9   8B8654030000           mov     eax, [esi+$0354]
004EA7AF   8B10                   mov     edx, [eax]
004EA7B1   FF92C4000000           call    dword ptr [edx+$00C4]
004EA7B7   84C0                   test    al, al
004EA7B9   7403                   jz      004EA7BE
004EA7BB   80E3EF                 and     bl, $EF
004EA7BE   8B8658030000           mov     eax, [esi+$0358]
004EA7C4   8B10                   mov     edx, [eax]
004EA7C6   FF92C4000000           call    dword ptr [edx+$00C4]
004EA7CC   84C0                   test    al, al
004EA7CE   7403                   jz      004EA7D3
004EA7D0   80E3F7                 and     bl, $F7
004EA7D3   8B865C030000           mov     eax, [esi+$035C]
004EA7D9   8B10                   mov     edx, [eax]
004EA7DB   FF92C4000000           call    dword ptr [edx+$00C4]
004EA7E1   84C0                   test    al, al
004EA7E3   7403                   jz      004EA7E8
004EA7E5   80E3FB                 and     bl, $FB
004EA7E8   8B8660030000           mov     eax, [esi+$0360]
004EA7EE   8B10                   mov     edx, [eax]
004EA7F0   FF92C4000000           call    dword ptr [edx+$00C4]
004EA7F6   84C0                   test    al, al
004EA7F8   7403                   jz      004EA7FD
004EA7FA   80E3FD                 and     bl, $FD
004EA7FD   8B8664030000           mov     eax, [esi+$0364]
004EA803   8B10                   mov     edx, [eax]
004EA805   FF92C4000000           call    dword ptr [edx+$00C4]
004EA80B   84C0                   test    al, al
004EA80D   7403                   jz      004EA812
004EA80F   80E3FE                 and     bl, $FE
004EA812   A180725000             mov     eax, dword ptr [$00507280]
004EA817   8B00                   mov     eax, [eax]
004EA819   8B8090050000           mov     eax, [eax+$0590]
004EA81F   8B10                   mov     edx, [eax]
004EA821   FF5204                 call    dword ptr [edx+$04]
004EA824   6A00                   push    $00
004EA826   53                     push    ebx
004EA827   A180725000             mov     eax, dword ptr [$00507280]
004EA82C   8B00                   mov     eax, [eax]
004EA82E   8B8090050000           mov     eax, [eax+$0590]
004EA834   B1A0                   mov     cl, $A0
004EA836   B2AC                   mov     dl, $AC
004EA838   8B18                   mov     ebx, [eax]
004EA83A   FF5328                 call    dword ptr [ebx+$28]
004EA83D   A180725000             mov     eax, dword ptr [$00507280]
004EA842   8B00                   mov     eax, [eax]
004EA844   8B8090050000           mov     eax, [eax+$0590]
004EA84A   8B10                   mov     edx, [eax]
004EA84C   FF5208                 call    dword ptr [edx+$08]

* Possible String Reference to: '命令完成!'
|
004EA84F   B86CA84E00             mov     eax, $004EA86C

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004EA854   E87369F5FF             call    004411CC
004EA859   8BC6                   mov     eax, esi

|
004EA85B   E840050000             call    004EADA0
004EA860   5E                     pop     esi
004EA861   5B                     pop     ebx
004EA862   C3                     ret

*)
end;

procedure Tat90can128otherFrm.Button8Click(Sender : TObject);
begin
(*

|
004EA878   E8A3060000             call    004EAF20
004EA87D   C3                     ret

*)
end;

procedure Tat90can128otherFrm.Button9Click(Sender : TObject);
begin
(*
004EA880   53                     push    ebx
004EA881   56                     push    esi
004EA882   8BF0                   mov     esi, eax
004EA884   B3FF                   mov     bl, $FF
004EA886   8B8690030000           mov     eax, [esi+$0390]
004EA88C   8B10                   mov     edx, [eax]
004EA88E   FF92C4000000           call    dword ptr [edx+$00C4]
004EA894   84C0                   test    al, al
004EA896   7403                   jz      004EA89B
004EA898   80E3F7                 and     bl, $F7
004EA89B   8B868C030000           mov     eax, [esi+$038C]
004EA8A1   8B10                   mov     edx, [eax]
004EA8A3   FF92C4000000           call    dword ptr [edx+$00C4]
004EA8A9   84C0                   test    al, al
004EA8AB   7403                   jz      004EA8B0
004EA8AD   80E3FB                 and     bl, $FB
004EA8B0   8B8674030000           mov     eax, [esi+$0374]
004EA8B6   8B10                   mov     edx, [eax]
004EA8B8   FF92C4000000           call    dword ptr [edx+$00C4]
004EA8BE   84C0                   test    al, al
004EA8C0   7403                   jz      004EA8C5
004EA8C2   80E3FD                 and     bl, $FD
004EA8C5   8B8678030000           mov     eax, [esi+$0378]
004EA8CB   8B10                   mov     edx, [eax]
004EA8CD   FF92C4000000           call    dword ptr [edx+$00C4]
004EA8D3   84C0                   test    al, al
004EA8D5   7403                   jz      004EA8DA
004EA8D7   80E3FE                 and     bl, $FE
004EA8DA   A180725000             mov     eax, dword ptr [$00507280]
004EA8DF   8B00                   mov     eax, [eax]
004EA8E1   8B8090050000           mov     eax, [eax+$0590]
004EA8E7   8B10                   mov     edx, [eax]
004EA8E9   FF5204                 call    dword ptr [edx+$04]
004EA8EC   6A00                   push    $00
004EA8EE   53                     push    ebx
004EA8EF   A180725000             mov     eax, dword ptr [$00507280]
004EA8F4   8B00                   mov     eax, [eax]
004EA8F6   8B8090050000           mov     eax, [eax+$0590]
004EA8FC   B1A4                   mov     cl, $A4
004EA8FE   B2AC                   mov     dl, $AC
004EA900   8B18                   mov     ebx, [eax]
004EA902   FF5328                 call    dword ptr [ebx+$28]
004EA905   A180725000             mov     eax, dword ptr [$00507280]
004EA90A   8B00                   mov     eax, [eax]
004EA90C   8B8090050000           mov     eax, [eax+$0590]
004EA912   8B10                   mov     edx, [eax]
004EA914   FF5208                 call    dword ptr [edx+$08]

* Possible String Reference to: '命令完成!'
|
004EA917   B834A94E00             mov     eax, $004EA934

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004EA91C   E8AB68F5FF             call    004411CC
004EA921   8BC6                   mov     eax, esi

|
004EA923   E8F8050000             call    004EAF20
004EA928   5E                     pop     esi
004EA929   5B                     pop     ebx
004EA92A   C3                     ret

*)
end;

procedure Tat90can128otherFrm.Button7Click(Sender : TObject);
begin
(*
004EA940   55                     push    ebp
004EA941   8BEC                   mov     ebp, esp
004EA943   6A00                   push    $00
004EA945   6A00                   push    $00
004EA947   53                     push    ebx
004EA948   33C0                   xor     eax, eax
004EA94A   55                     push    ebp
004EA94B   68DAA94E00             push    $004EA9DA

***** TRY
|
004EA950   64FF30                 push    dword ptr fs:[eax]
004EA953   648920                 mov     fs:[eax], esp
004EA956   A180725000             mov     eax, dword ptr [$00507280]
004EA95B   8B00                   mov     eax, [eax]
004EA95D   8B8090050000           mov     eax, [eax+$0590]
004EA963   8B10                   mov     edx, [eax]
004EA965   FF5204                 call    dword ptr [edx+$04]
004EA968   6A00                   push    $00
004EA96A   6A00                   push    $00
004EA96C   A180725000             mov     eax, dword ptr [$00507280]
004EA971   8B00                   mov     eax, [eax]
004EA973   8B8090050000           mov     eax, [eax+$0590]
004EA979   33C9                   xor     ecx, ecx
004EA97B   B238                   mov     dl, $38
004EA97D   8B18                   mov     ebx, [eax]
004EA97F   FF5328                 call    dword ptr [ebx+$28]
004EA982   8BD8                   mov     ebx, eax
004EA984   A180725000             mov     eax, dword ptr [$00507280]
004EA989   8B00                   mov     eax, [eax]
004EA98B   8B8090050000           mov     eax, [eax+$0590]
004EA991   8B10                   mov     edx, [eax]
004EA993   FF5208                 call    dword ptr [edx+$08]
004EA996   8D4DF8                 lea     ecx, [ebp-$08]
004EA999   33C0                   xor     eax, eax
004EA99B   8AC3                   mov     al, bl
004EA99D   BA02000000             mov     edx, $00000002

* Reference to: SysUtils.IntToHex(Integer;Integer):AnsiString;overload;
|
004EA9A2   E831ECF1FF             call    004095D8
004EA9A7   8B4DF8                 mov     ecx, [ebp-$08]
004EA9AA   8D45FC                 lea     eax, [ebp-$04]

* Possible String Reference to: '校准字节(Calibration Byte)值为:: 0
|                                x'
|
004EA9AD   BAF0A94E00             mov     edx, $004EA9F0

* Reference to: System.@LStrCat3;
|
004EA9B2   E869A3F1FF             call    00404D20
004EA9B7   8B45FC                 mov     eax, [ebp-$04]

* Reference to: Dialogs.ShowMessage(AnsiString);
|
004EA9BA   E80D68F5FF             call    004411CC
004EA9BF   33C0                   xor     eax, eax
004EA9C1   5A                     pop     edx
004EA9C2   59                     pop     ecx
004EA9C3   59                     pop     ecx
004EA9C4   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '[YY]

⌨️ 快捷键说明

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