mirror of
				https://github.com/saitohirga/WSJT-X.git
				synced 2025-10-31 04:50:34 -04:00 
			
		
		
		
	Fixed so that files can be read while Monitoring or Auto is on.
git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/trunk@135 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
This commit is contained in:
		
							parent
							
								
									6bcfe14ec2
								
							
						
					
					
						commit
						4dc8d03f8a
					
				| @ -41,7 +41,6 @@ subroutine getfile(fname,len) | ||||
| #ifdef Win32 | ||||
|   open(10,file=fname,form='binary',status='old',err=998) | ||||
|   read(10,end=998) hdr | ||||
|    | ||||
| #else | ||||
|   call rfile2(fname,hdr,44+2*NDMAX,nr) | ||||
| #endif | ||||
| @ -75,13 +74,7 @@ subroutine getfile(fname,len) | ||||
| #endif | ||||
|   endif | ||||
| 
 | ||||
|   if(monitoring.eq.0) then | ||||
| ! In this case, spec should read data from d2c | ||||
| !     jzc=jzc/2048 | ||||
| !     jzc=jzc*2048 | ||||
|      ndiskdat=1 | ||||
|   endif | ||||
| 
 | ||||
|   ndiskdat=1 | ||||
|   mousebutton=0 | ||||
|   go to 999 | ||||
| 
 | ||||
|  | ||||
							
								
								
									
										1
									
								
								spec.f90
									
									
									
									
									
								
							
							
						
						
									
										1
									
								
								spec.f90
									
									
									
									
									
								
							| @ -199,7 +199,6 @@ subroutine spec(brightness,contrast,logmap,ngain,nspeed,a) | ||||
|      nspeed0=nspeed | ||||
|   endif | ||||
| 
 | ||||
| !  print*,brightness,contrast,logmap,gain,gamma,offset | ||||
|   do i=1,iz | ||||
|      n=0 | ||||
|      if(a0(i).gt.0.0 .and. logmap.eq.1) n=gain*log10(0.001*a0(i)) + offset + 20 | ||||
|  | ||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user