tjrange.pas

一套反出来的股票分析软件,对于分析程序结构和数据结构有一定的帮助.

0065DF20   9E                     sahf
0065DF21   7653                   jbe     0065DF76
0065DF23   D94620                 fld     dword ptr [esi+$20]
0065DF26   83C4F4                 add     esp, -$0C
0065DF29   DB3C24                 fstp    tbyte ptr [esp]
0065DF2C   9B                     wait
0065DF2D   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DF33   BA02000000             mov     edx, $00000002
0065DF38   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DF3D   E8B593DAFF             call    004072F7
0065DF42   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DF48   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065DF4B   E8C863DAFF             call    00404318
0065DF50   8D8598FEFFFF           lea     eax, [ebp+$FFFFFE98]
0065DF56   B970E26500             mov     ecx, $0065E270
0065DF5B   8B55F4                 mov     edx, [ebp-$0C]

* Reference to: system.@LStrCat3;
|
0065DF5E   E87964DAFF             call    004043DC
0065DF63   8B9598FEFFFF           mov     edx, [ebp+$FFFFFE98]

* Reference to control TfrmQyTJ.Label24 : TLabel
|
0065DF69   8B8374030000           mov     eax, [ebx+$0374]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DF6F   E80CBBDDFF             call    00439A80
0065DF74   EB10                   jmp     0065DF86

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

* Reference to control TfrmQyTJ.Label24 : TLabel
|
0065DF7B   8B8374030000           mov     eax, [ebx+$0374]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DF81   E8FABADDFF             call    00439A80
0065DF86   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DF8C   D86E24                 fsubr   dword ptr [esi+$24]
0065DF8F   D9E1                   fabs
0065DF91   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DF97   DFE0                   fstsw   ax
0065DF99   9E                     sahf
0065DF9A   763D                   jbe     0065DFD9
0065DF9C   D94624                 fld     dword ptr [esi+$24]
0065DF9F   83C4F4                 add     esp, -$0C
0065DFA2   DB3C24                 fstp    tbyte ptr [esp]
0065DFA5   9B                     wait
0065DFA6   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065DFAC   BA02000000             mov     edx, $00000002
0065DFB1   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065DFB6   E83C93DAFF             call    004072F7
0065DFBB   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065DFC1   8D45F4                 lea     eax, [ebp-$0C]

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

* Reference to control TfrmQyTJ.Label25 : TLabel
|
0065DFCC   8B8378030000           mov     eax, [ebx+$0378]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DFD2   E8A9BADDFF             call    00439A80
0065DFD7   EB10                   jmp     0065DFE9

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

* Reference to control TfrmQyTJ.Label25 : TLabel
|
0065DFDE   8B8378030000           mov     eax, [ebx+$0378]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065DFE4   E897BADDFF             call    00439A80
0065DFE9   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065DFEF   D86E28                 fsubr   dword ptr [esi+$28]
0065DFF2   D9E1                   fabs
0065DFF4   D81D24E26500           fcomp   dword ptr [$0065E224]
0065DFFA   DFE0                   fstsw   ax
0065DFFC   9E                     sahf
0065DFFD   763D                   jbe     0065E03C
0065DFFF   D94628                 fld     dword ptr [esi+$28]
0065E002   83C4F4                 add     esp, -$0C
0065E005   DB3C24                 fstp    tbyte ptr [esp]
0065E008   9B                     wait
0065E009   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065E00F   BA02000000             mov     edx, $00000002
0065E014   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065E019   E8D992DAFF             call    004072F7
0065E01E   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065E024   8D45F4                 lea     eax, [ebp-$0C]

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

* Reference to control TfrmQyTJ.Label26 : TLabel
|
0065E02F   8B837C030000           mov     eax, [ebx+$037C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E035   E846BADDFF             call    00439A80
0065E03A   EB10                   jmp     0065E04C

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

* Reference to control TfrmQyTJ.Label26 : TLabel
|
0065E041   8B837C030000           mov     eax, [ebx+$037C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E047   E834BADDFF             call    00439A80
0065E04C   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065E052   D86E2C                 fsubr   dword ptr [esi+$2C]
0065E055   D9E1                   fabs
0065E057   D81D24E26500           fcomp   dword ptr [$0065E224]
0065E05D   DFE0                   fstsw   ax
0065E05F   9E                     sahf
0065E060   763D                   jbe     0065E09F
0065E062   D9462C                 fld     dword ptr [esi+$2C]
0065E065   83C4F4                 add     esp, -$0C
0065E068   DB3C24                 fstp    tbyte ptr [esp]
0065E06B   9B                     wait
0065E06C   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065E072   BA02000000             mov     edx, $00000002
0065E077   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065E07C   E87692DAFF             call    004072F7
0065E081   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065E087   8D45F4                 lea     eax, [ebp-$0C]

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

* Reference to control TfrmQyTJ.Label27 : TLabel
|
0065E092   8B8380030000           mov     eax, [ebx+$0380]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E098   E8E3B9DDFF             call    00439A80
0065E09D   EB10                   jmp     0065E0AF

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

* Reference to control TfrmQyTJ.Label27 : TLabel
|
0065E0A4   8B8380030000           mov     eax, [ebx+$0380]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E0AA   E8D1B9DDFF             call    00439A80
0065E0AF   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065E0B5   D86E30                 fsubr   dword ptr [esi+$30]
0065E0B8   D9E1                   fabs
0065E0BA   D81D24E26500           fcomp   dword ptr [$0065E224]
0065E0C0   DFE0                   fstsw   ax
0065E0C2   9E                     sahf
0065E0C3   7653                   jbe     0065E118
0065E0C5   D94630                 fld     dword ptr [esi+$30]
0065E0C8   83C4F4                 add     esp, -$0C
0065E0CB   DB3C24                 fstp    tbyte ptr [esp]
0065E0CE   9B                     wait
0065E0CF   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065E0D5   BA02000000             mov     edx, $00000002
0065E0DA   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065E0DF   E81392DAFF             call    004072F7
0065E0E4   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065E0EA   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
|
0065E0ED   E82662DAFF             call    00404318
0065E0F2   8D8594FEFFFF           lea     eax, [ebp+$FFFFFE94]
0065E0F8   B970E26500             mov     ecx, $0065E270
0065E0FD   8B55F4                 mov     edx, [ebp-$0C]

* Reference to: system.@LStrCat3;
|
0065E100   E8D762DAFF             call    004043DC
0065E105   8B9594FEFFFF           mov     edx, [ebp+$FFFFFE94]

* Reference to control TfrmQyTJ.Label28 : TLabel
|
0065E10B   8B8384030000           mov     eax, [ebx+$0384]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E111   E86AB9DDFF             call    00439A80
0065E116   EB10                   jmp     0065E128

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

* Reference to control TfrmQyTJ.Label28 : TLabel
|
0065E11D   8B8384030000           mov     eax, [ebx+$0384]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E123   E858B9DDFF             call    00439A80
0065E128   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065E12E   D86E34                 fsubr   dword ptr [esi+$34]
0065E131   D9E1                   fabs
0065E133   D81D24E26500           fcomp   dword ptr [$0065E224]
0065E139   DFE0                   fstsw   ax
0065E13B   9E                     sahf
0065E13C   7622                   jbe     0065E160
0065E13E   D94634                 fld     dword ptr [esi+$34]

* Reference to: system.@TRUNC;
|
0065E141   E8BA4BDAFF             call    00402D00
0065E146   52                     push    edx
0065E147   50                     push    eax
0065E148   8D45F4                 lea     eax, [ebp-$0C]

* Reference to: Unit_00409434.Proc_0040A594
|
0065E14B   E844C4DAFF             call    0040A594
0065E150   8B55F4                 mov     edx, [ebp-$0C]

* Reference to control TfrmQyTJ.Label29 : TLabel
|
0065E153   8B8388030000           mov     eax, [ebx+$0388]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E159   E822B9DDFF             call    00439A80
0065E15E   EB10                   jmp     0065E170

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

* Reference to control TfrmQyTJ.Label29 : TLabel
|
0065E165   8B8388030000           mov     eax, [ebx+$0388]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E16B   E810B9DDFF             call    00439A80
0065E170   DB2D18E26500           fld     tbyte ptr [$0065E218]
0065E176   D86E38                 fsubr   dword ptr [esi+$38]
0065E179   D9E1                   fabs
0065E17B   D81D24E26500           fcomp   dword ptr [$0065E224]
0065E181   DFE0                   fstsw   ax
0065E183   9E                     sahf
0065E184   763D                   jbe     0065E1C3
0065E186   D94638                 fld     dword ptr [esi+$38]
0065E189   83C4F4                 add     esp, -$0C
0065E18C   DB3C24                 fstp    tbyte ptr [esp]
0065E18F   9B                     wait
0065E190   8D8DA8FEFFFF           lea     ecx, [ebp+$FFFFFEA8]
0065E196   BA02000000             mov     edx, $00000002
0065E19B   B804000000             mov     eax, $00000004

* Reference to: system.@Str2Ext;
|
0065E1A0   E85291DAFF             call    004072F7
0065E1A5   8D95A8FEFFFF           lea     edx, [ebp+$FFFFFEA8]
0065E1AB   8D45F4                 lea     eax, [ebp-$0C]

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

* Reference to control TfrmQyTJ.Label30 : TLabel
|
0065E1B6   8B838C030000           mov     eax, [ebx+$038C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E1BC   E8BFB8DDFF             call    00439A80
0065E1C1   EB10                   jmp     0065E1D3

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

* Reference to control TfrmQyTJ.Label30 : TLabel
|
0065E1C8   8B838C030000           mov     eax, [ebx+$038C]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0065E1CE   E8ADB8DDFF             call    00439A80
0065E1D3   33C0                   xor     eax, eax
0065E1D5   5A                     pop     edx
0065E1D6   59                     pop     ecx
0065E1D7   59                     pop     ecx
0065E1D8   648910                 mov     fs:[eax], edx

****** FINALLY
|

* Possible String Reference to: '^[嬪]