Function at 0x4603d0
Capabilities:
Encode data using xor
Generate random numbers using the delphi lcg

Disassembly:
push ebp
mov ebp, esp
sub esp, 0xc
push ebx
mov ebx, dword [ebp + 8]
mov dword [ebp - 4], 0
push esi
test ebx, ebx
je 0x4606f5
mov esi, dword [ebx + 0xe0]
test esi, esi
je 0x4606f5
cmp dword [esi], 0
jne 0x46040a
pop esi
mov eax, 0xffffff9c
pop ebx
mov esp, ebp
pop ebp
ret 0xc
mov ecx, dword [ebp + 0x10]
push edi
test ecx, ecx
je 0x4606ea
mov eax, dword [ebp + 0xc]
mov edi, dword [esi + 8]
mov edx, edi
mov dword [esi + 0x10], eax
xor eax, eax
add edx, dword [esi + 0x78]
mov dword [ebp + 0x10], 0
adc eax, dword [esi + 0x7c]
mov dword [esi + 0x14], ecx
cmp dword [ebp + 0x10], eax
jb 0x46044f
ja 0x46043e
cmp ecx, edx
jbe 0x46044f
cmp dword [esi + 0xc8], 0
je 0x46044f
mov ecx, dword [esi + 0x78]
add ecx, edi
mov dword [esi + 0x14], ecx
test ecx, ecx
je 0x4606de
test edi, edi
jne 0x4605a9
mov ecx, dword [esi + 0x7c]
mov eax, dword [esi + 0x78]
test ecx, ecx
jne 0x460471
test eax, eax
je 0x4605a9
mov edi, 0x4000
test ecx, ecx
ja 0x46048a
jb 0x460480
cmp eax, edi
jae 0x46048a
mov edi, eax
test edi, edi
je 0x4606ea
mov ecx, dword [esi + 0xc0]
add ecx, dword [esi + 0x40]
mov eax, dword [esi + 0xc4]
adc eax, dword [esi + 0x44]
push 0
push eax
push ecx
push dword [esi + 0xb4]
lea eax, [esi + 0x88]
push eax
call fcn.00462630
add esp, 0x14
test eax, eax
jne 0x4606c7
mov eax, dword [esi + 0x8c]
push edi
push dword [esi]
push dword [esi + 0xb4]
push dword [esi + 0xa4]
call eax
add esp, 0x10
cmp eax, edi
jne 0x4606c7
cmp dword [ebx + 0xe4], 0
je 0x460593
xor ecx, ecx
mov dword [ebp + 0x10], ecx
test edi, edi
je 0x460593
nop dword [eax]
mov edx, dword [ebx + 0xf4]
add ecx, dword [esi]
and edx, 0xfffd
or edx, 2
mov eax, edx
xor eax, 1
imul eax, edx
shr eax, 8
xor byte [ecx], al
mov bl, byte [ecx]
mov eax, dword [ebp + 8]
mov edx, dword [eax + 0xf8]
mov ecx, dword [eax + 0xec]
movsx eax, bl
xor eax, ecx
shr ecx, 8
movzx eax, al
xor ecx, dword [edx + eax*4]
mov eax, dword [ebp + 8]
mov dword [eax + 0xec], ecx
movzx eax, cl
mov ecx, dword [ebp + 8]
add eax, dword [ecx + 0xf0]
imul eax, eax, 0x8088405
inc eax
mov dword [ecx + 0xf0], eax
mov ecx, dword [ecx + 0xf4]
shr eax, 0x18
xor eax, ecx
shr ecx, 8
movzx eax, al
xor ecx, dword [edx + eax*4]
mov eax, dword [ebp + 8]
mov dword [eax + 0xf4], ecx
mov ecx, dword [ebp + 0x10]
mov eax, dword [esi]
mov byte [ecx + eax], bl
inc ecx
mov ebx, dword [ebp + 8]
mov dword [ebp + 0x10], ecx
cmp ecx, edi
jb 0x460500
add dword [esi + 0x40], edi
mov eax, dword [esi]
adc dword [esi + 0x44], 0
sub dword [esi + 0x78], edi
mov dword [esi + 4], eax
sbb dword [esi + 0x7c], 0
mov dword [esi + 8], edi
mov eax, dword [esi + 0xb8]
test eax, eax
je 0x46064f
cmp dword [esi + 0xc8], 0
jne 0x46064f
cmp eax, 0xc
je 0x4606b9
mov eax, dword [esi + 0x18]
mov dword [ebp + 0x10], eax
mov eax, dword [esi + 0x10]
mov dword [ebp - 8], eax
lea eax, [esi + 4]
push 2
push eax
call fcn.00460710
mov dword [ebp + 0xc], eax
test eax, eax
js 0x4605fa
cmp dword [esi + 0x1c], 0
mov ecx, 0xfffffffd
cmovne eax, ecx
mov dword [ebp + 0xc], eax
mov edi, dword [esi + 0x18]
xor ebx, ebx
mov dword [ebp - 0xc], edi
sub edi, dword [ebp + 0x10]
push edi
push dword [ebp - 8]
sbb ebx, ebx
add dword [esi + 0x68], edi
push dword [esi + 0x70]
adc dword [esi + 0x6c], ebx
call fcn.00462330
sub dword [esi + 0x80], edi
mov ecx, dword [ebp - 4]
sbb dword [esi + 0x84], ebx
mov dword [esi + 0x70], eax
mov eax, dword [ebp - 0xc]
sub eax, dword [ebp + 0x10]
add ecx, eax
mov eax, dword [ebp + 0xc]
mov dword [ebp - 4], ecx
cmp eax, 1
je 0x4606d3
test eax, eax
je 0x4606b6
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 0xc
test edi, edi
jne 0x46065f
mov eax, dword [esi + 0x78]
or eax, dword [esi + 0x7c]
je 0x4606de
mov ebx, dword [esi + 0x14]
cmp ebx, edi
cmovae ebx, edi
xor edx, edx
test ebx, ebx
je 0x460681
nop dword [eax]
mov eax, dword [esi + 4]
mov ecx, dword [esi + 0x10]
mov al, byte [edx + eax]
mov byte [edx + ecx], al
inc edx
cmp edx, ebx
jb 0x460670
add dword [esi + 0x68], ebx
push ebx
push dword [esi + 0x10]
adc dword [esi + 0x6c], 0
push dword [esi + 0x70]
call fcn.00462330
sub dword [esi + 0x80], ebx
mov dword [esi + 0x70], eax
sbb dword [esi + 0x84], 0
sub dword [esi + 8], ebx
sub dword [esi + 0x14], ebx
add dword [esi + 0x10], ebx
add dword [esi + 4], ebx
add dword [esi + 0x18], ebx
add dword [ebp - 4], ebx
mov edi, dword [esi + 8]
cmp dword [esi + 0x14], 0
jbe 0x4606de
mov ebx, dword [ebp + 8]
jmp 0x460457
pop edi
pop esi
or eax, 0xffffffff
pop ebx
mov esp, ebp
pop ebp
ret 0xc
pop edi
pop esi
mov eax, ecx
pop ebx
mov esp, ebp
pop ebp
ret 0xc
mov eax, dword [ebp - 4]
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 0xc
pop edi
pop esi
xor eax, eax
pop ebx
mov esp, ebp
pop ebp
ret 0xc
pop esi
mov eax, 0xffffff9a
pop ebx
mov esp, ebp
pop ebp
ret 0xc