@@PROJECT	C:\Users\John\Desktop\pcode_db\probes\_discovery\foreach_ctrl\probe.exe	pcode=True	loaded=True	err=0 
@@FUNC	modProbe	Module	modProbe.Sub Main	401BDC
401BDC modProbe.Sub Main:
401BDC    04 74FF               FLdRfVar var_8C
401BDF    05 0000               ImpAdLdRf global_402018
401BE2    24 0100               NewIfNullPr Form1
401BE5    0D 18020200           VCallHresult Form1._Default
401BEA    51 74FF               FLdZeroAd var_8C
401BED    5B 70FF               FStAdFuncNoPop var_90
401BF0    04 78FF               FLdRfVar var_88
401BF3    FE88 6CFF03003000     ForEachCollObj var_94 0x3 loc_401C0C
401BFB    FDCD 6CFF3000         ExitForCollObj var_94 loc_401C0C
401C01    04 78FF               FLdRfVar var_88
401C04    FE8B 6CFF03001F00     NextEachCollObj var_94 0x3 loc_401BFB
401C0C    14                    ExitProcI4 
401C0D    db 0 0 0 8 


Const Pool: 401140
Size: 34
Last Offset: 401C10
RawAddr: 401C10
ByteCRC: 59A68B00

ProcDscInfo Dump: (RTMI)
	401C10   000   &ObjInfo       = 401108
	401C14   004   argSz          = 4
	401C16   006   FrameSize      = 10
	401C18   008   ProcSize       = 34
	401C1A   00A   field_A        = 30
	401C1B   00B   DstrctSpecial  = 0
	401C1C   00C   field_C        = 0
	401C1E   00E   erlRelOff      = 0
	401C20   010   field_10       = 0
	401C22   012   field_12       = 0
	401C24   014   field_14       = 0
	401C26   016   field_16       = 0
Destruct Special
	401C28   018   frameOwner     = 18
	401C2A   01A   field_1A       = 0
	401C2C   01C   flag           = 0
	401C2E   01E   flag2          = 3
	401C30   020   unk0           = 0
	401C34   024   unk1           = FF70
	401C36   026   unk2           = 3
@@FUNC	Form1	Form	Form1.Work	401C50
401C50 Form1.Work: ; Public Sub Work() 
401C50    04 68FF               FLdRfVar var_98
401C53    21                    FLdPrThis
401C54    0F FC02               VCallAd Form1.Text1
401C57    19 6CFF               FStAdFunc var_94
401C5A    08 6CFF               FLdPr var_94
401C5D    0D A0000000           VCallHresult _TextBox Get _Default
401C62    3E 68FF               FLdZeroAd var_98
401C65    31 78FF               FStStr var_88
401C68    1A 6CFF               FFree1Ad var_94
401C6B    1B 0100               LitStr str_40164C='a' 
401C6E    21                    FLdPrThis
401C6F    0F FC02               VCallAd Form1.Text1
401C72    19 6CFF               FStAdFunc var_94
401C75    08 6CFF               FLdPr var_94
401C78    0D A4000000           VCallHresult _TextBox Let _Default
401C7D    1A 6CFF               FFree1Ad var_94
401C80    04 60FF               FLdRfVar var_A0
401C83    04 64FF               FLdRfVar var_9C
401C86    F4 00                 LitI2_Byte 0
401C88    21                    FLdPrThis
401C89    0F 0003               VCallAd Form1.Command1
401C8C    19 6CFF               FStAdFunc var_94
401C8F    08 6CFF               FLdPr var_94
401C92    0D 40000200           VCallHresult {00000000-0000-0000-0000-000000000000}[64]Item
401C97    08 64FF               FLdPr var_9C
401C9A    0D 78000300           VCallHresult _CommandButton Get Width
401C9F    6E 60FF               FLdFPR4 var_A0
401CA2    E8                    CI4R8
401CA3    71 74FF               FStR4 [var_8C]
401CA6    29 0400 [4 bytes]     FFreeAd var_94 var_9C 
401CAD    1B 0400               LitStr str_401674='b' 
401CB0    04 64FF               FLdRfVar var_9C
401CB3    F4 00                 LitI2_Byte 0
401CB5    21                    FLdPrThis
401CB6    0F 0003               VCallAd Form1.Command1
401CB9    19 6CFF               FStAdFunc var_94
401CBC    08 6CFF               FLdPr var_94
401CBF    0D 40000200           VCallHresult {00000000-0000-0000-0000-000000000000}[64]Item
401CC4    08 64FF               FLdPr var_9C
401CC7    0D 54000300           VCallHresult _CommandButton Let Caption
401CCC    29 0400 [4 bytes]     FFreeAd var_94 var_9C 
401CD3    1B 0500               LitStr str_40167C='c' 
401CD6    08 0800               FLdPr this
401CD9    0D 54000600           VCallHresult Form1.Caption
401CDE    04 60FF               FLdRfVar var_A0
401CE1    08 0800               FLdPr this
401CE4    0D 00010600           VCallHresult Form1.ScaleWidth
401CE9    6E 60FF               FLdFPR4 var_A0
401CEC    73 70FF               FStFPR4 var_90
401CEF    1B 0700               LitStr str_401690='x' 
401CF2    F4 02                 LitI2_Byte 2
401CF4    F4 05                 LitI2_Byte 5
401CF6    F4 01                 LitI2_Byte 1
401CF8    1B 0800               LitStr str_401684='hi' 
401CFB    6C 0800               ILdRf [this]
401CFE    FF0D 09001C00         PrintObject
401D04    1B 0700               LitStr str_401690='x' 
401D07    6C 0800               ILdRf [this]
401D0A    FF0D 0A000C00         PrintObject
401D10    21                    FLdPrThis
401D11    0D C4020600           VCallHresult Form1.Cls
401D16    F5 00000000           LitI4 0x0
401D1B    F4 0A                 LitI2_Byte 10
401D1D    EB                    CR8I2
401D1E    37                    PopFPR4
401D1F    F4 0A                 LitI2_Byte 10
401D21    EB                    CR8I2
401D22    37                    PopFPR4
401D23    F4 00                 LitI2_Byte 0
401D25    EB                    CR8I2
401D26    37                    PopFPR4
401D27    F4 00                 LitI2_Byte 0
401D29    EB                    CR8I2
401D2A    37                    PopFPR4
401D2B    F4 04                 LitI2_Byte 4
401D2D    08 0800               FLdPr this
401D30    0D C8020600           VCallHresult Form1.Line
401D35    F4 00                 LitI2_Byte 0
401D37    EB                    CR8I2
401D38    37                    PopFPR4
401D39    F4 00                 LitI2_Byte 0
401D3B    EB                    CR8I2
401D3C    37                    PopFPR4
401D3D    F4 00                 LitI2_Byte 0
401D3F    EB                    CR8I2
401D40    37                    PopFPR4
401D41    F5 00000000           LitI4 0x0
401D46    F4 03                 LitI2_Byte 3
401D48    EB                    CR8I2
401D49    37                    PopFPR4
401D4A    F4 05                 LitI2_Byte 5
401D4C    EB                    CR8I2
401D4D    37                    PopFPR4
401D4E    F4 05                 LitI2_Byte 5
401D50    EB                    CR8I2
401D51    37                    PopFPR4
401D52    F4 00                 LitI2_Byte 0
401D54    08 0800               FLdPr this
401D57    0D C0020600           VCallHresult Form1.Circle
401D5C    F5 00000000           LitI4 0x0
401D61    F4 01                 LitI2_Byte 1
401D63    EB                    CR8I2
401D64    37                    PopFPR4
401D65    F4 01                 LitI2_Byte 1
401D67    EB                    CR8I2
401D68    37                    PopFPR4
401D69    F4 00                 LitI2_Byte 0
401D6B    08 0800               FLdPr this
401D6E    0D D4020600           VCallHresult Form1.PSet
401D73    04 60FF               FLdRfVar var_A0
401D76    F4 01                 LitI2_Byte 1
401D78    EB                    CR8I2
401D79    37                    PopFPR4
401D7A    F4 01                 LitI2_Byte 1
401D7C    EB                    CR8I2
401D7D    37                    PopFPR4
401D7E    21                    FLdPrThis
401D7F    0D D0020600           VCallHresult Form1.Point
401D84    6C 60FF               ILdRf [var_A0]
401D87    71 74FF               FStR4 [var_8C]
401D8A    F5 00000000           LitI4 0x0
401D8F    F4 05                 LitI2_Byte 5
401D91    EB                    CR8I2
401D92    37                    PopFPR4
401D93    F4 05                 LitI2_Byte 5
401D95    EB                    CR8I2
401D96    37                    PopFPR4
401D97    F4 00                 LitI2_Byte 0
401D99    EB                    CR8I2
401D9A    37                    PopFPR4
401D9B    F4 00                 LitI2_Byte 0
401D9D    EB                    CR8I2
401D9E    37                    PopFPR4
401D9F    F4 14                 LitI2_Byte 20
401DA1    08 0800               FLdPr this
401DA4    0D C8020600           VCallHresult Form1.Line
401DA9    04 60FF               FLdRfVar var_A0
401DAC    1B 0100               LitStr str_40164C='a' 
401DAF    21                    FLdPrThis
401DB0    0D E4020600           VCallHresult Form1.TextWidth
401DB5    6E 60FF               FLdFPR4 var_A0
401DB8    73 70FF               FStFPR4 var_90
401DBB    21                    FLdPrThis
401DBC    0F FC02               VCallAd Form1.Text1
401DBF    19 6CFF               FStAdFunc var_94
401DC2    08 6CFF               FLdPr var_94
401DC5    0D 04020000           VCallHresult _TextBox Function SetFocus
401DCA    1A 6CFF               FFree1Ad var_94
401DCD    F5 01000000           LitI4 0x1
401DD2    08 0800               FLdPr this
401DD5    8F 3400               MemStI4 [pr + 0x34]
401DD8    08 0800               FLdPr this
401DDB    8A 3400               MemLdStr [pr + 0x34]
401DDE    71 74FF               FStR4 [var_8C]
401DE1    F5 02000000           LitI4 0x2
401DE6    08 0800               FLdPr this
401DE9    0D FC060B00           VCallHresult Form1.var_34_put
401DEE    21                    FLdPrThis
401DEF    0D B4020600           VCallHresult Form1.Hide
401DF4    6C 0800               ILdRf [this]
401DF7    FD9C 6CFF             FStAdNoPop var_94
401DFB    05 0C00               ImpAdLdRf global_402330
401DFE    24 0D00               NewIfNullPr VBGlobal
401E01    0D 10000E00           VCallHresult VBGlobal Function Unload
401E06    1A 6CFF               FFree1Ad var_94
401E09    13                    ExitProcHresult 
401E0A    db 0 0 E0 


Const Pool: 401758
Size: 1BC
Last Offset: 401E0C
RawAddr: 401E0C
ByteCRC: 351FFDBF

ProcDscInfo Dump: (RTMI)
	401E0C   000   &ObjInfo       = 4016E0
	401E10   004   argSz          = 4
	401E12   006   FrameSize      = 1C
	401E14   008   ProcSize       = 1BC
	401E16   00A   field_A        = 28
	401E17   00B   DstrctSpecial  = 0
	401E18   00C   field_C        = 0
	401E1A   00E   erlRelOff      = 0
	401E1C   010   field_10       = 0
	401E1E   012   field_12       = 19
	401E20   014   field_14       = 0
	401E22   016   field_16       = 0
Destruct Special
	401E24   018   frameOwner     = 10
	401E26   01A   field_1A       = 0
	401E28   01C   flag           = 0
	401E2A   01E   flag2          = 1
	401E2C   020   unk0           = 0
	401E30   024   unk1           = FF78
	401E32   026   unk2           = 1
@@FUNC	Form1	Form	Form1.Form_Load	401B10
401B10 Form1.Form_Load:
401B10    10 00070B00           ThisVCallHresult Form1.Work
401B15    13                    ExitProcHresult 
401B16    db 0 0 E0 


Const Pool: 401758
Size: 8
Last Offset: 401B18
RawAddr: 401B18
ByteCRC: F97C0A42

ProcDscInfo Dump: (RTMI)
	401B18   000   &ObjInfo       = 4016E0
	401B1C   004   argSz          = 4
	401B1E   006   FrameSize      = 0
	401B20   008   ProcSize       = 8
	401B22   00A   field_A        = 24
	401B23   00B   DstrctSpecial  = 0
	401B24   00C   field_C        = 0
	401B26   00E   erlRelOff      = 0
	401B28   010   field_10       = 0
	401B2A   012   field_12       = 19
	401B2C   014   field_14       = 0
	401B2E   016   field_16       = 0
Destruct Special
	401B30   018   frameOwner     = C
	401B32   01A   field_1A       = 0
	401B34   01C   flag           = 0
	401B36   01E   flag2          = 0
	401B38   020   unk0           = 0
	401B3C   024   unk1           = C
	401B3E   026   unk2           = 0
