w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-21 19:55:20 -05:00
Code Issues Packages Projects Releases Wiki Activity

If DX grid is blank, set DX astro params to zero. Do this in astrosub.f90, not asstro.cpp!

Browse Source
This commit is contained in:
Joe Taylor 2022-07-17 16:12:59 -04:00
parent c296bca73a
commit 2e4a6c3c32
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/astrosub.f90
View File

@ -54,6 +54,12 @@ contains
width1,width2,xlst8,techo8) width1,width2,xlst8,techo8)
if (len_trim(AzElFileName) .eq. 0) go to 999 if (len_trim(AzElFileName) .eq. 0) go to 999
if(len(trim(hisgrid)).eq.0) then !If DX grid is blank, set these to zero:
AzMoonB8=0
ElMoonB8=0
ndop=0
width2=0
endif
imin=60*uth8 imin=60*uth8
isec=3600*uth8 isec=3600*uth8
ih=uth8 ih=uth8

6
widgets/astro.cpp
View File

@ -121,12 +121,6 @@ auto Astro::astroUpdate(QDateTime const& t, QString const& mygrid, QString const
AzElFileName.toLocal8Bit ().constData (), AzElFileName.toLocal8Bit ().constData (),
jpleph.toLocal8Bit ().constData ()); jpleph.toLocal8Bit ().constData ());
if(!hisgrid.size ()) {
azmoondx=0.0;
elmoondx=0.0;
m_dop=0;
width2=0.0;
}
QString message; QString message;
{ {
QTextStream out {&message}; QTextStream out {&message};