Function at 0x743a78
Capabilities:
Check for time delay via gettickcount

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffc0
push ebx
push esi
push edi
mov ebx, ecx
mov byte [ebp - 1], dl
mov esi, eax
test ebx, ebx
jbe 0x743aaa
call sub.kernel32.dll_GetTickCount
mov dword [ebp - 0xc], eax
mov eax, 0x3e8
call fcn.0040f23c
call sub.kernel32.dll_GetTickCount
sub eax, dword [ebp - 0xc]
cmp ebx, eax
ja 0x743a94
mov dword [ebp - 8], 0xff
mov ebx, 4
mov edi, 0x1f4
call sub.kernel32.dll_GetTickCount
mov dword [ebp - 0xc], eax
lea eax, [ebp - 0x40]
mov edx, 0x24
call fcn.004024a4
mov dword [ebp - 0x40], 0x24
lea eax, [ebp - 0x40]
push eax
push 5
call sub.shell32.dll_SHAppBarMessage
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_GetMonitor_qqrv
lea edx, [ebp - 0x1c]
call sub.vcl120.bpl__Forms_TMonitor_GetWorkareaRect_qqrv
lea eax, [ebp - 0x30]
push eax
lea eax, [ebp - 0x1c]
push eax
lea eax, [ebp - 0x1c]
push eax
call sub.user32.dll_SubtractRect
xor eax, eax
push ebp
push 0x743c91
push dword fs:[eax]
mov dword fs:[eax], esp
xor edx, edx
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x64]
cmp byte [ebp - 1], 0
je 0x743c66
mov dl, 1
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlend_qqrxo
xor edx, edx
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlendValue_qqrxuc
mov dl, 1
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetVisible_qqro
mov edx, dword [ebp - 0x14]
sub edx, dword [ebp - 0x1c]
sub edx, dword [esi + 0x48]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetLeft_qqri
mov edx, dword [ebp - 0x10]
sub edx, dword [ebp - 0x18]
sub edx, dword [esi + 0x4c]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetTop_qqri
mov eax, dword [esi + 0x378]
mov eax, dword [eax + 0x50]
cmp byte [eax + 0x11], 0
je 0x743c07
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_GetLeft_qqrv
mov edx, eax
mov eax, dword [esi + 0x378]
mov eax, dword [eax + 0x50]
add edx, dword [eax + 0x18]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetLeft_qqri
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_GetTop_qqrv
mov edx, eax
mov eax, dword [esi + 0x378]
mov eax, dword [eax + 0x50]
add edx, dword [eax + 0x20]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetTop_qqri
jmp 0x743c07
mov eax, dword [sym.imp.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl120.bpl__Forms_TApplication_ProcessMessages_qqrv
push 3
call sub.kernel32.dll_Sleep_1
mov edx, ebx
add dl, byte [esi + 0x331]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlendValue_qqrxuc
movzx eax, byte [esi + 0x331]
mov edx, dword [ebp - 8]
sub edx, eax
cmp ebx, edx
jle 0x743be9
movzx eax, byte [esi + 0x331]
mov ebx, dword [ebp - 8]
sub ebx, eax
cmp edi, 0xffffffff
je 0x743c07
call sub.kernel32.dll_GetTickCount
sub eax, dword [ebp - 0xc]
cmp edi, eax
ja 0x743c07
movzx edx, byte [ebp - 8]
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlendValue_qqrxuc
jmp 0x743c78
movzx eax, byte [esi + 0x331]
cmp eax, dword [ebp - 8]
jl 0x743bab
jmp 0x743c78
mov eax, dword [sym.imp.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl120.bpl__Forms_TApplication_ProcessMessages_qqrv
push 3
call sub.kernel32.dll_Sleep_1
movzx edx, byte [esi + 0x331]
sub dl, bl
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlendValue_qqrxuc
movzx eax, byte [esi + 0x331]
cmp ebx, eax
jle 0x743c4a
movzx ebx, byte [esi + 0x331]
cmp edi, 0xffffffff
je 0x743c66
call sub.kernel32.dll_GetTickCount
sub eax, dword [ebp - 0xc]
cmp edi, eax
ja 0x743c66
xor edx, edx
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetAlphaBlendValue_qqrxuc
jmp 0x743c6f
cmp byte [esi + 0x331], 0
ja 0x743c15
xor edx, edx
mov eax, esi
call sub.vcl120.bpl__Forms_TCustomForm_SetVisible_qqro
cmp byte [ebp - 1], 0
je 0x743c87
mov dl, 1
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x64]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x743c9b
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret