《CASIOfx系列编程计算器测量程序集教学提纲.doc》由会员分享，可在线阅读，更多相关《CASIOfx系列编程计算器测量程序集教学提纲.doc（20页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Good is good, but better carries it.精益求精，善益求善。CASIOfx系列编程计算器测量程序集-程序一SHIJUCETU（视距测图）1、用途：该程序用于“经纬仪视距法碎部测量”时，计算测站点至碎部点间的平距及碎部点的高程。2、程序清单：C“H0”：I：A“UP”：B“DOWN”：V“MIDDLE”：L：E=90-LD=100Abs（A-B）（cosE）2H=（C+I）+DtanE-V3、程序说明：H0测站点高程；I测站仪器高；UP塔尺上丝读数；DOWN塔尺下丝读数；MIDDLE塔尺中丝读数；L经纬仪竖盘读数盘左读数；D测站点至碎部点间平距；H碎部点的高程。4
2、、该程序若在fx-3950中的程序清单为：？M：？A：？B：？C：？D：100（A-B）（cos(90-D)）2XM+Xtan(90-D)-CY说明：M将测站高程H0+仪器高I；A上丝读数；B下丝读数；C中丝读数；D竖盘盘左读数L。X测站点至碎部点的平距；Y碎部点的高程。返回目录程序二FANSUAN（反算）1、用途：该程序是“坐标反算公式”程序，用于根据两点1、2的平面坐标（X1，Y1）、（X2，Y2，计算两点间的距离D12及坐标方位角A12。2、程序清单：G“X1”：B“Y1”：C“X2”：H“Y2”：E=C-G：F=H-BPol（E，F）：I“D12”J“A12”3、程序说明：X1，Y1点
3、1的平面坐标；X2，Y2点2的平面坐标；D12点1至点2间平距；A12点1至点2坐标方位角，单位是度，若需换算成“度分秒”，按SHIFT键和o键。由于编程时用到了极坐标函数POL（），故在程序运行中，会出现I=？XXX（数字）及J=？XXX（数字）这是函数POL计算出的两个量，不能改变，直接回车默认即可。返回目录程序三ZHENGSUAN（正算）1、用途：该程序是“坐标正算公式”程序，用于根据点1的平面坐标（X1，Y1），及点1至点2的平距D12、坐标方位角A12，来计算点2的平面坐标（X2，Y2）。2、程序清单：B“X1”：C“Y1”：D“D12”：A“A12”X“X2”=B+DcosAY“Y
4、2”=C+DsinA3、程序说明：X1，Y1点1的平面坐标；X2，Y2点2的平面坐标；D12点1至点2间平距；A12点1至点2坐标方位角；X2，Y2点2的平面坐标。另外在输入A12时，可直接输入“度分秒”。返回目录程序四YUANZHU（圆主）1、用途：该程序是“单圆曲线主点测设元素及里程计算”程序。2、程序清单：A“TURNINGANGLE”：R：B“JD”T=Rtan(A2)L=RA180E=Rcos(A2)-RD=2T-LC“ZY”=B-TF“YZ”=C+LG“QZ”=F-L23、程序说明：TURNINGANGLE交点JD处的转角；R圆曲线半径；JD交点。T切线长；L圆曲线长；E外矢距；D
5、切曲差；ZYZY点里程；YZYZ点里程；QZQZ点里程。返回目录程序五YUANXIANG（圆详）1、用途：该程序是“单圆曲线切线支距法及长弦偏角法详细测设”程序。2、程序清单：A“ZYORYZ”：R：Lbl1L：B=180Abs(L-A)R：X=RsinBY=R-RcosBD“ANGLE”=B2C“DISTANCE”=2RsinDGoto13、程序说明：ZYORYZZY点或YZ点里程（桩号）；R圆曲线半径；L某桩的里程（桩号）；X切线支距法的X值；Y切线支距法的Y值；ANGLE偏角法的偏角值，单位为“度”。若要查看其“度分秒”，可在程序运行显示时先后按“SHIFT”、“度分秒”这2个键；DIS
6、TANCE长弦偏角法的弦长。返回目录程序六HUANZHU（缓主）1、用途：该程序是“完整对称带缓和曲线的圆曲线”的主点测设元素及里程计算程序。2、程序清单：A“TURNINGANGLE”：R：S“LS”：H“JD”B=180S（2R）P=S224R-S4(2688R3)Q=S2-S3(240R2)T=(R+P)tan(A2)+QM=R(A-2B)180L=M+2SE=(R+P)cos(A2)-RD=2T-LN“ZH”=H-TO“HY”=N+SU“QZ”=O+M2V“YH”=O+MW“HZ”=V+S3、程序说明：TURNINGANGLE交点JD处的转角；R圆曲线半径；LS缓和曲线长；JD交点里程
7、（桩号）。T切线长；L曲线长；E外矢距；D切曲差；ZHZH点里程；HYHY点里程；QZQZ点里程；YHYH点里程；HZHZ点里程。返回目录程序七HUANQIE（缓切）1、用途：该程序是“完整对称带缓和曲线的圆曲线”的切线支距法详细测设坐标计算程序。2、程序清单：A“ZH”：R：S“LS”：Lbl1L，B：Lbl2C=Abs(L-A)：D=RS：X=C-C540D2+C93456D4-C13599040D6+C1717542600D8Y=C36D-C7336D3+C1142240D5-C159676800D7+C193530097000D9Goto1Lbl3E=180(Abs(L-A)-S)R+
8、180S(2R)：P=S224R-S42688R3：Q=S2-S3240R2X=RsinE+QY=R-RcosE+PGoto13、程序说明：ZHZH点桩号（里程）；R圆曲线半径；LS缓和曲线长；L待测设桩的桩号（里程）；B当待测设中桩位于缓和曲线段，则输入“1”，当待测设中桩位于圆曲线段，则输入“1”以外的数值。X切线支距法的X值；Y切线支距法的Y值。返回目录程序八HUANPIAN（缓偏）1、用途：该程序是“完整对称带缓和曲线的圆曲线”的偏角法详细测设计算程序。2、程序清单：A“ZH”：R：S“LS”B=30SR：F“B0”=2BLbl1LE=Abs(L-A)：D“ANGLE”=（ES）2BC
9、“DISTANCE”=E-E5(90R2S2)Goto13、程序说明：ZHZH点桩号（里程）；R圆曲线半径；LS缓和曲线长；B0在以后要测设圆曲线段上的中桩时，架仪于HY（或YH）点，瞄准ZH（或HZ）点，拨角B0为圆曲线的切线方向，找到切线方向后，即按单圆曲线偏角法去测设即可；L待测设桩的桩号（里程）；ANGLE偏角法的偏角值，在程序显示中其单位为“度”。若要查看其“度分秒”，可在显示时先后按“SHIFT”、“度分秒”这2个键；DISTANCE长弦偏角法的弦长。返回目录程序九ZHUANHUAN（转换）1、用途：该程序是“两平面坐标系间坐标转换”的计算程序。2、程序清单：C“X0”：E“Y0”
10、：D“ANGLE”：F“SIGN”Lbl0A，BF1A=A：B=-BX=C+AcosD-BsinDY=E+BcosD+AsinDGoto03、程序说明：X0，Y0施工坐标系（A-O-B）的原点O在统一坐标系（x-o-y）中的坐标。ANGLE为统一坐标系的x轴顺时针旋转至施工坐标系的A轴的角值。SIGN为符号函数，若输入“1”时，则表明x-o-y为左手系，且A-O-B也为左手系；若输入“1”之外值，则表明x-o-y为左手系，而A-O-B为右手系。A，B某点在施工坐标系中的纵、横坐标。X，Y该点在相应统一坐标系中的纵、横坐标。返回目录程序十FUDAOXIAN（附导线）1、用途：该程序是“附合导线平
11、差”的计算程序。2、程序清单：Defm40：X“X0”：Y“Y0”：F“A0”：S“X1”：E“Y1”：A“A1”：C“UNKNOWNPOINT”N=0：M=0：Lbl0N=N+1：L，D：G=180：F=F+L：FGF=F+G：F=F-GF2GF+F-2GZ2N-1=F：Z2N=D：M=M+D：NC+1Goto0L：F=F+L：FGF=F+G：F=F-GF2GF+F-2GB“FW”=F-AR：H“FR”=R（C+2）B=-B（C+2）N=0：P=0：Q=0：Lbl1N=N+1Z2N-1“A”=Z2N-1+NBI=Z2NcosZ2N-1：P=P+I：Z2C+2N+1=I：J=Z2NsinZ2N
12、-1：Q=Q+J：Z2C+2N+2=J：NC+1Goto1F“FX”=P-S+XG“FY”=Q-E+YH“F”=（F2+G2）K=HMN=0：V=-FM：W=-GM：Lbl2N=N+1Z2C+2N+1=Z2C+2N+1+VZ2N：Z2C+2N+2=Z2C+2N+2+WZ2N：X=X+Z2C+2N+1Y=Y+Z2C+2N+2NCGoto2：“END”3、程序说明：X0，Y0，A0已知的起始点的纵、横坐标及起始边的坐标方位角。X1，Y1，A1已知的结束点的纵、横坐标及结束边的坐标方位角。UNKNOWNPOINT待求未知点的个数。L，D观测的导线各左转角及平距。FW，R，FR导线角度闭合差、角度闭合
13、差的允许误差的系数及允许误差值。N，A各条导线边序号及其坐标方位角。FX，FY坐标增量X、Y的闭合差。F，K导线全长闭合差、导线全长相对闭合差。N，X，Y各导线点的序号及其纵横坐标。注意：（1）本程序是按10个未知点来设计的，若未知点数超过10个时，按“4倍点数”来改变源程序中的“Defm40”。（2）显示的角度允许误差FR的单位为“秒”。（3）在程序显示中角度单位为“度”。若要查看其“度分秒”，可在显示时先后按“SHIFT”、“度分秒”这2个键。返回目录程序十一BIDAOXIAN（闭导线）1、用途：该程序是“闭合导线平差”的计算程序。2、程序清单：Defm40：X“X0”：Y“Y0”：F“A
14、0”：N“UNKNOWNPOINT”：N=N+1I=0：E=0：C=0：Lbl0I=I+1：L，D：Z2I-1=L：Z2I=D：E=E+L：C=C+D：INGoto0B“FW”=E-180（N-2）R：A“FR”=RNB=-BN：I=1：Z2N+1=F：Lbl1I+I+1F=F+Z2I-1：F180F=F+180：F=F-180F360F+F-360Z2N+2I-1“A”=F+（I-1）BINGoto1I=0：G=0：H=0：Lbl2I+I+1：Z2I-1=Z2IcosZ2N+2I-1：G=G+Z2I-1：Z2N+2I=Z2IsinZ2N+2I-1：H=H+Z2N+2I：INGoto2G“FX
15、”H“FY”I“F”=（G2+H2）K=ICU=-GC：V=-HCI=0：Lbl3I+I+1Z2I-1=Z2I-1+UZ2I：Z2N+2I=Z2N+2I+VZ2I：X=X+Z2I-1Y=Y+Z2N+2IIN-1Goto3：“END”3、程序说明：X0，Y0，A0已知的起始点的纵、横坐标及起始边的坐标方位角。UNKNOWNPOINT待求未知点的个数。L，D观测的导线各左转角及平距。FW，R，FR导线角度闭合差、角度闭合差的允许误差的系数及允许误差值。I，A各条导线边序号及其坐标方位角。FX，FY坐标增量X、Y的闭合差。F，K导线全长闭合差、导线全长相对闭合差。I，X，Y各导线点的序号及其纵横坐标
16、。注意：（1）本程序是按10个未知点来设计的，若未知点数超过10个时，按“4倍点数”来改变源程序中的“Defm40”。（2）显示的角度允许误差FR的单位为“秒”。（3）在程序显示中角度单位为“度”。若要查看其“度分秒”，可在显示时先后按“SHIFT”、“度分秒”这2个键。返回目录程序十二SHUIZHUN（水准）1、用途：该程序是“单一水准路线的平差”的计算程序。2、程序清单：A“CODE”：Defm20：G=0：M=0：I=0：C“UNKNOWNPOINT”Lbl0：I=I+1：H：Z2I=H：G=G+HA=1L：Z2I-1=L：M=M+L：N：Z2I-1=N：M=M+NIC+1Goto0B“
17、H0”：D“H1”：F=B+G-DJ“FR”=RM1000AbsFJ“CHAOXIANCHA”：V=-FM：I=0：H=B：Lbl1：I=I+1H=H+Z2I+VZ2I-1ICGoto1：“END”3、程序说明：CODE地形编码，当是平地，统计公里数时输入“1”；当是山地，统计测站数时输入非“1”。UNKNOWNPOINT待求高程点的个数。L水准点间的路线长。N水准点间的测站数。H水准点间的实测高差。H0，H1已知的起始点和结束点的高程。F，FR高差闭合差、高差允许闭合差。R高差允许闭合差系数。等外水准：12（按测站数）或40（按公里数）；四等水准：6（按测站数）或20（按公里数）。I，H第I
18、段及第I个待求水准点的高程。注意：（1）本程序是按10个未知点来设计的，若未知点数超过10个时，按“2倍点数”来改变源程序中的“Defm20”。（2）当水准路线是闭合水准路线时，只需将H0，H1输入相同的值。返回目录程序十三FANGPINGAO（方平高）1、用途：该程序是“方格网法平整场地，填挖方量基本平衡时的设计高程”的计算程序。2、程序清单：N：X“INPUTANGLENUMBER”：I=0：C=0：Lbl0I=I+1：H：C=C+H：IXGoto0M“INPUTEDGENUMBER”：J=0：D=0：Lbl1J“I”=J+1：H：D=D+2H：JMGoto1P“INPUTCORNERNU
19、MBER”：K=0：E=0：Lbl2K“I”=K+1：H：E=E+3H：KPGoto2Q“INPUTMIDDLENUMBER”：L=0：F=0：Lbl3L“I”=L+1：H：F=F+4H：L0G=G+F4：A=A+F4J0L=L+M2：B=B+M2K0P=P+3T4：C=C+3T4Q0R=R+U：I=I+USWGoto4N“VW”=（G+L+P+R）D2V“VT”=-（A+B+C+I）D23、程序说明：D方格的边长。H0平整场地时的设计高程。INPUTANGLENUMBER输入角点的个数。INPUTEDGENUMBER输入边点的个数。INPUTCORNERNUMBER输入拐点的个数。INPUT
20、MIDDLENUMBER输入中点的个数。H各点的实测高程。DH填挖高度（各点的实测高程与设计高程之差），正为挖，负为填。VW，VT挖方、填方。返回目录程序十五JIZHUOBIAO（极坐标放样程序）1、用途：该程序是用于根据测站点坐标(x1,y1)和后视点坐标(x2,y2)，计算在测站点后视后视点，用极坐标法放样任一待定点(x,y)所需正拨的水平角及边长。2、程序清单：G“X1”：B“Y1”：C“X2”：H“Y2”：E=C-G：F=H-BPol（E，F）：L=J：Lbl1X，Y：M=X-G：N=Y-BPol（M，N）：D=IA=J-L：AGoto13、程序说明：X1，Y1测站点的坐标。X2，Y2后视点的坐标。X，Y待放样点的坐标。A测站点后视后视点，旋转至待放样点所需正拨的水平角角值。D测站点至待放样点的水平距离。由于编程时用到了极坐标函数POL（），故在程序运行中，放样第一个点时，会出现J=？XXX（数字）及I=？XXX（数字）这是函数POL计算出的两个量，不能改变，直接回车默认即可。放样以后几个点时，不会出现此现象。-