mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-12-23 19:25:37 -05:00
Better protection against bad data in c77. Slightly wider default Settings window.
This commit is contained in:
parent
5c628edb54
commit
fed89ef888
@ -6,7 +6,7 @@
|
||||
<rect>
|
||||
<x>0</x>
|
||||
<y>0</y>
|
||||
<width>532</width>
|
||||
<width>534</width>
|
||||
<height>546</height>
|
||||
</rect>
|
||||
</property>
|
||||
@ -3076,10 +3076,10 @@ soundcard changes</string>
|
||||
<buttongroups>
|
||||
<buttongroup name="CAT_stop_bits_button_group"/>
|
||||
<buttongroup name="split_mode_button_group"/>
|
||||
<buttongroup name="CAT_handshake_button_group"/>
|
||||
<buttongroup name="TX_mode_button_group"/>
|
||||
<buttongroup name="CAT_data_bits_button_group"/>
|
||||
<buttongroup name="CAT_handshake_button_group"/>
|
||||
<buttongroup name="TX_audio_source_button_group"/>
|
||||
<buttongroup name="TX_mode_button_group"/>
|
||||
<buttongroup name="PTT_method_button_group"/>
|
||||
</buttongroups>
|
||||
</ui>
|
||||
|
@ -232,10 +232,14 @@ subroutine unpack77(c77,msg)
|
||||
"NB ","NS ","QC ","ON ","MB ","SK ","AB ","BC ","NWT","NF ", &
|
||||
"LB ","NU ","VT ","PEI","DC "/
|
||||
|
||||
if(index(c77,'*').ge.1) then !Check for bad data
|
||||
msg='QUIRK 2'
|
||||
return
|
||||
endif
|
||||
|
||||
! Check for bad data
|
||||
do i=1,77
|
||||
if(c77(i:i).ne.'0' .and. c77(i:i).ne.'1') then
|
||||
msg='QUIRK 2'
|
||||
return
|
||||
endif
|
||||
enddo
|
||||
|
||||
read(c77(72:77),'(2b3)') n3,i3
|
||||
msg=repeat(' ',37)
|
||||
|
Loading…
Reference in New Issue
Block a user