计算机5800yfx程序,5800程序

计算机5800结构物坐标,竖曲线高程计算程序

Casio_Fx-5800结构物4点坐标计算程序

能计算包括直线，圆曲线，缓和曲线在内的任意结构物四角点坐标！程序非常好用(斜交正做，斜交斜做都可以！为什么不能上传附件？

程序名称：(JGW－4DZBJS)

Lbl 0:Fix 3 :

“Z.X”?X:

“Z.Y”?Y:

“F0”?F:

“ZL”?D:

“YL”?E:

“QK”?C:

“HK”?A:

?T: a

“1=>ZS,2=>XS”?B:

B=1=>Goto 1: B=2=>Goto 2 ↙

Lbl 1 ↙

X+CcosF÷sinT-Dcos(F+T)→G:

Y+CsinF÷sinT-Dsin(F+T)→H:

X-AcosF÷sinT-Dcos(F+T)→I:

Y-AsinF÷sinT-Dsin(F+T)→J:

X+CcosF÷sinT+Ecos(F+T)→K:

Y+CsinF÷sinT+Esin(F+T)→L:

X-AcosF÷sinT+Ecos(F+T)→M:

Y-AsinF÷sinT+Esin(F+T)→N:

“ZQ.X=”:Locate 6,4,G:

“ZQ.Y=”:Locate 6,4,H:

“ZH.X=”:Locate 6,4,I:

“ZH.Y=”:Locate 6,4,J ◢

“YQ.X=”:Locate 6,4,K:

“YQ.Y=”:Locate 6,4,L:

“YH.X=”:Locate 6,4,M:

“YH.Y=”:Locate 6,4,N ◢

Goto 0↙

Lbl 2 ↙

X+Csin(F+T)-Dcos(F+T)→O:

Y-Ccos(F+T)-Dsin(F+T)→P:

X-Asin(F+T)-Dcos(F+T)→Q:

Y+Acos(F+T)-Dsin(F+T)→R:

X+Csin(F+T)+Ecos(F+T)→S:

Y-Ccos(F+T)+Esin(F+T)→W:

X-Asin(F+T)+Ecos(F+T)→U: Y+Acos(F+T)+Esin(F+T)→V: “ZQ.X=”:Locate 6,4,O:

“ZQ.Y=”:Locate 6,4,P:

“ZH.X=”:Locate 6,4,Q:

“ZH.Y=”:Locate 6,4,R ◢

“YQ.X=”:Locate 6,4,S:

“YQ.Y=”:Locate 6,4,W:

“YH.X=”:Locate 6,4,U:

“YH.Y=”:Locate 6,4,V ◢