pro plot_mts set_plot, 'z' !P.multi = [0, 1, 3] !P.background = 255 mtsd = read_data('mts242388864.05.0.dat') plot, [0, 90], [0.0, 51.6], /nodata, xstyle=1, ystyle=1, $ ytitle='Count Rate!C5-12 keV', color=0, title='Time-series for seq 242388864, number 05, SSC 0', $ charsize=2.0, charthick=1.5 oplot, mtsd(0,*), mtsd(3,*), psym=10, color=0 plot, [0, 90], [0.0, 34.8], /nodata, xstyle=1, ystyle=1, $ ytitle='Count Rate!C3-5 keV', color=0, charsize=2.0, charthick=1.5 oplot, mtsd(0,*), mtsd(2,*), psym=10, color=0 plot, [0, 90], [0.0, 21.6], /nodata, xstyle=1, ystyle=1, $ ytitle='Count Rate!C1.5-3 keV', color=0, xtitle='Seconds from MJD 52158.432238 (UTC)', $ charsize=2.0, charthick=1.5 oplot, mtsd(0,*), mtsd(1,*), psym=10, color=0 filename = 'mts242388864.05.0.dat.gif' write_gif, filename, tvrd() end