5800交点法线路坐标计算程序