pro plot_sxs, sxs, timerange=timerange, ocolor=ocolor, titles=titles, $
	ytype=ytype, nsum=nsum

checkvar,ocolor, !p.color
checkvar, ytype, 0
checkvar, nsum, 1
checkvar, titles, strarr(4)+' '
if ytype eq 1 then ymin=1 else ymin=0


checkvar,timerange,0 ;no range set

a_ut = sxs(0).a_ut ;Yohkoh time start 7 element vector

for i=0,3 do begin   
	utplot,sxs.pc.sec,sxs.pc.rate(i,*),a_ut,psym=10,nsum=nsum*8, $
		time=timerange,/xsty,yrange=[ymin,max(sxs.pc.rate(i,*))],$
		title = titles(i),ytype=ytype    
	outplot,sxs.ph.sec,sxs.ph.pc_bins(i,*),a_ut,psym=10,color=ocolor,$
	nsum=nsum, thick=2
		
endfor

return
end