diff --git a/astro.cpp b/astro.cpp index c2ccbde3e..b8c22fa52 100644 --- a/astro.cpp +++ b/astro.cpp @@ -14,6 +14,7 @@ Astro::Astro(QWidget *parent) : ui->astroTextBrowser->setStyleSheet( "QTextBrowser { background-color : cyan; color : black; }"); ui->astroTextBrowser->clear(); + m_AzElDir0=""; } Astro::~Astro() @@ -72,8 +73,10 @@ void Astro::astroUpdate(QDateTime t, QString mygrid, QString hisgrid, QString fname=azelDir+"/azel.dat"; QFile f(fname); if(!f.open(QIODevice::WriteOnly | QIODevice::Text)) { + if(azelDir==m_AzElDir0) return; + m_AzElDir0=azelDir; QMessageBox mb; - mb.setText("Cannot open " + fname); + mb.setText("Cannot open " + fname + "\nCorrect the setting of AzEl Directory in Setup?"); mb.exec(); return; } diff --git a/astro.h b/astro.h index a142f0e3c..0568a878f 100644 --- a/astro.h +++ b/astro.h @@ -21,6 +21,7 @@ public: private: Ui::Astro *ui; + QString m_AzElDir0; }; extern "C" { diff --git a/libm65/qra64b.f90 b/libm65/qra64b.f90 index 94b86a14c..fe21bcd43 100644 --- a/libm65/qra64b.f90 +++ b/libm65/qra64b.f90 @@ -14,8 +14,8 @@ subroutine qra64b(nutc,nqd,fcenter,nfcal,nfsample,ikhz,mousedf,ntol,xpol, & open(17,file='red.dat',status='unknown') - nfft1=MAXNFFT1 - nfft2=MAXNFFT2 + nfft1=MAXFFT1 + nfft2=MAXFFT2 df=96000.0/NFFT1 if(nfsample.eq.95238) then nfft1=5120000 @@ -26,7 +26,7 @@ subroutine qra64b(nutc,nqd,fcenter,nfcal,nfsample,ikhz,mousedf,ntol,xpol, & ikhz0=nint(1000.0*(fcenter-int(fcenter))) k0=((ikhz-ikhz0+48.0+1.27)*1000.0+nfcal)/df if(k0.lt.nh .or. k0.gt.nfft1-nh) go to 900 - + fac=1.0/nfft2 cx(0:nh)=ca(k0:k0+nh) cx(nh+1:nfft2-1)=ca(k0-nh+1:k0-1)