mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 13:10:19 -04:00 
			
		
		
		
	Display sine-wave frequency for QRA64 "@nnnn" messages.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/wsjtx@7326 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
		
							parent
							
								
									2f49ef176a
								
							
						
					
					
						commit
						4b64729d67
					
				| @ -20,6 +20,9 @@ subroutine genqra64(msg0,ichk,msgsent,itone,itype) | ||||
|      go to 2 | ||||
| 1    nfreq=1000 | ||||
| 2    itone(1)=nfreq | ||||
|      write(msgsent,1000) nfreq | ||||
| 1000 format(i5,' Hz') | ||||
|      print*,'aa ',msgsent | ||||
|   else | ||||
|      message=msg0 | ||||
|      do i=1,22 | ||||
|  | ||||
| @ -259,10 +259,10 @@ program jt9 | ||||
|      shared_data%params%dttol=3. | ||||
| 
 | ||||
|      shared_data%params%minsync=0       !### TEST ONLY | ||||
| !     shared_data%params%nfqso=1500      !### TEST ONLY | ||||
| !     shared_data%params%nfqso=1500     !### TEST ONLY | ||||
|      mycall="G3WDG       "              !### TEST ONLY | ||||
|      hiscall="VK7MO       "             !### TEST ONLY | ||||
|      mycall="QE37        "              !### TEST ONLY | ||||
|      hisgrid="QE37        "             !### TEST ONLY | ||||
|      if(mode.eq.164 .and. nsubmode.lt.100) nsubmode=nsubmode+100 | ||||
| 
 | ||||
|      shared_data%params%naggressive=10 | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user