永发信息网

卡西欧fx-5800P如何编程我正学习当中

答案:1  悬赏:20  手机版
解决时间 2021-11-08 01:07
  • 提问者网友:聂風
  • 2021-11-07 08:52
卡西欧fx-5800P如何编程我正学习当中
最佳答案
  • 五星知识达人网友:往事隔山水
  • 2021-11-07 10:21
坐标、桩号换算 文件名LbI 4:”1.SZ=>NE”:”2.NE=>SZ”:?Q:Prog “文件名―3” LbI :Q=1=>Goto1:Q=2=>Goto 2LbI 1:?S:?Z:Prog “文件名―1”:”N”:N◢“E=”:E◢“F=”:FΔDMS◢Goto4LbI 2:”N=”:?B:”E=”:?C:B→N:C→E:Prog” 文件名―2”:”S=”:S◢“Z=”:Z◢Goto 4 文件名―1Prog “文件名―3”:0.5(1÷R-1÷P) ÷L→D:S-O→XU+∫(cos(A+(X÷P+DX2)×180÷∏),O,X)→NV+∫(sin(A+(X÷P+ DX2)×180÷∏),O,X)→EA+(X÷P+ DX2) ×180÷∏→FN+Zcos(F+90) →N:E+Zsin(F+90) →E 文件名―2LbI 1:0→Z:1→Q:Prog “文件名―3”:Prog“文件名―1”Pol(N-B+10^(-46),E-C+10^(-46):Isin(F-90-J) →W:S+W→SAbs(W)>0.001=>Goto 1LbI 2:0→Z:Prog “文件名―1”:(C-E) ÷sin(F+90) →Z 文件名―3If S≧QD 桩 号And S< ZY点桩号:Then Goto 0:IfEndIf S≧ZY点桩号And S< YZ点桩号:Then Goto 1:IfEndIf S≧YZ点桩号And S< ZD 桩 号:Then Goto 2:IfEndIf S≧ZD 桩 号 And S< ZD延长桩号:Then Goto 3:IfEndLbI 0:QD 桩 号→O:QD横坐标→U:QD纵坐标→V:QD段直线方位角→A:1000000000→P: ZY至QD距离→L:1000000000→R:ReturnLbI 1:ZY点桩号→O:ZY横坐标→U:ZY纵坐标→V:上段直线方位角→A:半径→P: 参数中L值→L:半径→R:ReturnLbI 2:YZ点桩号→O:YZ横坐标→U:YZ纵坐标→V:下段直线方位角→A:1000000000→P: YZ至ZD距离→L:1000000000→R:ReturnLbI 3:ZD桩号→O:ZD横坐标→U:ZD纵坐标→V:对应直线方位角→A:1000000000→P: ZD至延长位置距离→L:1000000000→R:Return 注:圆曲线交点在路线左边R为正,在路线右边R为负。直线半径为无穷大 方位角―距离 Do“X1”?A :“Y1”?B“X2”?C“Y2”?DPol(C-A,D-B):ClsJ<0=>J+360→J“D”:I◢“A”:JΔDMS◢J→J? K : Lbl 0 : ? N : ? EA+(N-K)cos(J) – Esin(J) →X:X→X◢B+(N-K)sin(J) + Ecos(J) →Y:Y→Y◢Goto 0 注:K为所输坐标(X1,Y1)对应的桩号 N为所求坐标的桩号 E为所求坐标的偏距 圆曲线 Lbl 0:?X:?Y:?A:?R:?Q:?Z:(Z-Q) ÷R×180÷∏→J:2Rsin(0.5j) →T:A+J→W◢X+Tcos(A+0.5J) →M◢Y+Tsin(A+0.5J) →N◢?S:M+cos(W+90) →B◢N+Ssin(W+90) →C◢Goto 0 纵断面设计高程Lbl 0:?K:If K≧起点桩号 And K≦ZY点桩号:Then Goto 1:IfEndIf K≧ZY点桩号 And K≦YZ点桩号:Then Goto 2:IfEndIf K≧YZ桩号 And K≦ZD点桩号:Then Goto 3:IfEndLbl 1:QD高程→V:QD桩号→Q:QD~ZY坡度→W:半径→R:Goto XLbl 2:ZY点高程→V:ZY点桩号→Q: QD~ZY坡度→W:半径→R:Goto XLbl 3:YZ点高程→V:YZ点桩号→Q:YZ~ZD坡度→W:半径→R:Goto XLbl X:V+(K-Q)W+(K-Q)2÷(2×R) →Y◢Goto 0 注:圆曲线交点在路线上方R为负,在路线下方R为正。直线半径为无穷大(1×10^45)
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯