DADI-NE公路弯道坐标计算

CASIOfx-4800P计算器程序DADI——NE(公路弯道坐标计算)K“JD”：R：S“LS”：F“PJ——L－R＋”：A“ZH——N”：B“ZH——E”：C“JD——N”：D“JD——E”M“ZH”=K－（R＋S2÷（24R））tan（AbsF÷2）－S÷2＋S^3÷（240R2）▲N“HY”=M＋S▲O“QZ”=M＋（πRAbsF÷180＋S）÷2▲Z[1]“YH”=M＋πRAbsF÷180▲Q“HZ”=Z[1]＋S▲T=K－M▲L=Q－M▲E=（R＋S2÷（24R））÷cos（F÷2）－R▲Lb10：{G}：G“ZHUANGHAO”：G＜O＝=＞Z=G－M≠=＞Z=Q－G：△{U}：U“I——BOUT＋IN－”Z＜S＋0.005＝=＞H=tan-1（24Z2S2R2－Z^6）÷（48Z^3R^3－6Z^4SR））：V=Z－Z^5÷（40S2R2）＋UsinH：W=Z^3÷（6SR）－Z^7÷（336Z^3R^3）－UcosH：≠=＞H=180（Z－S÷2）÷（πR）：V=RsinH＋S÷2－S^3÷（240R2）＋UsinH：W=R－RcosH＋S2÷（24R）－UcosH：△F＜0＝=＞G＜O＝=＞X=V：Y=W：≠=＞X=T＋TcosF－VcosF－WsinAbsF：Y=TsinAbsF－VsinAbsF＋WcosF：△≠=＞G＜O＝=＞X=V：Y=－W：≠=＞X=T＋TcosF－VcosF－WsinAbsF：Y=VsinAbsF－TsinAbsF－WcosF：△△C=A＝=＞D≥B＝=＞P=90：≠=＞P=270：△≠=＞C＜A＝=＞P=tan-1（（D－B）÷（C－A））＋180：≠=＞P=tan-1（（D－B）÷（C－A））：△△I“COM——N”=A＋√（X2＋Y2）cos（P－tan-1（Y÷X））▲J“COM——E”=B＋√（X2＋Y2）sin（P－tan-1（Y÷X））▲没G=池G经＋岭20哈Goto谱0程序运行作输入牛：棒J轨D够？扫的刮垒搬幸—绘—吼交点桩号仙筹寸R饥？魔输趣撕透矩—捕—率圆曲线半戒径骆的盒L若S残？引质豆椒指穷—索—条缓和曲线带长度慰拥树P帐J租—壤—卖L捏－骡R最＋兰？泪盏如—壳—食偏殿角姑毙右偏为正赵Z非H采—否—塔N否？犹回锦喘嚷—营—帮Z浑H半点遭N皆坐标密Z山H上—铸—款E连？挠鄙轮辉创—斤—阀Z掏H朝点殊E斥坐标伞J粉D镇—茎—庄N贺？粪秀掏废报—筑—览J腰D香点旅N缠坐标广J苏D返—欧—纠E骆？盈御生渐豪—歇—慧J灶D宪点碑E件坐标肌输出两：卧ZH=逼惰泛娇朝躬—眉—摊Z率H其点桩号斧曲骄HY=博僻点耍划阅—较—烈H骂Y恼点桩号雁QZ=坟大血拦耕撇—匪—游Q调Z镰点桩号序YH=模胞破失让嚼—瞧—叨Y浓H倒点桩号浅HZ=识额贩窃款芒—辆—施H潜Z轧点桩号口T=墙散跳肝茧舅—厨—坚切线长摊L=是虾方让镜铸—伯—染曲线长违E=从碗逐圈残症—潮—域外矢距技再输入愤：祖ZHUA包NGH灵A诉O找？秒吹疼—倍—骄输入任一玻点桩号株良轧I揉—趋—坡BO没U胜T丙＋汽I布N顾－祖？伪筒—渔—碧距中线距监离（外侧筋为正）先再输出览：乡CO稳M欣—谋—剩N=绸纹勺煎—肤—非计算丧出被N块坐标志施垫CO似M箭—再—退E=条帜透俭—晨—葡计算颜出贺E仁坐标黑以此循缎环差—男—昨再输语入积—箱—锄再输出坦程序中各椒字母所代森表的含义肆：议A扮—脸—负Z傍H钥点虫N缠坐标堪B滋—北—镜Z凤H盒点罪E饺坐标沾C僻—盐—洪J没D拢点团N公坐标第D肆—蹄—母J切D紫点验E锻坐标炊E败—爪—道外矢距陈F做—覆—光偏角（右竞偏为正）香G像—电—究弯道内任发一点桩号悬H敢—由—据弯道内任肌一点切线侮角痰I申—充—枪计算出硬的竿N耐坐标山J区—举—臂计算出州的旗E复坐标终K崇—豪—坟交点桩号晓L舌—塞—巩曲线长驶M迹—锦—库Z定H缴点桩号曲N扮—日—奋H俯Y齐点桩号给O抖—太—秃Q柜Z吼点桩号方P惯—扩—式ZH--棋J俩D听方位角靠Q我—栏—顽H犹Z锡点桩号侍R狡—赖—陡圆曲线半摄径(N2，E2)JDHZZH(N2，E2)JDHZZHxy(N1，E1)现S歪—绞—即缓和曲线丑