CASIO FX-4800P计算器公路放线程序
4800公路测量放样计算程序
4800公路测量放样计算程序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+20Goto 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点桩号。
CASIO计算器公路施工放样程序
CASIO fx-4800P(4500PA)计算器程序清单程序说明:本工程可以计算公路平面曲线中桩、边桩坐标(只限于缓和曲线长度相同之曲线)。
本工程中行首数字为行号,无须输入计算器。
程序清单如下:GLZBJS 公路坐标计算主程序(文件名)10 Defm 5 扩展内存20 F “JSFWJ”:R:S“LS”:A“ZJ”:输入曲线计算要素:F-计算方位角;I“L-,R+”:K“JDZH”:M“XJD”:R-曲线半径:N“YJD”S-缓和曲线长度;A-转角值;I-转角判30 C=28.6479S/R 定,当左转时输入+1,右转时输入-1;40 D=S2/(24R)-S^4/(2384R^3) K-JD桩号;M\N-JD坐标50 Q=S/2-S^3/(240R2) C-计算缓和曲线角;D-曲线内移植;60 T=(R+D)tan(A/2)+Q◢ Q-切线增值70 L“LQX”=(A-2C)Rπ/180+2S◢ T-切线长; L“LQX”-曲线长度80 E=(R+D)/cos(A/2)-R◢ E-曲线外距。
90 O“LY”=Rπ(A-2C)/180 O“LY”-圆曲线长度100 Z[1]“ZH”=K-T◢ ZH点桩号(如S=0,则为ZY点桩号)110 Z[2]“HY”=(K-T)+S◢ HY点桩号(同上)120 Z[3]“QZ”=K-T+L/2◢ QZ点桩号130 Z[4]“YH”=K-T+S+O◢ YH点桩号(如S=0,则为ZY点桩号)140 Z[5]“HZ”=K-T+L◢ HZ点桩号(同上)150 Lbl A 循环标识160 {W,B,C}输入W-1计算点桩号;B-宽度;C与170 W﹤K-T=﹥Prog“ZX SUB”:前进方向(轴线)的夹角。
≠=﹥W﹤(K-T)+S=﹥Prog“HHQX1SUB”:≠=﹥W﹤K-T+S+O=﹥Prog 判别输入的桩号在直线段、第一缓“YQX SUB”:≠和曲线段、圆曲线段还是第二缓和曲线=﹥W﹤K-T+O-2S=﹥Prog“HHQX2 段,然后分别用各子程序进行计算。
4800公路测量放样计算程序
4800公路测量放样计算程序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+20Goto 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点桩号有缓和曲线或无缓和曲线任意桩号中、边桩坐标4800计算程序四、QXZB(曲线坐标)A"ZH(ZH)=″:B"X(ZH)=″:C"Y(ZH)=″ "X(HZ)=″:E"Y(HZ)=″:F"FWJ-1=″:G"FWJ-2=″:H"R=″:I"L1=″:J"L=″:K"L2=″:L"ZJ(Z=1,Y=-1)=″O=180/pi (pi为圆周率,电脑中找不到此符号以此代替)LbI A{MN}M"ZHUANG HAO=″P=M-AMM>(A+I+J+K)?GOTO A⊿N"ZHUANG JU(Z+,Y-)=″M>(A+I+J)?GOTO D⊿M>(A+I)?GOTO C⊿LbI B(第一缓和曲线)X=B+(P-(P5÷40÷H2÷I2))COSF+(P3÷6÷H÷I-P7÷336÷H3÷I3)LSINFY=C+(P-(P5÷40÷H2÷I2))SINF-(P3÷6÷H÷I-P7÷336÷H3÷I3)LCOSFX=X+NCOS(F-(P2÷2÷H÷I)OL-90)◢Y=Y+NSIN(F-(P2÷2÷H÷I)OL-90)◢GOTO ALbI C(圆曲线)X=B+(HSIN(((P-I)÷H+I÷2÷H)O)+(I÷2-I3÷240÷H2))COSF-(H(1-COS(((P-I )÷H+I÷2÷H)O))+ I2÷24÷H)(-1)LSINFY=C+(HSIN(((P-I)÷H+I÷2÷H)O)+(I÷2-I3÷240÷H2))SINF+(H(1-COS(((P-I )÷H+I÷2÷H)O))+I2÷24÷H)(-1)LCOSFX=X+NCOS(F-((P-I)÷H+I÷2÷H)OL-90)◢Y=Y+NSIN(F-((P-I)÷H+I÷2÷H)OL-90)◢GOTO A回答人的补充 2009-06-21 01:41LbI D(第二缓和曲线)Q=A+I+J+K-MX=D-(Q-Q5÷40÷H2÷K2)COSG+(Q3÷6÷H÷K-Q7÷336÷H3÷K3)LSINGY=E-(Q-Q5÷40÷H2÷K2)SING-(Q3÷6÷H÷K-Q7÷336÷H3÷K3)LCOSGX=X+NCOS(F-(I÷2÷H+J÷H+K÷2÷H-Q2÷2÷H÷K)OL-90)◢Y=Y+NSIN(F-(I÷2÷H+J÷H+K÷2÷H-Q2÷2÷H÷K)OL-90)◢GOTO A变量说明:以上变量依次为:ZH(ZH)=直缓点桩号,无缓和曲线则为直圆点;X(ZH)=直缓点X坐标;无缓和曲线则为直圆点;Y(ZH)=直缓点Y坐标,无缓和曲线则为直圆点;X(HZ)=缓直点X坐标,无缓和曲线则为圆直点;Y(HZ)=缓直点Y坐标,无缓和曲线则为圆直点;FWJ-1=第一切线方位角;FWJ-2=第二切线方位角;R=半径;L1=第一缓和曲线长;L=圆曲线长;L2=第二缓和曲线长;ZJ(Z=1,Y=-1)=转角形式(左=1,右=-1)ZHUANG HAO=所求点桩号ZHUANG JU(Z+,Y-)=边桩桩距,左边桩为正,右为负,中桩0我已经用过了,没发现什么问题,请大家提意见。
CASIO4800公路测量施工放样计算程序
CASIO4800公路测量施工放样计算程序CASIO4800公路测量施工放样计算程序序先进的测设仪器和新技术的推广应用,给我们的测设工作带来了高质量和高效益。
但是运用软件的严重滞后,先进的仪器设备没有发挥出应有的作用,迫切呼唤新技术的开发、利用,广大工程技术人员渴求掌握更多、更新的先进技术,以减轻劳动强度,提高速度和精度。
《高等级公路定线测量及施工放样测量计算程序》一书既是在这样的形势下开发的,是作者多年来精心研究并在多条高等级公路上实际应用中成熟起来的。
本书运用极坐标法给出了公路测设和施工放样的计算程序,易于广大工程技术人员掌握,有着良好的社会和经济效益。
该书既是一本工具书,又可作为一本通俗易懂的教科书,丰富了学生的课堂知识,对测量课程的改革起到了充实作用。
我相信,只要我们广大的工程技术人员认真学习、运用本方法,必将对公路测设和施工控制测量技术的进步起到积极的作用。
前言当前国内高等级公路设计已经由传统的沿中线作业的设计方法逐步过渡到在路线外建立沿线控制网的设计方法,为适应新模式下高等级公路的定线测量、施工放样测量,特编写此书。
本书叙述浅显易懂,循序渐进,逐步深入,使读者易于接受和理解。
详细讲解程序的使用方法,并附有实例计算过程、计算成果,便于读者自学、程序调试,使之在短期内能快速上手使用本程序。
《高等级公路定线测量及施工放样测量计算程序》全书共五章。
第一章概论,对程序特点、适用范围等进行简要介绍;第二章为导线坐标计算及程序,主要讲述有关导线坐标的计算方法、计算程序;第三章主要讲述了程序的录入方法及源程序清单;第四章详细介绍程序中的符号含意、使用方法及步骤;第五章分别列举处于三种不同坐标系统中的计算实例,详尽介绍计算程序应用技巧。
本书的编写得到了杨金华校长等领导的大力支持和关心,及其他教师的热情帮助和鼓励,在此谨致诚挚的谢意。
由于编者水平有限,书中难免出现遗漏、不足和错误,诚请各位读者和同行专家批评指正。
利用OASIO fx—4800p计算器进行公路测量放样程序
-/ .E b Fra bibliotekK ^
.
30p f 40p 80 和 x 50 计算程序后 , 一 充分利用C SOf A I 一 x 40p 8 0 计算器函数丰富 、编程语 ,简单 、内存大 、 口 J 屏幕大的特点, 对公路 程测量程序重新进行了设 I _ I
计及 编写 。
1 I )
22 中桩和边桩坐标进行统一计算 . 利用 曲线 角 +9I 边 距值 来计 0一 .
算 边桩坐标 :
C=C +Ab KsnE s i D=D +Ah Kc s s o E
L I := + b K oED D A s s E b C C A s cs : = + bK i  ̄ 6 n
其中, 为网曲线半径 , 为放样点里程减去
2 程序 的设计方法和思路
收稿 日期 : 0 1 1- 0 20 — 2 1
直缓点里程后的绝对值 ,£为缓和曲线长 ,p 为勿
作者简介:太 自 ̄ (9 5 . .实验员 ,丰要进行测帚教学 与实验研究 。 ]1 6 一) 男
第2 期
太 自刚: 利用 C SOf. 8o 计算器进行公路测量放样程序 A I - 0p  ̄4
公路测量放样 程序
太 自刚
( 昆明冶金高 等专科学校资源 冶金 系, 云南 昆明 60 3 ) 503
摘 要: 论了线路坐标放样 中桩及边桩 的坐标计算方 法 .并结合 C SOf 4o 计算器 的特 点 ,用程序 讨 A I 一 8% x
实现 了 I 算 法 。 述 关键 词 : 放样 ;线 路 测 最 ;缓 和 『 线 ;网 『 线 ;偏 角 ;交 点 f n f n 中图分类号: 2 8 P 5 文献标识码: A
4800放线程序
卡西欧fx-4800p计算机(中、边线坐标放样程序,计算速度快,园曲线超过半圈后有误差)(此程序可以查找桩号和偏中距离)SUB-1A=0.1739274226:B=0.3260725774:K=0.0694318442:L=0.3300094782:X=U+W(ACOS(G +180QKW(1÷P+KWD)÷π)+BCOS(G+180QLW(1÷P+LWD)÷π)+BCOS(G+180QW(1-L)(1÷P+WD(1-L))÷π)+ ACOS(G+180QW(1-K)(1÷P+WD(1-K))÷π)):Y=V+W(ASIN(G+180QKW(1÷P+KWD)÷π)+BSIN(G+180QLW(1÷P+LWD)÷π)+BSIN(G+1 80QW(1-L)(1÷P+WD(1-L))÷π)+ ASIN(G+180QW(1-K)(1÷P+WD(1-K))÷π)):F=G+ 180QW(1÷P+WD)÷πS—O(放线主程序)Deg:Fix 3LbI 7:C“XC=”: E“YC=”LbI 1:{N}: N“XL=1,2”:N=3=>{U,V,G,P,R,О,H,Q}: Prog“QXYS”: ≠>△LbI 0:{S,M,Z}:S“ZHUANG HAO=”: LbI 8N=1=> Prog“TDGS--SJ”: GOTO 2: ≠>△N=2=> Prog“00000”: GOTO 2: ≠>△N=3=> Prog“QXYS”: GOTO 2: ≠>△GOTO 1LbI 2:S<О-0.001=> GOTO 1: ≠>△S>H+0.001=> GOTO 1: ≠>△D=(P-R)÷(2PR(H-О)):W=Abs(S-О): Prog“SUB1”: Z“KUAN DU=”: Z=1000=> GOTO 5△Z≠0=> GOTO 3 △X“XS=”▲ Y“YS=”▲F<0=> F=F+360:≠>△F“QX-FWJ=”▲LbI 4:I=0: J=0: PoI(X-C,Y-E):J<0=> J=J+360:≠>△J“FWJ=”▲ I“HD=”▲ G OTO 0Lb1 5:M“PJ=”: F=F+M:X=X+ZCOSF▲Y=Y+ZSINF▲Goto 4Lb1 5:DegF=F-M:J=0:I=0: PoI(X-C,Y-E+0.00001Ran#):J<0=> J=J+360:≠>△Abs(Icos(J-F)) <0.010=> Goto 6△ S=S-Icos(J-F):Pause 0: Goto 8Lb1 6:Z=0:S”JI SUAN ZH=”▲J-F<-180=>I”L= m”▲Goto 7: ≠>△J-F>180=>I”R= m”▲Goto 7: ≠>△J-F<0=> J-F>-180=>I”R= m”▲Goto 7: ≠>△△J-F>0=> J-F<180=>I”L= m”▲Goto 7: ≠>△△I”ZX--PT”▲Goto 7QXYS(现场输入曲线要素)U“X0=”: V“Y0=”: G“F0=”: P“R1=”:R“R2=”: О“DK1=”: H“DK2=”:Q “L(-1),R(+1),0”TDGS—SJ(线路名称)S>0=>S≤线元终点里程=>U=线元起点x坐标:V=线元起点y坐标:G=线元起点方位角: P=线元起点半径(直缓点、缓直点半径为1045):R=线元终点半径(直缓点、缓直点半径为1045):Q=(左转为-1,右转为+1,直线为0):GOTO 3:≠>△△S≤线元终点里程=>U=线元起点x坐标:V=线元起点y坐标:G=线元起点方位角:P=线元起点半径(直缓点、缓直点半径为1045):R=线元终点半径(直缓点、缓直点半径为104 5):Q=(左转为-1,右转为+1,直线为0):GOTO 3:≠>△。
CASIO-fx4800P型计算器连续计算线路高程、坐标Word文档
CASIO-fx4800P型计算器连续计算线路高程、坐标及放样程序【简述】为了适应现场快速、准确、灵活的放样要求,作者根据线路施工测量特点,运用计算器的编程功能,使整条线路的施工测量计算数据能连续快速的计算,只要把整条线路各个交点处的计算要素输入子程序中,你便拥有整条线路的“数据库”。
在忙碌的施工现场,你不必携带大量的施工图和资料来查找平面、纵断面的设计要素,更不必担心设计要素的输入错误,从而使得计算和放样轻松、方便、快捷。
【计算范围】坐标部分包括:各等级公路和高速路的直线段、圆曲线段、加对称缓和曲线的圆曲线段中、边桩坐标及放样计算。
高程部分包括:各等级公路和高速路的直线段、竖曲线段、缓和超高段中、边桩高程及放样计算。
一、坐标及放样程序【起算数据】:交点里程桩号、交点坐标、前直线方位角、交点转角、圆曲线半径、缓和曲线长(一)主程序:XYFY2Fix4M"Xc=":P"Yc=" '如须放样输入测站坐标值,否则输入0Lbl0{HS}:H"K0+0":S"B=(-B,0,B)":Prog"A" '变量输入和声明S=0=>E=0:≠>E=90 '求边桩坐标时的偏角值判定L=πRN÷180+V '含有缓曲线的曲线总长T=(V÷2-V^3÷(240R^2))+(R+(V^2÷(24R)-V^4÷(2688R^3)))tan(N÷2)'切线长A=Q-T:B=A+V:D=A+L:C=D-V 'A-ZH(ZY)点桩号,B-HY点桩号,C-YH点桩号,D-HZ(YZ)点桩号Rec(T,F+180) '求ZH(ZY)点的坐标增量Z[1]=W+I:Z[2]=K+J 'ZH(ZY)点坐标值Rec(T,F+GN) '求HZ(YZ)点的坐标增量Z[3]=W+I:Z[4]=K+J 'HZ(YZ)点的坐标值Lbl1U=S÷(Abs(S+10E-19)):S=AbsS '左右偏角每件判定H<A=>Goto2: ≠> '第一直线上坐标计算判定H<B=>Goto3: ≠> '第一缓和曲线上坐标计算判定H<C=>Goto4: ≠> '净圆曲线上坐标计算判定H<D=>Goto5: ≠> Goto6⊿⊿⊿⊿'第二缓和曲线和第二直线上坐标计算判定Lbl2Rec(Q-H,F+180) '第一直线上中桩坐标增量计算X=W+I:Y=K+J '中桩坐标值计算Rec(S,F+180-(180-E)U) '第一直线上与中桩同一断面的边桩增量计算X=X+I:Y=Y+J '边桩坐标值计算S=SU '边长条件判定Goto8Lbl3'进入第一缓曲线段计算Z=H-A '待求点至ZH点的距离O=90Z^2÷(πRV) '所求点缓曲线对应的圆心角X=Z-Z^5÷(40R^2V^2)+Z^9÷(3456R^4V^4) '缓曲线上ZH点至待求的支距X坐标Z=Z^3÷(6RV)-Z^7÷(336R^3V^3)+Z^11÷(42240R^5V^5) '缓曲线上ZH点至待求点的支距Y坐标Lbl7Rec(X,F)X=Z[1]+I:Y=Z[2]+JRec(Z,F+90G) '把中桩支距坐标转换成测量统一坐标X=X+I:Y=Y+JRec(S,F+O G+EU) '曲线边桩坐标增量计算X=X+I:Y=Y+J '坐标计算结果S=SU '边长条件Goto8Lbl4'进入主圆计算部分Z=H-A-V÷2 '曲线上待求点到HY点的里程O=180Z÷(Rπ) '待求点方位角所对应的圆心角X=Rsin O+(V÷2-V^3÷(240R^2))Z=R(1-cos O)+(V^2÷(24R)-V^4÷(2688R^3))'主圆部分待求点支距坐标XY Goto7Lbl5'进入第二缓和曲线计算Z=D-H '曲线上待求点到HZ点的里程O=90Z^2÷(πRV) '待求点方位角所对应的圆心角X=Z-Z^5÷(40Z R^2V^2)+^9÷(3456R^4V^4)Z=Z^3÷(6RV)-Z^7÷(336R^3V^3)+Z^11÷(42240R^5V^5) '待求点支距坐标XY Rec(X,F+GN+180)X=Z[3]+I:Y=Z[4]+J '把中桩支距坐标转换成测量统一坐标Rec(Z,F+GN+180-90G)X=X+I:Y=Y+JRec(S,F+GN+180-O G-(180-E)U) '曲线边桩坐标增量计算X=X+I:Y=Y+J '坐标计算结果S=SUGoto8Lbl6'进入第二直线段计算部分Rec(H-D+T,F+GN) '中桩坐标增量计算X=W+I:Y=K+J '中桩坐标计算结果Rec(S,F+GN+EU) '边桩坐标增量计算X=X+I:Y=Y+J '边桩坐标计算结果S=SUGoto8Lbl8X=X◢'显示坐标计算结果Y=Y◢M≠0=>Goto9: ≠>Goto0 ⊿Lbl9 '进入放样部分计算Pol(X-M,Y-P) '增量计算J<0=>J=J+360: ≠>J=J ⊿J"A"=Int J+0.01Int(60Frac J)+0.006Frac(60Frac J) ◢'方位角计算结果(此显示值为度分秒格式)I"L"=I◢'极距计算结果Goto0(二)子程序:AH≤ZY2(ZH2)=>Q=JD1:W=X1:K=Y1:R=R1:F=F0:N=N1:V=Ls1:G=1(-1):=>H≤ZY3(ZH3)=>Q=JD2:W=X2:K=Y2:R=R2:F=F1:N=N2:V=Ls2:G=1(-1):=>H≤ZY4(ZH4)=>Q=JD3:W=X3:K=Y3:R=R3:F=F2:N=N3:V=Ls3:G=1(-1):=>H≤ZY5(ZH5)=>Q=JD4:W=X4:K=Y4:R=R4:F=F3:N=N4:V=Ls4:G=1(-1):=>……………………………H≤ZY n+1(ZH n+1)=>Q=JD n:W=X n:K=Y n:R=R n:F=F n-1:N=N n:V=Ls n:G=1(-1)注:H—待求点桩号ZY n+1(ZH n+1)—后曲线起点桩号 Q—本曲线交点桩号 W—本曲线交点X坐标K—本曲线交点Y坐标 R—本曲线内圆曲线半径 F—前直线方位角 N—本交点转角V—本曲线内缓和曲线长 G—线路转向符,左转角-1,右转角为+1二、高程及放样程序【起算数据】:变坡点桩号A、变坡点高程B、前后纵坡C D、竖曲半径R、横坡度F、最大超高横坡度G、ZH点桩号、YH点桩号、HZ点桩号、施工层厚度N、视线高W (一)主程序:GCFYW"SXG=":N'常量输入(视线高程、施工层厚度)Lbl 1{LО}:L"K0+0":О"B=" :Prog"B"'变量输入及声明K=C-D '坡度差及竖曲线偏角K>0=>J=-1:≠>J=1⊿'凹凸竖曲线判断条件T=Abs(RK)÷2 '竖曲线切线长,如需显示则在后面加上◢H=A-T '竖曲线起点ZY桩号,如需显示则在后面加上◢X=A+T '竖曲线终点YZ桩号,如需显示则在后面加上◢M=L-A '待求点至变坡点的距离L≤H=>P=B+MC-N-W: ≠> '前纵坡直线段中桩高程计算L≤A=>P=B+MC+J(T-AbsM)2÷(2R)-N-W: ≠>'前纵坡竖曲线中桩高程计算L≤X=>P=B+MD+J(T-AbsM)2÷(2R)-N-W: ≠>'后纵坡竖曲线中桩高程计算L>X=>P=B+MD-N-W ⊿⊿⊿⊿⊿'后纵坡直线段中桩高程计算E=0=>Goto 2 '直线部分中、边桩计算判断条件≠>L≤E=> Goto 2 '直线部分中、边桩计算判断条件≠>L>V=> Goto 2 '直线部分中、边桩计算判断条件≠>L>E=> Goto 3 '前缓曲超高部分中、边桩计算判断条件≠> L>U=> Goto 4⊿⊿⊿⊿'后缓曲超高部分中、边桩计算判断条件Lbl 2O=0=>Z“H”=AbsP◢'显示直线部分中、边桩高程计算结果≠>Y“HB”=Abs(P-OF)◢不需放样显示高程,否则显示放样水准尺计数⊿Goto 1Lbl 3S=(L-E)(F+G)÷(V-U)-F'前缓曲线超高横坡度计算S≤F=> Goto 5:≠>S≤G=> Goto 6 '超高起点(终点)至零界面、零界面至全超高及全超高≠> Goto 7 ⊿⊿部分的计算判断条件Lbl 4S=(V-L)(F+G)÷(V-U)-F'后缓曲线超高横坡度计算S≤F=> Goto 5:≠>S≤G=> Goto 6 '超高起点(终点)至超高变坡零界面、零界面至全≠> Goto 7 ⊿⊿超高、全超高部分计算判断条件Lbl 5O=0=>Z“H1”=AbsP◢'超高起点(终点)至超高变坡零界面中、边桩高程≠>Y“H-D1”=Abs(P-OF)◢计算结果显示Q“H-G1”=Abs(P+OS)◢⊿Goto 1Lbl 6O=0=>Z“H2”=AbsP◢'超高变坡零界面至全超高中、边桩高程≠>Y“H-D2”=Abs(P-OS)◢计算结果显示Q“H-G2”=Abs(P+OS)◢⊿Goto 1Lbl 7O=0=>Z“H3”=AbsP◢'全超高中、边桩高程计算结果显示≠>Y“H-D3”=Abs(P-OG)◢Q“H-G3”=Abs(P+OG)◢⊿Goto 1注:W“SXG”-视线高N-施工层厚度L"K0+0"-待求点桩号О"B="-中桩至边桩距离(二)子程序:BL≤ZY2=>A=JD1:B=H1:C=I0:D=I1: R=R1:F=I h:E=ZH1:U=YH1:V=HZ1:G=I max1 :≠>L≤ZY3=>A=JD2:B=H2:C=I1:D=I2: R=R2:F=I h:E=ZH2:U=YH2:V=HZ2:G=I max2 :≠>L≤ZY4=>A=JD3:B=H3:C=I2:D=I3: R=R3:F=I h:E=ZH3:U=YH3:V=HZ3:G=I max3 :≠>L≤ZY4=>A=JD3:B=H3:C=I2:D=I3: R=R3:F=I h:E=ZH3:U=YH3:V=HZ3:G=I max3 :≠> ……………………L≤ZY n+1=>A=JD n:B=H n:C=I n-1:D=I n: R=R n:F=I h:E=ZH n:U=YH n:V=HZ n:G=I maxn注:ZY N+1:-下一个竖曲线起点桩号(如:变坡点2的计算范围为前竖曲线终点YZ1至后竖曲线起点ZY3,则在程序中“L≤ZY3”就应输入ZY3的里程桩。
Get清风casio fx4800p计算器程序在工程测量中的应用secret
casio fx4800p计算器程序在工程测量中的应用_secretCASIO fx4800p 计算器程序在工程测量中的应用1、问题的提出:工程测量是公路施工的根底工作。
目前,测量根本采用全站仪进行坐标放样,因此,路线上任一点的坐标计算工作非常重要。
而公路线型较复杂,直线、缓和曲线、圆曲线、复曲线在导线布设中均有应用。
采用一般科学计算器及普通计算方法,计算任一点坐标较复杂,有些甚至难以实现,而采用微型计算机那么本钱相对较高。
本人根据施工现场实际,采用CASIO fx4800p 计算器编制了一套简单应用程序,用以解决公路路线任一点坐标计算问题,并取得了一定收益。
2、编程计算原理本程序是以切线支距法为其根本原理。
切线支距法是以曲线直缓点ZH 或缓直点HZ 为坐标原点,以切线为X 轴,过原点的半径为Y 轴,利用缓和曲线和圆曲线上各点的X 、Y 坐标测设曲线。
如图1,曲线上各点的坐标按以下公式计算:①缓和曲线范围内X = L - 22540sL R LY=sRL L 63图 1 切线支距法②圆曲线范围内X = Rsin ϕ +q Y = R(1-cos ϕ)+Pϕ= RL L S -π180⨯+0β(YH)R(HZ)ZHHYO(JD)Pqx 0xy y 0yxpβϕ(HZ)yxM(x,y)b(x1,y1)θ式中:L 为测点至ZH 或HZ 的曲线长,L S 为缓和曲线长,0β为缓和曲线角0β=R L S 2,p 为圆曲线内移距离p=R L S 242,q 为切线增长q=2S L -23240RL S图2根据以上公式在计算出路线的中桩坐标后,该点的边桩坐标根据其切线方位角也就轻而易举的可以计算出了。
如图2所示,假定x 轴方位角为A1,那么所求点M 中心桩处方位角为A=A1-θ,θ=π18022⨯S RL l 〔测点在缓和曲线上时〕 θ=ππ1801802⨯+⨯R l R L S 〔测点在圆曲线上时〕 那么M 〔x,y 〕点坐标为:X=X 1+bcos(A-90)Y=Y 1+bsin(A-90) (式中b 为测点至中线宽度)综上所述,在根据以上公式先算出切线支距坐标x 、y,然后通过坐标变换将其转换为测量坐标X 、Y 。
4800全套计算程序(吐血推荐)
4800全套计算程序(吐⾎推荐)整套卡西欧计算器CASIO FX-4800 4500测量程序各位同⾏:我长年从事公路桥梁测绘⼯作,收集整理了⼀整套卡西欧计算器CASIOFX-4800P和卡西欧CASIO FX-4500P测量放线程序,该套程序经过反复修正,具有极⾼的可靠性。
现在免费提供给⼤家.程序⽬录:1.1 测边⼤地四边形的条件平差程序1.2 测边中点多边形的条件平差程序1.3 单⼀导线的严密平差程序1.4 单⼀结点导线的严密平差程序1.5 边、⾓后⽅交会的条件平差程序1.6 测边交汇点的条件平差程序1.7 单⼀⽔准路线的平差程序1.8 单结点的平差程序1.9 多结点⽔准⽹的平差程序1.10 多边形⽔准⽹的平差程序1.11 三⾓⾼程差的计算程序1.12 测距边⽔平距离的计算程序1.13 ⾼斯投影座标正、反解和换带的计算程序1.14 平⾯座标转移的计算程序2.1 单边、⾓后⽅交会的计算程序2.2 双边、⾓后⽅交会的计算程序2.3 碎部点座标的计算程序2.4 内、外分点座标的计算程序2.5 房⾓标的计算程序2.6 多次后⽅测⾓交会点2.7 测边交会点的计算程序2.8 导线三维值的计算程序2.9 圆⼼座标和半径的程序2.10 测站点、照准点归⼼改正的计算程序2.11 单边、双站后⽅交会的计算程序3.1 线路中⼼座标的计算程序3.3 红线交点座标的计算程序3.4 直线与圆曲线交点座标的计算程序3.5 垂⾜座标的计算程序3.6 道路不等宽时曲线要素的计算程序3.7 缓和曲线敷设时的计算程序3.8 圆曲线敷设时的计算程序3.9 极座标放线线的计算程序3.10 交点座标的计算程序3.11 宗地有关项⽬的计算程序3.12 丘地有关项⽬的计算程序4.1 导线X、Y、Z值的近似平差程序4.2 ⽆定向导线的计算程序4.3 测⾓前⽅交会点座标的计算程序4.4 测边交会座标的计算程序4.5 测⾓后⽅交会点座标的计算程序4.6 双边、⾓后⽅交会点座标的计算程序4.7 平⾯座标转移的计算程序4.8 测站点、照准点归⼼改正的计算程序4.9 三⾓⾼程⾼差的计算程序4.10 测距边⽔平距离的计算程序4.11 单⼀导线的严密平差程序4.12 边、⾓后⽅交会点的严密平差程序4.13 测边交会点的严密平差程序5.1 图跟导线点座标的计算程序5.2 碎部点座标的计算程序5.3 内、外分点座标的计算程序5.4 ⾓座标的计算程序5.5 圆⼼座标的和半径的计算程序5.6 交点座标的计算程序5.7 单边、⾓交会点座标的计算程序5.8 宗地有关项⽬的计算程序5.9 单边、双站后⽅交会座标的计算程序6.1 线路边桩座标的计算程序6.3 直线与曲线交点座标的计算程序6.4 道路不等宽时曲线元素的计算程序6.5 垂⾜座标的计算程序6.6 圆曲线敷设的计算程序6.7 缓各曲线敷设的计算程序6.8 极座标放线的计算程序6.9 单⼀⽔准路线的近似平差计算程序6.10 丘地有关项⽬的计算程序公路中、边桩坐标计算及放样程序功能:任意半径曲线中桩、任意交⾓边桩坐标计算放样、中桩切线⽅位⾓、任意点置仪放样、两点间距离计算、两点⽅位⾓计算。
卡西欧4800P计算器道路中边桩放样程序
卡西欧4800P计算器道路中边桩放样程序SG(主程序)NEJAIRSBC↙Prog“Y” ↙Z=J-T◢Z【2】=Z+S◢Z【3】=Z+L÷2◢Z【4】=Z【2】+M◢Z【5】=Z+L◢Prog“XY”XY(子程序)GH:Fixm: LbI0:{KD}:K≥Z【5】=>X=N+(K-Z【5】+T)cosC◢Y=E+(K-Z【5】+T)sinC◢≠=>K≤Z=>X=N-(J-K)cosB◢Y=E-(J-K)sinB◢≠=>K≥Z【3】=>V=Z 【5】-K:E【30】=E+TsinC:N【30】=N+TcosC:O=C: ≠=>V=K-Z:N【30】=N-TcosB:E 【30】=E-TsinB:O=B⊿V≤S=>X=V-V5÷40R2S2◢Y=V3÷6RS-V7÷336R3S3◢≠=>W=(V-S÷2)×180÷πR:X=RsimW+Q◢Y=R(1-cosW)+P◢△K≥Z【3】=>U=-X: ≠=>U=X△X=N【30】+Ucos-IYsinO◢Y=E【30】+UsinO+IYcosO◢△△D=0=>Prog“RD”: ≠=>Prog“F” △↙Goto0↙注:XY程序中的;U=-X: ≠=>U中的“-”符号是计算器中的“(-)”键RD(子程序)G“N【O】”:H“E【O】”:X:Y:U=X-G:O=Y-H:U≤0=>A【40】=180+tan -1(O÷U) ◢≠=> O≥0=>A【40】= tan-1(O÷U) ◢≠=>A【40】=360+ tan-1(O÷U) ◢△△D【40】=√(O 2+U2) ◢JD(子程序)G:H:X:Y:O:P:U:V:W=(Y-H)÷(X-G):M=(P-V)÷(O-U):N=(WG-M O+P-H)÷(W-M) ◢E=W(N-G)+H◢Y(子程序)P=S2÷24R-S4÷2384R3:Q=S÷2-S3÷240R2:T=Q+(R+P)tan(A÷2) ◢M=πR(A-180S÷πR)÷180◢L=M+2S◢E【37】=(R+P)÷cos(A÷2)-R◢2T-L◢D(子程序)X:Y:F:X=X+DcosF ◢Y=Y+DsinF◢Prog“RD”↙D-(子程序)XY:(OP-UV):D=((V-P)(X-O)+(U-O)(P-X))÷√((V-P)2+(U-O)2) ◢F(子程序)K≤Z=>F=90+B◢≠=>K≤Z【2】=>F=B+90+90I(K-Z)2÷πRS◢≠=>K≤Z【4】=>F=B+90+90I(2×(K-Z【2】)+S)÷πR◢≠=>K≤Z【5】=>F=C+90-90I(Z【5】-K)2÷πRS◢≠=>F=90+C◢△△△△Prog“D”程序说明:SG程序符号输入:N、E交点坐标,J:交点桩号,A:偏角,I:左负右正(1),R:半径,S:缓和曲长度(Lh),B: 本曲线方位角,C:下曲线方位角。
fx-4800计算器公路工程程序汇编
Fx—4800P计算器公路工程测量程序汇编蒋立日期:1998年12月《fx4800p》由坐标计算多边形面积程序程序清单程序名:ALbi0:{NAB}:N“N=”:S=0:I=1:I“N”=I◢A“X=”:B“Y=”:C=A:D=B ↙Lbi1:{XY}:I=I+1:I“N”=I◢X“X=”:Y“Y=”↙Lbi2:S=S+0.5 (AY-BX) :A=X :B=Y ↙Lbi3:I<N=>Goto1: ≠>S=S+0.5(DX-CY) ↙Lbi4:S“S”=AbsS◢↙Lbi5:Goto0 ↙使用说明:按FILE ■A→EXE ↙显示N=?问多边形个数,如N=3N=1提示输入第1个角点的X、Y坐标X=?1↙Y=?1↙N=2提示输入第2个角点的X、Y坐标X=?4↙Y=?5↙N=3提示↙输入第3个角点的X、Y坐标X=?1↙Y=?5↙S=6多边形(三角形)面积的等于6《fx4800p》计算直线、园曲线、缓和曲线上的中桩坐标、法线方向上边线坐标程序程序清单程序名:BLbi0 :Defm12 :{ABCDER}:A“JDK”:B“X0”:C“Y0”:D“PJ0”:E“FWJ:JD-ZH”:R“R”:H“Ls”↙Lbi1 :F=28.6479*H/R:P=H2/(24R:Q=H/2-H∧3/(240R2:L=R(D-2F)*π/180+2H◢↙Lbi3 :Z[12]=A:Z[11]=E:G=(R+P)*tan(D/2)+Q:V=Z[12]-G: W=V+L:V“ZH”=V◢W“HZ”=W◢↙Lbi4:Rec(G,Z[11]):X=B+I:Y=C+J:X“ZHX”=X◢Y“ZHY”=Y◢Z[1]=X:Z[2]=Y↙Lbi5:{N,T}:N“LP:1,RP:0”:T“S:0,S”↙Lbi6:N=1=>Z=Z[11]-D+180:≠>N=0=>Z=[11]+D-180≨≨↙Lbi7:Z<0=>Z=Z+360:≨Rec(G,Z):X=B+I:Y=C+J:X“HZX”=X◢Y“HZY”=Y◢Z[3]= X:Z[4]=Y ↙Lbi9:Z[11]-180<0=>Z[11]=Z[11]+180:≠>Z[11]=Z[11]-180≨↙LbiA:{M}:M“PK”↙LbiB:M≤L/2+V=>GotoC:≨GotoG ↙LbiC:M≤V=>Rec(V-M,Z[11]):X=Z[1]-I◢ Y=Z[2]-J◢ GotoI:≠>M≤H+V=>U=M-V:Prog“Z2”:≠>O=F+180(M-V-H)/(πR):Prog“Z3”≨↙LbiD:N=1=>S=Z[11]-tan-1(Y/X):≠>N=0=>S=Z[11]+tan-1(Y/X)≨≨↙LbiE:prog“Z4”:X=Z[1]+I◢Y=Z[2]+J◢↙LbiI:T=0=>GotoA:≨GotoN ↙LbiN:{T}:T“S”:M≤V=>Rec(T,Z[11]-90):Prog“Z6”:GotoA:≠>M ≤H+V=>G=28.6479*U2/(RH):GotoO:≠>GotoP ≨↙LbiO:N=1=>Z[12]=Z[11]-G-90:≠>N=0=>Z[12]=Z[11]+G-90≨≨Z[12] <0=>Z[12]=Z[12]+360:≨Rec(T,Z[12]):Prog“Z6”:GotoA ↙LbiP:Prog“Z7”:Prog“Z6”:GotoA ↙LbiG:N=1=>S=Z[11]-D:≠>S=Z[11]+D≨M≥W=>Rec(M-W,S):X=Z[3]+I◢Y=Z[4]+J◢GotoV:≠>M≤W-H=>O=F+180(W-H-M)/(πR):Prog“Z3”:≠>U=W-M:Prog“Z2”≨↙LbiH:N=1=>S=Z[11]-D+180+tan-1(Y/X):≠>N=0=>S=Z[11]+D+180- tan-1(Y/X)≨≨↙LbiK:Prog“Z4”:X=Z[3]+I ◢Y=Z[4]+J◢↙LbiV:T=0=>GotoA:≨{T}:T“S”:M≥W=>Rec(T,S-90):Prog“Z6”:GotoA:≠>M≤W-H=>GotoS:≨GotoT ↙LbiS:Prog“Z7”:Prog“Z6”:GotoA ↙LbiT:G=28.6479*U2/(RH)↙LbiU:N=1=>Z[12]=Z[11]-D+G-90:≠>N=0=>Z[12]=Z[11]+D-G-90≨≨Z[12]<0=>Z[12]=Z[12]+360:≨Rec(T,Z[12]):Prog“Z6”:GotoA ↙子程序程序名:Z2程序清单:X=U-U∧5/(40R2H2)+U∧9/(3456R∧4H∧4)-U∧13/(599040R∧6H∧6):Y=U∧3/(6RH)-U∧7/(336R∧3H∧3)+U∧11/(422400 R∧5H∧5)↙程序名:Z3程序清单:X=RsinO+Q:Y=R(1-cosO)+P ↙程序名:Z4程序清单:Rec(√—(X2+Y2),S)↙程序名:Z6程序清单:Z[5]=X+I:Z[6]=Y+J:Z[7]=2X-Z[5]:Z[8]=2Y-Z[6]:Z[5]“XL”=Z[5]◢ Z[6]“YL”=Z[6]◢ Z[7]“XR”=Z[7]◢ Z[8]“YR”=Z[8]◢↙程序名:Z7程序清单:N=1=>Z[12]=Z[11]-90-D/2:≠>N=0=>Z[12]=Z[11]+90+D/2≨≨Z[12] <0=>Z[12]=Z[12]+360:≨Rec((P+R)/cos(D/2),Z[12]):Z[9]=B+I:Z[10]=C+J:N=1=>Pol(Z[9]-X,Z[10]-Y):≠>N=0=>Pol(X-Z[9],Y-Z[10])≨≨J <0=>J=J+360:≨Rec(T,J)↙B程序使用说明启动程序:prog“B”↙显示输入说明例如JDK ?交点桩号10035.89 ↙X0 ?交点X坐标26714.542 ↙Y0 ?交点Y坐标145904.039 ↙PJ°?交点偏角(度、分、秒) 49°27′32″↙FWJ°:JD—ZH ?交点至ZH点切线方位角204°29′01″↙R ?园曲线半径710 ↙Ls ?缓和曲线长度,(当Ls=0时,为园曲线)125 ↙﹎﹎﹎﹎﹎﹎﹎﹎计算结果显示﹎﹎﹎﹎﹎﹎﹎﹎L=737.886 曲线总长度↙ZH=9645.978 ZH点桩号↙HZ=10383.865 HZ点桩号↙I ?中间显示↙J ?中间显示↙ZHX=26359.691 ZH点的X坐标↙ZHY=145742.447 ZH点的Y坐标↙LP:1,RP:0 ?[LP—线路左偏为1,RP—线路右偏为0 ] 0 ↙S:0,S ?0—只计算线路中线坐标,S—不等于0的任何数,计算中线坐标和边坐标,边坐标是指对应中桩法线方向的坐标,10 ↙HZX=26822.392 HZ点的X坐标↙ZHY=146278.738 HZ点的Y坐标↙PK ?待求点的桩号9770.98 ↙X=26471.845 待求点中桩X坐标↙Y=145797.548 待求点中桩Y坐标↙S= ?线路中点至待求点法线方向的距离15 ↙XL=26479.238 线路左15m的X坐标↙YL=145784.496 线路左15m的Y坐标↙XR=26464.453 线路右15m的X坐标↙YR=145810.600 线路右15m的Y坐标↙PK ?另一个待求点的桩号《fx4800p》计算高速公路匝道中心线、边线坐标程序程序清单程序名:CLbi0 :Defm12 :{ABCDFGKRP}: B“BP”:C“XB”:D“YB”:F“XP”:G“YP”:K “PJ°”:R“R”:A“A”:P“R1”:Pol(C-F,D-G):E=J+360 ↙Lbi1:{N,T,M}:N“LP:1,RP:0”:T“S:0,S”:M“L=>R:1,R=>L:0”:A=0=>GotoJ:≨Goto2 ↙Lbi2:U=A2/P:H= A2/R:P=9E99=>Z[3]=C:Z[4]=D:Goto3:≨U= A2/P:H= A2/R:Goto3 ↙Lbi3:M=1=>Z[1]=B-U:Z[2]=Z[1]+H:Z[1]“ZH”=Z[1]◢Z[2]“HY”=Z[2] ◢Goto4:≠>M=0=>Z[1]=B+U:Z[2]=Z[1]-H:Z[1]“HZ”=Z[1]◢Z[2]“YH”=Z[2] ◢≨≨↙Lbi4:P=9E99=>Goto5:≨Prog“Z2”:W=28.6479*U2/(RH:S=X-Y/tanW:Rec(Y/sinW,E):X=C+I:Y=D+J:N=1=>E=E+W:≠>N=0=>E-W≨≨Rec (S,E):Z[3]=X+I:Z[4]=Y+J ↙Lbi5:{Q}:Q“PK”↙Lbi6:M=1=>Goto7:≠>M=0=>Goto8≨≨↙Lbi7:Q≦Z[2] =>Goto9:≠>GotoD≨↙Lbi8:Q≧Z[2] =>Goto9:≠>GotoD≨↙Lbi9:M=1=>U=Q-Z[1]:≠>M=0=>U=Z[1]-Q≨≨Prog“Z2”↙LbiA:N=1=>V=E+180-tan-1(Y/X):≠>N=0=>V= E+180+tan-1(Y/X)≨≨Rec (√—(X2+Y2),V):X=Z[3]+I:Y=Z[4]+J:X“XP”=X ◢Y“YP”=Y ◢↙LbiB:T=0=>Goto5:≨GotoC↙LbiC:{T}:T“S”:W=28.6479*U2/(RH:N=1=>W=E+180-W-90:≠>N=0=>W=E+180+W-90≨≨Rec(T,W):Prog“Z5”:Goto5↙LbiD:U=H:Prog“Z2”:W=28.6479*H/R:N=1=>O=E+180-tan-1(Y/X):≠>N=0=>O=E+180+tan-1(Y/X)≨≨Rec(√—(X2+Y2),O):Z[9] =Z[3]+I:Z[10]=Z[4]+J ↙LbiE:N=1=>V=E+180-W-90:≠>N=0=>V=E+180+W+90≨≨Rec(R,V):Z[11]=Z[9]+I:Z[12]=Z[10]+J ↙LbiF:M=1=>L=Q-Z[2]::≠>M=0=>L=Z[2]-Q≨≨Prog“Z8”↙LbiH:{T}:T“S”:T=0=>Goto5:≨Prog“Z9”:Goto5↙LbiJ:Pol(F-C,G-D):W=J+360 ↙LbiK:{Q}:Q“PK”↙LbiM:N=1=>V=W-90:≠>N=0=>V=W+90≨≨Rec(R,V):Z[11]=C+I:Z[12]=D+J ↙LbiN:L=Abs(Q-B):Prog“Z8”↙LbiO:{T}:T“S”:T=0=>GotoK:≨Prog“Z9”:GotoK↙子程序程序名:Z5Lbi0:Z[5]=X+I:Z[6]=Y+J:Z[7]=2X-Z[5]:Z[8]=2Y-Z[6] ↙Lbi1:M=1=>Z[5]“XL”=Z[5]◢Z[6]“YL”=Z[6]◢Z[7]“XR”=Z[7]◢Z[8]“YR”=Z[8]◢≠>M=0=>Z[7]“XL”=Z[7]◢Z[8]“YL”=Z[8]◢Z[5]“XR”=Z[5]◢Z[6]“YR”=Z[6]◢≨≨↙程序名:Z8Lbi0:N=1=>Z=V+180-L*180/(πR):≠>N=0=>Z= V+180+L*180/(πR)(R,Z):X=Z[11] +I:Y=Z[12] +J :X“XP“=X ◢Y“YP“=Y ◢↙≨≨Rec程序名:Z9N=1=>Z=Z-180:≠>N=0=>Z=Z≨≨Rec(T,Z):Prog“Z5”↙C匝道程序使用说明FUNCTION 6 5 (变量清零)↙Prog“C”显示输入例如BP ?起点桩号754.493 ↙XB ?起点X坐标26541.168 ↙YB ?起点Y坐标145907.887 ↙XP ?第一段曲线X坐标26552.825 ↙YP ?第一段曲线Y坐标145935.665 ↙PJ°?园曲线偏角118.41°↙R ?园曲线偏半径80 ↙A?缓和曲线参数(园曲线A=0) 60 ↙R1 ?缓和曲线起点半径(当R无穷大时,R1=9EXP99) 9EXP99 ↙LP:1,RP:0 ?(左偏为1,右偏为0) 1 ↙S:0,S ?{ 计算边坐标为S(S为不为零的数),不计算为0} 10 ↙L=>R:1,R=>L:0?(计算顺序,从左往右为1,从右往左为0)0 ↙﹎﹎﹎﹎﹎﹎﹎﹎计算结果显示﹎﹎﹎﹎﹎﹎﹎﹎HZ=754.493 缓直点桩号↙(ZH) (直缓点桩号)YH=709.493 园缓点桩号↙PK ?输入待求点桩号544.161 ↙I ?中间显示↙XP=26698.387 待求点X坐标↙YP=145928.101 待求点Y坐标↙S ?从中点至法线方向的距离10 ↙XL=26707.612 线路前进方向左侧X坐标↙YL=145931.962 线路前进方向左侧Y坐标↙XR=26689.162 线路前进方向右侧X坐标↙YL=145924.241 线路前进方向右侧Y坐标↙PK ?另一个待求点的桩号《fx4800p》纵曲线计算程序(包括直线、曲线、直线)程序名:D程序清单:Lbi0:{ABCDERNT}:A“PVI”:B“HI”:R“R”:C“I1”:D“I2”↙Lbi1:N“LP:1,RP:0”↙Lbi2:N=1=>T=R(D-C)/200:≠>N=0=>T=R(C-D)/200≨≨E=A-T:F=A+T:E“PVC”=E◢F“PVT”=F◢↙Lbi3:{G}:G“PK”:G≦A=>Goto4:≨Goto5 ↙Lbi4:G≦E=>H=B-C(A-G)/100:H“HP”=H◢Goto3:≠>Prog“H1”:N=1=>H=B+I-J:H“HP”=H◢Goto3:≠>N=0=>H=B-I-J:H“HP”=H◢Goto3≨≨↙Lbi5:G≧F=>H=B+D(G-A)/100:H“HP”=H◢Goto3:≠>Prog“H2”:N=1=>H=B+I+J:H“HP”=H◢Goto3:≠>N=0=>H=B-I+J:H“HP”=H◢Goto3≨≨↙子程序程序名:H1I=(G-E)2/(2R:J=C(A-G)/100 ↙程序名:H2I=(F-G)2/(2R:J=D(G-A)/100 ↙D程序使用说明Prog“D”显示输入说明例如PVI ?变坡点桩号1040 ↙HI ?变坡点高程36.778 ↙R ?园曲线半径25285.340 ↙I1 ?变坡点左侧坡度值(百分数) 1.018 ↙I2 ?变坡点右侧坡度值(百分数) -1.260 ↙LP:1,RP:0 ?逆时针左偏为1, 顺时针右偏为0 0 ↙﹎﹎﹎﹎﹎﹎﹎﹎计算结果显示﹎﹎﹎﹎﹎﹎﹎﹎PVC=752.00 纵曲线起点桩号↙PVT=1328.00 纵曲线终点桩号↙PK= ?待求点桩号↙HP=35.165 待求点P点的设计高程↙PK= ?输入待求点桩号↙。
卡西欧4800公路测量程序
卡西欧4800公路测量程序第一章:基本符号1、X0——始点横坐标2、Y0——始点纵坐标3、X1——终点横坐标4、Y1——终点纵坐标5、D——始点到终点的水平距离6、F——始点到终点的方位角7、X(P1)——P1点的横坐标8、Y(P1)——P1点的纵坐标9、X(P2)——P2点的横坐标10、Y(P2)——P2点的纵坐标11、D(OP1)——置仪点到P1的水平距离12、D(OP2)——置仪点到P2的水平距离13、F(OP2)——置仪点到P2的方位角14、X(00)——置仪点的横坐标15、Y(00)——置仪点的纵坐标16、JD,JD(AB)——选择输入1或者2(1)JD——实交(2)JD(AB)——虚交17、IR、IL——选择输入1或者2(1)IR——路线右转(2)IL——路线左转19、(1) E-R; (2) T-R——选择输入(1)或(2)(1)E-R——继续E长控制半径R(2)T-R——T长控制半径R19、(1) E-R; (2) END——选择输入(1)或(2)(1)E-R——继续E长控制半径R测曲中(2)END——结束20、(1)S1,(2)S2,(3)R2——选择输入(1)或(2)或(3)(反复曲线S型)(1)S1——进入第一条曲线测量(2)S2——进入第二条曲线测量(3)R2——这是由第二条曲线测设后,进入第一条曲线测,在进入第二条曲线直接测量曲中21、(1)R1,(2)R2,(3)END——选择输入(1)或(2)或(3)(反复曲线S型)(1)R1——如对曲线一、二的测设皆不满意,可输入1,进入第一条曲线的测设,结束后输入3,进入第二条曲线的测设(2)R2——(2)R2:如对曲线二的邪恶设不满意,可输入2,再测曲中(3)END——结束22、X(QZ)——曲中的横坐标23、Y(QZ)——曲中的纵坐标24、D(QZ)——置仪点到曲中的水平距离25、F(QZ)——置仪点到曲中的方位角26、K——输入桩号27、W(L)——左侧边桩距离中桩的水平距离28、W(R)——右侧边桩距离中桩的水平距离29、X(L)——左侧边的桩横坐标30、Y(L)——左侧边的桩纵坐标31、H(L)——左侧边的高程32、D(L)——置仪点到左侧边桩的水平距离33、F(L)——置仪点到左侧边桩的方位角34、X(Z)——中桩的横坐标35、Y(Z)——中桩的纵坐标36、H(Z)——中桩的高程37、D(Z)——置仪点到中桩的水平距离38、F(Z)——置仪点到中桩的方位角39、X(R)——右侧边桩的横坐标40、Y(R)——右侧边桩的纵坐标41、H(R)——右侧边桩的高程42、D(R)——置仪点到右侧边桩的水平距离43、F(R)——置仪点到右侧边桩的方位角44、F1——第一条线路的方位角45、F2——第二条线路的方位角46、JA——虚交JDA转角47、JB——虚交JDB转角48、a——路线转角49、R——平、竖曲线半径50、R1——第一天曲线半径51、R2——第二条曲线半径52、L S——缓和曲线长度53、L S1——第一缓和曲线长度54、L S2——第二缓和曲线长度55、T——平、竖曲线切线长度56、T1——第一平曲线切线长度57、T2——第二平曲线切线长度62、L——平、竖曲线长度63、L1——第一平曲线长度64、L2——第二平曲线长度65、E——平、竖曲线外距66、E1——第一平曲线外距67、E2——第二平曲线外距68、LY——圆曲线长度69、L Y1——第一圆曲线长度70、L Y2——第二圆曲线长度72、K(JD) ——交点桩号73、AB——虚交JDA—JDB的水平距离74、ZH——直缓点桩号75、HY——缓圆点桩号76、QZ——曲中点桩号77、YH——圆缓点桩号78、HZ——缓直点桩号79、GQ——公切点桩号80、N°——右角顺时针第二章:路线测量与道路施工放样计算程序第一节:已知两点坐标求距离和方位角计算程序【例题1】如图1-1,已知A点坐标A(100,100), XB点坐标B(-100,-100)。
公路设计和放样程序程序4800P
公路平曲线设计与敷设程序(适用于CASIO fx-4800P计算器)1.该程序是公路平曲线测设的常用程序,包括五种半径选择程序、四种中线敷设程序和四种特殊平曲线设计与敷设程序。
适用于三、四级公路之测设,符合海地道路软件中平曲线计算之"算法三",是公路工程师的最佳助手。
2.该程序可分为三个部分:第一部分为半径选择程序,分为外距控制(E)、切线长控制(T)、曲线长控制(L),两点虚交(AB),三点虚交(ABC);第二部分为中桩支距法放样程序:分为单交点(1JD)、两点虚交(2JD)、三点虚交(3JD)、回头曲线之圆曲线部分(HTQX);第三部分为特殊平曲线设计与敷设程序,分为单交点凸型曲线设计(TU)、两点虚交复曲线设计与敷设(FU/FUF)、两点虚交非对称基本型平曲线的设计与敷设(FDCK/FDCF)以及两点虚交卵型曲线的设计与敷设(LQX/LQXF)。
3.该程序利用模拟菜单操作,各个程序既可单独使用,又可联合使用。
程序必须全部输入完才能正常运行(特殊平曲线除外)。
4.程序使用技巧:运行时按照提示输入数据即可得到结果:①单交点平曲线半径可根据控制较严的一项进行选择:外距控制按1(E)、切线长控制按2(T)、曲线长控制按5(L);结果不满意可按AC键退出程序,重新计算。
②虚交点的平曲线半径选择,先运行相应程序,拟放曲中桩号(QZ桩号),按AC键退出程序,根据拟放的曲中桩(QZ)位置需向外或者向内偏移的距离(例如:1.5米),再运行外距控制程序(E),需向外偏移时E值输入E-偏移距离(例如:E-1.5),向内偏移时输入E+偏移距离(例如:E+1.5),即可得所求半径。
③运行敷设程序得到中桩坐标,X值为沿导线上量取的长度,X前面的交点桩号为量取长度的起点,方向为测量的前进方向,Y值为偏移导线的垂直距离,Y值为正时向内偏移,为负时往外偏移。
④复曲线和卵型曲线须先拟定第一个曲线半径即可。
⑤C型曲线和S型曲线可分成两个曲线,分别用外距控制和切线长控制进行计算。
CASIO-fx4800P型计算器连续计算线路高程、坐标
CASIO-fx4800P型计算器连续计算线路高程、坐标及放样程序【简述】为了适应现场快速、准确、灵活的放样要求,作者根据线路施工测量特点,运用计算器的编程功能,使整条线路的施工测量计算数据能连续快速的计算,只要把整条线路各个交点处的计算要素输入子程序中,你便拥有整条线路的“数据库”。
在忙碌的施工现场,你不必携带大量的施工图和资料来查找平面、纵断面的设计要素,更不必担心设计要素的输入错误,从而使得计算和放样轻松、方便、快捷。
【计算范围】坐标部分包括:各等级公路和高速路的直线段、圆曲线段、加对称缓和曲线的圆曲线段中、边桩坐标及放样计算。
高程部分包括:各等级公路和高速路的直线段、竖曲线段、缓和超高段中、边桩高程及放样计算。
一、坐标及放样程序【起算数据】:交点里程桩号、交点坐标、前直线方位角、交点转角、圆曲线半径、缓和曲线长(一)主程序:XYFY2Fix4M"Xc=":P"Yc=" '如须放样输入测站坐标值,否则输入0Lbl0{HS}:H"K0+0":S"B=(-B,0,B)":Prog"A" '变量输入和声明S=0=>E=0:≠>E=90 '求边桩坐标时的偏角值判定L=πRN÷180+V '含有缓曲线的曲线总长T=(V÷2-V^3÷(240R^2))+(R+(V^2÷(24R)-V^4÷(2688R^3)))tan(N÷2) '切线长A=Q-T:B=A+V:D=A+L:C=D-V 'A-ZH(ZY)点桩号,B-HY点桩号,C-YH点桩号,D-HZ(YZ)点桩号Rec(T,F+180) '求ZH(ZY)点的坐标增量Z[1]=W+I:Z[2]=K+J 'ZH(ZY)点坐标值Rec(T,F+GN) '求HZ(YZ)点的坐标增量Z[3]=W+I:Z[4]=K+J 'HZ(YZ)点的坐标值Lbl1U=S÷(Abs(S+10E-19)):S=AbsS '左右偏角每件判定H<A=>Goto2: ≠> '第一直线上坐标计算判定H<B=>Goto3: ≠> '第一缓和曲线上坐标计算判定H<C=>Goto4: ≠> '净圆曲线上坐标计算判定H<D=>Goto5: ≠> Goto6⊿⊿⊿⊿ '第二缓和曲线和第二直线上坐标计算判定Lbl2Rec(Q-H,F+180) '第一直线上中桩坐标增量计算X=W+I:Y=K+J '中桩坐标值计算Rec(S,F+180-(180-E)U) '第一直线上与中桩同一断面的边桩增量计算X=X+I:Y=Y+J '边桩坐标值计算S=SU '边长条件判定Goto8Lbl3 '进入第一缓曲线段计算Z=H-A '待求点至ZH点的距离O=90Z^2÷(πRV) '所求点缓曲线对应的圆心角X=Z-Z^5÷(40R^2V^2)+Z^9÷(3456R^4V^4) '缓曲线上ZH点至待求的支距X坐标Z=Z^3÷(6RV)-Z^7÷(336R^3V^3)+Z^11÷(42240R^5V^5) '缓曲线上ZH点至待求点的支距Y坐标Lbl7Rec(X,F)X=Z[1]+I:Y=Z[2]+JRec(Z,F+90G) '把中桩支距坐标转换成测量统一坐标X=X+I:Y=Y+JRec(S,F+O G+EU) '曲线边桩坐标增量计算X=X+I:Y=Y+J '坐标计算结果S=SU '边长条件Goto8Lbl4 '进入主圆计算部分Z=H-A-V÷2 '曲线上待求点到HY点的里程O=180Z÷(Rπ) '待求点方位角所对应的圆心角X=Rsin O+(V÷2-V^3÷(240R^2))Z=R(1-cos O)+(V^2÷(24R)-V^4÷(2688R^3)) '主圆部分待求点支距坐标XY Goto7Lbl5 '进入第二缓和曲线计算Z=D-H '曲线上待求点到HZ点的里程O=90Z^2÷(πRV) '待求点方位角所对应的圆心角X=Z-Z^5÷(40Z R^2V^2)+^9÷(3456R^4V^4)Z=Z^3÷(6RV)-Z^7÷(336R^3V^3)+Z^11÷(42240R^5V^5) '待求点支距坐标XY Rec(X,F+GN+180)X=Z[3]+I:Y=Z[4]+J '把中桩支距坐标转换成测量统一坐标Rec(Z,F+GN+180-90G)X=X+I:Y=Y+JRec(S,F+GN+180-O G-(180-E)U) '曲线边桩坐标增量计算X=X+I:Y=Y+J '坐标计算结果S=SUGoto8Lbl6 '进入第二直线段计算部分Rec(H-D+T,F+GN) '中桩坐标增量计算X=W+I:Y=K+J '中桩坐标计算结果Rec(S,F+GN+EU) '边桩坐标增量计算X=X+I:Y=Y+J '边桩坐标计算结果S=SUGoto8Lbl8X=X◢ '显示坐标计算结果Y=Y◢M≠0=>Goto9: ≠>Goto0 ⊿Lbl9 '进入放样部分计算Pol(X-M,Y-P) '增量计算J<0=>J=J+360: ≠>J=J ⊿J"A"=Int J+0.01Int(60Frac J)+0.006Frac(60Frac J) ◢ '方位角计算结果(此显示值为度分秒格式)I"L"=I◢ '极距计算结果Goto0∙(二)子程序:AH≤ZY2(ZH2)=>Q=JD1:W=X1:K=Y1:R=R1:F=F0:N=N1:V=Ls1:G=1(-1):=>H≤ZY3(ZH3)=>Q=JD2:W=X2:K=Y2:R=R2:F=F1:N=N2:V=Ls2:G=1(-1):=>H≤ZY4(ZH4)=>Q=JD3:W=X3:K=Y3:R=R3:F=F2:N=N3:V=Ls3:G=1(-1):=>H≤ZY5(ZH5)=>Q=JD4:W=X4:K=Y4:R=R4:F=F3:N=N4:V=Ls4:G=1(-1):=>……………………………H≤ZY n+1(ZH n+1)=>Q=JD n:W=X n:K=Y n:R=R n:F=F n-1:N=N n:V=Ls n:G=1(-1)注:H—待求点桩号ZY n+1(ZH n+1)—后曲线起点桩号 Q—本曲线交点桩号 W—本曲线交点X坐标K—本曲线交点Y坐标 R—本曲线内圆曲线半径 F—前直线方位角 N—本交点转角V—本曲线内缓和曲线长 G—线路转向符,左转角-1,右转角为+1二、高程及放样程序【起算数据】:变坡点桩号A、变坡点高程B、前后纵坡C D、竖曲半径R、横坡度F、最大超高横坡度G、ZH点桩号、YH点桩号、HZ点桩号、施工层厚度N、视线高W (一)主程序:GCFYW"SXG=":N '常量输入(视线高程、施工层厚度)Lbl 1{LО}:L"K0+0":О"B=" :Prog"B" '变量输入及声明K=C-D '坡度差及竖曲线偏角K>0=>J=-1:≠>J=1⊿ '凹凸竖曲线判断条件T=Abs(RK)÷2 '竖曲线切线长,如需显示则在后面加上◢H=A-T '竖曲线起点ZY桩号,如需显示则在后面加上◢X=A+T '竖曲线终点YZ桩号,如需显示则在后面加上◢M=L-A '待求点至变坡点的距离L≤H=>P=B+MC-N-W: ≠> '前纵坡直线段中桩高程计算L≤A=>P=B+MC+J(T-AbsM)2÷(2R)-N-W: ≠> '前纵坡竖曲线中桩高程计算L≤X=>P=B+MD+J(T-AbsM)2÷(2R)-N-W: ≠> '后纵坡竖曲线中桩高程计算L>X=>P=B+MD-N-W⊿⊿⊿⊿⊿ '后纵坡直线段中桩高程计算E=0=>Goto 2 '直线部分中、边桩计算判断条件≠>L≤E=> Goto 2 '直线部分中、边桩计算判断条件≠>L>V=> Goto 2 '直线部分中、边桩计算判断条件≠>L>E=> Goto 3 '前缓曲超高部分中、边桩计算判断条件≠> L>U=> Goto 4⊿⊿⊿⊿ '后缓曲超高部分中、边桩计算判断条件Lbl 2O=0=>Z“H”=AbsP◢'显示直线部分中、边桩高程计算结果≠>Y“HB”=Abs(P-OF)◢不需放样显示高程,否则显示放样水准尺计数⊿Goto 1Lbl 3S=(L-E)(F+G)÷(V-U)-F '前缓曲线超高横坡度计算S≤F=> Goto 5:≠>S≤G=> Goto 6 '超高起点(终点)至零界面、零界面至全超高及全超高≠> Goto 7 ⊿⊿ 部分的计算判断条件Lbl 4S=(V-L)(F+G)÷(V-U)-F '后缓曲线超高横坡度计算S≤F=> Goto 5:≠>S≤G=> Goto 6 '超高起点(终点)至超高变坡零界面、零界面至全≠> Goto 7 ⊿⊿ 超高、全超高部分计算判断条件Lbl 5O=0=>Z“H1”=AbsP◢'超高起点(终点)至超高变坡零界面中、边桩高程≠>Y“H-D1”=Abs(P-OF)◢计算结果显示Q“H-G1”=Abs(P+OS)◢⊿Goto 1Lbl 6O=0=>Z“H2”=AbsP◢'超高变坡零界面至全超高中、边桩高程≠>Y“H-D2”=Abs(P-OS)◢计算结果显示Q“H-G2”=Abs(P+OS)◢⊿Goto 1Lbl 7O=0=>Z“H3”=AbsP◢'全超高中、边桩高程计算结果显示≠>Y“H-D3”=Abs(P-OG)◢Q“H-G3”=Abs(P+OG)◢⊿Goto 1∙∙注:W“SXG”-视线高N-施工层厚度L"K0+0"-待求点桩号О"B="-中桩至边桩距离(二)子程序:BL≤ZY2=>A=JD1:B=H1:C=I0:D=I1: R=R1:F=I h:E=ZH1:U=YH1:V=HZ1:G=I max1 :≠>L≤ZY3=>A=JD2:B=H2:C=I1:D=I2: R=R2:F=I h:E=ZH2:U=YH2:V=HZ2:G=I max2 :≠>L≤ZY4=>A=JD3:B=H3:C=I2:D=I3: R=R3:F=I h:E=ZH3:U=YH3:V=HZ3:G=I max3 :≠>L≤ZY4=>A=JD3:B=H3:C=I2:D=I3: R=R3:F=I h:E=ZH3:U=YH3:V=HZ3:G=I max3 :≠> ……………………L≤ZY n+1=>A=JD n:B=H n:C=I n-1:D=I n: R=R n:F=I h:E=ZH n:U=YH n:V=HZ n:G=I maxn注:ZY N+1:-下一个竖曲线起点桩号(如:变坡点2的计算范围为前竖曲线终点YZ1至后竖曲线起点ZY3,则在程序中“L≤ZY3”就应输入ZY3的里程桩。
CASIOfx4800公路测量程序
CASIOfx-4800P公路测量程序1、主程序(XLZB)Defm 10:Norm:O“X0”:G“Y0”:N≥1=>Goto 1:≠>N≥2=>Goto 2:≠>N≥3=>Goto 3:≠>N≥4=>Goto 4△△△△Lb1 1:{KPM}:KPM:Prog“C”:I=K-J:Prog“A”:X“XS”=X▲Y“YS”=Y▲Prog“W”Goto 1Lb1 2:{KXY}:KXY:A=X:B=Y:Prog“C”:Prog“B”:K=J+I▲P=P▲Goto 2Lb1 3:{KSQAB}:KSQAB:Prog“J”: Prog“C”: I=K-J:Prog“A”: X“XS”=X▲Y“YS”=Y▲Prog“W”Goto 3Lb1 4:{KE}:KE:Prog“W”: Prog“C”: I=K-J:P=T: M=90:Prog“A”: X“XS”=X▲Y“YS”=Y▲Prog“W”Goto 4a、当N=1时,求一般坐标放样。
K:待求点桩号 P:偏移距离,当求中桩时P=0(左负右正)M:与右侧夹角,当求中桩时M=0b、当N=2时,求桩号及距中桩距离。
K:待求点桩号曲线上随意的一个桩号X:反算时所求点的X坐标 Y:反算时所求点的Y坐标c、当N=3时,求构造物防样几个角点坐标。
K:待求点桩号 S:构造物的角点编号Q:与路线右夹角 A:横向距离 B:纵向距离d、当N=4时,所测标高点进行边线放样。
K:待求点桩号 E:待求点边桩位置标高2、正算子程序(A)Z[5]=90*I/п/R:Z=W+Z[3]*2*Z[5]+Z[4]*I*L*Z[5]:X=U+Z[2]*I*cosZ+Z[3]*(2RsinZ[5]*cos(W+Z[5]))+Z[4]((I-I5/(40R2L2))cosW-(I3/(6RL)-I7/(336R3L3))sinW):Y= V+Z[2]*I*csinZ+Z[3]*(2RsinZ[5]*sin(W+Z[5]))+Z[4]((I-I5/(40R2L2))sinW+(I3/(6RL)-I7/(336R3L3))cosW):Z<0=>Z=Z+360△Z>360=>Z=Z-360△Z“QA”=Z:X=X+Pcos(Z+M):Y=Y+Psin(Z+M)3、反算子程序(B)T=W-90:I=Abs((B-V)cosT-(A-U)sinT:P=0:M=90:Lb1 0:Prog“A”:L=T+Z[3]*180/п*I/R:P=(B-Y)cosL-(A-X)sinL:Abs P〈1E-6=>Goto 1:≠>I=I+P:Goto 0△Lb1 1:P=0:Prog“A”:P=(B-Y)/sin(Z-90)式中的E为计算器中的“EXP”符号4、平曲线要素(C)K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:K≥***=>J=***:U=***:V=***:W=***:R=***:L=***:Z[2]=***:Z[3]=***:Z[4]=***:……K:待测点桩号 J:线元起点桩号 U:线元起点的X坐标 V:线元起点的Y坐标W:线元起点切线方位角 R:曲线半径 L=缓和曲线长度当为直线段时Z[2]=1、Z[3]=0、Z[4]=0;当为圆曲线段时Z[2]=0、Z[3]=1、Z[4]=0;当为缓和曲线段时Z[2]=0、Z[3]=0、Z[4]=1;5、高程计算程序(W)Lb1 1:Prog“X”:H=A+D*(K-B)2/2/R+(K-B)*C:H=H-(14-1.5)*0.02:S=H-E:Prog“Y”:T=(25.4-0.75(S+8))Z[6]+(15.9-S)Z[7]+(14+1.5S)Z[8]+(26+1.75(S-8))Z[9]本程序计算得出的宽度6、宽度计算子程序(Y)S>-16=>Z[6]=1:Z[7]=0:Z[8]=0:Z[9]=0:S>-8=>Z[6]=0:Z[7]=1:Z[8]=0:Z[9]=0:S>0=>Z[6]=0:Z[7]=0:Z[8]=1:Z[9]=0:S>8=>Z[6]=0:Z[7]=0:Z[8]=0:Z[9]=17、竖曲线要素(X)K≥***=>A=***:B=***:C=***:D=***:(竖曲线中直线段)K≥***=>A=***:B=***:C=***:D=***:R=***:(竖曲线中曲线段)K≥***=>A=***:B=***:C=***:D=***:(竖曲线中直线段)K≥***=>A=***:B=***:C=***:D=***:R=***:(竖曲线中曲线段)……K:待测点桩号 A:起点桩号 B:起点桩号标高 C:坡度 R:曲线半径当计算段为直线时D=0,为曲线时D=-1;当为凸形竖曲线时R取正值,为凹形竖曲线时R取负值。
CASIO FX-4800P计算器公路放线程序
CASIO FX-4800P计算器公路放线程序兰明【摘要】结合自身工作经验,针对多套公路放线程序特点及弊端,重新优化计算程式,调整程序结构,提出了一种可以在CASIOFX-4800P计算器平台上运行的小巧且实用的新程序,并作了具体介绍,以期指导实际放样工作。
%Combining some self work experience,the paper points out the flexible and practical new program according to the features and shortages of many road line programs reoptimizing the calculating program,and adjusting the program structure,and undertakes the factual introduction,so as to direct the factual sampling work.【期刊名称】《山西建筑》【年(卷),期】2012(038)010【总页数】2页(P239-240)【关键词】公路放线程序;曲线要素;曲线坐标放样【作者】兰明【作者单位】山西省祁临高速公路有限责任公司,山西祁县030900【正文语种】中文【中图分类】U412.240 引言道路是一条三维空间的实体。
它是由路基、路面、桥梁、涵洞、隧道和沿线设施所组成的线形构造物。
一般所说的路线,是指道路中线的空间位置。
现代道路平面线形一般由:直线、圆曲线和缓和曲线构成,称之为“平面线形三要素”[1]。
自己从事多年的公路工程测量工作,在实际工作中需要准确高效的将平曲线在实地完成放样工作,深刻的体会到一套运行平台简单、实用、程序语言易编辑、易修改的放样程序对一个测量工程师的重要性。
综合了多套在行业内手口相传的CASIO FX-4500PA及CASIO FX-4800P平台上运行的公路放线程序[2],汲取了PC-E500平台上放线程序的优势,同时又克服了PC-E500手簿价格昂贵、功能单一、携带不方便、Basic语言生涩不易调整编辑的弊病。
卡西欧4800道路测量程序
各位同行,本人领悟yshf的程序后,进行了以下改编,达到以下目标:1.加编数据库,计算中不必逐项输入"线元要素",提高运算速度,避免现场忙中出错2.计算直观,人性化3.正算直接输入里程和边距,反算输入近似里程便可4.增加了“计算点与测站点”的距离和方位角计算语句,方便直接放样5.愿收获与大家共享一.改动后的程序清单:1.主程序(TYQXJS)"1.SZ => XY":"2.XY => SZ":U"X0":V"Y0":O"S0":G"F0":H"LS":P"R0":R"RN":Q:D=(P-R)÷(2HPR):N=1=>Goto 1:≠>Goto 2Δ←┘Lbl 1:{Z}:Z:W=Abs(S-O):Prog "SUB1":X"XS"=X◢Y"YS"=Y◢F"FS"=F-90◢C“XC”:E“YC”:I=0:J=0:Pol(X-C,Y-E):I“I=” ◢J∠0=>J“J=”+360◢≠>J“J=” ◢ΔProg"SJK"←┘Lbl 2:{XY}:XY:I=X:J=Y:Prog "SUB2":S"S"=O+W◢Z"Z"=Z◢Prog"SJK"2. 正算子程序(SUB1) A=0.1739274226:B=0.3260725774:K=0.0694318442:L=0.3300094782:F=1-L:M=1-K:X=U+W(Acos(G+57.2958QKW(1/P+KWD))+Bcos(G+57.2958QLW(1/P+LWD))+Bcos(G+ 57.2958QFW(1/P+FWD))+Acos(G+57.2958QMW(1/P+MWD))):Y=V+W(Asin(G+57.2958QKW(1/P+KWD))+Bsin(G+57.2958QLW(1/P+LWD))+Bsin(G+57.2958QFW(1/P+FWD))+Asin(G+57.2958QMW(1/ P+MWD))):F=G+57.2958QW(1/P+WD)+90:X=X+ZcosF:Y=Y+ZsinF3. 反算子程序(SUB2)T=G-90:W=Abs((Y-V)cosT-(X-U)sinT):Z=0:Lbl 0:Prog "SUB1":L=T+Q57.2958W(1/P+WD):Z=(J-Y)cosL-(I-X)sinL:AbsZ<1E-6=>Goto1:≠>W=W+Z:Goto 0Δ←┘Lbl 1:Z=0:Prog "SUB1":Z=(J-Y)÷sinF二.增设数据库程序(SJK)Lbo4:{S}:S∠下一线元起点里程≡>O=本线元起点里程:U=本线元起点X:V=本线元起点Y:G=本线元起算方位角:H=本线元长度:P=起点曲率半径:R=终点曲率半径:Q=0或1、-1:Prog“TYQXJS”:Goto4Δ←┘S∠下一线元起点里程=>O=。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
20 12 年 4 月
山 西 建 筑
S HAN ARC T T E XI HI EC UR
V0. 8 No.1 13 0
A r 2 1 p. 02
・2 9 ・ 3
文章 编号 :0 9 6 2 (0 2 1 —2 9 0 10 —8 5 2 1 )0 0 3 -2
方便该路段 的反 复放 样调用数据 。同时 结合 自己多年公 路工程测量工作 的经验及教 训 , 新优 化计 要 素存储在 了计算器 内 , 重 威远图 S 30环境下进行数 字化成 图 , V0 取得 了很好 的效果 。 在测绘 领域 大行 其道 , 完全 替代 传统纸 质作业 , 而且随 着测绘 科 技 的 日益进 步 , 各种新 测绘 技术 逐渐普 及 , 必将极 大提 高广 大测
F:H点至 J 位角 , 交点 坐标 , 交点 1坐标 。 D方 C: D: , 40 P 50 A及 C SO F 4 0 P平 台上 运行 的公路放 线程序 j 汲取 和曲线 长 , Z A I X一80 , 了 P .5 0平 台上放线程序 的优势 , CE0 同时 又克服 了 P .5 0手簿 CE 0
弊病 。
为了便 于记忆 , 可将 值改为具体的交 点号 , 同时使 G T , O OX
编辑好后 运行 , 完成对 2 Q Y s 可 . x sz的赋值 , 这样 就将 曲线
B 价格 昂贵 、 功能单一 、 携带不方便 、 ai语 言生涩不易调整编辑 的 L LX中 X值一一对应 。 Bs c
3 实际应 用
进一 步发挥 新技术 优质 、 效 高 以大 同市新建高层住 宅小 区“ 水泉湾龙 园” 规划验 收为例 , 以 绘工作者 的工作 效率 和工作 热情 , 的特点 。 前光有全站仪时 , 不但 从城 市 已有控 制点 向测 区引入 坐标 困难 ,
而且导线点 的数量与导线距 离和通视 困难程 度成正 比, 度难 以 精
洞、 隧道和沿线设施 所组 成 的线形构 造物 。一般 所说 的路 线 , 是
算 程式 、 调整程序结构 , 整理了此套可 以在 C SO F 一8 0 A I X 40 P计算 器 平台上运行的小巧且实用的公路工程放线程序 。 本程序 由三部分组成 :
1Q YC ) X S C曲线 要 素存 储 ; ) X SZ 曲线 要 素 设 置 ; 2 Q YS 3) 指道路 中线 的空 间位 置 。现代 道路 平 面线形 一般 由: 直线 、 曲 圆 Q Z  ̄ 曲线坐标放样。 XB 线 和缓 和曲线构成 , 称之 为“ 面线形三要素 ” 。 平 … 首先把三部分程序以上述文件名编入 C SO F .8 0 A I X 40 P计算 自己从 事多年的公路工程测量工作 , 际工作 中需要 准确 在实 高效 的将平 曲线 在实地完成放样工作 , 深刻 的体会 到一 套运 行平 器 内。
参 考文 献 : 北 京 : 绘 出版 社 ,00 测 2 1.
版 社 .o). 2( 9
1 王军德 , 时东玉. 数字化测 图( 内外业一体化 ) M] [ . 保证。现在有 了 R K, T 我们首先在小 区范围内空 旷且 R K信 号有 [ ] 杨 晓明 , T 固定解的位置选 了 4个距离合适且两两通视 的控制点 , R K分 用 T 康全 站仪进行设站检核 , 通过后视 点坐标 比较 , 验证 R K所 测坐 T 2 梅 控制测量 学( 上册 ) M] 武汉 : 汉大学 出 [ . 武 别在各点上采集两次数据取平均数 ( 在限差范围 内) 之 后用拓普 [ ] 孔祥元 , 是义. , 3 大比例 尺数 字测图的原理、 方法与应 用[ . M] 北京 : 标的准确性 , 一步再用 全站 仪对 测 区进 行 图根点 加密 , 面施 [ ] 杨得麟. 下 全 清华大 学出版社 , 0 2 9 0 测 。充分发挥了 R K实时定位和全站仪功能 多样 的优 点 , T 二者互 [ ] 武汉测绘科技 大学《 量学》 写组. 量学 [ . 4 测 编 测 M] 北京 : 测 为补 充 , 提高 了作业效率 。
F .80 X 4 0 P计算器平 台上运 行的小巧且实用的新程序 , 并作 了具体 介绍 , 以期指 导实际放 样工作。 关键词 : 公路放线程序 , 曲线要素 , 曲线坐标放 样
中图分类号 :4 2 2 U 1.4 文献标识码 : A
0 引言
道路 是 一条 三 维空 间的实 体 。它 是 由路 基 、 面 、 梁 、 路 桥 涵
C SO F 一80 A I X 40 P计算 器公路 放线程序
_ , 兰 明 ・ 一 ●
( 山西省祁临高速公路有限责任公司 , 山西 祁县 00 0 ) 39 0
摘
要 : 自身 工作经验 , 结合 针对 多套公路 放线 程序 特 点及弊 端 , 重新优 化计 算程 式 , 调整 程序 结构 , 出 了一种可 以在 C S 提 AI O
. YS C( [ 3 台简单 、 实用 、 序语 言易编辑 、 程 易修改的放样 程序对 一个测 量工 1 编辑 1QX C 曲线要素 存储 ) 1 I 交点桩号 ,: , : ,转角 ( +, 一) R: 右 左 , 半径 ( +, 一) 曰: 右 左 , 缓 程师 的重 要 性 。综 合 了 多 套 在 行 业 内手 口相 传 的 C SO F 一 A I X
实践 证明 , 二者结合 的方案不但 可行 , 而且精度非常可靠 。
绘 出版 社 。0 0 21.
4 结语
随着 国家 对“ 数字 中国” 数字城市” “ 的重视 , 数字化成 图必将
[ ] 刘 炳. 字化 测图方法浅析 [ ] 山西水利 ,0 9 1 (5 : 5 数 J. 20 ,0 1 )