%include "c:\spinplots\sp_plot.sas";
%include "c:\spinplots\sp_plota.sas";
%include "c:\spinplots\fixlen.sas";
%include "c:\spinplots\sp_plotbx1.sas";
%include "c:\spinplots\sp_plotbx1x2.sas";
%include "c:\spinplots\sp_plotbx1x1x2.sas";

%sp_plota(outfile="c:\spinplots\reg_int_cont1.gif", bx1=0,bx2=0,bx1x2=0);


%sp_plotbx1(outfile="c:\spinplots\reg_int_cont2.gif",
            bx1=0,bx2=0,bx1_lo=0,bx1_hi=3,bx1_by=.05, slen=5, 
            angle=190,gopt= delay=10);



* when b1 b2=0, add bx1x2 from 0 to .5, fast ;
%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont4.gif",
              bx1=0,bx2=0, bx1x2_lo=0, bx1x2_hi=.5, bx1x2_by=.01, 
              slen=5, angle=190,gopt= delay=10);

%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont5.gif",
              bx1=0, bx2=0, bx1x2_lo=0, bx1x2_hi=.5, bx1x2_by=.05, 
              slen=5, angle=190,gopt= delay=50);

%%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont6.gif",
               bx1=0, bx2=0, bx1x2_lo=-.5, bx1x2_hi=0, bx1x2_by=.01, 
               slen=5,angle=190,gopt= delay=10);

%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont7.gif",
              bx1=0,bx2=0, bx1x2_lo=-.5, bx1x2_hi=0, bx1x2_by=.05, 
              slen=5, angle=190,gopt= delay=50);

%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont8.gif",
              bx1=0, bx2=0, bx1x2_lo=-.5, bx1x2_hi=.5, bx1x2_by=.01, 
              slen=5, angle=190,gopt= delay=10); 

%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont9.gif",
              bx1=0, bx2=0, bx1x2_lo=-.5, bx1x2_hi=.5, bx1x2_by=.05, 
              slen=5,angle=190,gopt= delay=50);

%sp_plota(outfile="c:\spinplots\reg_int_cont10.gif", bx1=0,bx2=0,bx1x2=.5, title=" ");

%sp_plotbx1(outfile="c:\spinplots\reg_int_cont11.gif",
            bx1=0, bx2=0, bx1x2=.5, bx1_lo=0, bx1_hi=2, bx1_by=.1,
            angle=190, slen=5, gopt=delay=50, plot=zmin=-70 zmax=70);

%sp_plotbx1x2(outfile="c:\spinplots\reg_int_cont12.gif",
              bx1=3, bx2=0, bx1x2_lo=0, bx1x2_hi=.5, bx1x2_by=.05, 
              slen=5, angle=190, gopt=delay=50,
              plot=zmin=-70 zmax=70 noneedle shape='balloon' size=.5, cmd=scatter);

%sp_plota(outfile="c:\spinplots\reg_int_cont13.gif", 
                  cons=10, bx1=0, bx2=3, bx1x1=-.5,
                  title="Spinplot", 
                  title2="y=&cons+&bx1*x1+&bx2*x2+&bx1x1*x1*x1",
                  plot= zmin=-80 zmax=50);

%sp_plotbx1x1x2(outfile="c:\spinplots\reg_int_cont14.gif",
                cons=30, bx1=0, bx1x1=-.4, bx2=3, bx1x1x2_lo=0, bx1x1x2_hi=.07, bx1x1x2_by=.01,
		        slen=5, angle=10,gopt=delay=10 vsize=4 hsize=6, plot= zmin=-100 zmax=100);
