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

坐标、桩号换算 文件名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）