x1 = datenum(1993,8,9);
x2 = datenum(1993,8,19);
D1 = datenum(1993,8,1);
D2 = datenum(1993,8,30);
Selector = AllDrained(:,1)>=D1 & AllDrained(:,1) < D2;
Flow93AD = AllDrained(Selector,:);
Rain93 = Raindata(Selector,1:2);
Flow93AUD = AllUndrained(Selector,:);
Flow93Orig = OriginalDrainage(Selector,:);
[AX,H1,H2]=plotyy(Rain93(:,1),Rain93(:,2),Flow93AD(:,1),Flow93AD(:,2),'bar','area');
set(AX(1),'xlim',[x1,x2],'xtick',x1:x2,'FontWeight','Bold','TickDir','out');
set(AX(1),'xtick',[]);
set(AX(1),'ydir','rev','ylim',[0,3],'ytick',0:0.5:3);
set(AX(1),'Box','Off');
set(AX(2),'xlim',[x1,x2],'xtick',x1:x2,'ylim',[0,10000],'ytick',0:1000:10000,'FontWeight','Bold','TickDir','out');
datetick(AX(1),'keeplimits');
datetick(AX(2),'keeplimits');
set(get(AX(1),'Ylabel'),'String','Precipitation (in)','FontSize',12,'FontWeight','Bold');
set(get(AX(2),'Ylabel'),'String','Discharge (cfs)','FontSize',12,'FontWeight','Bold');
set(get(AX(1),'Xlabel'),'String','Date','FontSize',12,'FontWeight','Bold');
set(H1,'DisplayName','Precip','FaceColor','b');
set(H2,'DisplayName','Drained','FaceColor','none','EdgeColor','g');
legend('show','Location','West');
title('August 1993 Hydrograph for the One Soil All Drained Scenario','FontSize',14);