曲线任意里程中边桩坐标正反算（4850P计算器）程序（第四次修改(6)

96 楼：陈秋 收到了谢谢！ 97 楼：wuheqi 今天对你的程序进行了调试,正算可以成功通过,但发算也成功通过! 回 回 现在开始研究你各个子程序,但在仔细阅读的过程中我碰到了一个问题,就是正算子程序中通过5点公式的推导出程序中的X 和Y值,对于这个问题我已经反复推导了好几次都无法正确的推导到程序中所写的公式,希望你能发一贴推导公式,或者能否把推导公式发一份到我的油箱wu_he_qi@163.com 98 楼：lizengrong 程序终于调试成功，我对你万分的感谢。 99 楼：hanniu_1973楼主 lizengrong: 恭喜你调试成功！但你有没有在我的第四版的基础上进行扩展呢？我本来是想通过网络共享的原则进行相互交流的，但我已发布一个月有余了，都没有见到一个像样的扩展程序，没有达到我预期的效果，我亦感到有点遗憾！其实，第四版中仍有许多需要改进的地方，我现提供给大家一些思路： 1、对于数据库：可分为扩展变量型和常量型。各有优缺点，扩展变量型：运行速度较快、维护方便，但数据安全性较差、占容量大；变量型：数据安全性较好、占容量相对较小、易于扩展，但其维护不方便、运行速度相对差一点等。 2、对程序功能：已有程序只有正反算坐标功能，为了更好的测放线提供数据，发必须对其进行扩展，比如：加入方向坐标法或称虚拟测站法、平行线解算和曲线求交功能，以任一角度任一地点解算坐标、里程和偏距。更高级别一就是整合平、纵、横面线位数据在CASIO系列（最好是4850P，因4800P容量太低，如线元多实现起来有点难度）上实现线路三维坐标动态控制系统 希望热爱CASIO系列编程的朋友继续努力为测工编制更多的便用的测量程序服务于现场工作！ 100 楼：wuheqi 回 回 回 评：+5 分 hanniu_1973 我对你的反算程序理解不通,能否具体的讲讲你的反算思路,!谢谢,如果有QQ,请可以加我49619996,加的时候请写清楚你的名字.希望能得到你的指点! 101 楼：wuheqi 有没有 Simpson公式 的介绍? 102 楼：lovewangziqiang 我们这里左右幅,路基隧道加桥梁,切多为斜交所以感觉不太实用, 哪位高手改一下,把扩充去掉,只保留核心部分(有左右边桩连线与线路中线的 右交角大于小于90度的边桩坐标正反算);我的邮箱lovewangziqiang@sina. 回 评：+5 分 回 com,lovewangziqiang@163.com有劳各位高手了! 103 楼：lovewangziqiang 急用,谢谢了 104 楼：hanniu_1973楼主 lovewangziqiang: 照你说的，你可参照我在本网站里的另一程序：《利用Simpson公式和垂距趋近正反算曲线程序》，其可正反算任意角度、支距的坐标点。 105 楼：lovewangziqiang 为什么坐标反算时,计算器没有反应了呢?还是速度太慢了. 106 楼：hanniu_1973楼主 lovewangziqiang: 反算时，的确有点慢，因为其一般是逐步趋近解算里程和偏距的，计算时间与距离待测点的长度成正比。但一般不超过30秒，如果超过的话，首先检查你的程序结构是否正确。如果能反算成功，但其速度太慢，需优化数据结构或算法。如果程序计算数据结构本身错误，需进一步检查、更正并不断调试，直到调试成功并满足运行速度和精度要求。 107 楼：ZHAOYU009 yshy老师： 请给我也发一份“Gauss-Legendre”到ZHAOYU009_002@163.COM好吗？ 非常感谢 108 楼：zhaoyu009 邮件已经收到,谢谢,非常感谢 109 楼：罗自翔 hanniu_1973 : 我发给你的东西你收到了吗??? 110 楼：kent 回 回 回 回 评：+5 分 回 回 评：+4 分 回 回 评：+5 分 请问各位大师，我正在用CASIO fx-4850P计算器施入此程序，发现程序S≤Z[8（N+1）+2]=>J=n 中的 J=n 小写 n 不知怎么样施入，请各位大师指教， 111 楼：kent 程序S≤Z[8（N+1）+2]=>J=n 中的 J=n 小写 n 不知怎么样施入，请各位大师指教， 回 112 楼：风雨屋 请问.........................怎么输入！！！！！ 113 楼：kent 回 回 请问yshy大师，我正在用CASIO fx-4850P计算器施入此 程序， 发现程序S≤Z[8（N+1）+2]=>J=n 中的 J=n 小写 n 不知 怎么样施入，请大师指教. 114 楼：wuheqi 你好，我现在正在考虑分离和匝道的条件判断，但总是觉得不怎么理想，希望能得到你的指点！ 115 楼：wuheqi Lbl 1：{SZ}：SZ S≤Z[18]=>J=1：Prog “DAT1”：Goto 3Δ S≤Z[26]=>J=2：Prog “DAT1”：Goto 3Δ S≤Z[34]=>J=3：Prog “DAT1”：Goto 3Δ S≤Z[42]=>J=4：Prog “DAT1”：Goto 3Δ …………… S≤Z[8（N+1）+2]=>J=n：Prog “DAT1”：Goto 3Δ 对于这句可以如下处理 Lbl 5：{SZ}：SZ:N=1:Lbl 1:Isz N:S≤Z[8(N+1)+2]=>J=N：Prog “DAT1”：Goto 3:：≠>Goto 1 数据库的ＤＡＴ１也可以这样处理 116 楼：KENT 请问各位大师，怎样才能调试成功，请指教。 117 楼：wuheqi 按步骤一步一步输入,如果遇到问题不要急着输入,赶紧查书看看格式有没有对, 118 楼：KENT 很难调试成功啊，有那位大师调试成功的传份上来参考啦，让大家一起学习吗 119 楼：G4WWWW yshf老师请你告诉我Lbl1:J=1=>U=Z[8]:V=Z[9]:怎么输入？ 是这样吗Lbl1:J=1=>U=Z[8]=1235.45:V=Z[9]=4534.455:谢谢。 120 楼：yshf Lbl1:J=1=>Z[8]=1235.45:U=Z[8]:Z[9]=4534.455:V=Z[9]:...... 回 回 评：+5 分 回 回 回 回 回 121 楼：wang811736 请给我也发一份“Gauss-Legendre”到121767632@qq.com,谢谢 122 楼：wuheqi 回 回 我现在通过原稿的修改改编很自己的程序,已经综合考虑了匝道,左右线分离的情况，正算速度很错,但反算速度还是差了一步,觉的有点慢!! 另外在反正程序中，我对起过程还是了解不是很清楚,能有有象Gauss-Legendre一样的资料说明,只有理解了， 才可以对程序进行跟好的改良! 123 楼：hanniu_1973楼主 G4WWWW: 你好！我在此纠正一下yshf朋友的答复如下：像“Lbl1:J=1=>U=Z[8]:V=Z[9]:”这样的语句中的Z[8]、Z[9]，其输入数据是在程序运行前在COMP状态下直接输入Z[8]=1234.56，其实我以前早就答复过了，请你仔细看看我上面的答述。good luck! 124 楼：胡跃籍 回 评：+5 分 回 好东西，我还没看太明白，测量大军里有你们这些慷慨的人无私奉献你们的知识，是大家的测量水平会更上一个台阶，衷心的谢谢你们。 125 楼：g4wwww hanniu_1973 谢了,我有不明白的地方再问你可以吗? 126 楼：g4wwww hanniu_1973 老师，我运行程序为什么不能反算！正算以，反算时好想只能算一段？ 不知道为什么计算下一段线元就不正确了。 127 楼：wuheqi 回 回 评：+5 分 回 如果这样的话,我判断你的程序问题不大,希望你能检查一下你的曲元要素有没有正确,另外反算是你的程序有没有 联接正确, 128 楼：dengyangya hunniu老师： 请给我也发一份“Gauss-Legendre”到dengyangyang@sina.COM好吗？ 非常感谢 129 楼：g4wwww 回 评：+5 分 回 hanniu_1973老师: 请您给我也发一份“Gauss-Legendre”到g4wwww@163.com好吗？ 谢谢 130 楼：zongze hanniu_1973老师: 请您给我也发一份“Gauss-Legendre”到www.zongje@126.com好吗？ 谢谢 131 楼：淡天 计算斜交时只要是Z=负值就会计算出错,这是什么原因! 是本程序的原因吗? 132 楼：xb65785355 hanniu_1973大师:请给我也发一份“Gauss-Legendre”到cexoyga068@.sona.COM好吗？ 非常感谢 133 楼：zz05 hanniu_1973老师: 请您给我也发一份“Gauss-Legendre”到zhangzong05@sohu.com好吗？ 谢谢 134 楼：淡天 hanniu_1973老师: 能帮我看一下吗?为什么计算左边桩斜交角度会出错啊! 135 楼：小沈 我编的方位角程序只显示Ｓ，不显示方位角Ｊ，请各位前辈指教． 程序如下（４８００）： ～～～ＸＸＸ～～～ ＦＩＸＭ：ＰＯＬ（Ａ－Ｃ，Ｂ－Ｄ）：Ｉ＂Ｓ＝＂▲← Ｊ≤０＝＞Ｊ＝Ｊ＋３６０：＂Ｊ＝＂▲ 姓名：小沈 05-12-13 17:6 还有就是４８００上的（ＤＭＳ）键再那里 两个都要 回 回 回 回 回 回 评：+5 分