dateTime=1;

darkRefIntTime=2;

darkRef690=3;

darkRef590=4;

measureRefIntTime=5;

measureRef690=6;

measureRef590=7;

luminIntTime=8;

lumin690=9;

lumin590=10;

fluorIntTime=11;

fluor690=12;

fluor590=13;

phosIntTime=14;

phos690=15;

phos590=16;

fluorData=Drop[Import["/Users/mcgill/Desktop/Pulse\ 60/SES/fluorometer.csv"],1];

fluorData[[1;;10]]

DateListPlot[fluorData[[All,{dateTime,fluor690}]],{PlotRange->All,Joined->True,PlotLabel->"SES 690 nm Fluorescence on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"}}]

DateListPlot[fluorData[[All,{dateTime,fluor590}]],{PlotRange->All,Joined->True,PlotLabel->"SES 590 nm Fluorescence on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"}}]

DateListPlot[{fluorData[[All,{dateTime,measureRef690}]],fluorData[[All,{dateTime,measureRef590}]]},{PlotRange->All,Joined->True,PlotLabel->"SES Fluorescence References on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"}}]

DateListPlot[{fluorData[[All,{dateTime,fluor690}]],fluorData[[All,{dateTime,fluor590}]]},{PlotRange->All,Joined->True,PlotLabel->"SES Fluorescence on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"}}]

f690=fluorData[[All,{fluor690}]]-fluorData[[All,{measureRef690}]]

f690date=Partition[Flatten[Riffle[fluorData[[All,{dateTime}]],f690]],2];

f690date[[1;;10]]

pl690=DateListPlot[f690date,{PlotRange->All,Joined->True,PlotLabel->"SES 690 nm Fluorescence on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"},PlotStyle->Red}]

f590=fluorData[[All,{fluor590}]]-fluorData[[All,{measureRef590}]]

f590date=Partition[Flatten[Riffle[fluorData[[All,{dateTime}]],f590]],2];

pl590=DateListPlot[f590date,{PlotRange->All,Joined->True,PlotLabel->"SES 590 nm Fluorescence on Pulse 60",FrameLabel->{"Date","Fluorescence (counts)"},PlotStyle->Orange}]

Show[pl690,pl590]

<<PlotLegends`

DateListPlot[{f590date,f690date},{PlotRange->All,Joined->True,BaseStyle->{FontWeight->"Bold",FontSize->14},PlotLabel->"SES Fluorescence on Pulse 60",FrameLabel->{"Date (2012)","Fluorescence (PM counts)"},PlotStyle->{{Thick,Orange},{Thick,Red}},PlotLegend->{"590 nm","690 nm"},LegendShadow->None,LegendPosition->{0.3,0.2},LegendSize->{0.3,0.2}}]