Function at 0x40ce60
Capabilities:
Contain obfuscated stackstrings
Resolve function by parsing pe exports

Disassembly:
push ebp
push edi
push esi
push ebx
sub esp, 0x35c
cmp dword [esp + 0x380], 0x24
mov eax, dword [esp + 0x370]
jle 0x40dd4c
cmp dword [esp + 0x384], 0x4c
jle 0x40dce5
mov ecx, dword [eax + 4]
mov ebx, dword [eax + 8]
mov esi, dword [eax + 0xc]
mov edx, dword [eax]
mov edi, dword [eax + 0x10]
mov ebp, dword [eax + 0x14]
mov dword [esp + 0x93], ecx
mov dword [esp + 0x97], ebx
mov ecx, dword [eax + 0x18]
mov ebx, dword [eax + 0x1c]
mov dword [esp + 0x9b], esi
cmp word [0x434856], dx
mov esi, dword [eax + 0x20]
movzx eax, byte [eax + 0x24]
mov dword [esp + 0x8f], edx
mov dword [esp + 0x9f], edi
mov dword [esp + 0xa3], ebp
mov dword [esp + 0xa7], ecx
mov dword [esp + 0xab], ebx
mov dword [esp + 0xaf], esi
mov byte [esp + 0xb3], al
je 0x40d420
lea edi, [esp + 0x8f]
mov dword [esp + 0x38], edi
mov esi, dword [esp + 0x374]
mov ecx, dword [esp + 0x378]
mov edx, dword [esp + 0x374]
mov ebp, dword [esi]
mov ebx, dword [ecx]
mov dword [edx], 0xffffffff
mov dword [ecx], 0xffffffff
test ebp, ebp
mov dword [esp + 0x48], ebp
mov dword [esp + 0x4c], ebx
jne 0x40d562
cmp ebx, 5
jne 0x40d562
mov edi, dword [esp + 0x38]
mov dword [esp + 0x10], 0
mov dword [esp + 0xc], str._TU_
mov dword [esp + 8], 1
mov dword [esp], 0x25
mov dword [esp + 4], edi
call sym.__gfortran_string_index
sub eax, 1
cmp eax, 0x25
jg 0x40dd7b
test eax, eax
mov edx, 0
mov ecx, 0x12
cmovns edx, eax
lea ebp, [esp + 0x62]
cmp edx, 0x12
cmovbe ecx, edx
cmp ecx, 4
jb 0x40d360
mov esi, dword [esp + 0x38]
mov ebx, dword [esi]
mov dword [esp + 0x62], ebx
mov edi, dword [esi + ecx - 4]
lea ebx, [esp + 0x64]
mov dword [esp + ecx + 0x5e], edi
mov edi, ebp
sub edi, ebx
add ecx, edi
sub esi, edi
and ecx, 0xfffffffc
cmp ecx, 4
jb 0x40d094
mov dword [esp + 0x3c], ecx
lea edi, [ecx - 1]
mov ecx, dword [esi]
shr edi, 2
mov dword [ebx], ecx
and edi, 7
mov ecx, 4
cmp ecx, dword [esp + 0x3c]
jae 0x40d094
test edi, edi
je 0x40d04d
cmp edi, 1
je 0x40d03e
cmp edi, 2
je 0x40d035
cmp edi, 3
je 0x40d02c
cmp edi, 4
je 0x40d023
cmp edi, 5
je 0x40d01a
cmp edi, 6
jne 0x40dbd0
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
add ecx, 4
cmp ecx, dword [esp + 0x3c]
jae 0x40d094
mov edi, dword [esi + ecx]
mov dword [ebx + ecx], edi
mov edi, dword [esi + ecx + 4]
mov dword [ebx + ecx + 4], edi
mov edi, dword [esi + ecx + 8]
mov dword [ebx + ecx + 8], edi
mov edi, dword [esi + ecx + 0xc]
mov dword [ebx + ecx + 0xc], edi
mov edi, dword [esi + ecx + 0x10]
mov dword [ebx + ecx + 0x10], edi
mov edi, dword [esi + ecx + 0x14]
mov dword [ebx + ecx + 0x14], edi
mov edi, dword [esi + ecx + 0x18]
mov dword [ebx + ecx + 0x18], edi
mov edi, dword [esi + ecx + 0x1c]
mov dword [ebx + ecx + 0x1c], edi
add ecx, 0x20
cmp ecx, dword [esp + 0x3c]
jb 0x40d04d
cmp eax, 0x11
jle 0x40d750
lea ebx, [esp + 0x1f8]
mov dword [esp + 8], ebp
mov dword [esp + 4], 0x12
mov dword [esp], ebx
call sym.__gfortran_adjustr
movzx eax, word [esp + 0x208]
mov edx, dword [esp + 0x204]
mov ecx, dword [esp + 0x1f8]
mov esi, dword [esp + 0x1fc]
mov edi, dword [esp + 0x200]
mov dword [esp], ebx
mov dword [esp + 0x6e], edx
mov dword [esp + 0x23c], ebp
lea ebp, [esp + 0x54]
mov word [esp + 0x72], ax
mov dword [esp + 0x62], ecx
mov dword [esp + 0x66], esi
mov dword [esp + 0x6a], edi
mov dword [esp + 0x54], 0xffffff9d
mov dword [esp + 0x58], 0xffffff9d
mov dword [esp + 0x5c], 0xffffff9d
mov dword [esp + 0x200], str.C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0x204], 0xa0
mov dword [esp + 0x240], 0x12
mov dword [esp + 0x228], 0
mov dword [esp + 0x1fc], 0xffffffff
mov dword [esp + 0x22c], str._3z6__b23.23_2b24.24_2b3.3__2b3.3_c0
mov dword [esp + 0x230], 5
mov dword [esp + 0x1f8], 0x5004
call sym.__gfortran_st_read
lea ecx, [esp + 0x74]
mov dword [esp + 0xc], 0
mov dword [esp + 8], 4
mov dword [esp], ebx
mov dword [esp + 0x7c], 0x109
mov dword [esp + 4], ecx
mov dword [esp + 0x84], 1
mov dword [esp + 0x88], 3
mov dword [esp + 0x80], 1
mov dword [esp + 0x74], ebp
mov dword [esp + 0x78], 0xffffffff
call sym.__gfortran_transfer_array
mov dword [esp], ebx
call sym.__gfortran_st_read_done
mov esi, dword [esp + 0x1f8]
mov edx, dword [esp + 0x54]
and esi, 3
cmp esi, 1
je 0x40d390
cmp edx, 0x7fffff
jle 0x40d390
mov ecx, dword [esp + 0x374]
mov ebp, dword [0x43ae04]
mov eax, 0x32
cmp al, 0x32
mov edx, dword [esp + 0x378]
mov edi, 2
mov dword [esp + 0x9c], 0x20202020
mov dword [esp + 0xa0], 0x20202020
mov dword [ecx], 0
sete cl
cmove ebp, edi
test cl, cl
mov dword [edx], 0
mov dword [esp + 0xa4], 0x20202020
mov dword [esp + 0xa8], 0x20202020
mov dword [esp + 0xac], 0x20202020
mov dword [esp + 0xb0], 0x20202020
mov dword [0x43ae08], 1
jne 0x40dd9b
mov esi, dword [esp + 0x37c]
mov edx, dword [esp + 0x38]
mov dword [esp + 0xc], 0x47
mov dword [esp + 8], 0xd
mov dword [esp + 4], esi
mov dword [esp], edx
call sym.___packjt77_MOD_packtext77.part.1
mov ebp, dword [esp + 0x37c]
mov dword [esp], ebx
mov dword [esp + 0x200], str.C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0x204], 0xc3
mov dword [esp + 0x240], 6
mov dword [esp + 0x228], 0
add ebp, 0x47
mov dword [esp + 0x1fc], 0xffffffff
mov dword [esp + 0x22c], 0x4349a1
mov dword [esp + 0x23c], ebp
mov dword [esp + 0x230], 7
mov dword [esp + 0x1f8], 0x5000
call sym.__gfortran_st_write
mov eax, dword [esp + 0x378]
mov dword [esp], ebx
mov dword [esp + 8], 4
mov dword [esp + 4], eax
call sym.__gfortran_transfer_integer_write
mov ecx, dword [esp + 0x374]
mov dword [esp], ebx
mov dword [esp + 8], 4
mov dword [esp + 4], ecx
call sym.__gfortran_transfer_integer_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
add esp, 0x35c
pop ebx
pop esi
pop edi
pop ebp
ret
test ecx, ecx
je 0x40d094
mov esi, dword [esp + 0x38]
test cl, 2
movzx ebx, byte [esi]
mov byte [ebp], bl
je 0x40d094
mov edi, dword [esp + 0x38]
movzx esi, word [edi + ecx - 2]
mov word [ebp + ecx - 2], si
jmp 0x40d094
test edx, edx
lea edi, [esp + 0x101]
lea esi, [esp + 0x50]
js 0x40d3b3
mov eax, dword [esp + 0x58]
test eax, eax
js 0x40d3b3
mov ecx, dword [esp + 0x5c]
test ecx, ecx
jns 0x40d8c3
mov ecx, dword [esp + 0x37c]
mov edx, dword [esp + 0x378]
lea eax, [esp + 0x48]
mov ebp, dword [esp + 0x374]
lea ebx, [esp + 0x4c]
mov dword [esp + 0x20], 0x4d
mov dword [esp + 0x14], eax
mov dword [esp + 0x1c], 0xd
mov dword [esp + 0x18], ebx
mov dword [esp + 0x10], ecx
mov dword [esp + 0xc], edx
mov dword [esp + 8], ebp
mov dword [esp + 4], edi
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_06
mov ebx, dword [esp + 0x374]
mov eax, dword [ebx]
test eax, eax
js 0x40d620
add esp, 0x35c
pop ebx
pop esi
pop edi
pop ebp
ret
movzx edx, byte [0x434858]
cmp byte [esp + 0x91], dl
jne 0x40cefe
lea edi, [esp + 0x8f]
mov dword [esp + 0x10], 0
mov dword [esp + 0xc], str._TU_
mov dword [esp + 8], 1
mov dword [esp], 0x25
mov dword [esp + 4], edi
mov dword [esp + 0x38], edi
call sym.__gfortran_string_index
mov dword [esp + 4], 0x41e0b0
mov dword [esp], 6
mov esi, eax
call sym.__gfortran_string_len_trim
cmp eax, 6
jg 0x40dd2c
test eax, eax
mov ebp, 0
cmovns ebp, eax
lea ebx, [ebp + 1]
mov dword [esp], ebx
call sym._malloc
mov dword [esp + 0x14], str._TU_
mov dword [esp + 0x10], 1
mov edi, eax
mov dword [esp + 0xc], 0x41e0b0
mov dword [esp + 8], ebp
mov dword [esp + 4], eax
mov dword [esp], ebx
call sym.__gfortran_concat_string
lea ecx, [esi + 1]
test ecx, ecx
jle 0x40dd14
mov edx, 0x26
mov eax, 0
sub edx, ecx
cmovs edx, eax
lea ebp, [ebx + edx]
mov dword [esp + 0x3c], edx
mov dword [esp], ebp
call sym._malloc
add esi, dword [esp + 0x38]
mov dword [esp + 4], eax
mov dword [esp + 0xc], edi
mov dword [esp + 8], ebx
mov dword [esp], ebp
mov dword [esp + 0x14], esi
mov esi, dword [esp + 0x3c]
mov dword [esp + 0x3c], eax
mov dword [esp + 0x10], esi
call sym.__gfortran_concat_string
mov dword [esp], edi
call sym._free
cmp ebp, 0x25
mov edx, 0x25
mov eax, dword [esp + 0x3c]
cmovbe edx, ebp
cmp edx, 4
jae 0x40d9a5
test edx, edx
je 0x40d54c
movzx ebx, byte [eax]
mov edi, dword [esp + 0x38]
test dl, 2
mov byte [edi], bl
jne 0x40dbf3
cmp ebp, 0x24
jle 0x40daa1
mov dword [esp], eax
call sym._free
jmp 0x40cf09
mov ebp, dword [esp + 0x38]
lea eax, [esp + 0xb4]
lea edi, [esp + 0x101]
lea esi, [esp + 0x50]
mov dword [esp + 0x14], 0xd
mov dword [esp + 0x10], 0x25
mov dword [esp + 0xc], edi
mov dword [esp + 8], eax
mov dword [esp + 4], esi
mov dword [esp], ebp
call sym.___packjt77_MOD_split77
movzx ecx, word [esp + 0x8f]
cmp cx, word [str.CQ_CQ_At_line_81_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90]
je 0x40dae0
cmp cx, word [0x433f06]
je 0x40d852
cmp dword [esp + 0x8f], 0x205a5251
je 0x40d3b3
cmp dword [esp + 0x50], 5
je 0x40dc10
mov edx, dword [esp + 0x374]
mov eax, dword [edx]
test eax, eax
jns 0x40d411
mov ebp, dword [esp + 0x378]
mov ecx, dword [ebp]
test ecx, ecx
jg 0x40d411
mov edx, dword [esp + 0x50]
lea ebx, [edx - 4]
cmp ebx, 1
jbe 0x40dc8f
cmp edx, 1
jg 0x40d3b3
jmp 0x40cf47
mov ecx, dword [esp + 0x50]
sub ecx, 2
cmp ecx, 2
jbe 0x40d870
cmp byte [esp + 0x101], 0x3c
je 0x40dbe0
mov edx, dword [esp + 0x50]
sub edx, 4
cmp edx, 2
ja 0x40d6a0
mov ebp, dword [esp + 0x37c]
mov ebx, dword [esp + 0x378]
mov eax, dword [esp + 0x374]
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0x14], 0xd
mov dword [esp + 4], edi
mov dword [esp + 0x10], ebp
mov dword [esp + 0xc], ebx
mov dword [esp + 8], eax
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_3.part.3
mov ecx, dword [esp + 0x374]
mov edx, dword [ecx]
test edx, edx
jns 0x40d411
nop
lea esi, [esi]
mov ebp, dword [esp + 0x37c]
mov ebx, dword [esp + 0x378]
mov eax, dword [esp + 0x374]
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0x14], 0xd
mov dword [esp + 4], edi
mov dword [esp + 0x10], ebp
mov dword [esp + 0xc], ebx
mov dword [esp + 8], eax
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_4
mov ecx, dword [esp + 0x374]
mov edx, dword [ecx]
test edx, edx
jns 0x40d411
mov ebx, dword [esp + 0x378]
mov ebp, dword [esp + 0x37c]
mov eax, dword [esp + 0x374]
mov dword [esp + 4], edi
mov dword [esp], esi
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0xc], ebx
mov dword [esp + 0x14], 0xd
lea ebx, [esp + 0x1f8]
mov dword [esp + 0x10], ebp
mov dword [esp + 8], eax
call sym.___packjt77_MOD_pack77_5
mov edi, dword [esp + 0x374]
mov esi, dword [edi]
test esi, esi
jns 0x40d411
jmp 0x40d1f4
mov eax, 0x12
mov ebx, 0x20202020
sub eax, edx
add edx, ebp
cmp eax, 4
jb 0x40d830
lea ecx, [edx + 4]
mov dword [edx], 0x20202020
mov dword [edx + eax - 4], 0x20202020
and ecx, 0xfffffffc
sub edx, ecx
add eax, edx
and eax, 0xfffffffc
cmp eax, 4
jb 0x40d09d
lea edx, [eax - 1]
mov esi, eax
mov edi, eax
mov eax, 4
mov dword [ecx], 0x20202020
shr edx, 2
and edx, 7
cmp eax, esi
jae 0x40d09d
test edx, edx
je 0x40d801
cmp edx, 1
je 0x40d7f3
cmp edx, 2
je 0x40d7ed
cmp edx, 3
je 0x40d7e7
cmp edx, 4
je 0x40d7e1
cmp edx, 5
je 0x40d7db
cmp edx, 6
je 0x40d7d5
mov dword [ecx + 4], ebx
mov eax, 8
mov dword [ecx + eax], ebx
add eax, 4
mov dword [ecx + eax], ebx
add eax, 4
mov dword [ecx + eax], ebx
add eax, 4
mov dword [ecx + eax], ebx
add eax, 4
mov dword [ecx + eax], ebx
add eax, 4
mov dword [ecx + eax], ebx
add eax, 4
cmp eax, edi
jae 0x40d09d
mov dword [ecx + eax], ebx
mov dword [ecx + eax + 4], ebx
mov dword [ecx + eax + 8], ebx
mov dword [ecx + eax + 0xc], ebx
mov dword [ecx + eax + 0x10], ebx
mov dword [ecx + eax + 0x14], ebx
mov dword [ecx + eax + 0x18], ebx
mov dword [ecx + eax + 0x1c], ebx
add eax, 0x20
cmp eax, edi
jb 0x40d801
jmp 0x40d09d
test eax, eax
je 0x40d09d
test al, 2
mov byte [edx], 0x20
je 0x40d09d
mov esi, 0x2020
mov word [edx + eax - 2], si
jmp 0x40d09d
movzx edx, byte [0x433f08]
cmp byte [esp + 0x91], dl
jne 0x40d5be
jmp 0x40d3b3
mov edx, dword [esp + 0x37c]
mov ebp, dword [esp + 0x378]
mov ebx, dword [esp + 0x374]
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0x14], 0xd
mov dword [esp + 4], edi
mov dword [esp + 0x10], edx
mov dword [esp + 0xc], ebp
mov dword [esp + 8], ebx
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_1.part.4
mov eax, dword [esp + 0x374]
mov ecx, dword [eax]
test ecx, ecx
jns 0x40d411
jmp 0x40d630
mov edx, dword [esp + 0x374]
mov edi, dword [esp + 0x378]
mov esi, dword [esp + 0x37c]
mov dword [esp + 0x200], str.C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0x204], 0xa6
mov dword [esp + 0x240], 0x4d
mov dword [edx], 0
mov dword [edi], 5
mov dword [esp], ebx
mov dword [esp + 0x23c], esi
mov dword [esp + 0x228], 0
mov dword [esp + 0x1fc], 0xffffffff
mov dword [esp + 0x22c], 0x43498b
mov dword [esp + 0x230], 0x16
mov dword [esp + 0x1f8], 0x5000
call sym.__gfortran_st_write
mov dword [esp + 0x74], ebp
lea ebp, [esp + 0x74]
mov dword [esp + 0xc], 0
mov dword [esp + 8], 4
mov dword [esp], ebx
mov dword [esp + 4], ebp
mov dword [esp + 0x7c], 0x109
mov dword [esp + 0x84], 1
mov dword [esp + 0x88], 3
mov dword [esp + 0x80], 1
mov dword [esp + 0x78], 0xffffffff
call sym.__gfortran_transfer_array_write
jmp 0x40d312
mov esi, dword [esp + 0x38]
mov edi, dword [eax]
lea ecx, [esp + 0x90]
mov dword [esi], edi
mov ebx, dword [eax + edx - 4]
mov dword [esi + edx - 4], ebx
sub esi, ecx
mov ebx, eax
add edx, esi
sub ebx, esi
and edx, 0xfffffffc
cmp edx, 4
jb 0x40d54c
mov edi, edx
lea esi, [edx - 1]
mov edx, dword [ebx]
shr esi, 2
mov dword [ecx], edx
mov edx, 4
and esi, 7
cmp edx, edi
jae 0x40d54c
test esi, esi
je 0x40da57
cmp esi, 1
je 0x40da46
cmp esi, 2
je 0x40da3d
cmp esi, 3
je 0x40da34
cmp esi, 4
je 0x40da2b
cmp esi, 5
je 0x40da22
cmp esi, 6
je 0x40da19
mov esi, dword [ebx + 4]
mov edx, 8
mov dword [ecx + 4], esi
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
add edx, 4
cmp edx, edi
jae 0x40d54c
mov esi, dword [ebx + edx]
mov dword [ecx + edx], esi
mov esi, dword [ebx + edx + 4]
mov dword [ecx + edx + 4], esi
mov esi, dword [ebx + edx + 8]
mov dword [ecx + edx + 8], esi
mov esi, dword [ebx + edx + 0xc]
mov dword [ecx + edx + 0xc], esi
mov esi, dword [ebx + edx + 0x10]
mov dword [ecx + edx + 0x10], esi
mov esi, dword [ebx + edx + 0x14]
mov dword [ecx + edx + 0x14], esi
mov esi, dword [ebx + edx + 0x18]
mov dword [ecx + edx + 0x18], esi
mov esi, dword [ebx + edx + 0x1c]
mov dword [ecx + edx + 0x1c], esi
add edx, 0x20
cmp edx, edi
jb 0x40da57
jmp 0x40d54c
mov ebx, 0x25
mov edi, 0x20202020
sub ebx, ebp
add ebp, dword [esp + 0x38]
cmp ebx, 4
jae 0x40db00
test ebx, ebx
je 0x40d555
test bl, 2
mov byte [ebp], 0x20
je 0x40d555
mov ecx, 0x2020
mov word [ebp + ebx - 2], cx
jmp 0x40d555
movzx ebx, byte [0x433a98]
cmp byte [esp + 0x91], bl
jne 0x40d5b1
jmp 0x40d3b3
lea esi, [ebp + 4]
mov dword [ebp], 0x20202020
mov dword [ebp + ebx - 4], 0x20202020
and esi, 0xfffffffc
sub ebp, esi
add ebx, ebp
mov edx, ebx
and edx, 0xfffffffc
cmp edx, 4
jb 0x40d555
lea ebx, [edx - 1]
mov ebp, edx
mov ecx, edx
mov edx, 4
mov dword [esi], 0x20202020
shr ebx, 2
and ebx, 7
cmp edx, ebp
jae 0x40d555
test ebx, ebx
je 0x40db9d
cmp ebx, 1
je 0x40db8f
cmp ebx, 2
je 0x40db89
cmp ebx, 3
je 0x40db83
cmp ebx, 4
je 0x40db7d
cmp ebx, 5
je 0x40db77
cmp ebx, 6
je 0x40db71
mov dword [esi + 4], edi
mov edx, 8
mov dword [esi + edx], edi
add edx, 4
mov dword [esi + edx], edi
add edx, 4
mov dword [esi + edx], edi
add edx, 4
mov dword [esi + edx], edi
add edx, 4
mov dword [esi + edx], edi
add edx, 4
mov dword [esi + edx], edi
add edx, 4
cmp edx, ecx
jae 0x40d555
mov dword [esi + edx], edi
mov dword [esi + edx + 4], edi
mov dword [esi + edx + 8], edi
mov dword [esi + edx + 0xc], edi
mov dword [esi + edx + 0x10], edi
mov dword [esi + edx + 0x14], edi
mov dword [esi + edx + 0x18], edi
mov dword [esi + edx + 0x1c], edi
add edx, 0x20
cmp edx, ecx
jb 0x40db9d
jmp 0x40d555
mov edi, dword [esi + 4]
mov ecx, 8
mov dword [ebx + 4], edi
jmp 0x40d011
cmp byte [esp + 0x10e], 0x3c
jne 0x40d63e
jmp 0x40d6a0
movzx ecx, word [eax + edx - 2]
mov esi, dword [esp + 0x38]
mov word [esi + edx - 2], cx
jmp 0x40d54c
lea eax, [esp + 0x10e]
mov dword [esp + 0xc], str.RR73_msg0
mov dword [esp + 8], 5
mov dword [esp], 0xd
mov dword [esp + 4], eax
call sym.__gfortran_compare_string
test eax, eax
jne 0x40d5da
cmp byte [esp + 0x128], 0x3c
jne 0x40d5da
mov ebp, dword [esp + 0x37c]
mov ecx, dword [esp + 0x378]
mov ebx, dword [esp + 0x374]
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0x14], 0xd
mov dword [esp + 4], edi
mov dword [esp + 0x10], ebp
mov dword [esp + 0xc], ecx
mov dword [esp + 8], ebx
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_01.part.6
jmp 0x40d5da
mov edx, dword [esp + 0x37c]
mov eax, dword [esp + 0x378]
mov ebp, dword [esp + 0x374]
mov dword [esp + 0x18], 0x4d
mov dword [esp + 0x14], 0xd
mov dword [esp + 4], edi
mov dword [esp + 0x10], edx
mov dword [esp + 0xc], eax
mov dword [esp + 8], ebp
mov dword [esp], esi
call sym.___packjt77_MOD_pack77_03.part.5
mov ecx, dword [esp + 0x374]
cmp dword [ecx], 0
jns 0x40d411
mov edx, dword [esp + 0x50]
jmp 0x40d60d
mov ebx, dword [esp + 0x384]
mov dword [esp + 0x10], 0x4d
mov dword [esp + 8], 0x433bcf
mov dword [esp + 4], 0x433640
mov dword [esp], str.At_line_117_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0xc], ebx
call sym.__gfortran_runtime_error_at
mov dword [esp + 8], ecx
mov dword [esp + 4], str.Substring_out_of_bounds:_lower_bound___ld__of_msg_is_less_than_one
mov dword [esp], str.At_line_130_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 6
mov dword [esp + 8], eax
mov dword [esp + 4], str.Substring_out_of_bounds:_upper_bound___ld__of_dxbase_exceeds_string_length___ld_
mov dword [esp], str.At_line_130_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov edi, dword [esp + 0x380]
mov dword [esp + 0x10], 0x25
mov dword [esp + 8], 0x43480b
mov dword [esp + 4], 0x433640
mov dword [esp], str.At_line_117_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
mov dword [esp + 0xc], edi
call sym.__gfortran_runtime_error_at
mov dword [esp + 0xc], 0x25
mov dword [esp + 8], eax
mov dword [esp + 4], str.Substring_out_of_bounds:_upper_bound___ld__of_msg_exceeds_string_length___ld_
mov dword [esp], str.At_line_157_of_file_C:JTSDK64_Tools_tmpwsjtxlib77bitpackjt77.f90
call sym.__gfortran_runtime_error_at
mov dword [0x43ae04], ebp
jmp 0x40d27a