mirror of
https://github.com/saitohirga/WSJT-X.git
synced 2025-03-28 23:19:00 -04:00
Fix several more GUI parameters for FST240.
This commit is contained in:
parent
e98987c676
commit
eb167b11d3
@ -8,13 +8,11 @@ subroutine gen_fst240wave(itone,nsym,nsps,nwave,fsample,hmod,f0, &
|
||||
real, allocatable :: dphi(:)
|
||||
integer hmod
|
||||
integer itone(nsym)
|
||||
! integer*8 count0,count1,clkfreq
|
||||
logical first
|
||||
data first/.true./
|
||||
data nsps0/-99/
|
||||
save first,twopi,dt,tsym,nsps0,ctab
|
||||
|
||||
! call system_clock(count0,clkfreq)
|
||||
if(first) then
|
||||
twopi=8.0*atan(1.0)
|
||||
do i=0,NTAB-1
|
||||
@ -88,11 +86,6 @@ subroutine gen_fst240wave(itone,nsym,nsps,nwave,fsample,hmod,f0, &
|
||||
(1.0+cos(twopi*(/(i,i=0,nsps/4-1)/)/real(nsps/2)))/2.0
|
||||
cwave=cshift(cwave,kshift)
|
||||
endif
|
||||
|
||||
! call system_clock(count1,clkfreq)
|
||||
! tt=float(count1-count0)/float(clkfreq)
|
||||
! write(*,3001) tt
|
||||
!3001 format('Tgen:',f8.3)
|
||||
|
||||
return
|
||||
end subroutine gen_fst240wave
|
||||
|
@ -3888,12 +3888,11 @@ void MainWindow::guiUpdate()
|
||||
if(m_TRperiod==120) nsps=8200;
|
||||
if(m_TRperiod==300) nsps=21168;
|
||||
nsps=4*nsps; //48000 Hz sampling
|
||||
int nsym=164;
|
||||
int nsym=160;
|
||||
float fsample=48000.0;
|
||||
float dfreq=hmod*fsample/nsps;
|
||||
float f0=ui->TxFreqSpinBox->value() - m_XIT + 1.5*dfreq;
|
||||
// int nwave=(nsym+2)*nsps;
|
||||
int nwave=48000 + 166*nsps;
|
||||
int nwave=48000 + (nsym+2)*nsps;
|
||||
int icmplx=0;
|
||||
gen_fst240wave_(const_cast<int *>(itone),&nsym,&nsps,&nwave,
|
||||
&fsample,&hmod,&f0,&icmplx,foxcom_.wave,foxcom_.wave);
|
||||
|
Loading…
Reference in New Issue
Block a user