开挖(回填)边坡放样程序

  • A+
所属分类:卡西欧5800
还没添加站长微信的请抓紧

开挖(回填)边坡放样程序
作者:徐金树
已知中桩坐标、方位角、路基宽度、开挖(回填)各级边坡比,求开挖(回填)最高(低)边线的宽度及坐标。
编程:名称:B.P
(4800计算器)
Lbl 0←┚ {ABCEFGH} ◢
H“H”I“I”:

P=H÷I ◢ N=Int P ◢
A“K1”B“K2”C“K3”D“K4”E“K5”F“KX”S“S”:
L=S+2N+F(H-IN)+I(A+B+C+D+E) ◢
W“X0”V“Y0” J“F0”←┚ K“K:Z-,Y+” ←┚
X=W+Lcos(J+K)◢
Y=V+Lsin(J+K)◢

Goto 0←┚

注:A、B、C、D、E、G为第一、二、三、四、五、六级台阶边坡比值,“HT”为高差,“HN”为每级台阶高度,台阶宽“TZ”,S为半幅设计路基宽度,F0为路线方位角,L为开挖(回填)边线宽度,X0、Y0为起点中桩坐标。
(5800计算器) 

“P0”?M::“X0”?W:“Y0”?V:“f0”?J ←┚
“H0”?R:“I:-,+”?I:“HN”?H:?S ←┚
Lbl 0←┚
“PX”?P : P-M→U←┚
W+U×cos(J)→X :V+U×sin(J)→y ←┚
R+I U→Z←┚
Lbl 1←┚
“O:0,1”?O←┚
“HT”?T ←┚
“XN=”:
T÷H→Q ◢
“N=”:Int(Q)→N ◢
“K1”?A:“K2”?B:“K3”?C:“K4”?D:
“K5”?E:“KX”?G:“K:Z-,Y+”?K←┚

“L=”:S+2N+G(T-HN)+H(A+B+C+D+E)→L ◢
“X=”:X+L×cos(J+K)→X◢
“Y=”:Y+L×sin(J+K)→y◢
“Z=”:Z+T→Z◢
O=1=>Goto 1 ←┚
Goto 0←┚

  • 我的微信
  • 这是我的微信扫一扫
  • weinxin
  • 我的微信公众号
  • 我的微信公众号扫一扫
  • weinxin
avatar

发表评论

您必须登录才能发表评论!