CASIO9860/5800坐标正反算计算程序Tags580098602010/6/8fffsky发布CASIOfx-5800P分类评论0浏览350CASIO9860/(命名为ZBZS)第1行:Lbl0:”K=”?K:”BIAN=”?Z:”α=”?B第2行:Prog“A”第3行:”X=”:N+Zcos(F+B)◢第4行:”Y=”:E+Zsin(F+B)◢第5行:”F=”:F◢第6行:Goto0K——计算点的里程BIAN——计算点到中桩的距离(左负右正)α——(命名为ZBFS)第1行:”X1=”?C:”Y1=”?D:”K1=”?K第2行:Lbl0:Prog“A”第3行:Pol(C-N,D-E)第4行:ListAns[1]→I第5行:ListAns[2]→J第6行:Icos(F-J)→S:K+S→K第7行:Abs(S)>=>Goto0第8行:”K1=”:K◢第9行:”BIAN=”:Isin(J-F)→Z◢X1——取样点的X坐标Y1——取样点的Y坐标K1——输入时为计算起始点(在线路内即可),输出时为反算点的桩号Z——偏距(左负右正)(命名为XYF)为了简洁,本程序由数据库直接调用,上述中的正反算主程序不直接调用此程序第1行:K-A→S:(Q-P)÷L→I第2行:N+∫(cos(F+X(2P+XI)×90÷π),0,S)→N第3行:E+∫(sin(F+X(2P+XI)×90÷π),0,S)→E第4行:F+S(2P+SI)×90÷π→(命名为A)第1行:K≤=>Stop第2行:→A:→N:→E:92°26′40″→F:0→P:1/240→Q:→L:K≤A+L=>GoTo1(第一缓和曲线,圆半径为240)第3行:→A:→N:→E:100°50′″→F:1/240→P:1/240→Q:→L:K≤A+L=>Goto1(第圆曲线,半径为240)第4行:→A:→N:→E:118°15′″→F:1/240→P:0→Q:→L:K≤A+L=>Goto1(第二缓和曲线,圆半径为240)第5行:→A:→N:→E:124°50′″→F:0→P:-1/180→Q:→L:K≤A+L=>Goto1:Stop(第一缓和曲线,圆半径为180)第6行:Lbl1:Prog“XYF”A——曲线段起点的里程N——曲线段起点的x坐标E——曲线段起点的y坐标F——曲线段起点的坐标方位角P——曲线段起点的曲率(左负右正)Q——曲线段终点的曲率(左负右正)L——曲线段长度(尽量使用长度,为计算断链方便)说明:(1)在9860中,程序中所有公式和部分函数结果均存储在ListAns列表数组中,要想多次调用最好随公式取出结果,并赋给变量。(2)正算主程序可以计算一般边桩的坐标,如要计算类似涵洞端墙的坐标需增加第二偏距和转角两个变量。(3)程序规定,左偏曲线曲率(半径倒数)输入负值,右偏曲线曲
CASIO+98605800坐标正反算计算程序 来自beplayapp体育下载www.apt-nc.com转载请标明出处.