Function at 0x41e1ad0
Capabilities:
Contain obfuscated stackstrings

Disassembly:
push ebp
mov ebp, esp
mov ecx, 0x72
push 0
push 0
dec ecx
jne 0x41e1ad8
push ebx
mov ebx, eax
xor eax, eax
push ebp
push 0x41e3174
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebx + 0x760], eax
mov dword [ebx + 0x764], eax
xor eax, eax
mov dword [ebx + 0x750], eax
mov dword [ebx + 0x754], eax
xor eax, eax
mov dword [ebx + 0x768], eax
mov dword [ebx + 0x76c], eax
xor eax, eax
mov dword [ebx + 0x758], eax
mov dword [ebx + 0x75c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x1a0]
mov dword [ebx + 0x5b0], eax
mov eax, dword [ebp - 0x19c]
mov dword [ebx + 0x5b4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x190]
mov dword [ebx + 0x5c0], eax
mov eax, dword [ebp - 0x18c]
mov dword [ebx + 0x5c4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x180]
mov dword [ebx + 0x5d0], eax
mov eax, dword [ebp - 0x17c]
mov dword [ebx + 0x5d4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x170]
mov dword [ebx + 0x5e0], eax
mov eax, dword [ebp - 0x16c]
mov dword [ebx + 0x5e4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x160]
mov dword [ebx + 0x5f0], eax
mov eax, dword [ebp - 0x15c]
mov dword [ebx + 0x5f4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x150]
mov dword [ebx + 0x600], eax
mov eax, dword [ebp - 0x14c]
mov dword [ebx + 0x604], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x140]
mov dword [ebx + 0x610], eax
mov eax, dword [ebp - 0x13c]
mov dword [ebx + 0x614], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x130]
mov dword [ebx + 0x620], eax
mov eax, dword [ebp - 0x12c]
mov dword [ebx + 0x624], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x120]
mov dword [ebx + 0x630], eax
mov eax, dword [ebp - 0x11c]
mov dword [ebx + 0x634], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x110]
mov dword [ebx + 0x640], eax
mov eax, dword [ebp - 0x10c]
mov dword [ebx + 0x644], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x100]
mov dword [ebx + 0x650], eax
mov eax, dword [ebp - 0xfc]
mov dword [ebx + 0x654], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xf0]
mov dword [ebx + 0x660], eax
mov eax, dword [ebp - 0xec]
mov dword [ebx + 0x664], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xe0]
mov dword [ebx + 0x670], eax
mov eax, dword [ebp - 0xdc]
mov dword [ebx + 0x674], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xd0]
mov dword [ebx + 0x680], eax
mov eax, dword [ebp - 0xcc]
mov dword [ebx + 0x684], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xc0]
mov dword [ebx + 0x690], eax
mov eax, dword [ebp - 0xbc]
mov dword [ebx + 0x694], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xb0]
mov dword [ebx + 0x6a0], eax
mov eax, dword [ebp - 0xac]
mov dword [ebx + 0x6a4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xa0]
mov dword [ebx + 0x6b0], eax
mov eax, dword [ebp - 0x9c]
mov dword [ebx + 0x6b4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x90]
mov dword [ebx + 0x6c0], eax
mov eax, dword [ebp - 0x8c]
mov dword [ebx + 0x6c4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x80]
mov dword [ebx + 0x6d0], eax
mov eax, dword [ebp - 0x7c]
mov dword [ebx + 0x6d4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x70]
mov dword [ebx + 0x6e0], eax
mov eax, dword [ebp - 0x6c]
mov dword [ebx + 0x6e4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x60]
mov dword [ebx + 0x6f0], eax
mov eax, dword [ebp - 0x5c]
mov dword [ebx + 0x6f4], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x50]
mov dword [ebx + 0x700], eax
mov eax, dword [ebp - 0x4c]
mov dword [ebx + 0x704], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x40]
mov dword [ebx + 0x710], eax
mov eax, dword [ebp - 0x3c]
mov dword [ebx + 0x714], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x30]
mov dword [ebx + 0x720], eax
mov eax, dword [ebp - 0x2c]
mov dword [ebx + 0x724], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x20]
mov dword [ebx + 0x730], eax
mov eax, dword [ebp - 0x1c]
mov dword [ebx + 0x734], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x10]
mov dword [ebx + 0x740], eax
mov eax, dword [ebp - 0xc]
mov dword [ebx + 0x744], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x198]
mov dword [ebx + 0x5b8], eax
mov eax, dword [ebp - 0x194]
mov dword [ebx + 0x5bc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x188]
mov dword [ebx + 0x5c8], eax
mov eax, dword [ebp - 0x184]
mov dword [ebx + 0x5cc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x178]
mov dword [ebx + 0x5d8], eax
mov eax, dword [ebp - 0x174]
mov dword [ebx + 0x5dc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x168]
mov dword [ebx + 0x5e8], eax
mov eax, dword [ebp - 0x164]
mov dword [ebx + 0x5ec], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x158]
mov dword [ebx + 0x5f8], eax
mov eax, dword [ebp - 0x154]
mov dword [ebx + 0x5fc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x148]
mov dword [ebx + 0x608], eax
mov eax, dword [ebp - 0x144]
mov dword [ebx + 0x60c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x138]
mov dword [ebx + 0x618], eax
mov eax, dword [ebp - 0x134]
mov dword [ebx + 0x61c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x128]
mov dword [ebx + 0x628], eax
mov eax, dword [ebp - 0x124]
mov dword [ebx + 0x62c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x118]
mov dword [ebx + 0x638], eax
mov eax, dword [ebp - 0x114]
mov dword [ebx + 0x63c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x108]
mov dword [ebx + 0x648], eax
mov eax, dword [ebp - 0x104]
mov dword [ebx + 0x64c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xf8]
mov dword [ebx + 0x658], eax
mov eax, dword [ebp - 0xf4]
mov dword [ebx + 0x65c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xe8]
mov dword [ebx + 0x668], eax
mov eax, dword [ebp - 0xe4]
mov dword [ebx + 0x66c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xd8]
mov dword [ebx + 0x678], eax
mov eax, dword [ebp - 0xd4]
mov dword [ebx + 0x67c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xc8]
mov dword [ebx + 0x688], eax
mov eax, dword [ebp - 0xc4]
mov dword [ebx + 0x68c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xb8]
mov dword [ebx + 0x698], eax
mov eax, dword [ebp - 0xb4]
mov dword [ebx + 0x69c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0xa8]
mov dword [ebx + 0x6a8], eax
mov eax, dword [ebp - 0xa4]
mov dword [ebx + 0x6ac], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x98]
mov dword [ebx + 0x6b8], eax
mov eax, dword [ebp - 0x94]
mov dword [ebx + 0x6bc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x88]
mov dword [ebx + 0x6c8], eax
mov eax, dword [ebp - 0x84]
mov dword [ebx + 0x6cc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x78]
mov dword [ebx + 0x6d8], eax
mov eax, dword [ebp - 0x74]
mov dword [ebx + 0x6dc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x68]
mov dword [ebx + 0x6e8], eax
mov eax, dword [ebp - 0x64]
mov dword [ebx + 0x6ec], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x58]
mov dword [ebx + 0x6f8], eax
mov eax, dword [ebp - 0x54]
mov dword [ebx + 0x6fc], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x48]
mov dword [ebx + 0x708], eax
mov eax, dword [ebp - 0x44]
mov dword [ebx + 0x70c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x38]
mov dword [ebx + 0x718], eax
mov eax, dword [ebp - 0x34]
mov dword [ebx + 0x71c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x28]
mov dword [ebx + 0x728], eax
mov eax, dword [ebp - 0x24]
mov dword [ebx + 0x72c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 0x18]
mov dword [ebx + 0x738], eax
mov eax, dword [ebp - 0x14]
mov dword [ebx + 0x73c], eax
lea edx, [ebp - 0x1a0]
mov eax, ebx
call fcn.041e3e68
mov eax, dword [ebp - 8]
mov dword [ebx + 0x748], eax
mov eax, dword [ebp - 4]
mov dword [ebx + 0x74c], eax
mov ecx, ebx
mov dl, 1
mov eax, dword [sym.imp.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg__bctr_qqrp18Classes_TComponent
mov dword [0x42411c8], eax
mov eax, dword [ebx + 0x4cc]
mov edx, dword [eax]
call dword [edx + 0x14c]
mov edx, eax
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_SetMaximum_qqrxi
mov edx, 0x41e3188
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_SetText_qqrx17System_AnsiString
mov eax, dword [0x42411c8]
mov byte [eax + 0x45], 1
xor edx, edx
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_SetValue_qqrxi
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_Show_qqrv
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_First_qqrv
jmp 0x41e2526
call sub.dbrtl60.bpl__Db_TDataSet_Edit_qqrv
mov edx, 0x41e31c0
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
lea edx, [ebp - 0x1a4]
mov ecx, dword [eax]
call dword [ecx + 0x60]
mov eax, dword [ebp - 0x1a4]
mov edx, 0x41e31d4
call sub.rtl60.bpl__System__LStrCmp_qqrv
jne 0x41e23f6
mov edx, 0x41e31e0
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fcomp dword [0x41e31f0]
fnstsw ax
sahf
jbe 0x41e234d
mov edx, 0x41e31e0
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fdiv qword [ebx + 0x730]
fmul dword [0x41e31f4]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41e3200
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov edx, 0x41e3200
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fadd qword [ebx + 0x760]
fstp qword [ebx + 0x760]
wait
mov edx, 0x41e3210
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fcomp dword [0x41e31f0]
fnstsw ax
sahf
jbe 0x41e23cf
mov edx, 0x41e3210
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fdiv qword [ebx + 0x738]
fmul dword [0x41e31f4]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41e322c
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov edx, 0x41e322c
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fadd qword [ebx + 0x768]
fstp qword [ebx + 0x768]
wait
jmp 0x41e24fa
mov edx, 0x41e31e0
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fcomp dword [0x41e31f0]
fnstsw ax
sahf
jbe 0x41e2456
mov edx, 0x41e31e0
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fdiv qword [ebx + 0x740]
fmul dword [0x41e31f4]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41e3200
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov edx, 0x41e3200
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fadd qword [ebx + 0x750]
fstp qword [ebx + 0x750]
wait
mov edx, 0x41e3210
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fcomp dword [0x41e31f0]
fnstsw ax
sahf
jbe 0x41e24d8
mov edx, 0x41e3210
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fdiv qword [ebx + 0x748]
fmul dword [0x41e31f4]
add esp, 0xfffffff8
fstp qword [esp]
wait
mov edx, 0x41e322c
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0xa4]
mov edx, 0x41e322c
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_FieldByName_qqrx17System_AnsiString
mov edx, dword [eax]
call dword [edx + 0x54]
fadd qword [ebx + 0x758]
fstp qword [ebx + 0x758]
wait
mov eax, dword [ebx + 0x4cc]
mov edx, dword [eax]
call dword [edx + 0x248]
mov eax, dword [0x42411c8]
mov edx, dword [eax + 0x38]
inc edx
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_SetValue_qqrxi
mov eax, dword [ebx + 0x4cc]
call sub.dbrtl60.bpl__Db_TDataSet_Next_qqrv
mov eax, dword [ebx + 0x4cc]
cmp byte [eax + 0xa1], 0
je 0x41e22b7
mov eax, dword [0x42411c8]
call sub.JVCL200_R60.bpl__Jvprogressdlg_TJvProgressDlg_Close_qqrv
mov eax, dword [0x42411c8]
call sub.rtl60.bpl__System_TObject_Free_qqrv
mov cl, byte [0x41e3234]
mov edx, 0x41e3240
mov eax, dword [ebx + 0x4cc]
call sub.kbmMemD6Run.bpl__Kbmmemtable_TkbmCustomMemTable_SortOn_qqrx17System_AnsiString65System__Set_t37Kbmmemtable_TkbmMemTableCom
mov edx, dword [ebx + 0x4cc]
mov eax, dword [ebx + 0x300]
call sub.dbrtl60.bpl__Db_TDataSource_SetDataSet_qqrp11Db_TDataSet
lea eax, [ebp - 0x1a8]
push eax
fild dword [ebx + 0x770]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x29c]
xor eax, eax
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x29c]
mov dword [ebp - 0x298], eax
mov byte [ebp - 0x294], 0xb
fld qword [ebx + 0x730]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2a0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2a0]
mov dword [ebp - 0x290], eax
mov byte [ebp - 0x28c], 0xb
fld qword [ebx + 0x760]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2a4]
mov eax, 0x41e3268
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2a4]
mov dword [ebp - 0x288], eax
mov byte [ebp - 0x284], 0xb
fld qword [ebx + 0x5b0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2a8]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2a8]
mov dword [ebp - 0x280], eax
mov byte [ebp - 0x27c], 0xb
fld qword [ebx + 0x5c0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2ac]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2ac]
mov dword [ebp - 0x278], eax
mov byte [ebp - 0x274], 0xb
fld qword [ebx + 0x5d0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2b0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2b0]
mov dword [ebp - 0x270], eax
mov byte [ebp - 0x26c], 0xb
fld qword [ebx + 0x5e0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2b4]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2b4]
mov dword [ebp - 0x268], eax
mov byte [ebp - 0x264], 0xb
fld qword [ebx + 0x5f0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2b8]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2b8]
mov dword [ebp - 0x260], eax
mov byte [ebp - 0x25c], 0xb
fld qword [ebx + 0x600]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2bc]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2bc]
mov dword [ebp - 0x258], eax
mov byte [ebp - 0x254], 0xb
fld qword [ebx + 0x610]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2c0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2c0]
mov dword [ebp - 0x250], eax
mov byte [ebp - 0x24c], 0xb
fld qword [ebx + 0x620]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2c4]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2c4]
mov dword [ebp - 0x248], eax
mov byte [ebp - 0x244], 0xb
fld qword [ebx + 0x630]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2c8]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2c8]
mov dword [ebp - 0x240], eax
mov byte [ebp - 0x23c], 0xb
fld qword [ebx + 0x640]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2cc]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2cc]
mov dword [ebp - 0x238], eax
mov byte [ebp - 0x234], 0xb
fld qword [ebx + 0x650]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2d0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2d0]
mov dword [ebp - 0x230], eax
mov byte [ebp - 0x22c], 0xb
fld qword [ebx + 0x660]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2d4]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2d4]
mov dword [ebp - 0x228], eax
mov byte [ebp - 0x224], 0xb
mov eax, dword [ebx + 0x770]
dec eax
mov dword [ebp - 0x2dc], eax
fild dword [ebp - 0x2dc]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2d8]
xor eax, eax
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2d8]
mov dword [ebp - 0x220], eax
mov byte [ebp - 0x21c], 0xb
fld qword [ebx + 0x738]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2e0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2e0]
mov dword [ebp - 0x218], eax
mov byte [ebp - 0x214], 0xb
fld qword [ebx + 0x768]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2e4]
mov eax, 0x41e3268
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2e4]
mov dword [ebp - 0x210], eax
mov byte [ebp - 0x20c], 0xb
fld qword [ebx + 0x5b8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2e8]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2e8]
mov dword [ebp - 0x208], eax
mov byte [ebp - 0x204], 0xb
fld qword [ebx + 0x5c8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2ec]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2ec]
mov dword [ebp - 0x200], eax
mov byte [ebp - 0x1fc], 0xb
fld qword [ebx + 0x5d8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2f0]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2f0]
mov dword [ebp - 0x1f8], eax
mov byte [ebp - 0x1f4], 0xb
fld qword [ebx + 0x5e8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2f4]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2f4]
mov dword [ebp - 0x1f0], eax
mov byte [ebp - 0x1ec], 0xb
fld qword [ebx + 0x5f8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2f8]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2f8]
mov dword [ebp - 0x1e8], eax
mov byte [ebp - 0x1e4], 0xb
fld qword [ebx + 0x608]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x2fc]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x2fc]
mov dword [ebp - 0x1e0], eax
mov byte [ebp - 0x1dc], 0xb
fld qword [ebx + 0x618]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x300]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x300]
mov dword [ebp - 0x1d8], eax
mov byte [ebp - 0x1d4], 0xb
fld qword [ebx + 0x628]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x304]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x304]
mov dword [ebp - 0x1d0], eax
mov byte [ebp - 0x1cc], 0xb
fld qword [ebx + 0x638]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x308]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x308]
mov dword [ebp - 0x1c8], eax
mov byte [ebp - 0x1c4], 0xb
fld qword [ebx + 0x648]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x30c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x30c]
mov dword [ebp - 0x1c0], eax
mov byte [ebp - 0x1bc], 0xb
fld qword [ebx + 0x658]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x310]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x310]
mov dword [ebp - 0x1b8], eax
mov byte [ebp - 0x1b4], 0xb
fld qword [ebx + 0x668]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x314]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x314]
mov dword [ebp - 0x1b0], eax
mov byte [ebp - 0x1ac], 0xb
lea edx, [ebp - 0x298]
mov ecx, 0x1d
mov eax, 0x41e3274
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov edx, dword [ebp - 0x1a8]
mov eax, dword [ebx + 0x52c]
mov eax, dword [eax + 0x190]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
lea eax, [ebp - 0x318]
push eax
fild dword [ebx + 0x770]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x31c]
xor eax, eax
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x31c]
mov dword [ebp - 0x298], eax
mov byte [ebp - 0x294], 0xb
fld qword [ebx + 0x740]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x320]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x320]
mov dword [ebp - 0x290], eax
mov byte [ebp - 0x28c], 0xb
fld qword [ebx + 0x750]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x324]
mov eax, 0x41e3268
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x324]
mov dword [ebp - 0x288], eax
mov byte [ebp - 0x284], 0xb
fld qword [ebx + 0x670]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x328]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x328]
mov dword [ebp - 0x280], eax
mov byte [ebp - 0x27c], 0xb
fld qword [ebx + 0x680]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x32c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x32c]
mov dword [ebp - 0x278], eax
mov byte [ebp - 0x274], 0xb
fld qword [ebx + 0x690]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x330]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x330]
mov dword [ebp - 0x270], eax
mov byte [ebp - 0x26c], 0xb
fld qword [ebx + 0x6a0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x334]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x334]
mov dword [ebp - 0x268], eax
mov byte [ebp - 0x264], 0xb
fld qword [ebx + 0x6b0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x338]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x338]
mov dword [ebp - 0x260], eax
mov byte [ebp - 0x25c], 0xb
fld qword [ebx + 0x6c0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x33c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x33c]
mov dword [ebp - 0x258], eax
mov byte [ebp - 0x254], 0xb
fld qword [ebx + 0x6d0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x340]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x340]
mov dword [ebp - 0x250], eax
mov byte [ebp - 0x24c], 0xb
fld qword [ebx + 0x6e0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x344]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x344]
mov dword [ebp - 0x248], eax
mov byte [ebp - 0x244], 0xb
fld qword [ebx + 0x6f0]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x348]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x348]
mov dword [ebp - 0x240], eax
mov byte [ebp - 0x23c], 0xb
fld qword [ebx + 0x700]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x34c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x34c]
mov dword [ebp - 0x238], eax
mov byte [ebp - 0x234], 0xb
fld qword [ebx + 0x710]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x350]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x350]
mov dword [ebp - 0x230], eax
mov byte [ebp - 0x22c], 0xb
fld qword [ebx + 0x720]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x354]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x354]
mov dword [ebp - 0x228], eax
mov byte [ebp - 0x224], 0xb
mov eax, dword [ebx + 0x770]
dec eax
mov dword [ebp - 0x2dc], eax
fild dword [ebp - 0x2dc]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x358]
xor eax, eax
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x358]
mov dword [ebp - 0x220], eax
mov byte [ebp - 0x21c], 0xb
fld qword [ebx + 0x748]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x35c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x35c]
mov dword [ebp - 0x218], eax
mov byte [ebp - 0x214], 0xb
fld qword [ebx + 0x758]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x360]
mov eax, 0x41e3268
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x360]
mov dword [ebp - 0x210], eax
mov byte [ebp - 0x20c], 0xb
fld qword [ebx + 0x678]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x364]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x364]
mov dword [ebp - 0x208], eax
mov byte [ebp - 0x204], 0xb
fld qword [ebx + 0x688]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x368]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x368]
mov dword [ebp - 0x200], eax
mov byte [ebp - 0x1fc], 0xb
fld qword [ebx + 0x698]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x36c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x36c]
mov dword [ebp - 0x1f8], eax
mov byte [ebp - 0x1f4], 0xb
fld qword [ebx + 0x6a8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x370]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x370]
mov dword [ebp - 0x1f0], eax
mov byte [ebp - 0x1ec], 0xb
fld qword [ebx + 0x6b8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x374]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x374]
mov dword [ebp - 0x1e8], eax
mov byte [ebp - 0x1e4], 0xb
fld qword [ebx + 0x6c8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x378]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x378]
mov dword [ebp - 0x1e0], eax
mov byte [ebp - 0x1dc], 0xb
fld qword [ebx + 0x6d8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x37c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x37c]
mov dword [ebp - 0x1d8], eax
mov byte [ebp - 0x1d4], 0xb
fld qword [ebx + 0x6e8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x380]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x380]
mov dword [ebp - 0x1d0], eax
mov byte [ebp - 0x1cc], 0xb
fld qword [ebx + 0x6f8]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x384]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x384]
mov dword [ebp - 0x1c8], eax
mov byte [ebp - 0x1c4], 0xb
fld qword [ebx + 0x708]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x388]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x388]
mov dword [ebp - 0x1c0], eax
mov byte [ebp - 0x1bc], 0xb
fld qword [ebx + 0x718]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x38c]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x38c]
mov dword [ebp - 0x1b8], eax
mov byte [ebp - 0x1b4], 0xb
fld qword [ebx + 0x728]
add esp, 0xfffffff4
fstp xword [esp]
wait
lea edx, [ebp - 0x390]
mov eax, 0x41e3258
call sub.rtl60.bpl__Sysutils_FormatFloat_qqrx17System_AnsiStringg
mov eax, dword [ebp - 0x390]
mov dword [ebp - 0x1b0], eax
mov byte [ebp - 0x1ac], 0xb
lea edx, [ebp - 0x298]
mov ecx, 0x1d
mov eax, 0x41e3864
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov edx, dword [ebp - 0x318]
mov eax, dword [ebx + 0x524]
mov eax, dword [eax + 0x190]
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x370]
mov edx, dword [eax]
call dword [edx + 0xc0]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41e317b
lea eax, [ebp - 0x390]
mov edx, 0x2d
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x2d8]
mov edx, 0x10
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
lea eax, [ebp - 0x1a8]
mov edx, 2
call sub.rtl60.bpl__System__LStrArrayClr_qqrpvi
ret