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

📄 tjrange.pas

📁 一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.
💻 PAS
📖 第 1 页 / 共 3 页
字号:
0065DC62   D94604                 fld     dword ptr [esi+$04]
0065DC65   83C4F4                 add     esp, -$0C
0065DC68   DB3C24                 fstp    tbyte ptr [esp]
0065DC6B   9B                     wait
0065DC6C   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DC72   BA02000000             mov     edx, $00000002
0065DC77   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DC7C   E87696DAFF             call    004072F7
0065DC81   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DC87   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DC8A   E88966DAFF             call    00404318
0065DC8F   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label17 : TLabel
|
0065DC92   8B8358030000           mov     eax, [ebx+$0358]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DC98   E8E3BDDDFF             call    00439A80
0065DC9D   EB10                   jmp     0065DCAF

* Possible String Reference to: '--'
|
0065DC9F   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label17 : TLabel
|
0065DCA4   8B8358030000           mov     eax, [ebx+$0358]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DCAA   E8D1BDDDFF             call    00439A80
0065DCAF   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DCB5   D86E08                 fsubr   dword ptr [esi+$08]
0065DCB8   D9E1                   fabs
0065DCBA   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DCC0   DFE0                   fstsw   ax
0065DCC2   9E                     sahf
0065DCC3   763D                   jbe     0065DD02
0065DCC5   D94608                 fld     dword ptr [esi+$08]
0065DCC8   83C4F4                 add     esp, -$0C
0065DCCB   DB3C24                 fstp    tbyte ptr [esp]
0065DCCE   9B                     wait
0065DCCF   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DCD5   BA02000000             mov     edx, $00000002
0065DCDA   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DCDF   E81396DAFF             call    004072F7
0065DCE4   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DCEA   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DCED   E82666DAFF             call    00404318
0065DCF2   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label18 : TLabel
|
0065DCF5   8B835C030000           mov     eax, [ebx+$035C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DCFB   E880BDDDFF             call    00439A80
0065DD00   EB10                   jmp     0065DD12

* Possible String Reference to: '--'
|
0065DD02   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label18 : TLabel
|
0065DD07   8B835C030000           mov     eax, [ebx+$035C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DD0D   E86EBDDDFF             call    00439A80
0065DD12   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DD18   D86E0C                 fsubr   dword ptr [esi+$0C]
0065DD1B   D9E1                   fabs
0065DD1D   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DD23   DFE0                   fstsw   ax
0065DD25   9E                     sahf
0065DD26   763D                   jbe     0065DD65
0065DD28   D9460C                 fld     dword ptr [esi+$0C]
0065DD2B   83C4F4                 add     esp, -$0C
0065DD2E   DB3C24                 fstp    tbyte ptr [esp]
0065DD31   9B                     wait
0065DD32   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DD38   BA02000000             mov     edx, $00000002
0065DD3D   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DD42   E8B095DAFF             call    004072F7
0065DD47   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DD4D   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DD50   E8C365DAFF             call    00404318
0065DD55   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label19 : TLabel
|
0065DD58   8B8360030000           mov     eax, [ebx+$0360]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DD5E   E81DBDDDFF             call    00439A80
0065DD63   EB10                   jmp     0065DD75

* Possible String Reference to: '--'
|
0065DD65   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label19 : TLabel
|
0065DD6A   8B8360030000           mov     eax, [ebx+$0360]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DD70   E80BBDDDFF             call    00439A80
0065DD75   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DD7B   D86E10                 fsubr   dword ptr [esi+$10]
0065DD7E   D9E1                   fabs
0065DD80   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DD86   DFE0                   fstsw   ax
0065DD88   9E                     sahf
0065DD89   763D                   jbe     0065DDC8
0065DD8B   D94610                 fld     dword ptr [esi+$10]
0065DD8E   83C4F4                 add     esp, -$0C
0065DD91   DB3C24                 fstp    tbyte ptr [esp]
0065DD94   9B                     wait
0065DD95   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DD9B   BA02000000             mov     edx, $00000002
0065DDA0   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DDA5   E84D95DAFF             call    004072F7
0065DDAA   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DDB0   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DDB3   E86065DAFF             call    00404318
0065DDB8   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label20 : TLabel
|
0065DDBB   8B8364030000           mov     eax, [ebx+$0364]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DDC1   E8BABCDDFF             call    00439A80
0065DDC6   EB10                   jmp     0065DDD8

* Possible String Reference to: '--'
|
0065DDC8   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label20 : TLabel
|
0065DDCD   8B8364030000           mov     eax, [ebx+$0364]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DDD3   E8A8BCDDFF             call    00439A80
0065DDD8   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DDDE   D86E14                 fsubr   dword ptr [esi+$14]
0065DDE1   D9E1                   fabs
0065DDE3   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DDE9   DFE0                   fstsw   ax
0065DDEB   9E                     sahf
0065DDEC   7638                   jbe     0065DE26
0065DDEE   D94614                 fld     dword ptr [esi+$14]

* Reference to: system.@TRUNC;
|
0065DDF1   E80A4FDAFF             call    00402D00
0065DDF6   52                     push    edx
0065DDF7   50                     push    eax
0065DDF8   8D85A4FEFFFF           lea     eax, [ebp+$FFFFFEA4]

* Reference to: Unit_00409434.Proc_0040A594
|
0065DDFE   E891C7DAFF             call    0040A594
0065DE03   8B95A4FEFFFF           mov     edx, [ebp+$FFFFFEA4]
0065DE09   8D45F4                 lea     eax, [ebp-$0C]

* Possible String Reference to: '手'
|
0065DE0C   B958E26500             mov     ecx, $0065E258

* Reference to: system.@LStrCat3;
|
0065DE11   E8C665DAFF             call    004043DC
0065DE16   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label21 : TLabel
|
0065DE19   8B8368030000           mov     eax, [ebx+$0368]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DE1F   E85CBCDDFF             call    00439A80
0065DE24   EB10                   jmp     0065DE36

* Possible String Reference to: '--'
|
0065DE26   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label21 : TLabel
|
0065DE2B   8B8368030000           mov     eax, [ebx+$0368]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DE31   E84ABCDDFF             call    00439A80
0065DE36   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DE3C   D86E18                 fsubr   dword ptr [esi+$18]
0065DE3F   D9E1                   fabs
0065DE41   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DE47   DFE0                   fstsw   ax
0065DE49   9E                     sahf
0065DE4A   7638                   jbe     0065DE84
0065DE4C   D94618                 fld     dword ptr [esi+$18]

* Reference to: system.@TRUNC;
|
0065DE4F   E8AC4EDAFF             call    00402D00
0065DE54   52                     push    edx
0065DE55   50                     push    eax
0065DE56   8D85A0FEFFFF           lea     eax, [ebp+$FFFFFEA0]

* Reference to: Unit_00409434.Proc_0040A594
|
0065DE5C   E833C7DAFF             call    0040A594
0065DE61   8B95A0FEFFFF           mov     edx, [ebp+$FFFFFEA0]
0065DE67   8D45F4                 lea     eax, [ebp-$0C]

* Possible String Reference to: '万'
|
0065DE6A   B964E26500             mov     ecx, $0065E264

* Reference to: system.@LStrCat3;
|
0065DE6F   E86865DAFF             call    004043DC
0065DE74   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label22 : TLabel
|
0065DE77   8B836C030000           mov     eax, [ebx+$036C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DE7D   E8FEBBDDFF             call    00439A80
0065DE82   EB10                   jmp     0065DE94

* Possible String Reference to: '--'
|
0065DE84   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label22 : TLabel
|
0065DE89   8B836C030000           mov     eax, [ebx+$036C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DE8F   E8ECBBDDFF             call    00439A80
0065DE94   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DE9A   D86E1C                 fsubr   dword ptr [esi+$1C]
0065DE9D   D9E1                   fabs
0065DE9F   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DEA5   DFE0                   fstsw   ax
0065DEA7   9E                     sahf
0065DEA8   7653                   jbe     0065DEFD
0065DEAA   D9461C                 fld     dword ptr [esi+$1C]
0065DEAD   83C4F4                 add     esp, -$0C
0065DEB0   DB3C24                 fstp    tbyte ptr [esp]
0065DEB3   9B                     wait
0065DEB4   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DEBA   BA02000000             mov     edx, $00000002
0065DEBF   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DEC4   E82E94DAFF             call    004072F7
0065DEC9   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DECF   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DED2   E84164DAFF             call    00404318
0065DED7   8D859CFEFFFF           lea     eax, [ebp+$FFFFFE9C]
0065DEDD   B970E26500             mov     ecx, $0065E270
0065DEE2   8B55F4                 mov     edx, [ebp-$0C]

* Reference to: system.@LStrCat3;
|
0065DEE5   E8F264DAFF             call    004043DC
0065DEEA   8B959CFEFFFF           mov     edx, [ebp+$FFFFFE9C]

* Reference to control TfrmQyTJ.Label23 : TLabel
|
0065DEF0   8B8370030000           mov     eax, [ebx+$0370]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DEF6   E885BBDDFF             call    00439A80
0065DEFB   EB10                   jmp     0065DF0D

* Possible String Reference to: '--'
|
0065DEFD   BA4CE26500             mov     edx, $0065E24C

* Reference to control TfrmQyTJ.Label23 : TLabel
|
0065DF02   8B8370030000           mov     eax, [ebx+$0370]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DF08   E873BBDDFF             call    00439A80
0065DF0D   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DF13   D86E20                 fsubr   dword ptr [esi+$20]
0065DF16   D9E1                   fabs
0065DF18   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DF1E   DFE0                   fstsw   ax

⌨️ 快捷键说明

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