PRO JAN20_LCPLOTTER ; RESTORE, 'JAN20-LC1.SAV' minutes = FINDGEN(53)+25.5 f0 = lc_data[*,0] - lc_data[0,0] f4 = lc_data[*,4] - lc_data[0,4] f0 = f0 / max(f0) f4 = f4 / max(f4) F8 = lc_data[*,8] - lc_data[0,8] f8 = f8 / max(f8) PLOT, minutes, f0, XRANGE=[35,70], XSTYLE=1,YRANGE=[0,1.2],XTITLE='MINUTES AFTER 06:00', YTITLE='RELATIVE COUNTS',TITLE='20-JAN-2005', PSYM=10 ;300-500 OPLOT, minutes, f4, PSYM=-6 ; 2218-2228 squares OPLOT, minutes, f8, PSYM=7 ; 2500-7500 xxx XYOUTS, 55, 1.1, '- 300-500 keV XYOUTS, 55, 1.0, 'o 2218-2228 keV x 80' stop END