圆弧段边坡超欠挖检查及开口线放样程序

程序名：YFFY
程序：
A“YX”：B“YY”：X“XP”：Y“YP”：Z“ZP”： Fixm：Pol(A-X，B-Y)：T=Abs(I-R)：W=Abs(H-Z)： S=W*P-T：V=T/P-W：S<0=>M“Scw”=S◢⊿S≥0=>M“Sqw”=S◢⊿V<0=>K“Hcw”=V◢⊿ V≥0=>K“Hqw”=V◢⊿“END”
说明： A、 B为圆心坐标，显示为YX？YY？，依次输入圆心点的X、Y； X、Y、Z为测点坐标，显示为XP？YP？ZP？依次输入测点的X、Y，Z； R为到边坡底线的距离（半径）； H为边坡底线的高程（马道或平台的高程）； I不用管它，直接按“EXE”，显示下一个输入； P为坡比，无须输入正负号； M为计算的边坡距离超欠值，显示为Scw或Sqw，分别表示超挖或欠挖，距离超欠值为：设计距离减测量距离； K为计算的边坡高程超欠值，显示为Hcw或Hqw，分别表示超挖或欠挖，高程超欠值为：设计高程减测


直线段边坡超欠挖检查及开口线放样程序
程序名：BPFY
程序：
A“QX”：B“QY”：C“QZ”：E“ZX”：F“ZY”：G“ZZ”：P“PB”： K“XP”：L“YP”：M“ZP”：Fixm：Pol(E-A，F-B：J≤0=>J=J+360⊿ D=Abs((K-A)*CosJ+(L-B)*SinJ)：S=Abs((L-F)*CosJ-(K-E)*SinJ)： X=A+D*CosJ：Y=B+D*SinJ：Z=(G-C)/I*D+C：W=AbS(M-Z)：V=S/P-W： V<0=>O“Hcw”=V◢⊿ V≥0=>O“Hqw”=V◢⊿ U=W*P-S：U<0=>N“Scw”=U◢⊿U≥0=>N“Sqw”=U◢⊿“END”
说明： A、B、C为边坡底线的起点，显示为: QX?QY?QZ? 依次输入地线起点的X,Y,Z； E、F、G为边坡底线的终点，显示为: ZX?ZY?ZZ? 依次输入地线终点的X,Y,Z； P为坡比，无正负条件； K、L、M为测量点，显示为: XP?YP?PZ? 依次输入测量点的X,Y,Z； 中间计算测量点至边坡底线的垂足点，保存变量为X、Y、Z。 O为边坡的高程超欠挖值，显示为Hcw或Hqw，分别表示超挖或欠挖，即测点高程设计高程减实测高程； N为边坡的距离超欠挖值，显示为Scw或Sqw，分别表示超挖或欠挖，按高差计算的设计距离减实测点到垂足点距离。


由本站论坛　wlxzxm8426　发布，谢谢！！！