竖曲线
《SQX》主程序
LbI 1 ：{K}：Prog“B”：W=A－B:W＞0=>U＝－1：≠>U＝1△R：“T”：T＝Abs(RW/2) ▲“E”：E=T＾2÷2R▲C＝K-J：K≦J=>I=A：≠>I=B△H：AbsC≦T=>“HS”：G=H+CI+U(T- Abs C)＾2÷2R▲≠>“HS”：G=H+CI▲
Goto 1
《B》数据库
K＞？=>A=？：B=？：R=？：J=？：H=？△
K＞？=>A=？：B=？：R=？：…………
附注：
1、K所求的桩号：A=坡度：B=坡度：R=半径：J=交点桩号：H=变坡点
控制高程：
2、注意A、B的正负。
3、本程序可以计算上百公里的路线中桩高程。
匿名 2007-11-30 05:24
晕，都不齐
xyza0 2008-04-19 07:18
不全的东西就不要发吗
浪费表情