options mprint;
goptions cback=white ftext=swissb colors=(black) noprompt
         vsize=5.0 in hsize=5.0 in  target=ps720  gsflen=80
         gaccess=sasgaedt gsfmode=replace  horigin=0 in nodash
         gprolog='25210d0a'x vorigin=0.0 in hpos=90 vpos=67
         gsfname=cfc11;
filename cfc11 '/cdiac/ndp/ftp/pub/db1010/figures/cfc11.gsf';
symbol1 h=.05 in v=dot i=join;
data test(keep=cfc time);
    infile '/cdiac/ndp/ftp/pub/db1010/db1010.dat' firstobs=6;
input year c1  c2  c3  c4  c5   c6  c7  c8 c9 /
           c10 c11 c12 ann;
 array monthly(12) c1-c12;
 do i=1 to 12;
   cfc=monthly(i);
   if cfc=-99.9 then cfc=.;
   time=year+((i-1)/12);
   output;
 end;
proc print;
run;
footnote1 m=(3.1,18.8) a=90 h=.15 in 'CFC-11 Concentration (pptv)';
proc gplot data=test ;
axis1 label=(a=90 h=0.3 in '  ') value=(h=0.15 in)
  order=(150 to 300 by 50) major=(h=.08 in w=10)  offset=(0 in, 0 in)
  minor=(n=1 w=6 h=.06 in) width=10;
axis2 label=(h=.15 in font=swissb 'Year') order=(1980 to 1992 by 3)  value=(h=0.15 in)
  major=(h=.08 in w=10) minor=(h=.06 in n=1 w=6) width=10 offset=(0.1 in, 0.1 in);
plot cfc*time / overlay haxis=axis2 vaxis=axis1 skipmiss;
run;