CASIOfx5800p计算器测量实用程序加数据库

CASIO fx-5800p 道路主线坐标放样程序简化使用程序 说明： 此程序是根据教科书结合工地实践应用继续开发，本程序包含一个母程序和两个子程序，本程序简化了部分详细输出内容，加快了实地放样计算的速度，本程序还有一大优点就是有“一劳永逸”的效果，先把子程序输入计算器，然后根据曲线要素表，用其中的数据代替母程序中的文字提示（包括括号），输入计算器，在运行母程序，然后检核，每一个曲线至少检查一个点，检核无误后即可，每次去工地放样就可以免带图纸，同时也大大的提高了野外放样计算的速度。 ZBFY(道路主线坐标放样程序母程序)： Lbl 0  “KP=”?P  If P<(第一个曲线的结束桩号)：Then （第一个曲线的交点 x 坐标）→X  （第一个曲线的交点 y 坐标）→Y （第一个曲线的上一交点 x 坐标）→M  （第一个曲线的上一交点 y 坐标）→N  （第一个曲线的转角，左-右+）→O  （第一个曲线的半径）→R  （第一个曲线的第一缓和曲线长度）→B  （第一个曲线的第二缓和曲线长度）→C  （第一个曲线的交点桩号）→K  Prog “-ZBFY”:Goto 0:IfEnd  If P<(第二个曲线的结束桩号)：Then （第二个曲线的交点 x 坐标）→X  （第二个曲线的交点 y 坐标）→Y （第二个曲线的上一交点 x 坐标）→M  （第二个曲线的上一交点 y 坐标）→N  （第二个曲线的转角，左-右+）→O  （第二个曲线的半径）→R  （第二个曲线的第一缓和曲线长度）→B  （第二个曲线的第二缓和曲线长度）→C  （第二个曲线的交点桩号）→K  Prog “-ZBFY”:Goto 0:IfEnd  . . .(重复If 到IfEnd 的语句，有n 个曲线，就重复n-1 次) . . . （最后一个曲线的交点x 坐标）→X  （最后一个曲线的交点y 坐标）→Y  （最后一个曲线的上一交点x 坐标）→M  （最后一个曲线的上一交点y 坐标）→N  （最后一个曲线的转角，左-右+）→O  （最后一个曲线的半径）→R  （最后一个曲线的第一缓和曲线长度）→B  （最后一个曲线的第二缓和曲线长度）→C （最后一个曲线的交点桩号）→K  Prog “-ZBFY”:Goto 0 (结束) -ZBFY(带“-”号的程序表示子程序)： Deg:Fix3:26→ DimZ  Lbl0  If O<0:Then -1→ W:Else 1→ W:IfEnd:WO→ A  B224R-B∧(4) 2688R∧(3)+B∧(6)506880R∧(5)→...