• 4800曲线计算及常用导线坐标正算,反算.(步骤极少,方便输入)


    4800曲线计算及常用导线坐标正算,反算.(步骤极少,方便输入) 

    4800常用导线坐标正算,反算

    1.坐标反算程序
    文件名:ZBFS
    C“X1”:D“Y1”:E“X2”:F“Y2”:Fixm:Pol(E-C,F-D):I“S=” ▲J≤0=>J=J+360△
    J“W=”
    说明:
    X1,Y1,为测站坐标
    X2,Y2,为后视坐标
    S,W,为两点距离,测站到后视方位角

    2.坐标正算程序
    文件名:ZBZS
    C“X1”:D“Y1”:S“S”:R“W”:U“V”:Fixm:X“X2”=C+Rec((S,(R+U))▲
    Y“Y2”=D+Ssin(R+U)
    说明:
    X1,Y1,为测站坐标
    W为测站到后视方位角
    V为后视置0度0分0秒,盘左到前视夹角读数
    S为测站到前视水平距离
    X2,Y2,为求得前视坐标

    3.本人根据其他公试修改缓和曲线,圆曲线4800公试,望各位同行参考,提出意见,
    (本程序是运用复化辛普生公式)

    文件名:QXJS
    A“X0=”:B“Y0=”:C“W1=”:E“(+-)QR”:P“DKQ=”
    E≠0=>E=1÷E: ≠>E=0△
    Lb1 1:{FQ}:F“(+-)ZR”:Q“DKZ=”
    F≠0=>F=1÷F: ≠>F=0△
    Lb1 2:{VD}:V“DK=”:D“-DKL, +DKR”:○=V:○﹤P=>G0t0 3:≠>G0t0 4
    Lb1 3:“K-SMALL”:G0t0 2
    Lb1 4:○﹥Q=>G0t0 5:≠>G0t0 6
    Lb1 5:V=Q:D=0:“JISUAN:A-TXY”:G0t0 6 
    Lb1 6:W=C+90÷∏×(2×E+(F-E)(V-P)÷(Q-P))(V-P):W﹤0=>W=W+360△W﹥360=>W=W-360△W▲
    Rad:H“X”=A+∫(COS(C°×∏÷180+0.5×(2×E+(F-E)(X-P)÷(Q-P))(X-P)),P,V,4)+D×COS(W°×∏÷180+90°×∏÷180):Y=B+∫(SIN (C°×∏÷180+0.5×(2×E+(F-E)(X-P)÷(Q-P))(X-P)),P,V,4)+D×SIN(W°×∏÷180+90°×∏÷180):Deg:H“X=” △Y“Y=”△
    G0t0 7
    Lb1 7:○≤Q=>G0t0 2:≠>G0t0 8
    Lb1 8:A=H:B=Y:C=W:E=F:P=Q:G0t0 1

    说明:X0,Y0,为起始点坐标
           W1为起始点方位角   绶和曲线-----起始到交点
           (+-)QR起始点半经,0为无穷大,非无穷大时左偏为负右为正。
           DKQ起始里程,
           (+-)ZR终点半经, 0为无穷大,非无穷大时左偏为负右为正。
           DKZ为终点里程
           D K为要求点里程
           -DKL, +DKR节   中桩0   边桩 左-  右+
           显示W下一线形起点方位角
           显示要求点的XY坐标
     
     

  • 相关阅读:
    web资产识别
    《代码随想录》刷题笔记——哈希表篇【java实现】
    44特征02—— 对角化: 相似对角化的条件
    如何实现一个IO口读取多个设备信息
    优雅解决spring事务中异步发送MQ,Redis,RPC
    PHP毕业设计源代码计算机学院师生招聘系统
    记一次时间序列算法的自回归预测--AR&Autoreg
    【Aseprite】像素画背景制作
    Android页面跳转协议_URL Scheme详解
    msvcp140.dll丢失的有哪些解决方法,丢失msvcp140.dll是什么意思
  • 原文地址:https://blog.csdn.net/s13166803785/article/details/125556402