mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-05-24 18:32:27 -04:00
leadings zeroes should be included
This commit is contained in:
parent
ab8917d66a
commit
885691e170
@ -118,7 +118,7 @@ subroutine sfox_unpack(nutc,x,nsnr,f0,dt0,foxcall,nsignature)
|
|||||||
100 read(msgbits(307:326),'(b20)') nsignature
|
100 read(msgbits(307:326),'(b20)') nsignature
|
||||||
! print*,'i3:',i3
|
! print*,'i3:',i3
|
||||||
if (use_otp) then
|
if (use_otp) then
|
||||||
write(ssignature,'(I0)') nsignature
|
write(ssignature,'(I6.6)') nsignature
|
||||||
write(*,1100) nutc,nsnr,dt0,nint(f0),'$VERIFY$ '//trim(foxcall)//' '//trim(ssignature)
|
write(*,1100) nutc,nsnr,dt0,nint(f0),'$VERIFY$ '//trim(foxcall)//' '//trim(ssignature)
|
||||||
endif
|
endif
|
||||||
return
|
return
|
||||||
|
Loading…
x
Reference in New Issue
Block a user