公路弯道坐标计算.docVIP

CASIO fx-4800P计算器程序 DA DI——N E 公路弯道坐标计算 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（Abs F÷2）－S÷2＋S^3÷（240R2）▲ N“HY” M＋S▲ O“QZ” M＋（πRAbs F÷180＋S）÷2▲ Z[1]“YH” M＋πRAbs F÷180▲ Q“HZ” Z[1]＋S▲ T K－M▲ L Q－M▲ E （R＋S2÷（24R））÷cos（F÷2）－R▲ Lb1 0： G ：G“ZHUANG HAO”：G＜O＝ ＞Z G－M≠ ＞Z Q－G：△ U ：U“I——B OUT＋IN－” Z＜S＋0.005＝ ＞H tan-1（24Z2S2R2－Z^6）÷（48Z^3R^3－6Z^4SR））：V Z－Z^5÷（40S2R2）＋Usin H：W Z^3÷（6SR）－Z ^7÷（336Z^3R^3）－Ucos H：≠ ＞H 180（Z－S÷2）÷（πR）：V Rsin H＋S÷2－S^3÷（240R2）＋Usin H：W R－Rcos H＋ S2÷（24R）－Ucos H：△ F＜0＝ ＞G＜O＝ ＞X V：Y W：≠ ＞X T＋Tcos F－Vcos F－Wsin Abs F：Y Tsin Abs F－Vsin Abs F＋Wcos F：△≠ ＞G＜O＝ ＞X V：Y －W：≠ ＞X T＋Tcos F－Vcos F－Wsin Abs F：Y Vsin Abs F－Tsin Abs F－Wcos F：△△ 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 程序运行 输入：JD？ ——交点桩号 R？ ——圆曲线半径 LS？ ——缓和曲线长度 PJ——L－R＋？ ——偏角 右偏为正 ZH——N？ ——ZH点N坐标 ZH——E？ ——ZH点E坐标 JD——N？ ——JD点N坐标 JD——E？ ——JD点E坐标 输出：ZH ——ZH点桩号 HY ——HY点桩号 QZ ——QZ点桩号 YH ——YH点桩号 HZ ——HZ点桩号 T ——切线长 L ——曲线长 E ——外矢距 再输入：ZHUANG HAO？ ——输入任一点桩号 I——B OUT＋IN－？ ——距中线距离（外侧为正） 再输出：COM——N ——计算出N坐标 COM——E ——计算出E坐标 以此循环——再输入——再输出 程序中各字母所代表的含义： A——ZH点N坐标 B——ZH点E坐标 C——JD点N坐标 D——JD点E坐标 E——外矢距 F——偏角（右偏为正） G——弯道内任一点桩号 H——弯道内任一点切线角 I——计算出的N坐标 J——计算出的E坐标 K——交点桩号 L——曲线长 M——ZH点桩号 N——HY点桩号 O——QZ点桩号 P——ZH--JD方位角 Q——HZ点桩号 R——圆曲线半径 S——缓和曲线长度 T——切线长 U——距中线距离（外侧为正） V——支距 W——支距 X——弯道内坐标 Y——弯道内坐标 Z——任一点曲线长度 Z[1]——YH点桩号 667建筑网 万份建筑资料免费下载！