Function at 0x4015c0
Capabilities:
Contain obfuscated stackstrings

Disassembly:
push ebp
push edi
push esi
push ebx
sub esp, 0x46c
call sym.__gfortran_iargc
and eax, 0xfffffffd
cmp eax, 1
jne 0x401c75
lea ebp, [esp + 0x87]
mov dword [esp + 8], 0x25
mov dword [esp], 0x4321e4
mov esi, eax
mov dword [esp + 4], ebp
call sym.__gfortran_getarg_i4
mov dword [esp + 4], ebp
mov dword [esp], 0x25
call sym.__gfortran_string_len_trim
cmp eax, 0x25
jg 0x4021b3
cmp eax, 2
jne 0x40164f
movzx eax, word [esp + 0x87]
cmp ax, 0x542d
je 0x401eb5
cmp ax, 0x742d
jne 0x40164f
mov dword [esp + 0x44], 1
mov dword [esp + 0x2c], 1
mov dword [esp + 0x28], 0x30
jmp 0x40182d
lea edx, [esp + 0x48]
mov dword [esp + 8], 0x25
mov dword [esp], ebp
mov dword [esp + 4], edx
call sym._fmtmsg_
mov dword [esp + 0x28], 1
lea ebx, [esp + 0x308]
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x2a
mov dword [esp + 0x33c], str._4x_Message_31x_Decoded_29x_Err_i3.n3_100____
mov dword [esp + 0x340], 0x35
mov dword [esp], ebx
mov dword [esp + 0x308], 0x1000
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp + 0x44], 1
mov dword [esp + 0x2c], 0
jmp 0x40182d
mov ebx, dword [esp + 0x4c]
test ebx, ebx
jne 0x401aa0
mov dword [esp + 0x5a], 0x65657246
mov dword [esp + 0x5e], 0x78657420
mov dword [esp + 0x62], 0x20202074
mov dword [esp + 8], 0x25
mov dword [esp + 4], esi
mov dword [esp], ebp
mov byte [esp + 0x3f], 0x20
mov dword [esp + 0x51], 0x20202020
mov dword [esp + 0x55], 0x20202020
mov byte [esp + 0x59], 0x20
call sym._memcmp
test eax, eax
je 0x40173b
mov byte [esp + 0x3f], 0x2a
mov edx, dword [esp + 0x2c]
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
test edx, edx
je 0x4019a2
test ebx, ebx
js 0x401ae0
lea ebx, [esp + 0x308]
mov dword [esp + 0x314], 0x4b
mov dword [esp + 0x33c], str._i1_._i1_2x_a37_1x_a1_1x_a18__i1_._3x_a37_1x_a1_1x_a18_
mov dword [esp + 0x340], 0x1f
mov dword [esp + 0x308], 0x1000
mov dword [esp], ebx
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 4
mov dword [esp + 4], edi
mov dword [esp], ebx
call sym.__gfortran_transfer_integer_write
lea eax, [esp + 0x4c]
mov dword [esp + 8], 4
mov dword [esp + 4], eax
mov dword [esp], ebx
lea esi, [esp + 0x5a]
call sym.__gfortran_transfer_integer_write
mov dword [esp + 8], 0x25
mov dword [esp + 4], ebp
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
lea edx, [esp + 0x3f]
mov dword [esp + 8], 1
mov dword [esp], ebx
mov dword [esp + 4], edx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 0x12
mov dword [esp + 4], esi
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov edi, dword [esp + 0x44]
lea esi, [edi + 1]
cmp esi, dword [esp + 0x28]
mov dword [esp + 0x44], esi
jg 0x401c27
cmp dword [esp + 0x28], 1
je 0x4018b3
test esi, esi
jle 0x40215b
sub esi, 1
lea ecx, [esi + esi*8]
lea esi, [esi + ecx*4]
mov eax, dword [esi + str.TNX_BOB_73_GL________________________K1ABC_RR73__W9XYZ__KH1_KH7Z___08_____PA9XYZ_590003_IO91NP_________________G4ABC_P_R_570007_JO22DB______________K1ABC_W9XYZ_6A_WI____________________W9XYZ_K1ABC_R_17B_EMA________________123456789ABCDEF012___________________CQ_K1ABC_FN42________________________K1ABC_W9XYZ_EN37_____________________W9XYZ_K1ABC__11______________________K1ABC_W9XYZ_R_09_____________________W9XYZ_K1ABC_RRR______________________K1ABC_W9XYZ_73_______________________K1ABC_W9XYZ_RR73_____________________CQ_FD_K1ABC_FN42_____________________CQ_TEST_K1ABC_R_FN42_________________K1ABC_R_W9XYZ_EN37___________________W9XYZ_K1ABC_R_R_FN42_________________K1ABC_R_W9XYZ_RR73___________________CQ_TEST_K1ABC_FN42___________________W9XYZ__PJ4_K1ABC___11_________________PJ4_K1ABC__W9XYZ_R_09_______________CQ_W9XYZ_EN37_________________________YW18FIFA__W9XYZ__11_________________W9XYZ__YW18FIFA__R_09_________________YW18FIFA__KA1ABC____________________KA1ABC__YW18FIFA___11_________________YW18FIFA__KA1ABC_R_17________________YW18FIFA__KA1ABC_73_________________CQ_G4ABC_P_IO91______________________G4ABC_P_PA9XYZ_JO22__________________PA9XYZ_G4ABC_P_RR73__________________K1ABC_W9XYZ_579_WI___________________W9XYZ_K1ABC_R_589_MA_________________K1ABC_KA0DEF_559_MO__________________TU__KA0DEF_K1ABC_R_569_MA____________KA1ABC_G3AAA_529_0013________________TU__G3AAA_K1ABC_R_559_MA_____________CQ_KH1_KH7Z__________________________CQ_PJ4_K1ABC_________________________PJ4_K1ABC__W9XYZ______________________W9XYZ__PJ4_K1ABC_RRR________________PJ4_K1ABC__W9XYZ__73__________________W9XYZ__YW18FIFA_____________________YW18FIFA__W9XYZ__RRR__________________W9XYZ__YW18FIFA_73__________________CQ_YW18FIFA___________________________KA1ABC__YW18FIFA_RR73]
lea edi, [esi + str.TNX_BOB_73_GL________________________K1ABC_RR73__W9XYZ__KH1_KH7Z___08_____PA9XYZ_590003_IO91NP_________________G4ABC_P_R_570007_JO22DB______________K1ABC_W9XYZ_6A_WI____________________W9XYZ_K1ABC_R_17B_EMA________________123456789ABCDEF012___________________CQ_K1ABC_FN42________________________K1ABC_W9XYZ_EN37_____________________W9XYZ_K1ABC__11______________________K1ABC_W9XYZ_R_09_____________________W9XYZ_K1ABC_RRR______________________K1ABC_W9XYZ_73_______________________K1ABC_W9XYZ_RR73_____________________CQ_FD_K1ABC_FN42_____________________CQ_TEST_K1ABC_R_FN42_________________K1ABC_R_W9XYZ_EN37___________________W9XYZ_K1ABC_R_R_FN42_________________K1ABC_R_W9XYZ_RR73___________________CQ_TEST_K1ABC_FN42___________________W9XYZ__PJ4_K1ABC___11_________________PJ4_K1ABC__W9XYZ_R_09_______________CQ_W9XYZ_EN37_________________________YW18FIFA__W9XYZ__11_________________W9XYZ__YW18FIFA__R_09_________________YW18FIFA__KA1ABC____________________KA1ABC__YW18FIFA___11_________________YW18FIFA__KA1ABC_R_17________________YW18FIFA__KA1ABC_73_________________CQ_G4ABC_P_IO91______________________G4ABC_P_PA9XYZ_JO22__________________PA9XYZ_G4ABC_P_RR73__________________K1ABC_W9XYZ_579_WI___________________W9XYZ_K1ABC_R_589_MA_________________K1ABC_KA0DEF_559_MO__________________TU__KA0DEF_K1ABC_R_569_MA____________KA1ABC_G3AAA_529_0013________________TU__G3AAA_K1ABC_R_559_MA_____________CQ_KH1_KH7Z__________________________CQ_PJ4_K1ABC_________________________PJ4_K1ABC__W9XYZ______________________W9XYZ__PJ4_K1ABC_RRR________________PJ4_K1ABC__W9XYZ__73__________________W9XYZ__YW18FIFA_____________________YW18FIFA__W9XYZ__RRR__________________W9XYZ__YW18FIFA_73__________________CQ_YW18FIFA___________________________KA1ABC__YW18FIFA_RR73]
mov edx, dword [edi + 4]
mov ebx, dword [edi + 8]
mov dword [esp + 0x87], eax
mov eax, dword [edi + 0x14]
mov ecx, dword [edi + 0xc]
mov esi, dword [edi + 0x10]
mov dword [esp + 0x8b], edx
mov dword [esp + 0x8f], ebx
mov dword [esp + 0x9b], eax
movzx eax, byte [edi + 0x24]
mov dword [esp + 0x93], ecx
mov edx, dword [edi + 0x18]
mov ebx, dword [edi + 0x1c]
mov ecx, dword [edi + 0x20]
mov dword [esp + 0x97], esi
mov dword [esp + 0x9f], edx
mov byte [esp + 0xab], al
mov dword [esp + 0xa3], ebx
mov dword [esp + 0xa7], ecx
lea edi, [esp + 0x1cc]
lea esi, [esp + 0xd1]
lea edx, [esp + 0x4c]
mov dword [esp + 0x1c], 0x25
mov dword [esp + 0x18], 0x25
lea ebx, [esp + 0x11e]
mov dword [esp + 0x14], edi
mov dword [esp + 0x10], esi
lea edi, [esp + 0x40]
lea esi, [esp + 0xac]
mov dword [esp + 8], edx
mov dword [esp], ebp
mov dword [esp + 4], edi
mov dword [esp + 0x40], 0xffffffff
mov dword [esp + 0xc], esi
mov dword [esp + 0x4c], 0xffffffff
call sym._genft8_
lea ecx, [esp + 0xd1]
mov dword [esp + 4], ebx
mov dword [esp], ecx
call sym._encode174_91_
mov edx, dword [esp + 0x40]
mov eax, 0x2020
mov dword [esp + 0x5a], 0x20202020
mov dword [esp + 0x5e], 0x20202020
mov dword [esp + 0x62], 0x20202020
mov dword [esp + 0x66], 0x20202020
mov word [esp + 0x6a], ax
test edx, edx
je 0x4016e0
cmp edx, 1
jne 0x401c3d
mov ebx, 0x2020
mov dword [esp + 0x5a], 0x6e617453
mov dword [esp + 0x5e], 0x64726164
mov dword [esp + 0x62], 0x67736d20
mov dword [esp + 0x66], 0x20202020
mov word [esp + 0x6a], bx
nop
mov dword [esp + 0x4c], 0xffffffff
mov ebx, 0xffffffff
jmp 0x401704
test ebx, ebx
js 0x401b40
lea ebx, [esp + 0x308]
mov dword [esp + 0x314], 0x53
mov dword [esp + 0x33c], str._i2_._1x_a37_1x_a37_1x_a1_2x_i1_._i1_1x_a18_1x_a9_
mov dword [esp + 0x340], 0x36
mov dword [esp + 0x308], 0x1000
mov dword [esp], ebx
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
lea eax, [esp + 0x44]
mov dword [esp + 8], 4
mov dword [esp], ebx
mov dword [esp + 4], eax
call sym.__gfortran_transfer_integer_write
mov dword [esp + 8], 0x25
mov dword [esp + 4], ebp
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 0x25
mov dword [esp + 4], esi
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
lea edx, [esp + 0x3f]
mov dword [esp + 8], 1
mov dword [esp], ebx
mov dword [esp + 4], edx
call sym.__gfortran_transfer_character_write
mov dword [esp + 4], edi
lea edi, [esp + 0x4c]
mov dword [esp + 8], 4
mov dword [esp], ebx
call sym.__gfortran_transfer_integer_write
mov dword [esp + 8], 4
mov dword [esp + 4], edi
mov dword [esp], ebx
lea esi, [esp + 0x51]
call sym.__gfortran_transfer_integer_write
lea ecx, [esp + 0x5a]
mov dword [esp + 8], 0x12
mov dword [esp], ebx
mov dword [esp + 4], ecx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 9
jmp 0x401804
cmp ebx, 1
jne 0x401bef
mov eax, 0x2020
mov dword [esp + 0x5a], 0x65705844
mov dword [esp + 0x5e], 0x69746964
mov dword [esp + 0x62], 0x6d206e6f
mov dword [esp + 0x66], 0x2065646f
mov word [esp + 0x6a], ax
jmp 0x401704
lea ebx, [esp + 0x308]
mov dword [esp + 0x314], 0x4e
mov dword [esp + 0x33c], 0x43235f
mov dword [esp + 0x340], 0x1c
mov dword [esp + 0x308], 0x1000
mov dword [esp], ebx
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 4
mov dword [esp + 4], edi
jmp 0x4017c4
lea ebx, [esp + 0x308]
mov dword [esp + 0x314], 0x56
mov dword [esp + 0x33c], str._i2_._1x_a37_1x_a37_1x_a1_2x_i1_._1x_1x_a18_1x_a9_
mov dword [esp + 0x340], 0x36
mov dword [esp + 0x308], 0x1000
mov dword [esp], ebx
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
lea ecx, [esp + 0x44]
mov dword [esp + 8], 4
mov dword [esp], ebx
mov dword [esp + 4], ecx
call sym.__gfortran_transfer_integer_write
mov dword [esp + 8], 0x25
mov dword [esp + 4], ebp
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp + 4], esi
lea esi, [esp + 0x3f]
mov dword [esp + 8], 0x25
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 1
mov dword [esp + 4], esi
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 4
mov dword [esp + 4], edi
jmp 0x401a6c
cmp ebx, 2
jne 0x4021d3
mov ecx, 0x2020
mov dword [esp + 0x5a], 0x56205545
mov dword [esp + 0x5e], 0x43204648
mov dword [esp + 0x62], 0x65746e6f
mov dword [esp + 0x66], 0x20207473
mov word [esp + 0x6a], cx
jmp 0x401704
cmp dword [esp + 0x28], 1
je 0x401ec2
add esp, 0x46c
pop ebx
pop esi
pop edi
pop ebp
ret
cmp edx, 2
jne 0x40217b
mov edx, 0x2020
mov dword [esp + 0x5a], 0x56205545
mov dword [esp + 0x5e], 0x43204648
mov dword [esp + 0x62], 0x65746e6f
mov dword [esp + 0x66], 0x20207473
mov word [esp + 0x6a], dx
jmp 0x401990
lea ebx, [esp + 0x308]
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x15
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
mov dword [esp], ebx
call sym.__gfortran_st_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x17
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 0x38
mov dword [esp + 4], str.Program_ft8code:__Provides_examples_of_message_packing__LDPC_174_91__encoding_
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp + 8], 0x16
mov dword [esp + 4], 0x4320c8
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x18
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 0x3f
mov dword [esp + 4], str.bit_and_symbol_ordering__and_other_details_of_the_FT8_protocol.
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x19
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x1a
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 0x43
mov dword [esp + 4], str.Usage:_ft8code___c_grid___message____Results_for_specified_message
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x1b
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 0x43
mov dword [esp + 4], str._______ft8code__T____________________Examples_of_all_message_types
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x1c
mov dword [esp + 0x308], pe_nt_image_headers32
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 8], 0x3b
mov dword [esp + 4], str._______ft8code__t____________________Short_format_examples
mov dword [esp], ebx
call sym.__gfortran_transfer_character_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
jmp 0x401c32
mov dword [esp + 0x28], 0x30
jmp 0x40166f
lea edi, [esp + 0x6c]
mov dword [esp], ebx
lea ebp, [esp + 0xd1]
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x5d
mov dword [esp + 0x33c], str.__Source_encoded_message__77_bits:___77i1___14_bit_CRC:___14i1___83_Parity_bits:___83i1_
mov dword [esp + 0x340], 0x2c
mov dword [esp + 0x308], 0x1000
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
mov dword [esp + 0xc], 0
mov dword [esp + 8], 1
mov dword [esp + 4], edi
mov dword [esp], ebx
mov dword [esp + 0x74], 0x49
mov dword [esp + 0x7c], 1
mov dword [esp + 0x80], 0x4d
mov dword [esp + 0x78], 1
mov dword [esp + 0x6c], ebp
mov dword [esp + 0x70], 0xffffffff
call sym.__gfortran_transfer_array_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x5f
mov dword [esp + 0x33c], 0x432418
mov dword [esp + 0x340], 0x17
mov dword [esp + 0x308], 0x1000
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
lea ecx, [esp + 0x16b]
mov dword [esp + 0xc], 0
mov dword [esp + 8], 1
mov dword [esp + 4], edi
mov dword [esp], ebx
mov dword [esp + 0x6c], ecx
mov dword [esp + 0x74], 0x49
mov dword [esp + 0x7c], 1
mov dword [esp + 0x80], 0xe
mov dword [esp + 0x78], 1
mov dword [esp + 0x70], 0xffffffb2
call sym.__gfortran_transfer_array_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x61
mov dword [esp + 0x33c], 0x43242f
mov dword [esp + 0x340], 0x1b
mov dword [esp + 0x308], 0x1000
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
lea eax, [esp + 0x179]
mov dword [esp + 0xc], 0
mov dword [esp + 8], 1
mov dword [esp + 4], edi
mov dword [esp], ebx
mov dword [esp + 0x6c], eax
mov dword [esp + 0x74], 0x49
mov dword [esp + 0x7c], 1
mov dword [esp + 0x80], 0x53
mov dword [esp + 0x78], 1
mov dword [esp + 0x70], 0xffffffa4
call sym.__gfortran_transfer_array_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
mov dword [esp], ebx
mov dword [esp + 0x310], str.C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
mov dword [esp + 0x314], 0x63
mov dword [esp + 0x33c], str.__Channel_symbols__79_tones_:________________________________Sync__14x_Data_15x_Sync_15x_Data_15x_Sync_____________________7i1_1x_29i1_1x_7i1_1x_29i1_1x_7i1_
mov dword [esp + 0x340], 0xa9
mov dword [esp + 0x308], 0x1000
mov dword [esp + 0x30c], 6
call sym.__gfortran_st_write
lea edx, [esp + 0x1cc]
mov dword [esp + 0xc], 0
mov dword [esp + 8], 4
mov dword [esp + 4], edi
mov dword [esp], ebx
mov dword [esp + 0x74], 0x109
mov dword [esp + 0x7c], 1
mov dword [esp + 0x80], 0x4f
mov dword [esp + 0x78], 1
mov dword [esp + 0x6c], edx
mov dword [esp + 0x70], 0xffffffff
call sym.__gfortran_transfer_array_write
mov dword [esp], ebx
call sym.__gfortran_st_write_done
jmp 0x401c32
mov dword [esp + 0xc], 1
mov dword [esp + 8], esi
mov dword [esp + 4], str.Index__ld_of_dimension_1_of_array_testmsg_below_lower_bound_of__ld
mov dword [esp], str.At_line_46_of_file_C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
call sym.__gfortran_runtime_error_at
cmp edx, 3
jne 0x402207
mov eax, 0x2070
mov dword [esp + 0x5a], 0x4c525241
mov dword [esp + 0x5e], 0x54545220
mov dword [esp + 0x62], 0x6f522059
mov dword [esp + 0x66], 0x75646e75
mov word [esp + 0x6a], ax
jmp 0x401990
mov dword [esp + 0xc], 0x25
mov dword [esp + 8], eax
mov dword [esp + 4], 0x4321e8
mov dword [esp], str.At_line_34_of_file_C:JTSDK64_Tools_tmpwsjtxlib_ft8_ft8code.f90
call sym.__gfortran_runtime_error_at
cmp ebx, 3
jne 0x40223b
mov edx, 0x2020
mov dword [esp + 0x5a], 0x4c525241
mov dword [esp + 0x5e], 0x65694620
mov dword [esp + 0x62], 0x4420646c
mov dword [esp + 0x66], 0x20207961
mov word [esp + 0x6a], dx
jmp 0x401704
cmp edx, 4
jne 0x402274
mov ecx, 0x2020
mov dword [esp + 0x5a], 0x736e6f4e
mov dword [esp + 0x5e], 0x646e6174
mov dword [esp + 0x62], 0x20647261
mov dword [esp + 0x66], 0x6c6c6163
mov word [esp + 0x6a], cx
jmp 0x401990
cmp ebx, 4
je 0x4021d8
cmp ebx, 5
jne 0x4022ae
mov eax, 0x2020
mov dword [esp + 0x5a], 0x656c6554
mov dword [esp + 0x5e], 0x7274656d
mov dword [esp + 0x62], 0x20202079
mov dword [esp + 0x66], 0x20202020
mov word [esp + 0x6a], ax
jmp 0x401704
cmp edx, 5
je 0x401c46
jle 0x4022e3
mov ebx, 0x2020
mov dword [esp + 0x5a], 0x65646e55
mov dword [esp + 0x5e], 0x656e6966
mov dword [esp + 0x62], 0x79742064
mov dword [esp + 0x66], 0x20206570
mov word [esp + 0x6a], bx
jmp 0x401990
jle 0x401704
mov ecx, 0x2020
mov dword [esp + 0x5a], 0x65646e55
mov dword [esp + 0x5e], 0x656e6966
mov dword [esp + 0x62], 0x79742064
mov dword [esp + 0x66], 0x20206570
mov word [esp + 0x6a], cx
jmp 0x401704
test edx, edx
jg 0x401990
mov ebx, dword [esp + 0x4c]
jmp 0x401704