复曲线坐标4800计算程式 |
|
| 当前状态：全本 | |
| 书籍作者：未知 | |
| 更新时间：2019-07-30 | |
| 运行平台：MP3/MP4/PSP/手机/电脑IOS | |
| 关注次数：13 文件大小：6K | |
| 小说格式：TXT格式 下载 阅读 评论 收藏 |
内容简介
复曲线坐标4800计算程式该程式主要适用于对称复曲线（直线、缓曲、圆曲、缓曲、直线）中边桩坐标计算，单次半算范围为前一交点HZ点到后一交点ZH点。E“JDK” F“JDX” G“JDY” R H“LS” I“ALF”J“ZJ”Ｔ＝（Ｒ＋Ｈ２÷２４Ｒ－Ｈ3÷２６８８Ｒ3）Ｔａｎ（ＡｂｓＪ÷２）＋Ｈ÷２－Ｈ3÷２４０Ｒ２Ｌ＝Ｒ（πＡｂｓＪ÷１８０－Ｈ÷Ｒ）Ｌｂｏ０：｛ＫＱ｝：Q=90:X＝F－TCosM：Y=G＋TSinM：Z＝Ｅ－Ｔ：Z＝K－O：K＞Z →ＧOTO１：Z=K-Z: M＝I： P＝M－Q：GOTO5Ｌbo１：Ｊ＜０→Ｎ＝１：←Ｎ＝２△Ｋ＞Z＋Ｈ→ＧOto２：p＝（－１）Ｎ（Ｋ－Z）２÷Ｈ÷Ｒ÷６×１８０÷π：Ｍ＝Ｉ＋p：Ｚ＝Ｋ－Z－（Ｋ－Z）５÷９０÷Ｒ２Ｈ２：Ｐ＝Ｍ＋P－Ｑ：Ｇto５Ｌbo２：z＝z＋Ｈ：Ｋ＞z＋Ｌ→Ｇoto３：o＝Ｉ＋（－１）ＮＨ÷２÷Ｒ×１８０÷π：p＝（－１）Ｎ（Ｋ－Z）÷Ｒ×１８０÷π：Ｍ＝Ｉ＋（－１）ＮＨ÷Ｒ÷６×１８０／π：Ｚ＝Ｈ－Ｈ３÷９０Ｒ２：Ｘ＝Ｘ＋ＸＣosＭ：Ｙ＝Ｙ＋ＳinＭ：Ｍ＝o＋p÷２：Ｚ＝２ＲＳin（（－１）ＮP÷２）：q＝o＋p－Ｑ：ＧotoＯ５...