fx-4800P测量编程1、测边后方交会“求边长、方位角”实用p105LbI 1Y\"YA\"Q\"ABF\"{XYABCRDQ}POI((A-X),(B-Y))G=(C^2+R^2-D^2)÷(2×R)A\"XB\"C\"PAL\"H=√ (C^2-G^2)B\"YB\"R\"ABL\"M\"XP\"=X+G×CosQ-H×SinQX\"XA\"D\"PBL\"N\"YP\"=Y+G×SinQ+H×COSQGoto 12、求坐标（已知边长、方位角）实用p105LbI 1:{LGXY}:Rec(L,G)+X:Pause 1:J+Y:Pause 3Goto 13、椭圆求s边（任意角p）复杂p198Goto 1G=tan-1((B÷A)×tanJ){JAB}S=√(((A×SinG)^2+(B×CosG)^2)Goto 14、椭圆（已知A长轴一半B短轴一半）复杂p165LbI 1B\"NBX\"X\"NBJX\"=(B÷A)×√(A^{ABY}Y\"DXJY\"2-Y^2)A\"DXY\"Goto 15、缓和曲线偏角（已知弧长JL-ZHL、缓和长LS）土木240LbI 1J\"JL\"S\"HPJ\"=(L^2÷(6×R×C)){CLRJF}F\"ZHL\"×(180÷∏)C\"LS\"L\"HC\"=J-FGoto 16、圆曲线主点已知 角A、半径R、交点里程,路P25 F\"F\"=P:X\":T=Rtan0.5A I\"YZ\"=K+LL=∏RA÷180D:U=0:N=0:LbI 0:N=N+1E=R÷Cos0.5A-R{S}:F=1=＞B=28.8S÷RJ=2T-L:U=U+B G\"JD\"=K\"ZY\"=G-T≠＝＞ B=S^2÷2R:B\"F\"=H\"QZ\"=K+L÷2B-B^2÷18RN＜D=＞Goto 0\"END\"7、圆心角（已知弧长HC、半径R）复杂p51LbI 1G\"YXJ\"=(180÷(R×∏)×L{LR}Goto 1L \"HC\"8、弦长（已知圆心角YXJ、半径R）复杂p76LbI 1L\"XC\"=2×R×(Sin(G÷2)){RG}Goto 1G\"YXJ\"9、双曲线（已知A、B、X）A长轴一半复杂p242LbI 1B\"NBJB\"Y\"DXJY\"=(A÷B)×√(B^{ABX}X\"NBJX\"2+X^2)A\"DXJA\"Goto 111、圆曲线求弦高（圆心角YXJ、X1任意弦长）复杂p18LbI 1C=2×R×(Sin(A÷2))Y=F-E{RAX}D\"MP\"=(C÷2)-XGoto 1A\"YXJ\"E\"OP\"=R×(Cos(A÷2))X\"X1\"F\"ON\"=√(R^2-D^2)12、前方交会,土木p118,路157LbI 1E\"XP\"=((((A×(1÷tanW))+((C×(1÷tanM)))+{ABCDMW}(D-B))÷((1÷tanM)+(1÷tanW))A\"XA\":B\"YB\"F\"XP\"=((((B×(1÷tanW))+(D×(1÷tanM)))-(C-C\"XB\":D\"YB\"A))÷((1÷tanM)+(1÷tanW))M\"M\":W\"W\"Goto 113、大地坐标转为建筑坐标，A轴方位角AZFWJ，土木p184LbI 1A\"AP\"=(X-C)×CosG+(Y-D)×SinG{CDXYG}B\"BP\"= -(X-C)×SinG+(Y-D)×CosGC\"X0\"Goto 1D\"Y0\"X\"XP\"Y\"YP\"G\"AZFWJ\"18、缓和曲线主点里程LbI 1L\"LH\"=((R×A×∏)÷180)+H3Y\"LY\"=R×(A-(2×B))×(∏÷180)H\"HS\"E\"EH\"=R×((1÷(Cos(A÷2)))-1)+CA\"JDJ\"J=(2×T)-LB=0°00′206265″×((H÷(2×D\"JDL\"R)))Z\"ZH\"=D-TK=(H÷2)-(H^3÷(240×R^2)O\"HY\"=Z+HP=H^2÷(24×R)W\"YH\"=O+YU=P×(tan(A÷2))+KM\"HZ\"=W+HC=P×(1÷(Cos(A÷2)))Q\"QZ\"=M-(L÷2)T\"TH\"=(R×((tan(A÷2)))+UX\"JD\"=Q+(J÷2)Goto 119、双曲线计算南北XLbI 1D\"ZG\"总高{AMCD}B=(D×M)÷((√(C^2-M^2))+(√(A^2-M^2)))A\"BY\"X\"NX1\"=(B÷M)×(√(C^2-M^2))M\"ZY\"Y\"BX2\"=D-XC\"NY\"Goto 110、双曲线计算B （已知X.Y.A）见下图LbI 1Y\"DXY\"B\"NBB\"=√((1÷((Y^2÷{AXY}A\"DXA\"A^2)-1)×X^2)X\"NBX\"Goto 114、求椭圆长边一半、短边一半LbI 1X\"CZYB\"=B+D{ABJ}Y\"DZYB\"=A-EA\"R1\"Goto 1B\"R2\"J\"JD\"C\"C1\"=A-BD\"C2\"=Sin J×CE\"D\"=Cos J×C14、缓和曲线坐标（左偏）路p127LbI 1X=A+(((L-O)-(((L-O)^5)÷(40×R^2×{ABLORQH}H^2)))×(CosQ))+((((L-O)^3)÷A\"ZHX\"(6×R×H))×(SinQ))B\"ZHY\"Y=B+(((L-O)-(((L-O)^5)÷(40×R^2×L\"JL\"H^2)))×((SinQ))-((((L-O)}^3)÷O\"ZHL\"(6×R×H))×(CosQ))Q\"ZHJF\"Goto 1H\"LS\"15、缓和曲线中圆曲线坐标（左偏）路p127LbI 1X=A+((2×R×(Sin((90×(L-O))÷(∏÷R))))×(Cos(Q-((90(H+(L-O)))÷A\"HYX\"(∏×R)))))B\"HYY\"Y=B+((2×R×(Sin((90×(L-O))÷(∏÷R))×L\"JL\"(Sin(Q-((90×(H+(L-O)))÷O\"HYL\"(∏×R)))))Q\"ZHJF\"Goto 1H\"LS\"16、缓和曲线坐标（右偏）路p127LbI 1X=A+(((L-O)-(((L-O)^5)÷(40×R^2×{ABLORQH}H^2)))×(CosQ))-((((L-O)^3)÷A\"HZX\"(6×R×H))×(SinQ))B\"HZY\"Y=B+(((L-O)-(((L-O)^5)÷(40×R^2×L\"HZL\"H^2)))×((SinQ))+((((L-O)}^3)÷O\"JL\"(6×R×H))×(CosQ))Q\"HZJF\"Goto 1H\"LS\"20、抛物线 复杂P265LbI 1{Y X A}P=Y2÷(-2×X)A\"Y1\"B\"X1\"=A2÷(-2×P)Goto 121、施工坐标转为大地坐标LbI 1{XYABF}X\"X0\"Y\"Y0\"A\"AP\"B\"BP\"C\"XP\"=X+((A×(CosF))-(B×(SinF)))D\"YP\"=Y+((A×(SinF))+(B×(CosF)))Goto 122、竖曲线计算高程（凹曲线QK-BP K）LbI 1E=(T^2)/(2*R){RACXDF}Y=(X^2)/(2*R)A\"BK\"G\"QK\"=A+TC\"BH\"H\"QH\"=(C+(T*D))D\"P1\"I\"JZK\"=G+XF\"P2\"K\"JZH\"=(X*D)+HT=(R*(D-F))/2M\"JQK\"=G+XL=R*(D-F)N\"JQH\"=K+YGoto 1{ABRLOQH}17、缓和曲线中圆曲线坐标（右偏）路p127LbI 1X=A+((2×R×(Sin((90×(L-O))÷(∏÷R))))×{ABRLOQH}(Cos(Q+((90(H+(L-O)))÷A\"HYX\"(∏×R)))))B\"HYY\"Y=B+((2×R×(Sin((90×(L-O))÷(∏×R))×L\"JL\"(Sin(Q+((90×(H+(L-O)))÷O\"HYL\"(∏×R)))))Q\"ZHJF\"Goto 1H\"LS\"23、竖曲线计算高程（凹曲线ZK-BP K）LbI 1E=(T^2)/(2*R){RACXDF}Y=(X^2)/(2*R)A\"BP K\"O\"QK\"=A+TC\"BP H\"G\"Z K\"=O-LD\"P1\"H\"Z H\"=(C-(T*F))F\"P2\"I\"JZ K\"=G-XT=(R*(D-F))/2K\"JZ H\"=H-(X*F)L=R*(D-F)N\"JQ H\"=K+YGoto 1
