Function at 0x407870
Capabilities:
Enumerate pe sections
Resolve function by parsing pe exports

Disassembly:
push ebp
push edi
push esi
push ebx
sub esp, 0x1dc
mov ecx, dword [esp + 0x208]
mov eax, dword [esp + 0x1f8]
mov edx, dword [esp + 0x200]
mov ebx, dword [esp + 0x1f0]
mov ebp, dword [esp + 0x1f4]
mov esi, dword [esp + 0x1fc]
cmp ecx, 0x4c
mov dword [esp + 0x2c], eax
mov dword [esp + 0x38], edx
jle 0x40889a
mov edi, dword [ebx]
lea eax, [edi - 4]
cmp eax, 1
jbe 0x4078d0
add esp, 0x1dc
pop ebx
pop esi
pop edi
pop ebp
ret
cmp byte [ebp], 0x3c
jne 0x4078bf
cmp byte [ebp + 0xd], 0x3c
jne 0x4078bf
sub edi, 2
mov dword [esp + 0x60], 0xffffffff
mov dword [esp + 0x80], str.C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
lea edx, [edi + edi*2]
mov dword [esp + 0x84], 0x570
mov dword [esp + 0xc0], 0xd
mov dword [esp + 0xa8], 0
mov dword [esp + 0x7c], 0xffffffff
lea ecx, [edi + edx*4]
lea edi, [esp + 0x78]
mov dword [esp + 0x78], 0x4084
add ecx, ebp
mov dword [esp], edi
mov dword [esp + 0xbc], ecx
call sym.__gfortran_st_read
lea eax, [esp + 0x60]
lea edx, [esp + 0x78]
mov dword [esp + 8], 4
mov dword [esp + 4], eax
mov dword [esp], edx
call sym.__gfortran_transfer_integer
lea ecx, [esp + 0x78]
mov dword [esp], ecx
call sym.__gfortran_st_read_done
mov edi, dword [esp + 0x60]
sub edi, 0x7ef41
cmp edi, 0x1216e
ja 0x4078bf
mov eax, dword [ebx]
test eax, eax
jle 0x408922
cmp eax, 0x13
jg 0x408962
sub eax, 1
lea edx, [eax + eax*2]
lea ecx, [eax + edx*4]
lea edx, [esp + 0x78]
add ecx, ebp
mov edi, dword [ecx]
movzx eax, word [ecx + 4]
lea ecx, [esp + 0x64]
mov dword [esp + 0xc], edx
mov dword [esp + 8], 6
mov dword [esp + 4], ecx
mov dword [esp + 0x78], edi
lea edi, [esp + 0x68]
mov word [esp + 0x7c], ax
mov dword [esp], edi
call sym.__gfortran_string_trim
mov eax, dword [esp + 0x68]
cmp eax, 6
je 0x407a00
test eax, eax
jle 0x4078bf
mov edx, dword [esp + 0x64]
mov dword [esp + 0x1f0], edx
add esp, 0x1dc
pop ebx
pop esi
pop edi
pop ebp
jmp sym._free
movzx ecx, byte [esp + 0x78]
mov edx, dword [esp + 0x64]
sub ecx, 0x41
cmp cl, 0x11
ja 0x4079e2
movzx eax, byte [esp + 0x79]
sub eax, 0x41
cmp al, 0x11
ja 0x4079e2
movzx ecx, byte [esp + 0x7a]
sub ecx, 0x30
cmp cl, 9
ja 0x4079e2
movzx eax, byte [esp + 0x7b]
sub eax, 0x30
cmp al, 9
ja 0x4079e2
movzx ecx, byte [esp + 0x7c]
sub ecx, 0x41
cmp cl, 0x17
ja 0x4079e2
movzx eax, byte [esp + 0x7d]
sub eax, 0x41
cmp al, 0x17
ja 0x4079e2
mov dword [esp], edx
call sym._free
mov edi, dword [esp + 0x2c]
mov dword [esi], 0
lea edx, [esp + 0x58]
lea ecx, [esp + 0x50]
lea esi, [esp + 0x64]
mov dword [edi], 5
mov dword [esp + 0xc], esi
mov dword [esp + 8], edx
mov dword [esp + 4], ecx
mov dword [esp + 0x10], 0xd
mov dword [esp], ebp
call sym.___packjt77_MOD_save_hash_call
mov dword [esp + 0x10], 0
mov dword [esp + 0xc], 0x433ae6
mov dword [esp + 8], 1
mov dword [esp + 4], ebp
mov dword [esp], 0xd
call sym.__gfortran_string_index
mov esi, eax
lea eax, [eax - 1]
cmp eax, 0xd
jg 0x408942
mov edi, esi
mov edx, 0
lea ecx, [esp + 0x68]
sub edi, 2
cmovns edx, edi
mov edi, 0xd
cmp edx, 0xd
mov dword [esp + 0x30], edx
cmovbe edi, edx
lea edx, [ebp + 1]
cmp edi, 4
mov eax, edx
jae 0x40859e
xor edx, edx
test edi, 2
je 0x407b08
movzx edx, word [eax]
mov word [ecx], dx
mov edx, 2
and edi, 1
je 0x407b14
movzx eax, byte [eax + edx]
mov byte [ecx + edx], al
cmp esi, 0xe
jle 0x408690
lea eax, [esp + 0x68]
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov edi, 0x26
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov esi, eax
lea eax, [esp + 0x69]
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp + 0xc], eax
mov dword [esp], 0x26
call sym.__gfortran_string_index
mov ecx, eax
lea eax, [esi - 1]
mov dword [esp + 0x10], 0
sub ecx, 1
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
imul edi
mov esi, ecx
mov edi, ecx
sar edi, 0x1f
mov dword [esp], 0x26
add esi, eax
lea eax, [esp + 0x6a]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6b]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
imul edi, dword [esp + 0x34], 0x26
mul dword [esp + 0x30]
mov esi, ecx
mov dword [esp + 8], 1
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x6c]
adc edi, edx
mov dword [esp + 0xc], eax
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6d]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x6e]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
imul eax, edi, 0x26
mov dword [esp], 0x26
mov dword [esp + 0x10], 0
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6f]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x70]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x71]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x72]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
imul eax, edi, 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add eax, esi
mov esi, 0xf4bf0973
adc edx, edi
mov dword [esp + 0x30], eax
mov eax, dword [esp + 0x30]
imul ecx, edx, 0xf4bf0973
mov dword [esp + 0x34], edx
imul edx, dword [esp + 0x30], 0xa
add ecx, edx
mul esi
lea esi, [ebp + 0xd]
add edx, ecx
mov eax, edx
shr eax, 0x14
mov dword [esp + 0x58], eax
lea eax, [esp + 0x64]
mov dword [esp + 0x10], 0xd
mov dword [esp], esi
mov dword [esp + 0xc], eax
lea eax, [esp + 0x5c]
mov dword [esp + 8], eax
lea eax, [esp + 0x54]
mov dword [esp + 4], eax
call sym.___packjt77_MOD_save_hash_call
mov dword [esp + 4], esi
mov dword [esp + 0x10], 0
mov dword [esp + 0xc], 0x433ae6
mov dword [esp + 8], 1
mov dword [esp], 0xd
call sym.__gfortran_string_index
mov esi, eax
lea eax, [eax - 1]
cmp eax, 0xd
jg 0x408902
mov ecx, esi
mov edx, 0
mov edi, 0xd
sub ecx, 2
cmovns edx, ecx
lea ecx, [esp + 0x68]
cmp edx, 0xd
mov dword [esp + 0x30], edx
cmovbe edi, edx
lea edx, [ebp + 0xe]
cmp edi, 4
mov eax, edx
jae 0x4084ac
xor edx, edx
test edi, 2
je 0x407f2c
movzx edx, word [eax]
mov word [ecx], dx
mov edx, 2
and edi, 1
je 0x407f38
movzx eax, byte [eax + edx]
mov byte [ecx + edx], al
cmp esi, 0xe
jle 0x4086d0
lea eax, [esp + 0x68]
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov edi, 0x26
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov esi, eax
lea eax, [esp + 0x69]
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp + 0xc], eax
mov dword [esp], 0x26
call sym.__gfortran_string_index
mov ecx, eax
lea eax, [esi - 1]
mov dword [esp + 0x10], 0
sub ecx, 1
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
imul edi
mov esi, ecx
mov edi, ecx
sar edi, 0x1f
mov dword [esp], 0x26
add esi, eax
lea eax, [esp + 0x6a]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6b]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
imul edi, dword [esp + 0x34], 0x26
mul dword [esp + 0x30]
mov esi, ecx
mov dword [esp + 8], 1
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x6c]
adc edi, edx
mov dword [esp + 0xc], eax
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6d]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x6e]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
imul eax, edi, 0x26
mov dword [esp], 0x26
mov dword [esp + 0x10], 0
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x6f]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x70]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
mov dword [esp + 0x10], 0
mov dword [esp + 8], 1
imul eax, edi, 0x26
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add esi, eax
lea eax, [esp + 0x71]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov dword [esp + 0x30], esi
mov ecx, eax
mov dword [esp + 0x34], edi
mov eax, 0x26
sub ecx, 1
mov dword [esp + 0x10], 0
mul dword [esp + 0x30]
imul edi, dword [esp + 0x34], 0x26
mov esi, ecx
mov dword [esp + 8], 1
mov dword [esp + 4], 0x41c7a0
mov dword [esp], 0x26
add edx, edi
mov edi, ecx
sar edi, 0x1f
add esi, eax
lea eax, [esp + 0x72]
adc edi, edx
mov dword [esp + 0xc], eax
call sym.__gfortran_string_index
mov ecx, eax
imul eax, edi, 0x26
mov dword [esp + 0x30], eax
mov eax, 0x26
mov edi, dword [esp + 0x30]
mul esi
mov esi, eax
lea eax, [ecx - 1]
add edi, edx
cdq
add eax, esi
mov esi, 0xf4bf0973
adc edx, edi
mov dword [esp + 0x30], eax
mov eax, dword [esp + 0x30]
imul ecx, edx, 0xf4bf0973
mov dword [esp + 0x34], edx
imul edx, dword [esp + 0x30], 0xa
add ecx, edx
mul esi
add edx, ecx
mov eax, edx
shr eax, 0xa
mov dword [esp + 0x64], eax
mov dword [esp + 0x44], 0
cmp word [ebp + 0x1a], 0x2052
jne 0x4082c4
mov dword [esp + 0x44], 1
mov esi, dword [esp + 0x60]
mov ecx, 0x68db8bad
mov ebx, dword [ebx]
mov eax, esi
mov edi, esi
imul ecx
sar edi, 0x1f
sar edx, 0xc
sub edx, edi
imul eax, edx, 0x2710
lea ecx, [edx - 0x34]
mov edx, 0x7ff
mov dword [esp + 0x48], ecx
sub esi, eax
cmp esi, 0x7ff
cmovg esi, edx
test ebx, ebx
mov dword [esp + 0x4c], esi
jle 0x4088e2
cmp ebx, 0x13
jg 0x4088c2
sub ebx, 1
mov dword [esp + 0x80], str.C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0x84], 0x591
lea esi, [ebx + ebx*2]
mov dword [esp + 0xc0], 0x4d
mov dword [esp + 0xa8], 0
mov dword [esp + 0x7c], 0xffffffff
mov dword [esp + 0xac], str._b12.12_b22.22_b1_b3.3_b11.11_b25.25_b3.3_
lea edi, [ebx + esi*4]
mov dword [esp + 0xb0], 0x2a
mov dword [esp + 0x78], 0x5000
add edi, ebp
movzx ebp, byte [edi]
movzx eax, byte [edi + 1]
movzx ebx, byte [edi + 2]
sub ebp, 0x41
sub eax, 0x41
imul edx, eax, 0xe100
sub ebx, 0x30
movzx eax, byte [edi + 4]
imul ecx, ebp, 0xfd200
movzx ebp, byte [edi + 3]
movzx edi, byte [edi + 5]
imul esi, ebx, 0x1680
add ecx, edx
lea edx, [eax + eax*2 - 0xc3]
add esi, ecx
lea ecx, [ebp + ebp*8 - 0x1b0]
mov ebp, dword [esp + 0x38]
shl ecx, 6
add esi, ecx
lea ecx, [esp + 0x78]
mov dword [esp + 0xbc], ebp
lea ebx, [esi + edx*8]
lea ebp, [esp + 0x78]
mov dword [esp], ecx
lea esi, [ebx + edi - 0x41]
lea ebx, [esp + 0x64]
lea edi, [esp + 0x78]
mov dword [esp + 0x40], esi
lea esi, [esp + 0x44]
call sym.__gfortran_st_write
lea edx, [esp + 0x78]
lea eax, [esp + 0x58]
mov dword [esp + 8], 4
mov dword [esp], edx
mov dword [esp + 4], eax
call sym.__gfortran_transfer_integer_write
mov dword [esp + 4], ebx
mov dword [esp], edi
lea ebx, [esp + 0x78]
mov dword [esp + 8], 4
lea edi, [esp + 0x40]
call sym.__gfortran_transfer_integer_write
mov dword [esp + 4], esi
mov dword [esp], ebp
lea esi, [esp + 0x78]
mov dword [esp + 8], 4
call sym.__gfortran_transfer_integer_write
lea eax, [esp + 0x78]
lea ecx, [esp + 0x48]
mov dword [esp + 8], 4
mov dword [esp], eax
mov dword [esp + 4], ecx
call sym.__gfortran_transfer_integer_write
lea edx, [esp + 0x4c]
mov dword [esp + 8], 4
mov dword [esp], ebx
mov dword [esp + 4], edx
call sym.__gfortran_transfer_integer_write
mov dword [esp + 8], 4
mov dword [esp + 4], edi
mov dword [esp], esi
call sym.__gfortran_transfer_integer_write
mov ebp, dword [esp + 0x2c]
lea ecx, [esp + 0x78]
mov dword [esp + 8], 4
mov dword [esp], ecx
mov dword [esp + 4], ebp
call sym.__gfortran_transfer_integer_write
lea eax, [esp + 0x78]
mov dword [esp], eax
call sym.__gfortran_st_write_done
jmp 0x4078bf
mov eax, edi
and eax, 0xfffffffc
mov dword [esp + 0x3c], eax
lea ecx, [eax - 1]
mov eax, dword [edx]
shr ecx, 2
and ecx, 7
mov dword [esp + 0x68], eax
mov eax, 4
cmp eax, dword [esp + 0x3c]
jae 0x408591
test ecx, ecx
je 0x408543
cmp ecx, 1
je 0x408533
cmp ecx, 2
je 0x408529
cmp ecx, 3
je 0x40851f
cmp ecx, 4
je 0x408515
cmp ecx, 5
je 0x40850b
cmp ecx, 6
je 0x408501
mov ecx, dword [edx + 4]
mov eax, 8
mov dword [esp + 0x6c], ecx
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
cmp eax, dword [esp + 0x3c]
jae 0x408591
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
mov ecx, dword [edx + eax + 4]
mov dword [esp + eax + 0x6c], ecx
mov ecx, dword [edx + eax + 8]
mov dword [esp + eax + 0x70], ecx
mov ecx, dword [edx + eax + 0xc]
mov dword [esp + eax + 0x74], ecx
mov ecx, dword [edx + eax + 0x10]
mov dword [esp + eax + 0x78], ecx
mov ecx, dword [edx + eax + 0x14]
mov dword [esp + eax + 0x7c], ecx
mov ecx, dword [edx + eax + 0x18]
mov dword [esp + eax + 0x80], ecx
mov ecx, dword [edx + eax + 0x1c]
mov dword [esp + eax + 0x84], ecx
add eax, 0x20
cmp eax, dword [esp + 0x3c]
jb 0x408543
lea ecx, [esp + 0x68]
add ecx, eax
add eax, edx
jmp 0x407f17
mov ecx, edi
mov eax, dword [edx]
and ecx, 0xfffffffc
mov dword [esp + 0x3c], ecx
lea ecx, [ecx - 1]
mov dword [esp + 0x68], eax
mov eax, 4
shr ecx, 2
and ecx, 7
cmp eax, dword [esp + 0x3c]
jae 0x408683
test ecx, ecx
je 0x408635
cmp ecx, 1
je 0x408625
cmp ecx, 2
je 0x40861b
cmp ecx, 3
je 0x408611
cmp ecx, 4
je 0x408607
cmp ecx, 5
je 0x4085fd
cmp ecx, 6
je 0x4085f3
mov ecx, dword [edx + 4]
mov eax, 8
mov dword [esp + 0x6c], ecx
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
add eax, 4
cmp eax, dword [esp + 0x3c]
jae 0x408683
mov ecx, dword [edx + eax]
mov dword [esp + eax + 0x68], ecx
mov ecx, dword [edx + eax + 4]
mov dword [esp + eax + 0x6c], ecx
mov ecx, dword [edx + eax + 8]
mov dword [esp + eax + 0x70], ecx
mov ecx, dword [edx + eax + 0xc]
mov dword [esp + eax + 0x74], ecx
mov ecx, dword [edx + eax + 0x10]
mov dword [esp + eax + 0x78], ecx
mov ecx, dword [edx + eax + 0x14]
mov dword [esp + eax + 0x7c], ecx
mov ecx, dword [edx + eax + 0x18]
mov dword [esp + eax + 0x80], ecx
mov ecx, dword [edx + eax + 0x1c]
mov dword [esp + eax + 0x84], ecx
add eax, 0x20
cmp eax, dword [esp + 0x3c]
jb 0x408635
lea ecx, [esp + 0x68]
add ecx, eax
add eax, edx
jmp 0x407af3
mov esi, dword [esp + 0x30]
mov eax, 0xd
lea edi, [esp + 0x68]
sub eax, esi
add edi, esi
mov esi, 0x20202020
cmp eax, 4
jae 0x408710
test eax, eax
je 0x407b1d
test al, 2
mov byte [edi], 0x20
je 0x407b1d
mov word [edi + eax - 2], 0x2020
jmp 0x407b1d
mov esi, dword [esp + 0x30]
mov eax, 0xd
lea edi, [esp + 0x68]
sub eax, esi
add edi, esi
mov esi, 0x20202020
cmp eax, 4
jae 0x4087d5
test eax, eax
je 0x407f41
test al, 2
mov byte [edi], 0x20
je 0x407f41
mov word [edi + eax - 2], 0x2020
jmp 0x407f41
lea ecx, [edi + 4]
mov dword [edi], 0x20202020
mov dword [edi + eax - 4], 0x20202020
and ecx, 0xfffffffc
sub edi, ecx
add edi, eax
mov edx, edi
and edx, 0xfffffffc
cmp edx, 4
jb 0x407b1d
mov edi, edx
lea edx, [edx - 1]
mov eax, 4
mov dword [ecx], 0x20202020
shr edx, 2
and edx, 7
cmp eax, edi
jae 0x407b1d
test edx, edx
je 0x4087aa
cmp edx, 1
je 0x40879c
cmp edx, 2
je 0x408796
cmp edx, 3
je 0x408790
cmp edx, 4
je 0x40878a
cmp edx, 5
je 0x408784
cmp edx, 6
je 0x40877e
mov dword [ecx + 4], esi
mov eax, 8
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
cmp eax, edi
jae 0x407b1d
mov dword [ecx + eax], esi
mov dword [ecx + eax + 4], esi
mov dword [ecx + eax + 8], esi
mov dword [ecx + eax + 0xc], esi
mov dword [ecx + eax + 0x10], esi
mov dword [ecx + eax + 0x14], esi
mov dword [ecx + eax + 0x18], esi
mov dword [ecx + eax + 0x1c], esi
add eax, 0x20
cmp eax, edi
jb 0x4087aa
jmp 0x407b1d
lea ecx, [edi + 4]
mov dword [edi], 0x20202020
mov dword [edi + eax - 4], 0x20202020
and ecx, 0xfffffffc
sub edi, ecx
add edi, eax
mov edx, edi
and edx, 0xfffffffc
cmp edx, 4
jb 0x407f41
mov edi, edx
lea edx, [edx - 1]
mov eax, 4
mov dword [ecx], 0x20202020
shr edx, 2
and edx, 7
cmp eax, edi
jae 0x407f41
test edx, edx
je 0x40886f
cmp edx, 1
je 0x408861
cmp edx, 2
je 0x40885b
cmp edx, 3
je 0x408855
cmp edx, 4
je 0x40884f
cmp edx, 5
je 0x408849
cmp edx, 6
je 0x408843
mov dword [ecx + 4], esi
mov eax, 8
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
mov dword [ecx + eax], esi
add eax, 4
cmp eax, edi
jae 0x407f41
mov dword [ecx + eax], esi
mov dword [ecx + eax + 4], esi
mov dword [ecx + eax + 8], esi
mov dword [ecx + eax + 0xc], esi
mov dword [ecx + eax + 0x10], esi
mov dword [ecx + eax + 0x14], esi
mov dword [ecx + eax + 0x18], esi
mov dword [ecx + eax + 0x1c], esi
add eax, 0x20
cmp eax, edi
jb 0x40886f
jmp 0x407f41
mov dword [esp + 0x10], 0x4d
mov dword [esp + 0xc], ecx
mov dword [esp + 8], 0x433bcf
mov dword [esp + 4], 0x433640
mov dword [esp], str.At_line_1370_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 0x13
mov dword [esp + 8], ebx
mov dword [esp + 4], str.Index__ld_of_dimension_1_of_array_w_above_upper_bound_of__ld
mov dword [esp], str.At_line_1416_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 1
mov dword [esp + 8], ebx
mov dword [esp + 4], str.Index__ld_of_dimension_1_of_array_w_below_lower_bound_of__ld
mov dword [esp], str.At_line_1416_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 0xd
mov dword [esp + 8], eax
mov dword [esp + 4], str.Substring_out_of_bounds:_upper_bound___ld__of_w_exceeds_string_length___ld_
mov dword [esp], str.At_line_1408_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 1
mov dword [esp + 8], eax
mov dword [esp + 4], str.Index__ld_of_dimension_1_of_array_w_below_lower_bound_of__ld
mov dword [esp], str.At_line_1394_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 0xd
mov dword [esp + 8], eax
mov dword [esp + 4], str.Substring_out_of_bounds:_upper_bound___ld__of_w_exceeds_string_length___ld_
mov dword [esp], str.At_line_1403_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 0x13
mov dword [esp + 8], eax
mov dword [esp + 4], str.Index__ld_of_dimension_1_of_array_w_above_upper_bound_of__ld
mov dword [esp], str.At_line_1394_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
lea esi, [esi]
lea edi, [edi]