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

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x20
mov eax, dword [0x4f5568]
xor eax, ebp
mov dword [ebp - 4], eax
mov eax, dword [ebp + 8]
mov dword [ebp - 0x18], eax
mov eax, dword [0x503ba4]
push ebx
mov ebx, dword [0x502b9c]
inc eax
mov dword [ebp - 0x1c], edx
mov dword [ebp - 0x20], ebx
mov dword [0x503ba4], eax
push esi
push edi
cmp eax, 1
jne 0x4a62fa
push 0
call fcn.004ad568
xor eax, 0xbb40e64e
push eax
call fcn.004ad558
add esp, 8
mov ecx, ebx
call fcn.004a6230
mov dword [ebp - 0x14], 0
call fcn.004ad537
mov ecx, dword [0x54eb14]
mov ebx, eax
mov esi, dword [0x584048]
mov eax, ecx
mov edx, dword [0x54eb1c]
mov edi, edx
sar ebx, 7
and edi, 0xfffd
and ebx, 0xff
shr ecx, 8
xor eax, ebx
or edi, 2
and eax, 0xff
xor ecx, dword [esi + eax*4]
movzx eax, cl
add eax, dword [0x54eb18]
imul eax, eax, 0x8088405
mov dword [0x54eb14], ecx
mov ecx, dword [ebp - 0x14]
inc eax
mov dword [0x54eb18], eax
shr eax, 0x18
xor eax, edx
shr edx, 8
and eax, 0xff
xor edx, dword [esi + eax*4]
mov eax, edi
xor eax, 1
mov dword [0x54eb1c], edx
imul eax, edi
shr eax, 8
xor al, bl
mov byte [ebp + ecx - 0x10], al
inc ecx
mov dword [ebp - 0x14], ecx
cmp ecx, 0xa
jl 0x4a6308
mov ecx, dword [ebp - 0x20]
call fcn.004a6230
xor eax, eax
mov dword [ebp - 0x14], eax
movzx edi, byte [ebp + eax - 0x10]
mov ecx, dword [0x54eb14]
mov eax, edi
xor eax, ecx
mov edx, dword [0x54eb1c]
and eax, 0xff
shr ecx, 8
push dword [ebp - 0x18]
mov ebx, edx
and ebx, 0xfffd
xor ecx, dword [esi + eax*4]
or ebx, 2
movzx eax, cl
add eax, dword [0x54eb18]
imul eax, eax, 0x8088405
mov dword [0x54eb14], ecx
inc eax
mov dword [0x54eb18], eax
shr eax, 0x18
xor eax, edx
shr edx, 8
and eax, 0xff
xor edx, dword [esi + eax*4]
mov eax, ebx
xor eax, 1
mov dword [0x54eb1c], edx
imul eax, ebx
shr eax, 8
and eax, 0xff
xor eax, edi
push eax
call fcn.004b3669
mov eax, dword [ebp - 0x14]
add esp, 8
inc eax
mov dword [ebp - 0x14], eax
cmp eax, 0xa
jge 0x4a6434
mov esi, dword [0x584048]
jmp 0x4a63a3
mov ebx, dword [ebp - 0x1c]
mov ecx, dword [0x54eb14]
mov edx, dword [0x584048]
mov esi, dword [0x54eb1c]
mov edi, esi
shr ebx, 0x10
and edi, 0xfffd
mov eax, ebx
or edi, 2
xor eax, ecx
shr ecx, 8
and eax, 0xff
push dword [ebp - 0x18]
xor ecx, dword [edx + eax*4]
movzx eax, cl
add eax, dword [0x54eb18]
imul eax, eax, 0x8088405
mov dword [0x54eb14], ecx
mov ecx, edi
xor ecx, 1
imul ecx, edi
mov edi, dword [ebp - 0x1c]
inc eax
mov dword [0x54eb18], eax
shr eax, 0x18
xor eax, esi
shr esi, 8
and eax, 0xff
xor esi, dword [edx + eax*4]
mov eax, edi
shr eax, 8
xor ecx, eax
mov dword [0x54eb1c], esi
shr ecx, 8
and ecx, 0xff
push ecx
call fcn.004b3669
mov eax, dword [0x54eb14]
mov ecx, dword [0x584048]
mov edx, dword [0x54eb1c]
mov esi, edx
shr edi, 0x18
and esi, 0xfffd
xor edi, eax
or esi, 2
shr eax, 8
and edi, 0xff
push dword [ebp - 0x18]
xor eax, dword [ecx + edi*4]
mov dword [0x54eb14], eax
movzx eax, al
add eax, dword [0x54eb18]
imul eax, eax, 0x8088405
inc eax
mov dword [0x54eb18], eax
shr eax, 0x18
xor eax, edx
shr edx, 8
and eax, 0xff
xor edx, dword [ecx + eax*4]
mov eax, esi
xor eax, 1
mov dword [0x54eb1c], edx
imul eax, esi
and eax, 0xff00
xor eax, ebx
shr eax, 8
push eax
call fcn.004b3669
mov ecx, dword [ebp - 4]
add esp, 0x10
xor ecx, ebp
pop edi
pop esi
pop ebx
call fcn.004aca59
mov esp, ebp
pop ebp
ret