平 曲 线 程 序 运 行 提 示 符
CASIO fx—5800P    湖南津市 赵济汉
启动    Q.5     建立曲线要素矩阵存储表		提  示  符	示  例	说                明		N ?		问综合曲线自然段数		Z［］→DK?		问本段起点里程		→X?		问本段起点纵坐标		→Y?		问本段起点横坐标		→AT?		问本段起点切线方位（以小数点为度)		→(－	→L?		问本段曲线长		→R1?		问本段起点曲率半径		→R2?		问本段终点曲率半径		JX→1:NO→0:OK→2?		问是否校对，是赋值1 ，否赋值0，本综合段结束赋值2。（校对有误时可直接对显示值进行修改）		END		重复以上拾序步,直至本综合曲线各自然段赋值结束（赋值2）。		特别提示：除起始自然段外，其后，各自然段X, Y, AT可缺省，其值均赋值为0，程序在首次运行时，依次计算各接点中桩坐标一次，则能自动补齐各缺省值。这一功能在匝道曲线方程建立时，十分有利。
		启动 PPQX  选择需计算的综合曲线		提  示  符	示  例	说                  明		ZQX→0:ZD→1****→M?		问在PPQX程序编写过程中，自定义的综合曲线属性，如：主曲线赋值0，匝道赋值1,等等。选择确定后，程序自动转向PQX ，无需选择时可直接启动PQX。				启动 PQX 进入坐标计算阶段		XZ→0:YZ→1?		问是否改变以前设定的工作状态，新工作状态赋值0，原工作状态赋值1。（选择原工作状态时，程序直接进入上阶段运行状态，无需再次设置工作与计算状态）		BS→0:XY→1:AND→2:DK→3: →L（I）4?		选择新状态时：问计算状态，极坐标放样赋值0，直角坐标赋值1，两种坐标都需要赋值2， 求里程、边距赋值3，由里程求所在曲线段号赋值4。选择原工作状态时不问。		极 坐 标 放 样		问计算状态，赋值0时		提  示  符	示  例	说                  明		→X1?		问设站点纵坐标		→Y1?		问设站点横坐标		→X2 ?		问定向点纵坐标		→Y2?		问定向点横坐标，				由原状态进入时，以上不问。		S=
B12=		给出已知点间边长
给出定向角		→DKP?		问测点里程（赋值0时转向程序运行终止）		→B?		问测点偏角（以小数点为度）		→(－÷2?		问测点偏距		BP=
SP=		给出测点方向
给出测点边长		S?		问测点实测边长（赋值0时，转向测设下一点，问测点里程）		BP=
?S=		给出测点方向
给出修正值（－为退回、+为延伸）		DKP MAX		提示测点里程超出本综合段终点里程		DKP MIN		提示测点里程小于本综合段起点里程		END		程序运行终止 (DKP=0时)				直 角 坐 标 放 样		问计算状态，赋值1时		 ?0: ≠?1?		中桩赋值0，边桩赋值1		→DKP?		问测点里程（赋值0时转向程序运行终止）		→B?		问测点偏角（以小数点为度），中桩不问		→(－÷2?		问测点偏距，中桩不问		XP=
YP=
AT=	
	给出测点纵坐标
给出测点横坐标
给出测点切线方向		END		序运行程终止 (DKP=0时)				两种坐标都需要		问计算状态，赋值2时		→DKP?		同上		*		从略		*		同时给出以上两种结果		END		程序运行终止 (DKP=0时)		
由里程求所在曲线段号		问计算状态，赋值4时		提  示  符	示  例	说                  明		→DKP?		同上		L(I), I=
DK(MIN)=
DK(MAX)=		给出里程所在曲线段号。
给出本曲线段最小里程
给出本曲线段最大里程
本功能只是反求里程的一个辅助功能，以便程序按指定所在曲线段方式进行反算，快速获得计算结果。				反求里程边距		问计算状态，赋值3时		ZH. D(LI) →0 : NO→1		问反算形式，指定曲线段赋值0、不指定曲线段赋值1。		按指定曲线段反算		问反算形式，赋值0时。		I?		问曲线段（可慨略指定）		X?		问纵坐标（X=0时，程序运行终止）		Y?		问横坐标		?		程序运行等待符		DKP=
D÷2=
I?		给出求点里程
给出求点边距（正交）
问下点曲线段		END		程序运行终止 。（X=0时）		特殊情况提示：				DK MIN, →L(I－﹥ →L(I+1)		提示所求点不在本曲线区间，原段号应加1				这一功能的设置，便于反算点曲线区间位置不明确时，也能按指定曲线段形式进行反算。		特别提示：按指定曲线段形式进行反算，有计算速度快，不存在程序判断盲点的问题，是反算形式的首选。		
		按不指定曲线段反算		问反算形式，赋值1时		X?		问纵坐标 。（X=0时，程序运行终止）		Y?		问横坐标		?		程序运行等待符		DKP=
D÷2=
X?		给出求点里程
给出求点边距（正交）
问下点纵坐标		特殊情况提示：				DKP≠		提示本里程有误，在程序判断盲区，不可采用。		L(I), I=		给出本点所在曲线段号。						DK(MIN)=
DK(MAX)=
END,  ?ZH.D（LI）		给出本曲线段最小里程
给出本曲线段最大里程
提示中断运行程序，转向按指定曲线段形式进行反算。		END		程序运行终止 。（X=0时）		                                                  2009-3-31
算例1
       例某工程C匝道:
一   启动Q . 5  按下列数据建立矩阵存储表  
给矩阵存储单元定维:   140→DimZ
综合曲线属性: 名C . ZD    编号0    Z［］±1	-1	1	1	1	0		L	190	165.927	116.241	89.623	0		R1	5500	5500	100	100	0		R2	5500	100	100	×10 20	0		备注： 起始矩阵存储单元Z［］［］×5-1)
二   编写程序PPQX（给定综合曲线属性）
“ C. ZD →0 ” ？ C ↙
If  C=0: Then 100→Z［］→Z［］ IfEnd ↙
Prog “ PQX ” 
三   启动程序PPQX（指定需计算的综合曲线编号）
C. ZD →0 ？    提示C匝道赋值 0
回车
（自动转向PQX进入各项计算）
2009-4-9
一   平分中矢法布桩
平分中矢布桩法，一般用于曲线上中小桥的设计，此时，各墩台方向一致，每跨内各梁(板)长相同，
是典型的弯桥直做法。
示图
图中；A  Z  B 为平曲线中桥的起点、中间点、终点，QA、QZ、QB为平分中矢弯桥直做后的起点、中间点、终点，C为直线AB的中分点，E为矢距。
图中各点计算方法
根据已建立主平曲线方程，求得A  Z  B三点坐标及的切线方位AT；
由A  B求出直线中点C的坐标；
由C及Z的坐标可以确定中矢点QZ的坐标及

赵集汉5800程序.doc