📄 ifggzs.pas
字号:
0061A8F7 8BB3D0020000 mov esi, [ebx+$02D0]
0061A8FD 85F6 test esi, esi
0061A8FF 741A jz 0061A91B
0061A901 8B06 mov eax, [esi]
* Reference to: Unit_00767B88.Proc_00768060
|
0061A903 E858D71400 call 00768060
0061A908 663BF8 cmp di, ax
0061A90B 750E jnz 0061A91B
0061A90D 8BC3 mov eax, ebx
* Reference to : TFrmInfoGgZs._PROC_0061A944()
|
0061A90F E830000000 call 0061A944
0061A914 8BC3 mov eax, ebx
* Reference to : TFrmInfoGgZs._PROC_0061ACA8()
|
0061A916 E88D030000 call 0061ACA8
0061A91B 5F pop edi
0061A91C 5E pop esi
0061A91D 5B pop ebx
0061A91E C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A920(Sender : TObject);
begin
(*
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A920 83B8D802000000 cmp dword ptr [eax+$02D8], +$00
0061A927 7405 jz 0061A92E
* Reference to : TFrmInfoGgZs.Proc_0061AC08()
|
0061A929 E8DA020000 call 0061AC08
0061A92E C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A930(Sender : TObject);
begin
(*
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A930 83B8D802000000 cmp dword ptr [eax+$02D8], +$00
0061A937 7405 jz 0061A93E
* Reference to : TFrmInfoGgZs.Proc_0061AC00()
|
0061A939 E8C2020000 call 0061AC00
0061A93E C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A940(Sender : TObject);
begin
(*
0061A940 C3 ret
*)
end;
procedure TFrmInfoGgZs._PROC_0061A944(Sender : TObject);
begin
(*
0061A944 53 push ebx
0061A945 56 push esi
0061A946 57 push edi
0061A947 83C4CC add esp, -$34
0061A94A 8BD8 mov ebx, eax
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A94C 83BBD802000000 cmp dword ptr [ebx+$02D8], +$00
0061A953 0F847D020000 jz 0061ABD6
* Reference to pointer to GlobalVar_0078CF18
|
0061A959 A1E8D07700 mov eax, dword ptr [$0077D0E8]
0061A95E 8B00 mov eax, [eax]
* Reference to: Unit_0075E474.Proc_0075E5B8
|
0061A960 E8533C1400 call 0075E5B8
0061A965 84C0 test al, al
0061A967 757E jnz 0061A9E7
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A969 8BB3D0020000 mov esi, [ebx+$02D0]
0061A96F 85F6 test esi, esi
0061A971 7456 jz 0061A9C9
0061A973 8B06 mov eax, [esi]
* Reference to: Unit_00767B88.Proc_00767F18
|
0061A975 E89ED51400 call 00767F18
0061A97A 8B4041 mov eax, [eax+$41]
0061A97D 89442404 mov [esp+$04], eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A981 8B83D0020000 mov eax, [ebx+$02D0]
0061A987 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00767F18
|
0061A989 E88AD51400 call 00767F18
0061A98E 8B403D mov eax, [eax+$3D]
0061A991 89442408 mov [esp+$08], eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A995 8B83D0020000 mov eax, [ebx+$02D0]
0061A99B 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00767F18
|
0061A99D E876D51400 call 00767F18
0061A9A2 8B80C9000000 mov eax, [eax+$00C9]
* Reference to field TFrmInfoGgZs.OFFS_0310
|
0061A9A8 898310030000 mov [ebx+$0310], eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061A9AE 8B83D0020000 mov eax, [ebx+$02D0]
0061A9B4 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00767F18
|
0061A9B6 E85DD51400 call 00767F18
0061A9BB 8B80CD000000 mov eax, [eax+$00CD]
* Reference to field TFrmInfoGgZs.OFFS_0314
|
0061A9C1 898314030000 mov [ebx+$0314], eax
0061A9C7 EB4A jmp 0061AA13
0061A9C9 33C0 xor eax, eax
0061A9CB 89442404 mov [esp+$04], eax
0061A9CF 33C0 xor eax, eax
0061A9D1 89442408 mov [esp+$08], eax
0061A9D5 33C0 xor eax, eax
* Reference to field TFrmInfoGgZs.OFFS_0310
|
0061A9D7 898310030000 mov [ebx+$0310], eax
0061A9DD 33C0 xor eax, eax
* Reference to field TFrmInfoGgZs.OFFS_0314
|
0061A9DF 898314030000 mov [ebx+$0314], eax
0061A9E5 EB2C jmp 0061AA13
* Reference to field TFrmInfoGgZs.OFFS_0310
|
0061A9E7 8D8310030000 lea eax, [ebx+$0310]
0061A9ED 50 push eax
* Reference to field TFrmInfoGgZs.OFFS_0314
|
0061A9EE 8D8314030000 lea eax, [ebx+$0314]
0061A9F4 50 push eax
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061A9F5 8B83D8020000 mov eax, [ebx+$02D8]
* Reference to class TCmdtTickSlot
|
0061A9FB 8B15F4E47600 mov edx, [$0076E4F4]
* Reference to: system.@AsClass;
|
0061AA01 E8568ADEFF call 0040345C
0061AA06 8D4C2410 lea ecx, [esp+$10]
0061AA0A 8D54240C lea edx, [esp+$0C]
* Reference to: Unit_0076E494.Proc_0076F778
|
0061AA0E E8654D1500 call 0076F778
* Reference to field TFrmInfoGgZs.OFFS_0308
|
0061AA13 8BB308030000 mov esi, [ebx+$0308]
* Reference to control TFrmInfoGgZs.PaintBox1 : TPaintBox
|
0061AA19 8BBBE0020000 mov edi, [ebx+$02E0]
0061AA1F 8B473C mov eax, [edi+$3C]
0061AA22 50 push eax
0061AA23 8D442418 lea eax, [esp+$18]
0061AA27 50 push eax
0061AA28 8B4F38 mov ecx, [edi+$38]
0061AA2B 33D2 xor edx, edx
0061AA2D 33C0 xor eax, eax
* Reference to: Classes.Proc_00413328
|
0061AA2F E8F488DFFF call 00413328
0061AA34 6A02 push $02
0061AA36 8D442418 lea eax, [esp+$18]
0061AA3A 50 push eax
* Reference to THJ32Main instance
|
0061AA3B A158D37700 mov eax, dword ptr [$0077D358]
0061AA40 8B00 mov eax, [eax]
* Reference to: forms.TCustomForm.GetActiveMDIChild(TCustomForm):TForm;
|
0061AA42 E8F18EE3FF call 00453938
* Reference to: controls.TWinControl.GetHandle(TWinControl):HWND;
|
0061AA47 E83C53E2FF call 0043FD88
0061AA4C 50 push eax
0061AA4D 8BC3 mov eax, ebx
* Reference to: controls.TWinControl.GetHandle(TWinControl):HWND;
|
0061AA4F E83453E2FF call 0043FD88
0061AA54 50 push eax
* Reference to: user32.MapWindowPoints()
|
0061AA55 E89EE1DEFF call 00408BF8
0061AA5A 8D542414 lea edx, [esp+$14]
0061AA5E 8BC6 mov eax, esi
* Reference to: Unit_0061EA74.Proc_0061ED2C
|
0061AA60 E8C7420000 call 0061ED2C
* Reference to control TFrmInfoGgZs.PaintBox1 : TPaintBox
|
0061AA65 8B83E0020000 mov eax, [ebx+$02E0]
* Reference to field TPaintBox.Canvas : TCanvas
|
0061AA6B 8B9020010000 mov edx, [eax+$0120]
0061AA71 8BC6 mov eax, esi
* Reference to: Unit_0061EA74.Proc_0061ED24
|
0061AA73 E8AC420000 call 0061ED24
0061AA78 8B442404 mov eax, [esp+$04]
0061AA7C 50 push eax
* Reference to field TFrmInfoGgZs.OFFS_032C
|
0061AA7D 8D832C030000 lea eax, [ebx+$032C]
0061AA83 50 push eax
0061AA84 8B4C2410 mov ecx, [esp+$10]
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061AA88 8B93D0020000 mov edx, [ebx+$02D0]
0061AA8E 8BC6 mov eax, esi
* Reference to: Unit_0061EA74.Proc_00620AA8
|
0061AA90 E813600000 call 00620AA8
* Reference to field TFrmInfoGgZs.OFFS_031D : Byte
|
0061AA95 80BB1D03000000 cmp byte ptr [ebx+$031D], $00
0061AA9C 7507 jnz 0061AAA5
0061AA9E 8BC6 mov eax, esi
* Reference to: Unit_0061EA74.Proc_0061EDA0
|
0061AAA0 E8FB420000 call 0061EDA0
0061AAA5 33C0 xor eax, eax
0061AAA7 8944240C mov [esp+$0C], eax
0061AAAB 33C0 xor eax, eax
* Reference to field TFrmInfoGgZs.OFFS_0318
|
0061AAAD 898318030000 mov [ebx+$0318], eax
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061AAB3 8BB3D0020000 mov esi, [ebx+$02D0]
0061AAB9 85F6 test esi, esi
0061AABB 0F8405010000 jz 0061ABC6
0061AAC1 8B06 mov eax, [esi]
* Reference to: Unit_00767B88.Proc_00767F20
|
0061AAC3 E858D41400 call 00767F20
0061AAC8 85C0 test eax, eax
0061AACA 0F84F6000000 jz 0061ABC6
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061AAD0 8B83D0020000 mov eax, [ebx+$02D0]
0061AAD6 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00767F20
|
0061AAD8 E843D41400 call 00767F20
0061AADD 8B4010 mov eax, [eax+$10]
0061AAE0 89442424 mov [esp+$24], eax
0061AAE4 33C0 xor eax, eax
0061AAE6 89442428 mov [esp+$28], eax
0061AAEA DF6C2424 fild qword ptr [esp+$24]
0061AAEE D91C24 fstp dword ptr [esp]
0061AAF1 9B wait
0061AAF2 33C0 xor eax, eax
0061AAF4 89442410 mov [esp+$10], eax
0061AAF8 DB2DE0AB6100 fld tbyte ptr [$0061ABE0]
0061AAFE D82C24 fsubr dword ptr [esp]
0061AB01 D81DECAB6100 fcomp dword ptr [$0061ABEC]
0061AB07 DFE0 fstsw ax
0061AB09 9E sahf
0061AB0A 0F86B6000000 jbe 0061ABC6
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061AB10 8B83D8020000 mov eax, [ebx+$02D8]
0061AB16 8B780C mov edi, [eax+$0C]
0061AB19 8B7010 mov esi, [eax+$10]
0061AB1C 2BF7 sub esi, edi
0061AB1E 7C54 jl 0061AB74
0061AB20 46 inc esi
* Reference to field TFrmInfoGgZs.OFFS_02D8
|
0061AB21 8B83D8020000 mov eax, [ebx+$02D8]
* Reference to class TCmdtTickSlot
|
0061AB27 8B15F4E47600 mov edx, [$0076E4F4]
* Reference to: system.@AsClass;
|
0061AB2D E82A89DEFF call 0040345C
0061AB32 8D4C240C lea ecx, [esp+$0C]
0061AB36 8BD7 mov edx, edi
* Reference to: Unit_0076E494.Proc_0076EAD4
|
0061AB38 E8973F1500 call 0076EAD4
0061AB3D 8BD0 mov edx, eax
0061AB3F 85D2 test edx, edx
0061AB41 742D jz 0061AB70
0061AB43 8B4A08 mov ecx, [edx+$08]
0061AB46 894C2424 mov [esp+$24], ecx
0061AB4A 33C0 xor eax, eax
0061AB4C 89442428 mov [esp+$28], eax
0061AB50 DF6C2424 fild qword ptr [esp+$24]
0061AB54 D90424 fld dword ptr [esp]
0061AB57 D80DF0AB6100 fmul dword ptr [$0061ABF0]
0061AB5D DEF9 fdivp st(1), st(0)
0061AB5F DB2DF4AB6100 fld tbyte ptr [$0061ABF4]
0061AB65 DED9 fcompp
0061AB67 DFE0 fstsw ax
0061AB69 9E sahf
0061AB6A 7304 jnb 0061AB70
0061AB6C 014C2410 add [esp+$10], ecx
0061AB70 47 inc edi
0061AB71 4E dec esi
0061AB72 75AD jnz 0061AB21
* Reference to field TFrmInfoGgZs.OFFS_02D0
|
0061AB74 8B83D0020000 mov eax, [ebx+$02D0]
0061AB7A 8B00 mov eax, [eax]
* Reference to: Unit_00767B88.Proc_00767F18
|
0061AB7C E897D31400 call 00767F18
0061AB81 83781F00 cmp dword ptr [eax+$1F], +$00
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -