% m-file: mk_climo_plot.m
clf

%n=max(size(obs_lo));

set(gcf,'Visible','off');
set(gcf,'Renderer','painters');

h1=plot(daysall,rec_hi,'-');set(h1,'Color',[255 150 150]/255,'linewidth',2);hold on
h=plot(daysall,rec_hi,'.');set(h,'Color',[255 120 120]/255);hold on
h2=plot(daysall,rec_lo,'-');set(h2,'Color',[150 150 255]/255,'linewidth',2);
h=plot(daysall,rec_lo,'.');set(h,'Color',[120 120 255]/255);

%jbfill(day,norm_hi,norm_lo,[200 200 200]/255,[105 105 105]/255);
h3=plot(daysall,norm_hi,'--');set(h3,'Color',[255 150 150]/255,'linewidth',2)
h4=plot(daysall,norm_lo,'--');set(h4,'Color',[150 150 255]/255,'linewidth',2);

hold on
h5=plot(daysobs,obs_lo_to_plot,'-');set(h5,'Color',[50 50 255]/255,'linewidth',2);
h=plot(daysobs,obs_lo_to_plot,'*');set(h,'Color',[0 0 1],'linewidth',4);
h6=plot(daysobs,obs_hi_to_plot,'-');set(h6,'Color',[255 50 50]/255,'linewidth',2);
h=plot(daysobs,obs_hi_to_plot,'*');set(h,'Color',[1 0 0],'linewidth',4);

grid on
axis([min(daysall) max(daysall) min([obs_lo_to_plot rec_lo])-1 max([obs_hi_to_plot rec_hi])+1])
%legend([h1 h2 h3 h4 h5 h6],'Record Hi','Record Lo','Normal Hi','Normal Lo','Obs Hi','Obs Lo')

title(['K' city ' Midnight to Midnight (Local Time) Max/Min Temperature (^oF)'],'fontweight','bold','fontsize',22)
xlabel(['Day in month of ' monthstr],'fontweight','bold','fontsize',20);
ylabel('Temperature (^oF)','fontweight','bold','fontsize',20) 

set(gca,'xtick',daysall,'FontSize',14,'xticklabel',dayslabelstr,'ytick',[-50:5:100])

legend([h1 h2 h3 h4 h6 h5],'Record Hi','Record Lo','Normal Hi','Normal Lo','Obs Hi','Obs Lo','Location','NorthEastOutside')  

set(1,'Position',[1 200 1000 500],'PaperPositionMode','auto','PaperSize',[7 4]')

%orient portrait; 
%print -r100 -dpng Jan_temps1
print -dpng obs_temps
