mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2024-11-25 05:38:46 -05:00
Merge branch 'release-2.1.0' of bitbucket.org:k1jt/wsjtx into release-2.1.0
This commit is contained in:
commit
8104d80998
@ -1,7 +1,7 @@
|
||||
subroutine azdist(grid1,grid2,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
|
||||
subroutine azdist(MyGrid,HisGrid,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
|
||||
|
||||
character*(*) grid1,grid2
|
||||
character*6 MyGrid,HisGrid,mygrid0,hisgrid0
|
||||
character(len=*) :: MyGrid,HisGrid
|
||||
character*6 mygrid0,hisgrid0
|
||||
real*8 utch,utch0
|
||||
logical HotABetter,IamEast
|
||||
real eltab(22),daztab(22)
|
||||
@ -12,11 +12,6 @@ subroutine azdist(grid1,grid2,utch,nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter)
|
||||
data mygrid0/" "/,hisgrid0/" "/,utch0/-999.d0/
|
||||
save
|
||||
|
||||
MyGrid=grid1//' '
|
||||
HisGrid=grid2//' '
|
||||
if(ichar(MyGrid(5:5)).eq.0) MyGrid(5:6)=' '
|
||||
if(ichar(HisGrid(5:5)).eq.0) HisGrid(5:6)=' '
|
||||
|
||||
if(MyGrid.eq.HisGrid) then
|
||||
naz=0
|
||||
nel=0
|
||||
|
@ -41,6 +41,7 @@ LogQSO::LogQSO(QString const& programTitle, QSettings * settings
|
||||
|
||||
ok_->setAutoDefault (false);
|
||||
ok_->setFocusPolicy (Qt::ClickFocus);
|
||||
ok_->setStyleSheet ("background-color: green");
|
||||
cancel_->setAutoDefault (false);
|
||||
ui->button_layout->addStretch ();
|
||||
ui->button_layout->addWidget (ok_);
|
||||
|
@ -7549,8 +7549,8 @@ void MainWindow::p1ReadFromStdout() //p1readFromStdout
|
||||
if(grid!="") {
|
||||
double utch=0.0;
|
||||
int nAz,nEl,nDmiles,nDkm,nHotAz,nHotABetter;
|
||||
azdist_(const_cast <char *> (m_config.my_grid ().toLatin1().constData()),
|
||||
const_cast <char *> (grid.toLatin1().constData()),&utch,
|
||||
azdist_(const_cast <char *> ((m_config.my_grid () + " ").left (6).toLatin1 ().constData ()),
|
||||
const_cast <char *> ((grid + " ").left (6).toLatin1 ().constData ()),&utch,
|
||||
&nAz,&nEl,&nDmiles,&nDkm,&nHotAz,&nHotABetter,6,6);
|
||||
QString t1;
|
||||
if(m_config.miles()) {
|
||||
|
Loading…
Reference in New Issue
Block a user