单交点支线、缓和曲线、圆曲线综合程序(CAISO fx-5800p计算器).doc
《单交点支线、缓和曲线、圆曲线综合程序(CAISO fx-5800p计算器).doc》由会员分享,可在线阅读,更多相关《单交点支线、缓和曲线、圆曲线综合程序(CAISO fx-5800p计算器).doc(3页珍藏版)》请在三一文库上搜索。
1、单交点支线、缓和曲线、圆曲线综合程序(CAISO fx-5800p计算器)(第四指挥部 姚志彪) 一、 程序功能本程序适合于一个交点内的第一缓和曲线、圆曲线、第二缓和曲线以及第一缓和曲线前的直线段上任意一点的坐标计算。起算点为第一缓和曲线前的直线段起点,计算终点为第二缓和曲线终点。计算时只需输入待求点里程以及待求点偏移距离两个元素即可。二、源程序DJDQXFY(文件名)“Xj”?A:“Yj”?B:“FWJ”?C:“PJ”?D:“R”?R:“L1”?L:“L2”?Z:“U”?U:“K(J)”?WDE:D0=-DEL/2-L3/(240R2)+(R+L2/(24R)-L4/(2688R3)Tan(
2、E/2)+(Z2-L2)/(24R)+(L4-Z4)/(2688R3)/sinETZ/2-Z3/(240R2)+(R+Z2/(24R)-Z4/(2688R3)tan(E/2)+(L2-Z2)/(24R)+(Z4-L4)/(2688R3)/sinEPRE/180+L/2+Z/2S:C+180G:TcosG+AE:TsinG+BF:C+DI:PcosI+AG:PsinI+BHLBI 0 “K(m)”?K:“Q”?VIf KW-T:then Goto1Else if KW-T+L:then Goto2Else if KW-T+S-Z:then Goto3Else if KW-T+S:then Got
3、o4Else if KW-T+S:then Goto5If endLBI 1K-WN:CO:NcosO+AM:NsinO+BNGoto8LBI 2K-W+TN:90N2/(RL) QN-N5/(40R2L2)+N9/(3456R4L4)N(K-W+T)3/(6RL)-(K-W+T)7/(336R3L3)+(K-W+T)11/(42240R5L5) JIf D0:then E+NcosC-JsinCM:F+NsinC+JcosCNElse E+NcosC+JsinCM:F+NsinC-JcosCNIf endIf D0:then C+QO: Else C-QO: If endGoto 8LBI
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 单交点支线、缓和曲线、圆曲线综合程序CAISO fx-5800p计算器 交点 支线 缓和 曲线 综合 程序 CAISO fx 5800 计算器
链接地址:https://www.31doc.com/p-2402872.html