卡西欧FX5800怎么编程

我是一个新手,现在在学习这种计算器的编程,望广大的同行、同仁。给与热心的指导

第1个回答  推荐于2016-01-03
1、 主线坐标计算
主程序 A01ZB (子程序名 B0ZB)
8→DimZ (K待求点桩号)
Lbl 9:Norm 1:”K”?K:Prog”B0ZB”:F-T→A:A+S→B:A+W→D: D-S→C
If K<C:Then U→H:J→J:-1→O:Else V→H:-J→J:1→O:Ifend:
N+OTcos(H)→Z[1]:E+OTsin(H)→Z[2]:Goto 0:
Lbl 0 (K待求点桩号)
K<A=>Goto 1:
K<B=>Goto 2:
K<C=>Goto 3:
K<D=>Goto 4:
K≥D=>Goto 5:
Lbl 1:0→Z[3]:H+JZ[3]→Z[4]:(K-A)cos(H)→Z[7]:(K-A)sin(H)→Z[8]:
Goto 6
Lbl 2:30(K-A)^2/R/S/ →Z[3]:H+3JZ[3]→Z[4]
(K-A)-(K-A)^(5)/90/R^2/S^2→Z
Zcos(H+JZ[3])→Z[7]:Zsin(H+JZ[3])→Z[8]:Goto 6
Lbl 3:90S/R/ +180(K-B)/R/ →Z[3]:H+JZ[3]→Z[4]
Rsin(Z[3])+S/2-S^(3)/240/R^2→I
R(1-cos(Z[3]))+S^2/24/R→Z
Icos(H)-JZsin(H)→Z[7]:Isin(H)+JZcos(H)→Z[8]:Goto 6
Lbl 4
30(K-D)^(2)/R/S/ →Z[3]:H+3JZ[3]→Z[4]
(D-K)-(D-K)^(5)/90/R^(2)/S^(2)→Z
-Zcos(H+JZ[3])→Z[7]:-Zsin(H+JZ[3])→Z[8]:Goto 6
Lbl 5
0→z[3]:H-JZ[3]→Z[4]:(K-D)cos(H)→Z[7]:(K-D)sin(H)→Z[8]:Goto 6
Lbl 6 边桩坐标
Norm 1:”HR=”:Z[4] DMS 显示中线的方位角(度分秒 )
Fix 3:”X=”:Z[1]+Z[7]→X
“Y=”:Z[2]+Z[8]→Y
Norm 1:”HJ”?Q:”DL”?P:Fix 3:”XL=”:X+Pcos(Z[4]-Q)→Z[5]
“YL=”:Y+Psin(Z[4]-Q)→Z[6]
Norm 1:”DR”?L
Fix 3:”XR=”:X+Lcos(Z[4]-Q+180)→X
”YR=”:Y+Lsin(Z[4]-Q+180)→Y
Norm 1:”10x K(+,-)”?G:K+10G→K:Goto 9本回答被网友采纳
第2个回答  2014-08-28
一、主程序(XY—ZB)
Deg: Fix 3
“X0(QD)”?A:“Y0(QD)”?B:?F:“QD”?Q:“ZD”?Z
Z-Q→C: 0→U:0→V
“R1(QD+R,-L)”?R: If R≠0:Then 1÷R→U:Ifend
“R2(ZD+R,-L)”?T:If T≠0:Then 1÷T→V:Ifend
180÷π→O:(V-U)÷(2C)→W
LbI 0:?N:?S:“E=90,-90”?E
N-Q→L
Prog “SUB—ZD”
“X=”: X⊿
“Y=”: Y⊿
Go To 0
二、子程序SUB—ZD(求切线方位角和坐标)
F+OUL+OWL2→J:If J<0:Then J+360→J:Ifend
A+∫(CoS(F+OUX+OWX2),0,L)+S CoS(J+E)→X
B+∫(Sin(F+OUX+OWX2),0,L)+S Sin(J+E)→Y
Return
说明:
Q、Z---分别为起点、终点桩号
A、B、F---起点坐标、方位角
R、T---分别为线元起点、终点半径,当曲线右转输正值,左转输负值
N、S---待求点桩号、边桩—中桩的距离(M)
E---边桩待测点与对应中桩的连线与道路前进方向的夹角,
右夹角输入+E,左夹角输入E-180
X、Y----待测点计算坐标
相似回答