银行卡被盗刷的条件:锥坡放样计算程序(简单易用.绝对精品)1
上面完整布置图中,①,②号桥台锥坡尖点方位角就是尖点对应中桩的切线方位角。③,④号桥台锥坡尖点方位角任然是尖点对应中桩的切线方位角,但在计算时要±180(程序中为:H=H±180),而此时P=P-N:Z=1=>P=P≠>Z=2=>P= - P△,为了方便程序计算,规定①,②号桥台锥坡为前锥坡;③,④号桥台锥坡为后锥坡,下列程序中现已都考虑了这些元素,只要计算时分清前后左右就OK了。
程序名: ZPFY
Lbl 0 :{ABCDEFGHRSZ}:
A"HS":B"HJ":C"i1":D"i2":E"X0":F"Y0":G"XJIAO":H"FWJ":R"QZP-1,HZP-2":S"JMD":Z"1-L,2-R":
K=(A-B)C÷cos(90-G) ▲..................显示为锥坡极轴长度值(如果去掉黑三角,K值不显示)
L=(A-B)D▲..............................显示为锥坡短半轴长度值(如果去掉黑三角,L值不显示)
T=0:N=0:
Lbl 1:T"POInt"=T+1 ▲.........................显示坐标值的组数
N≥G =>N=G△P=G-N:
M=KLsinG÷√((KsinN)²+(LsinP)²) ▲
………………………显示随着加密递增变化而变化的极轴长度值(可去掉黑三角,M值不显示)
R=1=>Goto 2≠>R=2=>H=H+180:Goto 3 △………判断是前桥台锥坡还是后桥台锥坡
Lbl 2:Z=1=>P=-P≠>Z=2=>P=P:Goto 4 △………判断是前桥台锥坡的左侧锥坡还是右侧锥坡
Lbl 3:Z=1=>P=P≠>Z=2=>P=-P△…………………判断是后桥台锥坡的左侧锥坡还是右侧锥坡
Lbl 4:
"X=":X=E+Mcos(H+P) ▲..................显示随着加密递增变化而变化的极轴末端的X坐标
"Y=":Y=F+Msin(H+P) ▲..................显示随着加密递增变化而变化的极轴末端的Y坐标
I=0:J=0:Pol(X-U"XC",Y-V"YC"):J<0=>J=J+360Δ…(XC,YC)表示测站(置镜)点横纵坐标
“FWJ=”:J→DMS▲.......................显示随着加密递增变化而变化的放样极坐标方位角
“I=”:I▲.............................显示随着加密递增变化而变化的放样极坐标距离
N=G=>Goto 0△ ………………………… N=G程序自动跳回主程序表示锥坡基础曲线计算放样完毕
N=N+S:Goto 1
注意:
N=0时放样的锥坡基础曲线的起点(第一组坐标),N=G时放样的锥坡基础曲线的终点(返回前的最后一组坐标),程序在执行返回要求重新输入变量时表示该曲线已计算放样完毕。