pro plot_celias_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 11 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_celias_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,4,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))
;
;   CTOF TRP,   thermistor type 3
;
if ( (single eq 0) or (single eq 1) ) then begin
;   v = tmpoint(svmhk2,offset+25,'ff00'xl)		;Byte offset 50
   v = fix(svmhk2(offset+50,*))		;Byte offset 50
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4)
   utplot,utc2,v,title='CTOF Temp Ref Point'
endif

;
;   MTOF TRP,   thermistor type 3
;
if ( (single eq 0) or (single eq 2) ) then begin
;   v = tmpoint(svmhk2,offset+33,'00ff'xl)		;Byte offset 67
   v = fix(svmhk2(offset+67,*))		;Byte offset 67
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4)
   utplot,utc2,v,title='MTOF Temp Ref Point'
endif

;
;   STOF TRP,   thermistor type 3
;
if ( (single eq 0) or (single eq 3) ) then begin
;   v = tmpoint(svmhk2,offset+41,'ff00'xl)		;Byte offset 82
   v = fix(svmhk2,offset+82,*))		;Byte offset 82
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4)
   utplot,utc2,v,title='STOF Temp Ref Point'
endif

;
;   STOF ELEX TRP,   thermistor type 3
;
if ( (single eq 0) or (single eq 4) ) then begin
;   v = tmpoint(svmhk4,offset+73,'ff00'xl)		;Byte offset 146
   v = fix(svmhk4(offset+146,*))		;Byte offset 146
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4)
   utplot,utc4,v,title='STOF Elex Temp Ref Point'
endif

;
;   Celias DPU TRP,   thermistor type 3
;
if ( (single eq 0) or (single eq 5) ) then begin
;   v = tmpoint(svmhk2,offset+50,'00ff'xl)		;Byte offset 101
   v = fix(svmhk2(offset+101,*))		;Byte offset 101
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,4)
   utplot,utc2,v,title='CELIAS DPU Temp Ref Point'
endif

;
;   STOF TH1,   thermistor type 4
;
if ( (single eq 0) or (single eq 6) ) then begin
;   v = tmpoint(svmhk2,offset+29,'00ff'xl)		;Byte offset 59
   v = fix(svmhk2(offset+59,*))		;Byte offset 59
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc2,v,title='STOF Non-OP Thermistor 1'
endif

;
;   STOF TH4,   thermistor type 4
;
if ( (single eq 0) or (single eq 7) ) then begin
;   v = tmpoint(svmhk4,offset+76,'00ff'xl)		;Byte offset 153
   v = fix(svmhk4(offset+153,*))		;Byte offset 153
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc4,v,title='STOF Non-OP Thermistor 4'
endif

;
;   MTOF TH2,   thermistor type 4
;
if ( (single eq 0) or (single eq 8) ) then begin
;   v = tmpoint(svmhk2,offset+36,'00ff'xl)		;Byte offset 73
   v = fix(svmhk2(offset+73,*))		;Byte offset 73
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc2,v,title='MTOF Non-OP Thermistor 2'
endif

;
;   MTOF TH5,   thermistor type 4
;
if ( (single eq 0) or (single eq 9) ) then begin
;   v = tmpoint(svmhk2,offset+55,'ff00'xl)		;Byte offset 110
   v = fix(svmhk2(offset+110,*))		;Byte offset 110
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc2,v,title='MTOF Non-OP Thermistor 5'
endif

;
;   CTOF TH3,   thermistor type 4
;
if ( (single eq 0) or (single eq 10) ) then begin
;   v = tmpoint(svmhk2,offset+46,'00ff'xl)		;Byte offset 93
   v = fix(svmhk2(offset+93,*))		;Byte offset 93
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc2,v,title='CTOF Non-OP Thermistor 3'
endif

;
;   CTOF TH6,   thermistor type 4
;
if ( (single eq 0) or (single eq 11) ) then begin
;   v = tmpoint(svmhk4,offset+55,'ff00'xl)		;Byte offset 110
   v = fix(svmhk4(offset+110,*))		;Byte offset 110
   if ( not keyword_set(noconvert) ) then v = cnvrt_temps (v,5)
   utplot,utc4,v,title='CTOF Non-OP Thermistor 6'
endif


!y.title = ''
!p.multi = 0
!x.title = ''
empty
return
end