landscap.spt

#include <splot.h>                                  
double *data1,*data2;
main() 
   {   

   /* select landscape orientation */
   set(PAGE_ROT,ON);
   set(LINEWIDTH,0.09); 
   axes_box(20,14,1.5088,0,1.515,1.03e8,3,3);

   set(TICKLENGTH,0.5);
   tickmarks(XAXES,1.510,1.515);

   set(LINEWIDTH,0.06); 
   set(FONTWIDTH,0.8);
   /* use short squat letters for labels */
   set(FONTASPECT,1.1);
   set(FONT,COMPLEX);
   ticklabel(LOWER,1.510,1.515);
   set(FONTWIDTH,1.0);
   label(LEFT,"Relative PL Intensity");
   text(9.00,1.90,"Photon energy (eV)");
   text(20.00,15.00,"12 T");
   text(21.00,13.00,"a)");
   text(21.00,7.00,"b)");
   set(FONTWIDTH,0.70);
   text(13.47,9.84,"2p_0_");
   text(5.70,8.35,"3p_0_");
   text(8.80,6.46,"2s");
   text(4.80,5.40,"3d_0_");
   text(3.82,5.30,"3s");
   text(7.65,5.70,"3p_-_");
   text(11.65,5.60,"3d_-1_");
   set(FONTWIDTH,0.75);
   text(13.65,16.10,"a");
   text(14.70,14.60,"b");
   text(16.25,13.75,"b*");
   text(16.80,13.10,"c*");
       
   set(LINEWIDTH,0.05); 
   set(TICKLENGTH,0.35);
   tickmarks(XAXES,1.509,1.511,1.512,1.513,1.514,1.516);
       
   /* constrain plot to axes box */
   set(AXESCLIP,ON);

   /* change x axis units to eV */
   set(XMULT,0.1239842e-3);   
       
   /* plot first spectrum */
   set(XSHIFT,0);     
   set(YSHIFT,47e6);     
   set(YMULT,300);
   readdata("demo\fe21m23a.dat",data1);
   set(YRANGE,0,99e6);
   drawdata(data1,0,1);

   /* plot second spectrum shifted up */
   set(YSHIFT, 7e6);     
   set(YMULT,150);
   readdata("demo\fe22v31a.dat",data2);
   set(YRANGE,0,45e6);
   drawdata(data2,0,1);
   }