casio4800完整曲线程序

文件名:WZQXDefm5LBI 1:C“L1”:D“L2”:R:F“A1”:F“A2”:H“XB”:V“YB”:Z“XE”:P“YE”:G“ZH”:U“HZ”:E:N“L(1),R(-1)”:{K,W,Q}K≥(G+C)=> GOTO 3△ X=C:Y=F:Z[5]=V:T=H:S...

文件名:WZQX
Defm5
LBI 1:C“L1”:D“L2”:R:F“A1”:F“A2”:H“XB”:V“YB”:Z“XE”:P“YE”:G“ZH”:U“HZ”:E:N“L(1),R(-1)”:{K,W,Q}
K≥(G+C)=> GOTO 3△ X=C:Y=F:Z[5]=V:T=H:S=N:Z[4]=1:L=(K-G)
LBI 2:B=L2÷(2×R×X)×180÷π
Z[3]=L-L5÷(40×R2×X2)+L9÷(3456×R4×X4)-L13÷(599040×R6×X6):M=L3÷(6×R×X)-L7÷(336×R3×X3)+L11÷(42240×R5×X5):GOTO 4△
LBI 3:K≤(U - D)=> X=C:Y=F:Z[5]=V:T=H:S=N:Z[4]=1:M=X÷2-X3÷(240×R2)+X5÷(34560×R4):B=180÷(π×R)(K-G-X÷2)Z[3]=R×SIN B+M
M=R(1-COS B)+X2÷(24×R)-X4÷(2688×R3)+X6÷(506880×R5):GOTO 4△ L=(U-K):X=D:Y=A:S=-N:Z[5]=P:T=Z:Z[4]=-1:GOTO 2△
LBI 4:L(Y-S×TAN-1(M÷Z[3]):I=POL(M,Z[3]):Z[1]=COS L×I+T:Z[1]“XM”▲
Z[2]=SIN L×I+ Z[5]:Z[2]“YM”▲
O“JJ”:Q“R,JU,LI”:W= Z[1]+COS(Y-S×B+O×Z[4])×(Q+E):W“XR=” ▲
W= Z[2]+SIN(Y-S×B+O×Z[4])×(Q+E):W“YR=”▲
GOTO 1

带缓和曲线的圆曲线计算完整程序

L1:第一缓和曲线长度   L2:第二缓和曲线长度   A1:曲线第一方位角   A2:曲线第二方位角    R:曲线半径     XB:曲线起点X轴坐标      YB:曲线起点Y轴坐标      XE:曲线终点X轴坐标      YE:曲线终点Y轴坐标     HZ:曲线起点里程   ZH:曲线终点里程   E:线路中心偏移值(一般用于结构物中心方向与线路中心不重合)               L(1),R(-1):线路方向左右偏        K:计算点里程         XM,YM:计算点坐标         JJ:与线路交角R,JU,LI:边桩距离输入            XR,YR:边桩坐标

  • 发表于 2018-11-05 13:35
  • 阅读 ( 30 )
  • 分类:4800

你可能感兴趣的文章

相关问题

0 条评论

请先 登录 后评论
admin
admin

174 篇文章

作家榜 »

  1. admin 174 文章
  2. 胡亮 4 文章
  3. 梁雄 2 文章
  4. 肖肖 2 文章
  5. 老Y 2 文章
  6. netbee 1 文章
  7. 秦汉 1 文章
  8. boyving 1 文章