pro plot_mdi_nonop,svmhk2,svmhk4,single=single,noconvert=noconvert 
; 
;     svmhk2 = array of all monitors from SVHK2 TLM stream generated by DACS 
;     svmhk4 = array of all monitors from SVHK4 TLM stream generated by DACS 
; 
;     single is an optional number that is from 0 to 4 that controls the 
;            plot number for a single plot.  If the parameter is omitted 
;            or 0 then all of the plots are made on a single page.  Otherwise 
;            the plot is the following 
; @(#)plot_mdi_nonop.pro	1.1 01/23/98 :LASCO IDL LIBRARY
;
; 
; offset the beginning of HK before HK information begins 
; 
offset=12 
; 
if keyword_set(noconvert) then begin 
        !y.title = 'Temp (DN)'  
        !y.range = [0,255] 
endif else begin 
        !y.title='Temp (Deg)' 
        !y.range = [0,40] 
endelse 
 
if keyword_set(single) then begin 
        !p.multi=0 
endif else begin 
        !p.multi=[0,3,3,0,0] 
        single = 0 
endelse 
 
getcputime,svmhk2,firstday,time2 ,cdstime=utc2
getcputime,svmhk4,firstday,time4 ,cdstime=utc4
 
!x.title = 'Time (Hours) Starting Date:  '+ utc2str(utc2(0))
; 
;   MDI SU TRP1,   thermistor type 3 
; 
if ( (single eq 0) or (single eq 1) ) then begin 
;   v = tmpoint(svmhk4,offset+74,'ff00'xl)               ;Byte offset 148 
   v = fix(svmhk4(offset+148,*))               ;Byte offset 148 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   utplot,utc4,v,title='MDI SU Temp Ref Point',yrange=[0,50] 
endif 
 
; 
;   MDI ENICS TRP2,   thermistor type 3 
; 
if ( (single eq 0) or (single eq 2) ) then begin 
;   v = tmpoint(svmhk4,offset+54,'00ff'xl)               ;Byte offset 109 
   v = fix(svmhk4(offset+109,*))               ;Byte offset 109 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   utplot,utc4,v,title='MDI ENICS Temp Ref Point',yrange=[0,50] 
endif 
 
; 
;   MDI SU TH1,   thermistor type 3 
; 
if ( (single eq 0) or (single eq 3) ) then begin 
;   v = tmpoint(svmhk2,offset+37,'00ff'xl)               ;Byte offset 75 
   v = fix(svmhk2(offset+75,*))               ;Byte offset 75 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   utplot,utc2,v,title='MDI Thermistor 1' 
endif 
 
; 
;   MDI SU TH2,   thermistor type 3 
; 
if ( (single eq 0) or (single eq 4) ) then begin 
;   v = tmpoint(svmhk4,offset+75,'00ff'xl)               ;Byte offset 151 
   v = fix(svmhk4(offset+151,*))               ;Byte offset 151 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   utplot,utc4,v,title='MDI SU Thermistor 2' 
endif 
 
; 
;   MDI SU TH3,   thermistor type 3 
; 
if ( (single eq 0) or (single eq 5) ) then begin 
;   v = tmpoint(svmhk2,offset+54,'ff00'xl)               ;Byte offset 108 
   v = fix(svmhk2(offset+108,*))               ;Byte offset 108 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4) 
   utplot,utc2,v,title='MDI SU Thermistor 3' 
endif 
 
; 
;   MDI SU TH4,   thermistor type 5 
; 
if ( (single eq 0) or (single eq 6) ) then begin 
;   v = tmpoint(svmhk4,offset+56,'ff00'xl)               ;Byte offset 112 
   v = fix(svmhk4(offset+112,*))               ;Byte offset 112 
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,7) 
   utplot,utc4,v,title='MDI SU Thermistor 4' 
endif 
 
; 
;   MDI SU TH5,   thermistor type 4 
; 
if ( (single eq 0) or (single eq 7) ) then begin 
;   v = tmpoint(svmhk2,offset+43,'00ff'xl)               ;Byte offset 87 
   v = fix(svmhk2(offset+87,*))               ;Byte offset 87
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5) 
   utplot,utc2,v,title='MDI EL Thermistor 5' 
endif 
 
!y.title = '' 
!p.multi = 0 
!x.title = '' 
empty 
return 
end 
