学帮网CASIO缓和曲线中边桩坐标计算程序.CASIO圆、缓和曲线中边桩计算程序啊?要实际可行的哦!跪求中……………………
来源：学生作业学帮网 编辑：学帮网 时间：2024/05/06 01:30:06
CASIO缓和曲线中边桩坐标计算程序.
CASIO圆、缓和曲线中边桩计算程序啊?
要实际可行的哦!
跪求中……………………
CASIOFx-4500p曲线上任一点坐标计算程序
F1：HHQXZB
L1 Abs W"FixmC=>"=7=> Fixm:Goto F/⊿Z=E7A"ZJ"/Abs AN[9:A=Abs A:Q=R+S"Ls"2/24R
L2 T=S/2-Sxy3/240R2+Ans tan .5A◢L=πRA/180+S◢H"ZH"=J"JDZH"-T◢V"HY"=H+S◢V"QZ"=H+.5L◢V"YH"=H+L-S◢L"HZ"=H+L◢D"XZD"K"YZD" B"FWJ"
L3 Lb1 F:{FN}:F≤H=>X=F-J:ZN:≠>F≤L-S=>I=F-H:FProg Q:≠> Rec(R-ZN,90(2I-S)/πR):
X=W-Qtan.5A:Q-V⊿≠>I=L-F:Po1(T-I,ZN:FProg Q:Po1(-X,Ans⊿X=Rec( Ans,A+W)
L4 W⊿⊿X"X"=D+Rec( Po1(X,ZAns,W+B◢Y"Y"=K+W◢ Goto F [主程序结束]
F2：Q
L1 Y=2RS:W=180I2/πY:X=I-Ixy5/10Y2-T-ZNsin W:Ixy3/3Y-Ixy7/42Yxy3+ZNcosW [子程序结束]
输入说明：F1为第一个程序,L1为第一个程序的第一行,L2为第二行,依次类推.
1、程序中Z=E7A"ZJ"/Abs 处E用按键[EXP] 键输入；
2、程序中π代表圆周率,也就是3.1415926；
3、程序中Ans用按键[Ans]输入；操作说明：Fixm C=>?,首次启动时,需输入密码：“10000000”.重启动功能控制符,输入“7”可启动重启动功能.ZJ?,曲线转角,要求以度分秒形式输入,左转输入“负” 值,右转输入“正”值.,曲线半径,直接输入即可.LS?,和曲线长度,有缓和曲线时输入缓和曲线长度,圆曲线输入“0”.T=S/2-Sxy3/2→ 程序输出曲线切线长度.L=πRA/180+S,程序输出曲线长度.JDZH?,曲线交点桩号,直接输入平曲线交点桩号,如K123+456.789输入123456.789.ZH= ,程序输出曲线起点[ZH]桩号.HY= ,程序输出HY桩号.HY= ,程序输出HY桩号.QZ=,程序输出QZ桩号.YH= ,程序输出YH桩号.HZ= ,程序输出曲线止点[HZ]桩号.XJD?,交点大地坐标[X坐标].YJD?,交点大地坐标[Y坐标].FWJ?,曲线起始方位角.即由ZH指向实交点的方位角.,放样点里程桩号.,放样中桩距,即边桩至中桩的距离.无论曲线左转还是右转,均以左“负”右“正”输入,中桩输入“0”.X= ,程序输出放样点坐标[X坐标].Y= ,程序输出放样点坐标[Y坐标].按EXE键循环到F?.
该程序可以输入CASIOFx-4500P计算器内,操作简单,计算结果可靠,转角两边直线输入桩号一样可算中边桩坐标.如果是在CASIO Fx4800上运行请将原程序中的V,W分别用I,J替代即可.