Function at 0x4220c44
Capabilities:
Encode data using xor

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffee8
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0xc], ebx
mov dword [ebp - 0x118], ebx
mov dword [ebp - 4], ecx
mov esi, edx
mov ebx, eax
mov edi, dword [ebp + 8]
xor eax, eax
push ebp
push 0x4221048
push dword fs:[eax]
mov dword fs:[eax], esp
mov edx, 1
mov eax, ebx
call fcn.04220944
test al, al
jne 0x4220cd0
lea eax, [ebp - 0xc]
push eax
lea edx, [ebp - 0x114]
mov eax, dword [ebx]
call sub.rtl60.bpl__System_TObject_ClassName_qqrp17System_TMetaClass
lea eax, [ebp - 0x114]
mov dword [ebp - 0x14], eax
mov byte [ebp - 0x10], 4
lea eax, [ebp - 0x14]
push eax
lea edx, [ebp - 0x118]
mov eax, dword [0x424015c]
call sub.rtl60.bpl__System_LoadResString_qqrp20System_TResStringRec
mov eax, dword [ebp - 0x118]
xor ecx, ecx
pop edx
call sub.rtl60.bpl__Sysutils_Format_qqrx17System_AnsiStringpx14System_TVarRecxi
mov edx, dword [ebp - 0xc]
mov eax, 3
call fcn.042207d4
mov dword [ebp - 8], esi
mov esi, dword [ebp - 4]
xor eax, eax
mov al, byte [ebx + 0x14]
cmp eax, 7
ja case.default.0x4220ce4
jmp dword [eax*4 + 0x4220ceb]
cmp esi, dword [ebp - 8]
je 0x4220d2e
mov edx, esi
mov eax, dword [ebp - 8]
mov ecx, edi
call sub.rtl60.bpl__System_Move_qqrpxvpvi
jmp 0x4220d2e
mov edx, esi
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x24]
add esi, eax
sub edi, eax
cmp edi, dword [ebx + 0x24]
jge 0x4220d1e
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, esi
mov ecx, edi
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov edx, esi
mov eax, dword [ebx + 0x2c]
mov ecx, edi
call sub.rtl60.bpl__System_Move_qqrpxvpvi
jmp case.default.0x4220ce4
push esi
mov ecx, eax
mov edx, dword [ebx + 0x34]
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov edx, esi
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, esi
call fcn.04210bcc
mov eax, dword [ebx + 0x24]
add dword [ebp - 8], eax
add esi, eax
sub edi, eax
mov eax, dword [ebx + 0x24]
cmp edi, eax
jge 0x4220d62
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
push esi
mov ecx, edi
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, dword [ebx + 0x2c]
call fcn.04210bcc
jmp case.default.0x4220ce4
mov edx, dword [ebx + 0x34]
jmp 0x4220e03
push esi
mov ecx, eax
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov edx, esi
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov edx, esi
mov eax, dword [ebx + 0x24]
add dword [ebp - 8], eax
add esi, eax
sub edi, eax
mov eax, dword [ebx + 0x24]
cmp edi, eax
jge 0x4220de3
mov eax, edx
mov edx, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
push esi
mov ecx, edi
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, dword [ebx + 0x2c]
call fcn.04210bcc
jmp case.default.0x4220ce4
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebp - 8]
mov al, byte [eax]
mov edx, dword [ebx + 0x2c]
xor al, byte [edx]
mov byte [esi], al
mov ecx, dword [ebx + 0x24]
dec ecx
mov eax, dword [ebx + 0x34]
push eax
inc eax
pop edx
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov eax, dword [ebx + 0x34]
mov edx, dword [ebx + 0x24]
mov cl, byte [esi]
mov byte [eax + edx - 1], cl
inc esi
inc dword [ebp - 8]
dec edi
test edi, edi
jg 0x4220e63
jmp case.default.0x4220ce4
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebp - 8]
mov al, byte [eax]
mov edx, dword [ebx + 0x2c]
xor al, byte [edx]
mov byte [esi], al
mov ecx, dword [ebx + 0x24]
dec ecx
mov eax, dword [ebx + 0x34]
push eax
inc eax
pop edx
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov eax, dword [ebx + 0x34]
mov edx, dword [ebx + 0x24]
mov ecx, dword [ebx + 0x2c]
mov cl, byte [ecx]
mov byte [eax + edx - 1], cl
inc esi
inc dword [ebp - 8]
dec edi
test edi, edi
jg 0x4220eb8
jmp case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
push edx
mov ecx, eax
mov edx, dword [ebx + 0x34]
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, dword [ebx + 0x2c]
call fcn.04210bcc
mov eax, dword [ebx + 0x24]
add dword [ebp - 8], eax
sub edi, eax
mov eax, dword [ebx + 0x24]
cmp edi, eax
jge 0x4220f08
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, dword [ebx + 0x2c]
call fcn.04210bcc
jmp case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
push edx
mov ecx, eax
mov edx, dword [ebx + 0x34]
mov eax, dword [ebp - 8]
call fcn.04210bcc
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov edx, dword [ebx + 0x34]
mov eax, dword [ebx + 0x2c]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov eax, dword [ebx + 0x24]
add dword [ebp - 8], eax
sub edi, eax
mov eax, dword [ebx + 0x24]
cmp edi, eax
jge 0x4220f79
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov eax, dword [ebx + 0x34]
push eax
mov ecx, dword [ebx + 0x24]
mov edx, eax
mov eax, dword [ebx + 0x2c]
call fcn.04210bcc
jmp case.default.0x4220ce4
test edi, edi
jle case.default.0x4220ce4
mov edx, dword [ebx + 0x2c]
mov eax, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov edx, dword [ebx + 0x2c]
mov eax, ebx
mov ecx, dword [eax]
call dword [ecx + 0x2c]
mov ecx, dword [ebx + 0x24]
dec ecx
mov eax, dword [ebx + 0x34]
mov edx, eax
inc eax
call sub.rtl60.bpl__System_Move_qqrpxvpvi
mov eax, dword [ebp - 8]
mov al, byte [eax]
mov edx, dword [ebx + 0x2c]
xor al, byte [edx]
mov edx, dword [ebx + 0x34]
mov ecx, dword [ebx + 0x24]
mov byte [edx + ecx - 1], al
inc dword [ebp - 8]
dec edi
test edi, edi
jg 0x4220fe4
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x422104f
lea eax, [ebp - 0x118]
call sub.rtl60.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0xc]
call sub.rtl60.bpl__System__LStrClr_qqrpv
ret