function plotWeatherArea(D,N,lflag)

h = area(D);

cols = [0,0,150;127,127,127;250,210,90;55,0,0]/255;

for i = 1:4
    set(h(i),'FaceColor',cols(i,:));
end

if nargin>1 && ~isempty(N)
    hold on
    plot(N/30,'--r')
    hold off
end

if nargin>2 && lflag
    ltxt = {'rain','cloud','sun','dark'};
    for i=1:4
        annotation('rectangle',[.936,.81-(i-1)*.2,.03,.02],'FaceColor',cols(i,:));
        annotation('textbox',[.932,.77-(i-1)*.2,.04,.04],'String',ltxt{i},'HorizontalAlignment','center','VerticalAlignment','cap','LineStyle','none');
    end
end