为了正常的体验网站,请在浏览器设置里面开启Javascript功能!

卡西欧手表瑞士手表casio手表

2013-01-05 17页 doc 108KB 99阅读

用户头像

is_205740

暂无简介

举报
卡西欧手表瑞士手表casio手表 支付宝、财付通付款 卡西欧手表瑞士手表casio手表 卡西欧手表瑞士手表casio手表旅游,卡西欧手表瑞士手表casio手表组团,卡西欧手表瑞士手表casio手表攻略! 美橙表业 http://88680.com/ 三、坐标反算的程序   LINE1∶A:B:C:D  LINE2∶POL((C-A),(D-B))◢   LINE3∶W≥0 =>E=W◢≠>E=W+360   注释∶  LINE1是要求输入坐标正算中两点的x,y坐标,即A,B代表x1,y1,C,D代表x2,y2;  LINE2中为计算...
卡西欧手表瑞士手表casio手表
支付宝、财付通付款 卡西欧手瑞士手表casio手表 卡西欧手表瑞士手表casio手表旅游,卡西欧手表瑞士手表casio手表组团,卡西欧手表瑞士手表casio手表攻略! 美橙表业 http://88680.com/ 三、坐标反算的程序   LINE1∶A:B:C:D  LINE2∶POL((C-A),(D-B))◢   LINE3∶W≥0 =>E=W◢≠>E=W+360   注释∶  LINE1是要求输入坐标正算中两点的x,y坐标,即A,B代表x1,y1,C,D代表x2,y2;  LINE2中为计算器提供的由直角坐标到极坐标的函数;式中(C-A),(D-B),是考虑到输入数据的顺序性而定的,因为L1~L4中A、B为点1的X、Y坐标C、D为点2的X、Y坐标,要得到点1-点2的方位角,如要输入按顺序的话,就必须(C-A),(D-B);  LINE3因为计算器把计算后的方位角值存于W中,所以第3行的作用是如果W值即方位角值<0的话,加上3600 即可。 四、前方交会程序  前方交会公式如下: Xp=(XActgB+XBctgA-YA+YB)/(ctgA+ctgB)   Yp=(YActgB+YBctgA+XA-XB)/ (ctgA+ctgB)    LINE1:A“XA” :B“YA” :C“XB” :D“YB”   LINE2:E“〈A” :F“〈B”:Q=1/tan E:W=1/tan F   LINE3: Deg  LINE3: M=Q+W   LINE4: X=(AW+CQ-B+D)/M◢   LINE5: Y=(BW+DQ+A-C)/M   注释∶  LINE1是要求输入如图A、B坐标A,B,C,D;  LINE2是要求输入角A、角B的值E、F;  LINE3是定义角度计算状态处于DEG度分秒状态,由MODE 4输入;  后方交会也可按此方法编程,只是公式不同而已。 CASIO 4500公路中线坐标计算程序 ZXCLCX Defm16 Lbl1 X=1:{X}:X“ZJF-1 ZBF-2 TT-3 SJD-4 P2L-5 B2A-6” X=1=>Prog"ZJF"△ X=2=>Prog“ZBF”△ X=3=>Prog“TT"△ X=4=>Prog“SJD"△ X=5=>Prog“P2L"△ X=6=>Prog“B2A"△ Goto1 ZBF “-----ZXZBjs-----”:{YD}:Y“I1”“I2” Y≠D=>Z=0rog“FP”:A=B:B=0:Goto3△ X=0:{TPXVWU}:T“HJD(X+Yi)” Lbl1 X“XJA=1”“JD(X+Yi)”:U“JDLC”:Y=Arg(P-T) Y<0=>Y=Y+360△ Y“I”◢C“L”=Abs(P-T)◢ X=0=>V=P:Goto2△ V“JDB(X+Yi)”=Arg(V-P) D<0=>D=D+360△ D“I”◢Z“L”=Abs(V-P)◢Prog"FP":A=B Lbl2 W“QJD(X+Yi)”=Arg(W-V) D<0=>D=D+360△ D“I”◢C“L”=Abs(W-V)◢ Lbl4 Prog“FP” X=1=>B=B-A△ X=0=>A=B:B=0:Z=0:E=Rep P:F=ImpP:Goto3△ M=Rep(P-T):N=Imp(P-T):I=Rep(W-V):J=Imp(W-V):F“Y”=(M Imp T÷N-I Imp V÷J+Rep V-Rep T)÷(M÷N-I÷J)◢E“X”=M(F-Imp T)÷N+Rep T◢C“L1”=√((E-Rep P)2+(F-Imp P)2)◢U=U+C:C“L2”=√((E-Rep V)2+(F-Imp V)2)◢ Lbl3 X=0:{X}:X“ZBF(0)ZJF(1)” X=1=>O=Zrog"ZJF"△A=A+Brog"ZBjs" ZBjs I=0:J=0:B=0:{RGH}:R:G“LS1”:H“LS2”rog“TWE” Z=0=>E“JD(X)”:F“JD(Y)”:U“JDLC”△ Rec(-Z[7],Y):Z[15]=I+E:Z[16]=J+F:Rec(Z[8],D):Z[13]=I+E:Z[14]=J+F:C=U-Z[7]:Z[6]“ZH”=C◢Prog“ZDZ” C=Z[6] Lbl1 {C}:C“JIAZHUANG”:Z=C-Z[6] Z≤0=>Rec(Z,Y):Z[11]“X”=I+Z[15]◢Z[12]“Y”=J+Z[16]◢Prog“BZ”:Goto1△ Z≤G=>S=G=Z[1]:Q=Z[3]rog“H”ol(Z[11],Z[12]):Rec(I,Y-JO):Z[11]“X”=I+Z[15]◢Z[12]“Y”=J+Z[16]◢Prog“BZ”:Goto1△ Z≤W-H=>S=G=Z[1]:Q=Z[3]rog“Y”ol(Z[11],Z[12]):Rec(I,Y-JO):Z[11]“X”=I+Z[15]◢Z[12]“Y”=J+Z[16]◢Prog"BZ":Goto1△ Z≤W=>Z=W-Z=H=Z[2]:Q=Z[4]rog"H"ol(Z[11],Z[12]):Rec(I,D+180+JO):Z[11]“X"=I+Z[13]◢Z[12]“Y"=J+Z[14]◢Z=W-Zrog“BZ”:Goto1△ Z>W=>Z=Z-W:Rec(Z,D):Z[11]“X"=I+Z[13]◢Z[12]“Y"=J+Z[14]◢Z=W+Zrog“BZ”:Goto1△ FP B=Y-D B>180=>B=B-360△ B<-180=>B=B+360△ O=B÷Abs B:B=Abs B TWE S=Grog“PQ”:Z[1]=P:Z[3]=Q=Hrog“PQ”:Z[2]=P:Z[4]=Q Z[7]“T1”=(R+Z[2]-(R+Z[1])cos(A+B))÷sin(A+B)+Z[3]◢Z[8]“T2”=(R+Z[1]-(R+Z[2])cos(A+B))÷sin(A+B)+Z[4]◢W“L”=πR(A+B)÷ 180+.5G+.5H◢X“E”=(R+Z[1])÷cos(tan-1(((R+Z[2])÷(R+Z[1])-cos(A+B))÷sin(A+B)))-R◢Z[9]=Z[7]-Osin B÷sin(A+B):Z[10]=Z[8]- Osin A÷sin(A+B) B≠0=>Z[9]“TA”◢ Z[10]“TB”◢△ CASIOfx—4500PA(4500P)型计算机是最先进的可设程式的科学计算机。它具有能同时显示计算方程式及计算结果的2行式显示幕的特色。其记存计算方程式的内藏式方程式储存系统,可使我们很方便地、轻易地进行重复计算或手控计算。该机的“多重语句功能”,可让我们快速又容易地进行程序的编辑与查寻,而“转移指令”功能可使我们重复实行同一计算方程式或变换实行至另一个计算方程式,进行一连串的计算。    fx—4500PA(4500P)型计算机程序计算的这些特别功能将为我们公路#施工#测量师带来很大方便,并将大大提高工效和成果提供的可靠率。    我们知道,公路工程施工,从开工到施工,到施工结束,从路基到垫层,到基层,到面层,施工测量师重复做的工作就是恢复线路中桩和边桩的平面位置及测设中桩和边桩的高程,量大而繁。用常规方法计算放样数据,实践难以满足施工的进度,特别是用水准测量方法测设大量中桩及边桩的高程,用常规方法计算:    Hi=H已+a-bi 是无法满足一边施工一边进行高程放样的。如果我们将其上述公式用fx—4500PA(4500P)型计算机程序计算功能编写成程序:    F1  H  (文件名)    L1 Lb1 O:Z:A:{B K}:B>O=>H=Z+A—B▲V=K-H▲≠=>B≤O=>Goto 1△LbI 1:{Z A}:Goto O△Goto O    则可方便地、轻易地计算出每一桩位的高程放样数据。 市政-云天-新疆(357025120) 16:00:51 线路中线和边线点位坐标的万能通用程序 Lb1 : { E G }:A“X ”:B“Y ”:C“FWJ”:D“1/R-QD”: E“1/R-ZD”:F“QD-ZH”: G“ZD-ZH”: Lb1 1:{ H O }:H“JS-ZH”:O“JZ-JL”:H > G Goto 2 Δ Prog 1: X“X-JS”=X+Ocos(J+9 )▲Y“Y-JS”=Y+Osin(J+9 )▲Goto 1Δ Lb1 2:L=H:H=G:“WARING>JS-FW” ▲“SR…SUJU” ▲ Prog 1: A=X:B=Y:D=E:F=G:C=J:H=L: Goto Δ 子程序1: P= (E-D)/ABS(G-F):Q=ABS(H-F):I=PQ: J=C+9 Q(I+2D)/π: M=C+45Q(I/8+D)/π: N=C+135Q(3I/8+D)/π K=C+45Q(I/2+2D)/π X=A+Q(cosC+4(cosM+cosN)+2cosK+cosJ)/12: Y=B+Q(sinC+4(sinM+sinN)+2sinK+sinJ)/12: 注释:A“X ”:B“Y ”:-起点的xy坐标 C“FWJ”:-起点的方位角 D“1/R-QD”:起点的 1/半径 ,如直线为1/e50 E“1/R-ZD”:终点的 1/半径 ,如半径100为1/100(如左转为负,右转为正)“QD-ZH”: G“ZD-ZH”:起点、终点的桩号 H“JS-ZH”:O“JZ-JL”:输入计算的桩号,距中距离、如大于计算范围则显示 “WARING>JS-FW” ▲“SR…SUJU” ▲只需继续输入下一点的终点的 1/半径和终点桩号即可连续计算下一线型。 X“X-JS”、y“y-JS”显示计算点的xy坐标 一、 应用CASIO-fx45000PA编写常用的几个程序  CASIO-fx45000PA通过编写简单的程序来将计算过程简化。其算法就是将现成公式堆积,我们可以应用条件语句要将整个曲线统一成一个程序。 (1) CASIO- fx4500PA计算器条件语句 格式: a<条件判断符>b = >语句1:≠>语句2 :△ 语句3   说明:当条件成立时,进行语句1计算;不成立进行语句2的计算,最后运行语句3(不用可以省略)。条件判断可以是大于、等于、小于、不等于以及大于等于和小于等于;语句1、语句2可以为计算式也可为GOTO语句。 示例1:已知两点坐标求方位角(取值范围在0°—360°之间)   源程序:    L1 A”X1”:B”Y1”:C”X2”:D”Y2”    L2 E=C-A: F=D-B:I=tan-1(F/E)   L3 E>0 = > I=I: ≠>I=I+180   L4 I>0 = > I=I: ≠>I=I+360 用户在使用时,可以根据提示输入数据便可得出方位角(本程序已调试成功)。  (2) 无条件转换语句   无条件转换语句即是当程序运行至GOTO n 语句时,程序无条件执行LBI n后的语句。一个GOTO 相对应一个LBI语句。无条件语句一般与条件语句相配合使用,实现条件转移。 示例2:在以ZH 点为原点的独立坐标系中,等缓和曲线的单曲线中线放样计算(曲线中不存在短链)。  算法思路:通过曲线上点到ZH点的距离确定它在哪个区段(第一缓和曲线、圆曲线、第二缓和曲线),然后再利用现有公式进行计算。   已知: 曲线半径 R 切线长 T 曲线长 L 、缓和曲线长 l0、曲线偏角I(左偏还是右偏),以及曲线起点(ZH)里程和曲线上任意一点的里程。   源程序如下:    L1 R“R”:T“T”:L“L”M“L0”:I“PJ”:Z“ZH”:K“RYD“ :A    L2 S=K-Z    L3 S GOTO 0:≠>S<(L-M) => GOTO 1:≠>GOTO 2:    L4 LBI 0    L5 N=M : GOTO 3:    L6 LBI 1    L7 N=S-M: P=M^2/(24R): Q=M/2-M^3/(240R):J=(2*S-M)*90/(R*π)    L8 X=R*SINJ+P :Y=-(R*(1-COSJ)+Q)    L9 LBI 2    L10 N=L-S :GOTO 3:    L11 LBI 3    L12 C=RM: U=N-N^5/(40C^2)+N^9/(3456C^4):V=N^3/(6C)-N^7/(336C^3)+N^4/(42240N^5) L13 N=S => X=U:Y=-V:≠>X=T*(1+COSI)+U*COSI-V*SINI:Y=-TSINI+XSINI+YCOSI L14 A=1 => X=X▲Y=Y▲≠>X=X▲Y=-Y   说明: 用户在使用时即可按提示输入数据即可得到数据。左偏曲线A 输入1, 右偏曲线输入非1。如要求用统一坐标计算可以加入下面一句 程序:    L15 U”X”=C“X1“+X*COSB-Y*SINB▲   V”Y”=D”Y1“+X*SINB+Y*COSB    ( C,D 为ZH点在统一坐标系中的坐标,B为ZH-JD的方位角)  3:循环语句的使用   CASIO 源程序中很出现循环语句,这是因为CASIO 中没有提供现成的循环语句但我们可以将条件语句与无条件注意语句相配合形成一句循 环语句:   格式: 1) L1 Z=0:   L2 LBI 0   L3 Z=Z+1   L4:语句1:   L5 Z=N ≠>GOTO 0   1可以视为步长,可以为任意数,N为条件。在水准测量中求可以用他来减少计算量。   示例3。路基水准测量时一般一个20m一个断面,一个断面测三个点,水准仪两个测站间距离为100米,那么一个测站可以读15个点。下面就 这个情况编写一个程序:   已知:水准点高程、以及各次读数。 源程序:   L1 A”SZDGC”:B”HS”   L2 Y =A+B/1000:Z=0   L3 LBI 0   L4 Z=Z+1▲{D}:D”DS”  L5 H=Y-D/1000▲   L7 Z=15=>GOTO 1:≠>GOTO 0   L8 LBI 1   L9 {D}:D”DS: Y= H+D/1000: Z=0:GOTO 0   用户在使用时可以按照提示输入数据即可得到所要数据(读数输入时单位为毫米)。   CASIO 计算器将逐渐被应用到施工生产中,它将会减少现场人员计算工作量,提高人员工作效率。随着CASIO计算器的不断升级,fx4800以上已经提供图形功能,用户可以通过编写程序将现场放样形象化,更大方便工程人员使用,更大减小工程人员计算工程量。 二、电子在测量工程的应用   测量人员也可以电子表格(EXEL)提供计算功能计算测量内业资料。有效的利用电子表格的拖拉功能可以减少大量工程量,并且电子表格可以将各个程序分段编写,各个关键点很明显的表现出来,更有效的更直观将你的意图表现出来。   1、运用电子表格技巧   电子表格为用户提供各种类型函数,在施工中熟练使用各种类型的函数可以将各种计算过程简化,减少单元格数目。比如在测量中我们一般采用度、分、秒计算而电子表格计算按照弧度计算,所以在使用电子表格计算时我们可以运用 PI()这个函数将π代替而不需要输入3.14……。电子表格中单元格数字类型提供的自定义选项,它更丰富了数值内涵,使它能在工程中更有效运用。如防样里程为K26+899.321就可以将单元格数字类型定义为K26+00#.000,其参加运算时只有899.321参加运算。   2、示例 计算单曲线的法向角   下面是关于电子表格中的一些说明:   1、F、G、H 、I 列为中间计算数据,打印时可以隐藏。   2、开始计算前,将B列数据类型定义为 “K194+000.000” (红色的表示当里程为整数时省略)。   3、电子表格计算数据要比CASIO形象,其计算过程可以用公式可以更直接的表现出来。   4、其计算公式也是将现有公式一个一个的堆积,在引用数据时可分为相对引用和绝对引用两种。如D6单元格的公式为“=F6-F6^5/(40*$D$3^2*F$3*2)”,公式中$D$3、F$3就是绝对引用而F6则为相对引用。绝对引用数据不会因为单元格拖拉而发生变化。D7 单元格公式为“=F7-F7^5/(40*D$3^2*F$3*2)”。 5、本例中使用了PI()和INT()两个函数。    随着时代的发展,各种新的仪器和新的软件逐渐普及到施工生产中,作为一个新时代的工程人员只有不断接受新的知识,并将它运用到实际生产中才可以发挥它的最大功效,最大的提高生产效率,才能为企业和社会创造更大的财富。 卡西欧4500计算程序:高程计算 1、该程序是利用CASIO fx—4500(CASIO fx—4800)计算器程序编制功能编制的线路高程计算程序。在测设高程时使用全站仪或者水准仪便可以很方便的测设、复核在路线上的任意里程高程点。 程序以变坡点里程为计算起始里程,以变坡点顶点高程为计算起始高程,可分别计算路线大小任意里程方向的竖曲线和平坡点的高程。该程序虽小,但是在实际测量过程中确实大大节约和缩短了高程计算输入时间,为工程施工工序的及时交接提供了快速可靠的保障。 2. 程序 主程序:SPJS LbI 0:A〝BKZ″:B〝GC″:C〝P1″:D〝P2″:E〝SR″:F〝FMZ″ {H,N} N:〝PQJS:0,SQJS:1″ N=1=>Prog SQJS: ≠〉N=0=>Prog PQJS⊿⊿ Goto 0 子程序:PQJS H≦A=>K=B-(A-H)*C/F◢≠〉K=B+(H-A)*D/F◢ 子程序:SQJS H≦A=>G=(H-(A+E*(C-D)/F/2))^2/(2*E): ≠〉G=((A-E*(C-D)/F/2)-H)^2/(2*E)⊿ H≦A=>K=B-(A-H)*C/F+G◢≠〉K=B-(A-H)*D/F+G◢ 3. 程序使用说明 3.1、使用说明:BKZ为变坡点里程,GC为变坡点顶点高程,P1为小里程坡度值,P2为大里程坡度值,当坡度为上坡是输正值,下坡时输负值;SR为竖曲线半径,,当竖曲线为凸型曲线时半径输负值,当竖曲线为凹型曲线时半径输正值;FMZ为坡度分母值。当执行坡度高程计算时N输0;当执行竖曲线高程计算时N输1。H为计算点里程,K为计算里程点的高程。 3.2、特别说明的是:执行计算者必须牢记每一段竖曲线的起点和终点里程,超出任何一段竖曲线范围的里程标高一律应按平坡计算。进入第二段竖曲线范围需输入第二竖曲线的计算元素,既:变坡点里程和顶点标高、小里程坡度和大里程坡度、竖曲线半径、坡度分母值。 4. 算例 4.1、以南京市城市快速内环东线工程设计线路高程为例,南京市城市快速内环东线工程线路纵断面设计主要受工程起点、近北京东路交叉口处的¢1500暗管和交叉口处的管线覆土要求、规划地铁四号线区间、九华山既有人防设施、玄武湖河床规划河底标高和河床形态以及穿越东西向隧道敞开段的既有结构标高等控制。设计最大纵坡4.5%,最小纵坡0.3%,竖曲线半径全部满足规范最小半径的要求。其中第一段竖曲线设计里程为K4+924.821~K5+055.179,竖曲线为凸形曲线,设计半径为2700米,起点里程K4+924.821,设计高程为10.226米,变坡点里程K4+990,设计顶点高程为10.440米,终点里程K5+055.179,设计高程为7.507米;第二段竖曲线的里程为K5+147.875~K5+387.895,竖曲线为凹形曲线,设计半径为5000米,起点里程K5+147.875,设计高程为3.335米,变坡点里程K5+267.885,设计顶点高程为-2.066米,终点里程K5+387.895,设计高程为-1.706米。 4.2、操作方法 键操作 屏 幕 显 示 操 作 说 明 [FILE] SPJS 调出SPJS文件 [EXE] BKZ? 输入变坡点里程 4990 4990 [EXE] GC? 输入变坡点高程 10.440 10.440 [EXE] P1? 输入小里程坡度值(上坡输正值,下坡输负值) 0.33 0.33 [EXE] P2? 输入大里程坡度值(上坡输正值,下坡输负值) -4.5 -4.5 [EXE] SR? 输入竖曲线半径,凸形曲线输负反之为正 -2700 -2700 [EXE] FMZ? 输入坡度分母值 100 100 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 1 1 竖曲线计算 [EXE] H? 输入需要计算点的里程 4924.821 4924.821 [EXE] 10.225 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 0 0 平坡计算 [EXE] H? 输入需要计算点的里程 4924.821 4924.821 [EXE] 10.225` 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 1 1 竖曲线计算 [EXE] H? 输入需要计算点的里程 4990 4990 [EXE] 9.653 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 0 0 平坡计算 [EXE] H? 输入需要计算点的里程 4990 4990 [EXE] 10.440 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 1 1 竖曲线计算 [EXE] H? 输入需要计算点的里程 5055.179 5055.179 [EXE] 7.507 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 0 0 平坡计算 [EXE] H? 输入需要计算点的里程 5055.179 5055.179 [EXE] 7.507 显示里程点高程计算结果 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 0 0 平坡计算 [EXE] H? 输入需要计算点的里程 5147.875 5147.875 [EXE] 3.335 显示里程点高程计算结果 [FILE] SPJS 重新调出SPJS文件 [EXE] BKZ? 输入第二段竖曲线变坡点里程 5267.885 5267.885 [EXE] GC? 输入变坡点顶点高程 -2.066 -2.066 [EXE] P1? 输入小里程坡度值(上坡输正值,下坡输负值) -4.5 -4.5 [EXE] P2? 输入大里程坡度值(上坡输正值,下坡输负值) 0.3 0.3 [EXE] SR? 输入竖曲线半径,凸形曲线输负反之为正 5000 5000 [EXE] FMZ? 输入坡度分母值 100 100 [EXE] PQJS:0,SQJS:1? 执行平坡计算时输入0;执行竖曲线计算时输入1 ```` ` ``````` 计算方法和输入步骤同上 CASIO4500坐标计算程序 HUANHEQUXIAN K"JD"D"LS":B=D2/24R:M=D/2-DB/10R T=M+tan.5A(R+B)▲L=∏RA/180+D▲E=(R+B)/cos.5A-R▲Z"ZH"=K-T▲H"HY"=Z+D▲Q"QZ"= Z+L/2▲J"YH"=Z+L-D▲O"HZ"J+D▲prog 1▲ N"N=1=>V":P:prog 3:L=W:Fixm Lb1 2:{S}:S"KX":S>J=>Goto4△S>H=>Goto3△U=S-Z:E=U-UXY5/40R2D2:F=UXY3/6RD:Goto5 Lb1 3:U=90(2S-2H+D)/ ∏R:E=RsinU+M:F=R-RcosU+B:Goto5 Lb1 4:F=O-S:D≠0=>I=30F2/∏RD△V=F-FXY3/90R2:N=1=>U=360-A:F=180-A+I: ≠=>U=A:F-180+A-I△E=T+TcosU+VcosF:F=TsinU+VsinF:Goto1 Lb1 5:N=1=>F=-F△Lb1 1:X=E:Y=F:P=1=>prog2: prog4△: prog3:W=W-L:W<0=>W=W+360△V: "S"▲W: "R"▲Goto2 X=C+EcosL-FsinL▲Y=G+EsinL+FcosL▲ C"X0"G"Y0":Pol(X-C,Y-G):W<0=>W=W+360△W D≠0=>Q=>90U2/∏RD△Fixm:I=A-3I:N=1=>Q=-Q:U=-U:I=-I△ S<H=>F=L+Q≠=>S>J=>F=L+I: ≠=>F=L+U△△V=1: {E}:E"<B":F"R"=F+E: Lb1 6: {I}:I"SL":X+IcosF▲Y+IsinF▲V<2=>V=V+1:Goto6△ ZHI XIAN E"X0"F"Y0"A"R0"K"CZ":Lb1 1: {S}=S"KX":D=S-K:X=E+DcosA▲Y=F+DsinA▲V=1:Lb1 2: {BI}:H=A+B-180:I"SL":X+IcosH▲Y+IsinH▲V<2=>V=V+1:Goto2△Goto1 计算要素: JD——交点里程 LS——缓和曲线长 R ——圆曲线半径 A ——线路转角 T ——切线长 L ——圆弧总长度 E ——外矢距 N ——曲线方向,左偏取“1”,右偏取“0” P ——取“1” X0.Y0——ZH点坐标 X.Y——交点坐标 KX——待求点里程 B ——与中线夹角 SL——边距,左“+”;右“-” 坐标反算程序(已知两坐标求算其平距和方位角) 程序名:ZBFS Norm:A”X1”:B”Y1”:pol(C”X2” - A,D”Y2” - B:”S=”▲W<0=>W=W+360△W:”Aμ=” 注意:本程序在CASIO4500上调试运行通过。如果是在4800上运行请将源程序中的V,W分别用I,J替代即可。 运行后界面如下: 输入项目: X1?————————————请输入点1的X坐标,按EXE键输入下一个量。 Y1?————————————请输入点1的Y坐标。 X2?————————————请输入点2的X坐标。 Y2?————————————请输入点2的Y坐标。 输出项目: S= ————————————为两点之间距离,按EXE键输出下一个量。 Aμ=————————————为1点到2点的方位角。按EXE键循环。 ==== 2 === 坐标正算程序(已知一坐标及其平距和方位角求算另一点坐标) 程序名:ZBZS C”X1”D”Y1”S”S=”R”Aμ”:X”X2”=C+Rec(S,R▲Y”Y2”=D+W 注意:本程序在CASIO4500上调试运行通过。如果是在4800上运行请将源程序中的V,W分别用I,J替代即可。 运行后界面如下: 输入项目 X1? ————————————请输入点1的X坐标,按EXE键输入下一个量。 Y1? ————————————请输入点1的Y坐标。 S=? ————————————为两点之间距离。 Aμ?————————————为1点到2点的方位角。 输出项目 X2 ————————————输出点2的X坐标。 Y2 ————————————输入点2的Y坐标。按EXE键进入下一个循环。 ==== 3 ==== 竖曲线计算程序 程序名:SQX LBl 1:{DEIHRQPJ}:W=DEIHRQPJ:T=(I-H)R/2:N=T2/2R LBl 2:{A}:Z=A LBl 3:A>P=>Goto 4:△A>E=>Goto 6:△A>Q=>Goto 5:△X=D+(A-E)I▲ Goto 2 LBl 4:X= D+(A-E)H▲Goto 2 LBl 5:M=(Q-A)2/2RJ:X=D+(A-E)I+M▲ Goto 2 LBl 6:M=(P-A)2/2RJ:X=D+(A-E)H+M▲ Goto 2 注意:本程序在CASIO4500上调试运行通过。如果是在4800上运行请将源程序中的V,W分别用I,J替代即可。 字母含义: D:变坡点高程 E:变坡点里程 J:曲线凸凹(凸为-1、凹为+1) L:开始坡度 H:结束坡度 A:待求点标高 R:竖曲线半径 Q:起点里程 P:终点里程 ==== 4 ==== 计算曲线上任一点放样极坐标 F1: QXJS L1 Abs W"FixmC=>"=7=>Fixm:Goto F△Fix 4:Z=E7A"A0"/Abs AN[9:A=Abs A:Q=R+S"Lsci"2/24R L2 T=S/2-Sxy3/240R2+Anstan .5A▲L=πRA/180 +S▲H"ZH"=J"JDT"-T▲V"HY"=H+S▲V"QZ"=H+.5L▲V"YH"=H+L-S▲L"HZ"=H+L▲D"xJ"K"yJ" B"Gra"O"XE"U"YE"G"Xm"M"Xm" L3 LbI F:{FN}:F≤H=>X=F-J:ZN:≠>F≤L-S=>I= L-S=>I= F-H:FProg Q:≠>Rec(R-ZN,90(2I-S)/πR: X=W-Qtan.5A:Q-V△≠>I=L-F:PoI(T-I,ZN:FProg Q:PoI(-X,Ans△X=Rec(Ans,A+W L4 W△△X=D+Rec(PoI(X,ZAns,W+B:Y=K+W: "EnD OK!":PoI(G-O,M-U:I=W:PoI(X-O,Y-U:W-I: Ans<0=>Ans+360△I=Ans:60Frac Ans:I"≤Deg"=IntI+.01Int Ans+6mFrac Ans▲V"P"=V▲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"A0"/Abs AN[9处E用按键[EXP] 键输入; 2、程序中π代表圆周率,也就是3.1415926的那个; 3、程序中Ans用按键[Ans]输入; 4、程序中I"≦Deg"=Int I+.01Int Ans+6mFrac Ans▲处的m 用按键[SHIFT][5]输入; 操作说明: Fixm C=>? 首次启动时,需输入密码:“10000000”。重启动功能控制符,输入“7”或“-7”可启动重启动功能。 A0? 曲线转角,要求以度分秒形式输入,左转输入“负” 值,右转输入“正”值。 R? 曲线半径,直接输入即可。 LSci? 缓和曲线长度,有缓和曲线时输入缓和曲线长度,圆曲线输入“0”。 T=S/2-Sxy3/2→ 程序输出曲线切线长度。 L=ПRA/180+S 程序输出曲线长度。 JDT? 曲线交点里程,直接输入平曲线交点里程,如K123+456.789输入123456.789即可。 ZH= 程序输出曲线起点[ZH]里程。 HY= 程序输出HY里程。 HY= 程序输出HY里程。 QZ= 程序输出QZ里程。 YH= 程序输出YH里程。 HZ= 程序输出曲线止点[HZ]里程。 XJ? 交点大地坐标[X坐标]。 YJ? 交点大地坐标[Y坐标]。 Gra? 曲线起始方位角。即由ZH指向实交点的方位角。 XE? 输入放样置仪点大地坐标[X坐标]。 YE? 输入放样置仪点大地坐标[Y坐标]。 Xm? 输入放样后视点大地坐标[X坐标]。 Ym? 输入放样后视点大地坐标[Y坐标]。 F? 放样点里程桩号。 N? 放样中桩距,即边桩至中桩的距离。无论曲线左转还是右转,均以左“负”右“正”输入,中桩输入“0”。 EnD OK! 程序提示:程序已完成放样点的坐标计算,正在进行放样元素计算,请稍候! ≤Deg= 程序输出放样极角为28度16分47秒(度分秒化处理),不要再人为转换,将仪器水平度盘拨至该角度即可放样。 P= 程序输出放样极距。即置仪点至放样点的水平距离。按EXE键循环到F?。 ==== 5 ==== 计算曲线上任一点大地坐标 F1: QXJS L1 Abs W"FixmC=>"=7=>Fixm:Goto F△Z=E7A"A0"/Abs AN[9:A=Abs A:Q=R+S"Lsci"2/24R L2 T=S/2-Sxy3/240R2+Anstan .5A▲L=πRA/180+S▲H"ZH"=J"JDT"-T▲V"HY"=H+S▲V"QZ"=H+.5L▲V"YH"=H+L-S▲L"HZ"=H+L▲D"xJ"K"yJ" B"Gra" L3 LbI 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:PoI(T-I,ZN:FProg Q:PoI(-X,Ans△X=Rec(Ans,A+W L4 W△△X”X”=D+Rec(PoI(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"A0"/Abs AN[9处E用按键[EXP] 键输入; 2、程序中π代表圆周率,也就是3.1415926的那个; 3、程序中Ans用按键[Ans]输入; 4、程序中I"≦Deg"=Int I+.01Int Ans+6mFrac Ans▲处的m 用按键[SHIFT][5]输入; 操作说明: Fixm C=>? 首次启动时,需输入密码:“10000000”。重启动功能控制符,输入“7”或“-7”可启动重启动功能。 A0? 曲线转角,要求以度分秒形式输入,左转输入“负” 值,右转输入“正”值。 R? 曲线半径,直接输入即可。 LSci? 缓和曲线长度,有缓和曲线时输入缓和曲线长度,圆曲线输入“0”。 T=S/2-Sxy3/2→ 程序输出曲线切线长度。 L=ПRA/180+S 程序输出曲线长度。 JDT? 曲线交点里程,直接输入平曲线交点里程,如K123+456.789输入123456.789即可。 ZH= 程序输出曲线起点[ZH]里程。 HY= 程序输出HY里程。 HY= 程序输出HY里程。 QZ= 程序输出QZ里程。 YH= 程序输出YH里程。 HZ= 程序输出曲线止点[HZ]里程。 XJ? 交点大地坐标[X坐标]。 YJ? 交点大地坐标[Y坐标]。 Gra? 曲线起始方位角。即由ZH指向实交点的方位角。 F? 放样点里程桩号。 N? 放样中桩距,即边桩至中桩的距离。无论曲线左转还是右转,均以左“负”右“正”输入,中桩输入“0”。 X= 程序输出放样点坐标[X坐标]。 Y= 程序输出放样点坐标[Y坐标]。按EXE键循环到F?。 三、结束语 以上程序可以输入Fx-4500PA计算器内,只要程序容量允许。以上程序均用于实际计算工作当中,结果可靠,操作简单。这些程序在CASIO4500上调试运行通过。如果是在4800上运行请将源程序中的V,W分别用I,J替代即可。 此外,该计算器还可进行一些其它的测量内外业计算,因篇幅关系仅将上述程序做以介绍。 手表 品牌手表 手表品牌 卡西欧手表官网 美橙表业 手表 http://88680.com/ 1 美橙表业 http://88680.com/ http://www.meichengbiaoye.com/ 全国最大的手表批发零售网站
/
本文档为【卡西欧手表瑞士手表casio手表】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。 本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。 网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。

历史搜索

    清空历史搜索