卡西欧fx-5800计算器缓和曲线编程
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1fx－5800P计算器编程
缓和曲线程序
14→DimZ ：“ZHK”：?K：?R ：? A：?L：? T：? F：“Y＋1，Z－1”：?P：“JDX”：?Q：“JDY”：?W：180÷（πR）→Z：0.5L－L^3÷(240R2)→Z[8]：“LZ”：ZL÷2→B：A÷Z＋L→Z[13]◢
“ZHK=”：K◢
“HYK=”：K+L→Z[1]◢
“YHK=”：K+ Z[13] －L→Z[2]◢
“HZK=”：K+ Z[13]→Z[3]◢
“ZHX=”：Q+Tcos(F+180)→U◢
“ZHY=”：W+Tsin(F+180)→V◢
“HZX=”：Q+ Tcos(F+PA)→Z[6]◢
“HZY=”：W+ Tsin (F+PA)→Z[7]◢
Lb1 0：“CDZH”：?M
If M≤K：Then Goto 6：Else If M≤Z[1] ：Then Goto 1：Else If M≤Z[2] ：Then Goto 2：Else If M≥Z[3] ：Then Goto 7：Else If M≥Z[2] ：Then Goto 5：If End：If End：If End：If End：If End
Lb1 1：M－K→G：√（（G－G^(5)÷(40L2R2)＋G^(9)÷(3456R^(4)L^(4)))2＋(G^(3)÷(6RL)－G^(7)÷(336R^(3)L^(3)) ＋G^(11)÷(42240R^(5)L^(5)))2）→D F＋PZG2÷(6L)→C：F＋PBG2÷L2→H：Goto 3
Lb1 2：M－Z[1]→G：R（1－cos（B＋ZG））＋L2÷（24R）→Z[9]：√（Z[9]2＋（Rsin（B＋ZG）＋Z[8]）2）→D
F＋Ptg-1(Z[9]÷(Rsin(B＋ZG)＋Z[8]))→C：F＋P(B＋ZG)→H
Lb1 3
“X=”:U＋Dcos(C)→X◢
“Y=”:V＋Dsin(C)→Y◢
Lb1 B：“ZBJS1，FY－1”：?J
If J>0：Then Goto 4：Else If J〈0：Then Goto A：If End：If End
Lb1 4：“ZB”：?S
“ZBX”:X＋Scos（H－90）◢
“ZBY”:Y＋Ssin（H－90）◢
“YB”：?N
“YBX”:X＋Ncos（H＋90）◢
“YBY”:Y＋Nsin（H＋90）◢
Goto 0
Lb1 5：Z[3]－M→G：（T－G＋G^(5)÷(40L2R2)－G^(9)÷(3456R^(4)L^(4))) sin(A) ＋(G^(3)÷(6RL)－G^(7)÷(336R^(3)L^(3))＋G^(11)÷(42240R^(5)L^(5))) cos(A)→Z[4]：T＋（T －G＋G^(5)÷(40L2R2)）cos(A) －(G^(3)÷(6RL)－G^(7)÷(336R^(3)L^(3))) sin(A)→Z[5]：√（Z[4]2＋Z[5]2）→D ：F＋Ptg-1(Z[4]÷Z[5])→C：F＋P(A－BG2÷L2) →H：Goto 3
Lb1 6：K－M→D：F＋180→C：F→H：Goto 3
Lb1 7：M－Z[3]→D：F＋PA→C：C→H：Goto 9
Lb1 9：“X=”: Z[6]＋Dcos(C)→X◢
“Y=”: Z[7]＋Dsin(C)→Y◢
Goto B
Lb1 A：“N”：?N:“E”：?S：“H”：?I
“X=”:（N－X）cos(H)＋(S－Y)sin(H)＋M→Z[10]◢
“Y=”:（S－Y）cos(H)－(N－X)sin(H) →Z[11]◢
“MS”：1711.15+0.004(Z[10]-85030) →E◢
If I≥E+2 ：Then“+－R1”：6.57－√((I－E－2)) 2+ Z[11] 2→O
Else If I “﹦＞DB”:(I－E+0.5)→O◢ Z[10] →M：If End：If End Goto 0 1.1程序说明 “DimZ”—内存变量扩充 “ZHK”—输入直缓点桩号 “R”—输入曲半径 “L”—输入缓和曲线长 “A”—输入偏角 “Y＋1，Z－1”—路线右转输＋1，左转输－1 “FWJ”—输入起算方位角 “JDX”—输入交点X坐标 “JDY”—输入交点Y坐标 “ZHK=”：得出直缓点桩号 “HYK=”：得出缓圆点桩号 “YHK=”：得出圆缓点桩号 “HZK=”：得出缓直点桩号 “ZHX=”：得出直缓点X “ZHY=”：得出直缓点Y “HZX=”：得出缓直点X “HZY=”：得出缓直点Y “CDZH”—输入待测点桩号 “X=”：得出测点桩号中心桩N “Y=”：得出测点桩号中心桩E “ZBJS1，FY－1”— ①（坐标计算）施工坐标转大地坐标输+1， “ZB”—输入中桩到左边桩的距离； “ZBX”: 得出待测点左边N值 “ZBY”: 得出待测点左边E值 “YB”—输入中桩到右边桩的距离； “YBX”: 得出待测点右边N值 “YBY”: 得出待测点右边E值②（放样）大地坐标转施工坐标输－1， “N”—输入大地坐标的N坐标； “E”—输入大地坐标的E坐标。 “I”—输入大地坐标的H坐标。 “X=”：得出测点桩号X “Y=”：得出测点偏心Y “MS”：得出测点设计高程 “+-R1”：得出测点R1的超欠挖 “+-R2”：得出测点R2的超欠挖 “﹦＞DB”测点到底部超欠挖