参加环球培训 并送论坛金币
 

CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

[ 11631 查看 / 7 回复 ]

CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

用CASIO fx—4500计算器
计算道路平曲线中桩及其边桩的大地坐标

一:已知条件:
  缓和曲线长:L1 ;平曲线半径:R ;导线边方位角:A ;交点里程桩号:J ;边桩横距:S ;直缓点、缓直点的大地坐标:X0、Y0。
二:计算程序:
ZBJS  (程序名)
L1  Lbi  0
L2  E“L1”:R:A:B:J:S
L3  T=Rtan(Abs B/2)+E2/(24R)×tan 
   (Abs B/2)+E/2-E xY3/(240R2)▲
L4  L=Abs(RBπ/180)+E▲
L5  W=28.6479E/R:B<0 => W= -WΔ
L6  Z“ZH”=J-T▲H“HY”=Z+E▲
G“QZ”=Z+L/2▲D“YH”=Z+L-E▲
I“HZ”=Z+L▲
L7  Lbi 1:{N}:N<Z =>Goto 0△
     N>I=>Goto 0△
L8  N≤H =>F=N-Z:GotO 2△
L9  N≤D =>F=N-H:Goto 3△
L10 N >D =>F=I-N:Goto 2△
L11 Lbi 2:K=W×(F/E)2/3:C=F:Goto 4 
L12 Lbi 3:K=90F/(πR)):
  C=2Rsin K:B<0 => K= -K△Goto 5
L13 Lbi 4:N>D = Goto 6△ U“X0”:V“Y0”
L14 X=U+C cos(A+K)▲Y=V+C sin(A+K)▲
L15 X[3]“X1”=X+S Cos(A+3K+90)▲
    Y[3]“Y1”=Y+S Sin(A+3K+90)▲
L16 X[5]“X2”=X+S Cos(A+3K-90)▲
    Y[5]“Y2”=Y+S Sin(A+3K-90)▲
L17 X[7]=X:Y[7]=Y:Goto 1
L18 Lbi 5:U=X[7]:V=Y[7]
L19 X = U+C Cos(A+W+K)▲
    Y = V+C Sin(A+W+K)▲
L20 X[3]“X1”=X+S Cos(A+W+2K+90)▲
    Y[3]“Y1”=Y+S Sin(A+W+2K+90)▲
L21 X[5]“X2”=X+S Cos(A+W+2K-90)▲
Y[5]“Y2”=Y+S Sin(A+W+2K-90)▲ 
Goto 1
L22 Lbi 6:P“X0”:Q“Y0”
L23 X= P+C Cos(A+B+180-K)▲ 
    Y= Q+C Sin(A+B+180-K)▲
L24 X[3]“X1”=X+S Cos(A+B+90-3K)▲
    Y[3]“Y1”=Y+S Sin(A+B+90-3K)▲
L25 X[5]“X2”=X+S Cos(A+B-90-3K)▲
Y[5]“Y2”=X+S Cos(A+B-90-3K)▲
Goto 1
三、符号标识:
L1:缓和曲线;R:平曲线半径;A:导线边方位角;B:转角;J:交点里程;S:边桩横距;T:切线长;L:曲线长;ZH:直缓点里程;HY:缓圆点里程;QZ:曲中点里程;YH:圆缓点里程;HZ:缓直点里程;N:曲线上任一点里程桩号;X0、Y0:直缓点、缓
直点大地坐标;X、Y曲线上任一点大地坐标;
X1、Y1、X2、Y2:对应点边桩大地坐标。
四、算例:
某弯道平曲线缓和曲线长200m,半径1800m,起始导线边方位角87о09′06″,左转角15ο26′20″,交点里程102K+044.126,直缓点大地坐标:(38310.860,40822.807),缓直点大地坐标(38435.931,41493.211)。边桩横距30m。
运行本程序,根据计算器提示逐一输入数据,可显示:
1:曲线元素:切线长T=344.107m;
  曲线长L=685.027m
2:曲线主点里程:ZH=101+700.019;
  HY=101+900.019;QZ=102+042.533;
  YH=102+185.046;HZ=102+385.046
3、中桩及边桩的大地坐标:
 
里程桩号 中桩点的大地坐标 边桩点的大地坐标 备注
 X Y X1 Y1 X2 Y2 
101+700.019 38310.860 40822.807 38280.897 40824.298 38340.823 40821.316 ZH点
+740 38312.876 40862.737 38282.917 40864.294 38342.836 40861.180 
+780 38315.071 40902.677 38285.122 40904.434 38345.019 40900.920 
+800 38316.290 40922.640 38286.351 40924.547 38346.230 40920.734 
+840 38319.084 40962.546 38289.173 40964.852 38348.995 40960.240 
+880 38322.498 41002.411 38292.633 41005.248 38352.364 40999.574 
101+900.019 38324.496 41022.342 38294.662 41025.494 38354.330 41019.189 HY点
+940 38329.138 41062.051 38299.381 41065.865 38358.894 41058.237 
+980 38334.664 41101.667 38304.999 41106.141 38364.328 41097.193 
 102+000 38337.756 41121.426 38308.143 41126.230 38367.369 41116.623 
102+042.533 38345.062 41163.326 38315.571 41168.828 38374.553 41157.824 QZ点
+080 38352.316 41200.083 38322.946 41206.198 38381.687 41193.969 
 102+100    38356.501 41219.641 38327.201 41226.081 38385.802 41213.200 
+140 38365.552 41258.609 38336.372 41265.699 38394.672 41251.519 
+160 38370.357 41278.016 38341.287 41285.429 38399.426 41270.603 
102+185.046 38376.715 41302.242 38347.751 41310.059 38405.678 41294.424 YH点
+200 38380.660 41316.612 38351.759 41324.661 38409.560 41308.564 
+260 38397.554 41374.199 38368.872 41382.992 38426.237 41365.407 
+300 38409.516 41412.371 38380.938 41421.498 38438.094 41403.244 
+340 38421.837 41450.427 38393.325 41459.760 38450.348 41441.095 
+360 38428.079 41469.427 38399.586 41478.816 38456.572 41460.039 
102+385.046 38435.931 41493.211 38407.446 41502.624 38464.416 41483.798 HZ点

 
五、说明:
    1:运行程序时,先扩充储存区:MODE  Ans   4  EXE
2:当平曲线为左转弯时,转角B用其负值输入。
3:计算主曲线的点的坐标时,请务必先在前一桩号计算出“HY点”的坐标。
原作者为:hfsh
本主题由 超级版主 chengjunxian 于 2007-8-20 21:34:02 执行 设置精华/取消 操作
分享 转发
TOP

hehe,不错啊
TOP

回复:CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

这个RTK的首部上可以弄出来,谢谢!
TOP

回复:CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

非常感谢,发了这么好的东西上来!
TOP

hehe

呵呵 感谢楼主 正需要呢 :)
TOP

回复:CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

好东西
TOP

回复:CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

楼主太有才了  :'(
TOP

CASIO fx—4500计算器计算道路平曲线中桩及其边桩的大地坐标小程序(转)

分享了。。。
TOP
上一主题 | 下一主题