曲线测设程序用MATLAB语言编写

用MATLAB程序写的公路曲线测设放样程序，可计算出曲线综合要素和曲线放样数据等

function A0=CalAlfa（x1y1x2y2） 
% 计算方位角
dx=x2-x1;
dy=y2-y1;
K=dy/dx; 
% A1=atan2（dxdy）; 
A1=atan（K）;
if dx>0 && dy>0 
    A0=A1; 
end 
if dx>0 && dy<0
    A0=A1+2*pi; 
end 
if dx<0 && dy>0 
    A0=A1+pi; 
end 
if dx<0 && dy<0 
    A0=A1+pi;
end 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        321  2009-12-20 15:48  老师MATLAB程序\CalAlfa.m

     文件        344  2009-12-20 15:48  老师MATLAB程序\CalCoordHY_YH.m

     文件        245  2009-12-20 15:49  老师MATLAB程序\CalCoordHZ_ZX.m

     文件        345  2009-12-20 15:49  老师MATLAB程序\CalCoordYH_HZ.m

     文件        250  2009-12-20 15:49  老师MATLAB程序\CalCoordZH_HY.m

     文件        219  2009-12-20 15:49  老师MATLAB程序\CalCoordZX_ZH.m

     文件        172  2009-12-20 15:50  老师MATLAB程序\Curve.m

     文件       4404  2009-12-20 15:48  老师MATLAB程序\Untitled.asv

     文件       3173  2009-12-20 15:50  老师MATLAB程序\Untitled.m

     目录          0  2010-01-01 12:04  老师MATLAB程序

----------- ---------  ---------- -----  ----

                 9473                    10