Function at 0x4abc90
Capabilities:
Validate payment card number using luhn algorithm

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x30
mov eax, dword [0x6c9294]
xor eax, ebp
mov dword [ebp - 4], eax
mov dword [ebp - 0x24], 0x20
mov eax, 1
imul ecx, eax, 0
mov edx, dword [ebp + 0xc]
movzx eax, byte [edx + ecx]
mov ecx, 1
shl ecx, 0
mov edx, dword [ebp + 0xc]
movzx ecx, byte [edx + ecx]
shl ecx, 8
add eax, ecx
mov dword [ebp - 0x2c], eax
mov edx, 1
shl edx, 1
mov eax, dword [ebp + 0xc]
movzx ecx, byte [eax + edx]
mov edx, 1
imul eax, edx, 3
mov edx, dword [ebp + 0xc]
movzx eax, byte [edx + eax]
shl eax, 8
add ecx, eax
mov dword [ebp - 0x30], ecx
lea ecx, [ebp - 0x10]
push ecx
lea edx, [ebp - 0xc]
push edx
lea eax, [ebp - 8]
push eax
mov ecx, dword [ebp - 0x2c]
push ecx
call fcn.004abf20
add esp, 0x10
mov edx, 1
imul eax, edx, 0
mov cl, byte [ebp - 8]
mov byte [ebp + eax - 0x1c], cl
mov edx, 1
shl edx, 0
mov al, byte [ebp - 0xc]
mov byte [ebp + edx - 0x1c], al
mov ecx, 1
shl ecx, 1
mov dl, byte [ebp - 0x10]
mov byte [ebp + ecx - 0x1c], dl
lea eax, [ebp - 0x10]
push eax
lea ecx, [ebp - 0xc]
push ecx
lea edx, [ebp - 8]
push edx
mov eax, dword [ebp - 0x30]
push eax
call fcn.004abf20
add esp, 0x10
mov ecx, 1
imul edx, ecx, 3
mov al, byte [ebp - 8]
mov byte [ebp + edx - 0x1c], al
mov ecx, 1
shl ecx, 2
mov dl, byte [ebp - 0xc]
mov byte [ebp + ecx - 0x1c], dl
mov eax, 1
imul ecx, eax, 5
mov dl, byte [ebp - 0x10]
mov byte [ebp + ecx - 0x1c], dl
mov eax, 1
imul ecx, eax, 0
movzx edx, byte [ebp + ecx - 0x1c]
mov eax, 1
imul ecx, eax, 3
movzx eax, byte [ebp + ecx - 0x1c]
lea eax, [eax + edx*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
imul ecx, edx, 6
mov byte [ebp + ecx - 0x1c], al
mov edx, 1
shl edx, 0
movzx eax, byte [ebp + edx - 0x1c]
mov ecx, 1
shl ecx, 2
movzx edx, byte [ebp + ecx - 0x1c]
lea eax, [edx + eax*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
imul ecx, edx, 7
mov byte [ebp + ecx - 0x1c], al
mov edx, 1
shl edx, 1
movzx eax, byte [ebp + edx - 0x1c]
mov ecx, 1
imul edx, ecx, 5
movzx ecx, byte [ebp + edx - 0x1c]
lea eax, [ecx + eax*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
shl edx, 3
mov byte [ebp + edx - 0x1c], al
mov eax, 1
imul ecx, eax, 0
movzx edx, byte [ebp + ecx - 0x1c]
mov eax, 1
imul ecx, eax, 3
movzx eax, byte [ebp + ecx - 0x1c]
lea eax, [edx + eax*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
imul ecx, edx, 9
mov byte [ebp + ecx - 0x1c], al
mov edx, 1
shl edx, 0
movzx eax, byte [ebp + edx - 0x1c]
mov ecx, 1
shl ecx, 2
movzx edx, byte [ebp + ecx - 0x1c]
lea eax, [eax + edx*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
imul ecx, edx, 0xa
mov byte [ebp + ecx - 0x1c], al
mov edx, 1
shl edx, 1
movzx eax, byte [ebp + edx - 0x1c]
mov ecx, 1
imul edx, ecx, 5
movzx ecx, byte [ebp + edx - 0x1c]
lea eax, [eax + ecx*2]
cdq
mov ecx, 3
idiv ecx
mov edx, 1
imul ecx, edx, 0xb
mov byte [ebp + ecx - 0x1c], al
mov dword [ebp - 0x20], 0
jmp 0x4abeb1
mov edx, dword [ebp - 0x20]
add edx, 4
mov dword [ebp - 0x20], edx
cmp dword [ebp - 0x20], 0x40
jge 0x4abf0f
mov eax, dword [ebp - 0x24]
sar eax, 3
mov ecx, dword [ebp + 0xc]
movzx edx, byte [ecx + eax]
mov ecx, dword [ebp - 0x24]
and ecx, 7
sar edx, cl
and edx, 3
imul eax, edx, 3
mov dword [ebp - 0x28], eax
mov ecx, dword [ebp - 0x24]
add ecx, 2
mov dword [ebp - 0x24], ecx
mov edx, dword [ebp + 8]
add edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0x28]
mov cl, byte [ebp + eax - 0x1c]
mov byte [edx], cl
mov edx, dword [ebp + 8]
add edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0x28]
mov cl, byte [ebp + eax - 0x1b]
mov byte [edx + 1], cl
mov edx, dword [ebp + 8]
add edx, dword [ebp - 0x20]
mov eax, dword [ebp - 0x28]
mov cl, byte [ebp + eax - 0x1a]
mov byte [edx + 2], cl
jmp 0x4abea8
mov ecx, dword [ebp - 4]
xor ecx, ebp
call fcn.004b4fea
mov esp, ebp
pop ebp
ret