@@PROJECT	C:\Users\John\Desktop\pcode_db\probes\_discovery\clsnew_Date\probe.exe	pcode=True	loaded=True	err=0 
@@FUNC	modProbe	Module	modProbe.Sub Main	401A88
401A88 modProbe.Sub Main:
401A88    04 78FF               FLdRfVar var_88
401A8B    24 0000               NewIfNullPr CThing
401A8E    0D 24000100           VCallHresult CThing.Work
401A93    04 68FF               FLdRfVar var_98
401A96    04 78FF               FLdRfVar var_88
401A99    24 0000               NewIfNullPr CThing
401A9C    0D 28000100           VCallHresult CThing.Prop
401AA1    6F 68FF               FLdFPR8 var_98
401AA4    74 70FF               FStFPR8 var_90
401AA7    04 68FF               FLdRfVar var_98
401AAA    04 78FF               FLdRfVar var_88
401AAD    24 0000               NewIfNullPr CThing
401AB0    0D 30000100           VCallHresult CThing.Fn
401AB5    6F 68FF               FLdFPR8 var_98
401AB8    74 70FF               FStFPR8 var_90
401ABB    14                    ExitProcI4 



Const Pool: 4010E8
Size: 34
Last Offset: 401ABC
RawAddr: 401ABC
ByteCRC: 4D5332C9

ProcDscInfo Dump: (RTMI)
	401ABC   000   &ObjInfo       = 4010B0
	401AC0   004   argSz          = 4
	401AC2   006   FrameSize      = 14
	401AC4   008   ProcSize       = 34
	401AC6   00A   field_A        = 28
	401AC7   00B   DstrctSpecial  = 0
	401AC8   00C   field_C        = 0
	401ACA   00E   erlRelOff      = 0
	401ACC   010   field_10       = 0
	401ACE   012   field_12       = 19
	401AD0   014   field_14       = 0
	401AD2   016   field_16       = 0
Destruct Special
	401AD4   018   frameOwner     = 10
	401AD6   01A   field_1A       = 0
	401AD8   01C   flag           = 0
	401ADA   01E   flag2          = 1
	401ADC   020   unk0           = 0
	401AE0   024   unk1           = FF78
	401AE2   026   unk2           = 3
@@FUNC	CThing	Class	CThing.Work	401AF0
401AF0 CThing.Work: ; Public Sub Work() 
401AF0    6F 74FF               FLdFPR8 var_8C
401AF3    08 0800               FLdPr this
401AF6    92 3C00               MemStFPR8 [pr + 0x3C]
401AF9    08 0800               FLdPr this
401AFC    8D 3C00               MemLdFPR8 [pr + 0x3C]
401AFF    74 74FF               FStFPR8 var_8C
401B02    6F 74FF               FLdFPR8 var_8C
401B05    08 0800               FLdPr this
401B08    92 3400               MemStFPR8 [pr + 0x34]
401B0B    08 0800               FLdPr this
401B0E    8D 3400               MemLdFPR8 [pr + 0x34]
401B11    74 74FF               FStFPR8 var_8C
401B14    F5 01000000           LitI4 0x1
401B19    71 70FF               FStR4 [var_90]
401B1C    6F 74FF               FLdFPR8 var_8C
401B1F    6C 70FF               ILdRf [var_90]
401B22    08 0800               FLdPr this
401B25    06 4800               MemLdRfVar [pr + 0x48]
401B28    A6                    Ary1StFPR8
401B29    6C 70FF               ILdRf [var_90]
401B2C    08 0800               FLdPr this
401B2F    06 4800               MemLdRfVar [pr + 0x48]
401B32    A1                    Ary1LdFPR8
401B33    74 74FF               FStFPR8 var_8C
401B36    04 68FF               FLdRfVar var_98
401B39    08 0800               FLdPr this
401B3C    0D 28000000           VCallHresult CThing.Prop
401B41    6F 68FF               FLdFPR8 var_98
401B44    74 74FF               FStFPR8 var_8C
401B47    6D 74FF               FLdR8 var_8C
401B4A    08 0800               FLdPr this
401B4D    0D 20000000           VCallHresult CThing.var_34_put
401B52    04 68FF               FLdRfVar var_98
401B55    10 30000000           ThisVCallHresult CThing.Fn
401B5A    6F 68FF               FLdFPR8 var_98
401B5D    74 74FF               FStFPR8 var_8C
401B60    10 34000000           ThisVCallHresult CThing.Sb
401B65    08 0800               FLdPr this
401B68    0D 34000000           VCallHresult CThing.Sb
401B6D    13                    ExitProcHresult 
401B6E    db 0 0 8C 


Const Pool: 401204
Size: 80
Last Offset: 401B70
RawAddr: 401B70
ByteCRC: 64E41777

ProcDscInfo Dump: (RTMI)
	401B70   000   &ObjInfo       = 40118C
	401B74   004   argSz          = 4
	401B76   006   FrameSize      = 14
	401B78   008   ProcSize       = 80
	401B7A   00A   field_A        = 24
	401B7B   00B   DstrctSpecial  = 0
	401B7C   00C   field_C        = 0
	401B7E   00E   erlRelOff      = 0
	401B80   010   field_10       = 0
	401B82   012   field_12       = 19
	401B84   014   field_14       = 0
	401B86   016   field_16       = 0
Destruct Special
	401B88   018   frameOwner     = C
	401B8A   01A   field_1A       = 0
	401B8C   01C   flag           = 0
	401B8E   01E   flag2          = 0
	401B90   020   unk0           = 0
	401B94   024   unk1           = C
	401B96   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Prop	4019C8
4019C8 CThing.Prop: ; Public Property Get Prop()  As Date
4019C8    08 0800               FLdPr this
4019CB    8D 3C00               MemLdFPR8 [pr + 0x3C]
4019CE    74 74FF               FStFPR8 var_8C
4019D1    FF2F 0C000800         ExitProcCbHresult copyTo:arg_C sz:0x8 
4019D7    db 0 8C 


Const Pool: 401204
Size: 10
Last Offset: 4019D8
RawAddr: 4019D8
ByteCRC: C13C35DA

ProcDscInfo Dump: (RTMI)
	4019D8   000   &ObjInfo       = 40118C
	4019DC   004   argSz          = 8
	4019DE   006   FrameSize      = 8
	4019E0   008   ProcSize       = 10
	4019E2   00A   field_A        = 24
	4019E3   00B   DstrctSpecial  = 0
	4019E4   00C   field_C        = 0
	4019E6   00E   erlRelOff      = 0
	4019E8   010   field_10       = 0
	4019EA   012   field_12       = 19
	4019EC   014   field_14       = 0
	4019EE   016   field_16       = 0
Destruct Special
	4019F0   018   frameOwner     = C
	4019F2   01A   field_1A       = 0
	4019F4   01C   flag           = 0
	4019F6   01E   flag2          = 0
	4019F8   020   unk0           = 0
	4019FC   024   unk1           = C
	4019FE   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Prop	4018CC
4018CC CThing.Prop: ; Public Property Let Prop(v As Date) 
4018CC    83 0C00               ILdFPR8 arg_C
4018CF    08 0800               FLdPr this
4018D2    92 3C00               MemStFPR8 [pr + 0x3C]
4018D5    13                    ExitProcHresult 
4018D6    db 0 0 8C 


Const Pool: 401204
Size: C
Last Offset: 4018D8
RawAddr: 4018D8
ByteCRC: 1DC237AF

ProcDscInfo Dump: (RTMI)
	4018D8   000   &ObjInfo       = 40118C
	4018DC   004   argSz          = 8
	4018DE   006   FrameSize      = 0
	4018E0   008   ProcSize       = C
	4018E2   00A   field_A        = 24
	4018E3   00B   DstrctSpecial  = 0
	4018E4   00C   field_C        = 0
	4018E6   00E   erlRelOff      = 0
	4018E8   010   field_10       = 0
	4018EA   012   field_12       = 19
	4018EC   014   field_14       = 0
	4018EE   016   field_16       = 0
Destruct Special
	4018F0   018   frameOwner     = C
	4018F2   01A   field_1A       = 0
	4018F4   01C   flag           = 0
	4018F6   01E   flag2          = 0
	4018F8   020   unk0           = 0
	4018FC   024   unk1           = C
	4018FE   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Fn	401908
401908 CThing.Fn: ; Public Function Fn()  As Date
401908    08 0800               FLdPr this
40190B    8D 3C00               MemLdFPR8 [pr + 0x3C]
40190E    74 74FF               FStFPR8 var_8C
401911    FF2F 0C000800         ExitProcCbHresult copyTo:arg_C sz:0x8 
401917    db 0 8C 


Const Pool: 401204
Size: 10
Last Offset: 401918
RawAddr: 401918
ByteCRC: C13C35DA

ProcDscInfo Dump: (RTMI)
	401918   000   &ObjInfo       = 40118C
	40191C   004   argSz          = 8
	40191E   006   FrameSize      = 8
	401920   008   ProcSize       = 10
	401922   00A   field_A        = 24
	401923   00B   DstrctSpecial  = 0
	401924   00C   field_C        = 0
	401926   00E   erlRelOff      = 0
	401928   010   field_10       = 0
	40192A   012   field_12       = 19
	40192C   014   field_14       = 0
	40192E   016   field_16       = 0
Destruct Special
	401930   018   frameOwner     = C
	401932   01A   field_1A       = 0
	401934   01C   flag           = 0
	401936   01E   flag2          = 0
	401938   020   unk0           = 0
	40193C   024   unk1           = C
	40193E   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Proc_401A08	401A08
401A08 CThing.Proc_401A08:
401A08    08 0800               FLdPr this
401A0B    8D 3C00               MemLdFPR8 [pr + 0x3C]
401A0E    74 74FF               FStFPR8 var_8C
401A11    FF2F 0C000800         ExitProcCbHresult copyTo:arg_C sz:0x8 
401A17    db 0 8C 


Const Pool: 401204
Size: 10
Last Offset: 401A18
RawAddr: 401A18
ByteCRC: C13C35DA

ProcDscInfo Dump: (RTMI)
	401A18   000   &ObjInfo       = 40118C
	401A1C   004   argSz          = 8
	401A1E   006   FrameSize      = 8
	401A20   008   ProcSize       = 10
	401A22   00A   field_A        = 24
	401A23   00B   DstrctSpecial  = 0
	401A24   00C   field_C        = 0
	401A26   00E   erlRelOff      = 0
	401A28   010   field_10       = 0
	401A2A   012   field_12       = 19
	401A2C   014   field_14       = 0
	401A2E   016   field_16       = 0
Destruct Special
	401A30   018   frameOwner     = C
	401A32   01A   field_1A       = 0
	401A34   01C   flag           = 0
	401A36   01E   flag2          = 0
	401A38   020   unk0           = 0
	401A3C   024   unk1           = C
	401A3E   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Sb	401988
401988 CThing.Sb: ; Public Sub Sb() 
401988    04 6CFF               FLdRfVar var_94
40198B    10 38000000           ThisVCallHresult CThing.Proc_401A08
401990    6F 6CFF               FLdFPR8 var_94
401993    74 74FF               FStFPR8 var_8C
401996    13                    ExitProcHresult 
401997    db 0 8C 


Const Pool: 401204
Size: 10
Last Offset: 401998
RawAddr: 401998
ByteCRC: 378BC4C5

ProcDscInfo Dump: (RTMI)
	401998   000   &ObjInfo       = 40118C
	40199C   004   argSz          = 4
	40199E   006   FrameSize      = 10
	4019A0   008   ProcSize       = 10
	4019A2   00A   field_A        = 24
	4019A3   00B   DstrctSpecial  = 0
	4019A4   00C   field_C        = 0
	4019A6   00E   erlRelOff      = 0
	4019A8   010   field_10       = 0
	4019AA   012   field_12       = 19
	4019AC   014   field_14       = 0
	4019AE   016   field_16       = 0
Destruct Special
	4019B0   018   frameOwner     = C
	4019B2   01A   field_1A       = 0
	4019B4   01C   flag           = 0
	4019B6   01E   flag2          = 0
	4019B8   020   unk0           = 0
	4019BC   024   unk1           = C
	4019BE   026   unk2           = 0
@@FUNC	CThing	Class	CThing.Proc_401948	401948
401948 CThing.Proc_401948:
401948    08 0800               FLdPr this
40194B    8D 3C00               MemLdFPR8 [pr + 0x3C]
40194E    74 74FF               FStFPR8 var_8C
401951    FF2F 0C000800         ExitProcCbHresult copyTo:arg_C sz:0x8 
401957    db 0 8C 


Const Pool: 401204
Size: 10
Last Offset: 401958
RawAddr: 401958
ByteCRC: C13C35DA

ProcDscInfo Dump: (RTMI)
	401958   000   &ObjInfo       = 40118C
	40195C   004   argSz          = 8
	40195E   006   FrameSize      = 8
	401960   008   ProcSize       = 10
	401962   00A   field_A        = 24
	401963   00B   DstrctSpecial  = 0
	401964   00C   field_C        = 10
	401966   00E   erlRelOff      = 0
	401968   010   field_10       = 0
	40196A   012   field_12       = 19
	40196C   014   field_14       = 0
	40196E   016   field_16       = 0
Destruct Special
	401970   018   frameOwner     = C
	401972   01A   field_1A       = 0
	401974   01C   flag           = 0
	401976   01E   flag2          = 0
	401978   020   unk0           = 0
	40197C   024   unk1           = C
	40197E   026   unk2           = 0
