data anno ;
        retain xsys ysys   '2' ;
        set hema end=last;
        where std>.z;
        length color function $8;
        if tx=1 then color='black';
        else if tx=2 then color='blue';
function='move';x=visday-0.5;y=mean-std;output;
        function='draw';x=visday+0.5;y=mean-std;output;
        function='move';x=visday-0.5;y=mean+std;output;
        function='draw';x=visday+0.5;y=mean+std;output;

        function='move';x=visday;y=mean-std;output;
        function='draw';x=visday;y=mean+std;output;
run;

proc gplot data=hema;
        plot mean*visday=tx/haxis=axis1 vaxis=axis2 legend=legend1 anno=anno;
        title1 f="Times New Roman" c=blue h=2  "Plot of Mean - Hemoglobin";
        footnote1 f=simplex j=l "Protocol" h=1.5  "XYZ/2";
   label visday = "Visit";
run;
quit;

data inds;
  set inds0;
     lln=mean-std;
    hln=mean+std;
run;
%annomac;
data anno;
  set inds;
  %DCLANNO;
  %system(2,2,3);
  %line(visday,lln,visday,hln,back,1,0.1);
  %line(visday-0.1,lln,visday+0.1,lln,back,1,0.1);
%line(visday-0.1,hln,visday+0.1,hln,back,1,0.1);
run;