We input and plot all the data.

Input := 


adata = {{0,1},{2,.88},{6,.69},{10,.53},

		  {20,.28},{30,.15},{50,.043},{70,.012},

		  {90,0},{120,0},{150,0},{200,0}};

bdata = {{0,1},{2,.12},{6,.29},{10,.42},

		  {20,.55},{30,.57},{50,.46},{70,.33},

		  {90,.22},{120,.12},{150,.06},{200,.02}};

cdata = {{0,0},{2,.003},{6,.030},{10,.050},

		  {20,.16},{30,.28},{50,.50},{70,.66},

		  {90,.78},{120,.88},{150,.94},{200,.98}};

Input := 


adataPlot = ListPlot[adata,PlotStyle->PointSize[.01]]

Output =


-Graphics-

Input := 


bdataPlot = ListPlot[bdata,PlotStyle->PointSize[.015]]

Output =


-Graphics-

Input := 


cdataPlot = ListPlot[cdata,PlotStyle->PointSize[.02]]

Output =


-Graphics-

Input := 


alldataPlot =Show[adataPlot,bdataPlot,cdataPlot]

Output =


-Graphics-