卡西欧5800p计算器所有编程命令解释
5800卡西欧计算器程序大全
5800卡西欧计算器程序大全1.基本数学运算程序-加法：输入两个数字，然后计算它们的和。
-减法：输入两个数字，然后计算它们的差。
-乘法：输入两个数字，然后计算它们的积。
-除法：输入两个数字，然后计算它们的商。
-平方根：输入一个数字，然后计算它的平方根。
-幂运算：输入两个数字，然后计算第一个数字的第二个数字次方。
2.科学计算程序-对数运算：输入一个数字和一个底数，然后计算它们的对数。
-三角函数：输入一个角度，然后计算它的正弦、余弦和正切值。
-阶乘计算：输入一个数字，然后计算它的阶乘。
-指数函数：输入一个数字，然后计算e的这个数字次方。
-随机数生成：生成一个随机数。
3.金融计算程序-终值计算：输入本金、利率和时间，然后计算将来其中一时刻的价值。
-现值计算：输入将来其中一时刻的价值、利率和时间，然后计算现在的价值。
-年金支付计算：输入每期支付的金额、利率和时间，然后计算总支付金额。
-贷款利率计算：输入贷款金额、每期支付金额和时间，然后计算贷款利率。
-折现计算：输入每期支付金额、利率和时间，然后计算折现值。
4.统计计算程序-平均值计算：输入一组数字，然后计算它们的平均值。
-中值计算：输入一组数字，然后计算它们的中值。
-方差计算：输入一组数字，然后计算它们的方差。
-标准差计算：输入一组数字，然后计算它们的标准差。
-相关系数计算：输入两组数字，然后计算它们的相关系数。
以上只是一部分5800卡西欧计算器程序的示例，卡西欧计算器还提供了更多的功能，例如单位转换、时间计算、日期计算等等，可以根据实际需求选择使用。
希望以上内容对您有所帮助。
卡西欧fx-5800p计算器测量程序
卡西欧fx-5800p计算器测量程序（作者：水江华）1.坐标反算程序"ZBFS QH1-4"◢Deg：Fix 3←┘"X+YiS(m）="?A←┘Lb1 0:"X+YiE(m)，0=>END="?B←┘Abs（B）=0=>Goto E←┘Arg（B-A)→JJ<0=>J+360→J"DIST(m）="：Abs（B-A)◢"α（DMS)=":J▶DMS◢Goto 0←┘Lb1 E:"ZBFS QH1-4=>END"2.坐标正算程序"ZBZS QH1-3"◢Deg：Fix 3←┘"XS(m)= "？A:"YS(m)= "？B←┘Lb1 1:"DIST(m)= "？L←┘If L≤0:Then Goto 2:IfEnd←┘"α（Deg)="？R←┘A+Lcos（R）→C←┘B+Lsin（R）→D←┘Fix 3："XE(m)= ":C◢"YE(m)= ":D◢Goto 1←┘Lb1 2:"ZBZS QH1-3=>END"3.单一闭、附合导线近似平差程序"BFHDXPC QH1-8"◢Deg:Norm 1:FreqOn←┘n→N←┘If List Y[N]=0:Then N-1→DimZ:Goto 0←┘Else N→DimZ:Goto 1: IfEnd←┘Lb1 0: "CLOSE Or CONECT TRA VE"◢"ANGLE NUM=":N◢"SIDE NUM=":N-1◢"UNKNOWN P NUM=":N-2◢"CLOSE(0)，CONNECT(≠0)="?→Z←┘Fix 3："XA(m)，≤0=>αA→B(Deg)="？A←┘If A>0：Then "YA(m)= "？B：Else "αA→B(Deg)="？R：IfEnd←┘"XB(m)= "？C:"YB(m)= "？D←┘C+Di→U：U→V←┘If A>0：Then Pol（C-A，D-B）：Cls←┘J<0=>J+360→J：J→R←┘"DIST A→B(m)="：I◢"αA→B(DMS)="：R▶DMS◢IfEnd←┘If Z≠0：Then "XC(m)= "？E:"YC(m)= "？F←┘E+Fi→V←┘"XD(m)，≤0=>αC→D(Deg)="？G←┘If G>0：Then "YD(m)= "？H←┘Pol（G-E，H-F）：Cls←┘J<0=>J+360→J：J→S←┘"DIST C→D(m)="：I◢"αC→D(DMS)="：S▶DMS◢Else "αC→D(Deg)="？S：IfEnd←┘Else If R>180：Then R-180→S：Else R+180→S：IfEnd←┘IfEnd←┘∑y→M←┘For 1→I To N←┘If I=1：Then R+List X[I]→L：Else L+List X[I]→L：IfEnd←┘If L>180：Then L-180→L：Else L+180→L：IfEnd←┘Nent←┘3600(L-S)→T←┘"α CLOSE ERROR(S)="：T◢40→W←┘Abs(T)>W=>"α CLOSE ERROR OVRE!"←┘-T÷N÷3600→P：0→O←┘For 1→I To N←┘If I=1：Then R+List X[I]+P→L←┘Else L+List X[I] +P→L：IfEnd←┘If L>180：Then L-180→L：Else L+180→L：IfEnd←┘If I<N：Then List Y[I]<L→Z[I] ：Z[I]+O→O：IfEnd←┘Nent←┘3600(L-S)→T←┘"CHECK α CLOSE ERROR(S)="：T◢U+O-V→O←┘Int(M÷Abs(O))→K←┘"DELTA X(m)= "：ReP(O)◢"DELTA Y(m)= "：ImP(O)◢"RELAT CLOSE ERROR=1÷"：K◢K<4000=>"RELAT CLOSE ERROR OVER! "←┘For 1→I To N-1←┘Z[I]-OList Y[I]÷M→X←┘If I=1：Then U+X→Y：Else Y+X→Y：IfEnd←┘Norm 1："POINT n="：I◢Fix 3："X(m)= "：ReP(Y)◢"Y(m)= "：ImP(Y)◢Nent←┘Y-V→Q←┘"CHECK X (m)= "：ReP(Q)◢"CHECK Y (m)= "：ImP(Q)◢Goto E←┘Lb1 1："NO DIRECT TRA VE"◢"ANGLE NUM="：N-1◢"SIDE NUM="：N◢"UNKNOWN P NUM="：N-1◢"XA(m)= "？A:"YA(m)= "？B←┘"XB(m)= "？C:"YB(m)= "？D←┘A+Bi→U:C+Di→V←┘0→H:U+List Y[1]<H→Z[1]←┘For 1→I To N-1←┘H+List X[1]→H←┘If H>180：Then H-180→H：Else H+180→L：IfEnd←┘以下未完程序由读者完成。
5800编程命令代表什么意思
34. 清除语句
① Cls：清除屏幕显示的文字、表达式及计算结果。
② ClrStat：清除统计串列List X，List Y，List Freq。
③ ClrMemory：清除字母变量A~Z 与数值答案寄存器。
④ ClrMat：清除矩阵Mat A~Mat F 与矩阵答案寄存器Mat Ans
10. Lbi n ~ Goto n Goto n~Lbl n
无条件转移至 Lbi n 位置
11. Getkey
返回与上次按键相对应的代码,Getkey=
12. DO ~ LpWhile循环语句
Do <语句块> LpWhile<条件>
先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。无,论条件是否为真，语句块至少被执行一次。
如果判断表达式为假（或是零），则会跳过语句1.
4. If...then…else…ifend
如果语句为真，则执行then（不执行else）,然后执行ifend.
如果语句为假，则执行else（不执行then）,然后执行ifend.
5. Break 中断语句
中断For，Do，While循环，并从该循环的下个命令起继续运行
它与 For~To~Next 句法的功能相同，唯一区别是增加了步长语句Step
30. While~WhileEnd 循环语句
句法：While <条件> <语句块>WhileEnd
先测试条件，直到,条件为假时执行WhileEnd 后的语句结束循环
13. Pol
计算两坐标点之间距离,坐标为（4，4）,与原点的距离就是POL（4，4）=4√2
卡西欧FX5800P编程计算器应用及程序
程序示例
U“Z=0 Y≠0”=0
K0+=0 H0=3014.6 ≥=1/74.09 D=2.9 E=2.46 R=1.671
【1】 直线段
实测坐标（m）
圆拱段超欠(m) 直墙超欠(m) 底板超欠(m) 至拱肩高差(m)
111.139 93.763 64.030 94.543 116.748
18°52ˊ49.81" 91°24ˊ13.56" 88°26ˊ53.49" 49°40ˊ03.20" 60°41ˊ09.73"
移 动 值（m）
DV=、0.254 D∧=、0.700 DV=、0.049 DV=、0.140 DV=、0.168
据目录（个数）是利用“ ”，按 FUNCTION->7->2->1->EXE 就可以看到个数了。
在程序中调用统计储存器中的数据时，是利用 List 调用的。具体格式如下： List X［A］+Y［A］i->C
式中 A 是点号，C 是任意储存单元。具体示例详见“程序部分”->“极程序放样” （2）、利用统计计算（SD/REG）
2、以 形式计算。以坐标换算为例：
坐标重合点 A 旧坐标 98042.831->SHIFT->RCL->A 11430.122->SHIFT->RCL->B A+Bi->E 新坐标值均为零，就不必另行输值，新旧坐标方位角差值 69°56"23"->W。 要求计算施工坐标 X=27，Y=29.1 的 B 点的测量坐标。 计算赋值：27->U，29.1->V。U+Vi->F
<=、0.663 =>、0.023 <=、0.218 <=、0.561 =>、0.298
CASIO5800P 程序更新版
CASIO fx—5800P 计算程序1：曲线计算程序名：QXJS“L=”？L:“LI CHENG=”?W L为项目编号，W为里程；本程序按两个项目设计（预设置），5800P可满足多个100公里以上的项目计算，项目编号以此类推，添加类似语句即可。
0→D:1→VLbl 11→NL=1=＞Prog”L1”为快速查找项目1平面元素而设置了N初始值的转子程序，没必要时可删除L=2=＞Prog”L2”为快速查找项目2平面元素而设置了N初始值的转子程序，没必要时可删除For N→N to 50 循环语句终值50可根据交点的数量大小调整L=1=＞Prog“L1-XY”转项目编号为1的线路平曲线元素的子程序L=2=＞Prog“L2-XY”转项目编号为2的线路平曲线元素的子程序If W≥Rep(Z)And W≤Imp(Z):Then Goto 2: IfEnd:Next 当前里程与计算区间Z比较“Sto p！”:Stop 输入不在本项目范围的错误里程时停止运行Lbl 2If K<0:Then Q→X: 平曲线元素可能是交点里程、坐标时运行该条件语句，交点里程以负值输入元素表中0→Q:0→J:S+C→I: -K→K:Goto 6:IfEndGoto 5Lbl 3Q<0=＞360+Q→Q“LI CHENG=”?W 同上，此处是回到当前计算区间继续输入新里程Lbl 4If W≥Rep(Z) And W≤Imp(Z):Then Goto5:EIse“>>>>” :Goto1 :IfEnd同上，当前里程可能找不到计算元素而回到Lbl 1重新开始从头查找Lbl 50→Jμ0+Abs(W－Abs(K)→Iμ0是无穷小量，避免特殊情况错误运行，I为计算当前里程到ZH或HZ点长度W:K<0=＞－WIf Ans<K:Then 0→U:－I:Goto 7:IfEnd 为ZH或HZ两端直线上计算条件语句I>S+C=＞S+C→ILbl 6If I<S:Then I2r÷(2RS) →U:I－I∧(5) ÷(40R2S2)＋i(I∧(3)÷(6RS)－I∧(7) ÷(336R∧(3)S∧(3)) :EIse(2I-S) r ÷(2R) →U:Z[2]+R(Sin(U)－icos(U)＋i):IfEnd 缓和曲线与综合曲线计算条件语句Lbl 7J+Anscos(Q)+Ans i Sin(Q) →J 坐标旋转、平移之变换计算语句If I=S+C:Then Q+ A→Q:－K－I－T→K:T→I:S→T:I→S:- R→R:Pr og“MP”:Goto 6: IfEnd ZH与HZ端换头计算语句，下同If Q+A=0:Then X－A－180→Q 平曲线元素可能是交点里程及坐标时所作变换计算的条件语句:K+Rep(J) +Imp(J) ÷tan(A) →K:O+Imp(J)(cos(Q) +i sin(Q)) ÷sin(A)→O:Goto 5:IfEndIf I=S:Then Q-180→Q:O+J→O:Goto 5:IfEndK <0=＞U+180→UQ+U→UD=1=＞Goto 8“BJ a+b i=”?E 输入水平边距和高程边距。
CASIO5800线元法程序
卡西欧5800P 线元法正反算程序1-JIN YU(主程序)Lbl 4: “1→ZS,2→FS?N(选择计算模式，1为正算，2为反算，3为超欠挖)N=1=>Goto 1:N=2=>Goto 2Lbl 1: “K=”?S：“P=”?Z：Prog “SJ-PM”： Abs(S-O) → W：Prog “SUB1-ZS”：“X=”：Locate4,4,X:“Y=”：Locate4,4,Y:F-90→F: “W=”: Locate4,4,F°◢Goto 4(正算-输入待求点里程K=、输入待求点偏距P=、显示待求点里程X=、显示待求点里程Y=、显示待求点里程设计高程H=)Lbl 2:“X=”?X：“Y=”？Y:Prog“SJ-PM”： X→ I： Y→J：Prog "SUB2-FS"：O+W→S: “K="：Locate4,4, S：“P="：Locate4,4, Z：S→ K:Prog“SJ-GC”：“H=”：Locate4,4, H:F-90→F: “W=”: Locate4,4,F°◢Goto 4(反算-输入实测点X=、输入实测点Y=、显示实测点里程K=、显示实测点偏距P=、显示实测点的设计高程H=)SJ-PM（子程序名-平面线形数据库）If S ≥59227.681（线元起点里程）:Then 2599818.013→U（线元起点X坐标）：496887.918→V（线元起点Y坐标）：59227.681→O（线元起点里程）：208028’39”→G（线元起点方位角）：100 →H（线元长度）：1×1045→P（线元起点曲率半径）：1×1045→R（线元终点曲率半径）：0→Q（线元左右偏标志：左-1右1直0）：IfEndIf S ≥59327.681（线元起点里程）:Then 2599730.112→U（线元起点X坐标）：496840.237→V（线元起点Y坐标）：59327.681→O（线元起点里程）：208028’39”→G（线元起点方位角）：90 →H（线元长度）：1×1045→P（线元起点曲率半径）：750→R（线元终点曲率半径）：-1 →Q（线元左右偏标志：左-1右1直0）：IfEnd(注：有多个平面线形，依照上面的依次变更, 每多一个，就增加一个。
卡西欧FX5800P编程计算器应用及程序
Prog FXA
Norm 1:?N:N=2=>Goto 0:N=2=>Goto 1:“ =”: ◢
“X0+Y0i”?M:List X[M]+List Y[M]i->C:Lb1 0“X+Yi”?T:T=0=>Goto 1:T->K:?L:List X[T]+List Y[T]i->B:Fix 3:“D=”:Abs(B-C->D◢ Arg(B-C->A:A<0=>A+360->A:“A=”:A▶DMS◢ “X,Yi”:B◢ Norm 1:O->X:Goto 0: Lb1:?X:X=0=>Goto 0:X->O:?Y:?H:X+Yi->S:Abs(S-C->I:Fix 3: If S>D:Then“DV=”:Locate 5,4,I:Else “D∧=”:Locate 5,4,I:IfEnd:Arg(E-C->J: J<0=>J+360->J:J-A->J:J<0=>J+360->J:Abs(Ssin(J->I:If >180:Then “=>”: Loca te 4,4,I:Else“<=”:Locate 4,4,I:IfEnd:Abs(H-L->I:If H>L:Then“hV=”:Locat e 5,4,I◢ Else“h∧=”: Locate 5,4,I◢ IfEnd:K->T:Norm 1:Goto 1:“END”
Abs(A-C Abs((4281.739+3592.881i)-(3885.634+3114.471i) =621.1081219
CASIO fx-5800部分程序语句简要说明
CASIO fx-5800部分程序语句简要说明1.Norm 1 指数显示Norm 2 小数显示2.?→x 只显示？字符+?→x 显示字符+？？x 显示x?“字符”？x 显示字符+？有→则不显示该变量当前值3.（判断表达式）语句1 : 语句2。
如果判断表达式为真（或非零），则不跳过语句1.如果判断表达式为假（或是零），则会跳过语句1.4. If...then…else…ifend如果语句为真，则执行then（不执行else）,然后执行ifend.如果语句为假，则执行else（不执行then）,然后执行ifend.5. Break 中断语句中断For，Do，While循环，并从该循环的下个命令起继续运行6. Dsz使控制变量递减一，在变量的值为零时执行转移7. IszIsz<变量>:<语句1> <语句2>，变量应为A~Z以 1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句28. ClsDsz<变量>:<语句1> <语句2>。
变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句29. Locate 定位显示语句句法1：Locate <列数>, <行数>,<数值>句法2：Locate <列数>, <行数>,<表达式>句法3：Locate <列数>, <行数>, "字符串"fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。
10. Lbi n ~ Goto n Goto n~Lbl n无条件转移至Lbi n 位置11. Getkey返回与上次按键相对应的代码,Getkey=12. DO ~ LpWhile循环语句Do <语句块> LpWhile<条件>先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。
卡西欧5800p计算器所有编程命令解释
卡西欧5800p计算器所有编程命令解释1.Norm 1 指数显示Norm 2 小数显示2.→x 只显示？字符+?→x 显示字符+？x 显示x?“字符”？x 显示字符+？有→则不显示该变量当前值3.（判断表达式）语句1 : 语句2。
如果判断表达式为真（或非零），则不跳过语句1. 如果判断表达式为假（或是零），则会跳过语句1.4. If...then…else…ifend如果语句为真，则执行then（不执行else）,然后执行ifend.如果语句为假，则执行else（不执行then）,然后执行ifend.5. Break 中断语句中断For，Do，While循环，并从该循环的下个命令起继续运行6. Dsz使控制变量递减一，在变量的值为零时执行转移7. IszIsz<变量>:<语句1> <语句2>，变量应为A~Z以 1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句28. ClsDsz<变量>:<语句1> <语句2>。
变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句29. Locate 定位显示语句句法1：Locate <列数>, <行数>,<数值>句法2：Locate <列数>, <行数>,<表达式>句法3：Locate <列数>, <行数>, "字符串"fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。
10. Lbi n ~ Goto n Goto n~Lbl n无条件转移至Lbi n 位置11. Getkey返回与上次按键相对应的代码,Getkey=12. DO ~ LpWhile循环语句Do <语句块> LpWhile<条件>先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。
fx-5800计算器编程共39页文档
第 1 页卡西欧Ｆｘ－５８００Ｐ计算器一、Ｆｘ－５８００Ｐ编程命令１、基本操作命令（１）分隔语句。
不停止程序的执行。
（２）（３）（４）２、关系运算子３、转移命令（１） ｎ。
第 2 页（２）及后面的所有见容。
＜变量＞值为零，则会跳过语句１和语句２以及执行该命令后的所有内容。
（３）＜变量＞值非零，则执行语句１，然后执行语句２以及后面的所有见容。
＜变量＞值为零，则会跳过语句１和语句２以及执行该命令后的所有内容。
（４）４、控制结构命令：（１）（２）之间语句的执行重复进行，每次执行控制变量都加１（从始值开始）。
当控制变量的值到达终值时，执行会跳至Ｎｅｘｔ后面的语句。
如果Ｎｅｘｔ后面没有语句，则停止程序的执行。
（３）第 3 页（４）５、子程序调用命令（１）从当前程序（主程序）执行另一个其它程序（子程序）。
最多可以嵌套１０层子程序。
６、程序控制命令（１）（２） 从子程序返回调用此子程序的程序。
在主程序中，此命令会终止程序。
（３） 强制终止程序执行。
在子程序中执行此命令会终止所有执行，包括所有子程序和主程序。
７、输入／输出命令（１） 返回如下代码之一（对应按的最后一个键）。
如果未按键，则返回０。
８、显示屏幕命令（１） 显示为注释文本。
（２） 清除显示器中的所有表达式和计算结果。
（３）在指定的屏幕位置显示指定值或字符串。
９、逻辑运算子命令（１）运算两端的表达式（相等或不相等），并基于它们的逻辑积返回真或假。
（２）运算两端的表达式（相等或不相等），并基于它们的逻辑积返回真或假。
（３）运算后面紧邻的表达式（相等或不相等），并返回其非值。
１０、清除命令（１）清除所有列表数据。
（２）将所有变量清零。
（３）清除所有矩阵存储器的内容。
（４）清除所有公式变量。
二、Ｆｘ－５８００Ｐ涵数命令１、绝对值２、正弦涵数３、余弦涵数４、正切涵数第 4 页三、ｆｘ－５８００Ｐ计算器编程１、线路坐标计算［ＸＬＪＳ］（主程序）使用说明（１）功能计算线路中桩、边桩坐标。
CASIOfx-5800p程序编写操作步骤
6/5
键 EXE 按 673.133 值程高点知已入输 键 EXE 按 193.133 值测观程高点知已入输 键 EXE 按 568.9347 值标坐 y 点知已入输 键 EXE 按 478.9347 值测观标坐 y 点知已入输 键 EXE 按 135.8493 值标坐 x 点知已入输 键 EXE 按 484.8493 值测观标坐 x 点知已入输 键 EXE 按、2 和之长全线导示显 419.9511 = ) D ( Σ 示显 键 EXE 按 和之长边点#6 至边始起示显 419.9511 =)6−1D(Σ 示显 键 EXE 按 和之长边点#5 至边始起示显 412.178 =)5−1D(Σ 示显 键 EXE 按 和之长边点#4 至边始起示显 295.746 =)4−1D(Σ 示显 键 EXE 按 和之长边点#3 至边始起示显 259.935 =)3−1D(Σ 示显 键 EXE 按 和之长边点#2 至边始起示显 956.663 =)2−1D(Σ 示显 键 EXE 按 „„� �边条 6 有 只线导本为因�0 入输都�8�S 和)7(S�意注�)8(S 到直键 EXE 按)1(S 入输 键 EXE 按”CPXDHB“序程开打、1 �下如作操体具序程的步六第 。序程有所除删为 seli F llA �序程定指除删为 eli F enO �序程除删�键�ETELED� �序程�改修或�辑编�键�TIDE� �序程行�运或�执�键�NUR� �序程建�新或�创�键�WEN� 4 3 2 1
面画程编建新现
出�键
1
5
EDOM
NO/CA
按�能功程编器算计入进、1
和之长边长全线导算计 ]02[Z ⟶N+M+W+G+E+C+B+A:”=)D(Σ“ W+G+E+C+B+A:” �6−1�DΣ“ G+E+C+B+A:” �5−1�DΣ“ E+C+B+A:” �4−1�DΣ“ �推类下以�和之边条三第至边始起算计 C+B+A:” �3−1�DΣ“ 和之边条二第至边始起算计 B+A:” �2−1�DΣ“ 据数长边各边线导入输 ↲N?”=)8(S“:M?”=)7(S“ :W? ”=)6(S“ :G? ”=)5(S“ :E? ”=)4(S“ :C? ”=)3(S“ :B? ”=)2(S“ :A? ”=)1(S“ 序程子和之长边算计 HZCB
casio fx-5800p 使用方法与编程技巧
BASE-N
设置 BASE-N 模式为有符号与无符号计算
fx-4850P 无专门设置按键，其设置操作放置在 键菜单中，内容远没有 fx-5800P 丰富。
例如 fx-4850P 只能以线性格式显示数学表达式，而 fx-5800P 具有与书写数学公式一样的数据格式
显示模式，该模式用于微分、积分、分数计算非常直观与便利，详细见图 A-8 所示。
(4)
键
按
键，屏幕显示图 A-5 左图的一
页设置菜单，按 键显示图 A-5 右图的二
页设置菜单，按 键返回图 A-5 左图的一
页设置菜单，按 ~ 键选择设置选项， 按 键为退出设置菜单。
图 A-5 按
键的 SETUP 菜单
3
fx-5800P 有 14 个设置选项，各设置选项的意义列于表 A-4。
表 A-4 设置菜单的意义
W.End，Do，Lp.W，Break，Return，Stop，Getkey 输入 mp，mn，me，mμ，a0，h，μN，μB 等 40 个科学常数 输入角度变换函数 ， ， ，
输入各类清除命令 ClrStat，ClrMemory，ClrMat，ClrVar 输入统计计算串列数据、统计变量与分布符
双变量统计及回归模式 指定显示小数位数格式有效 指定显示小数位的科学显示格式有效 工程显示格式有效 当前显示的数值为中间结果
显示一列数据时出现，表示当前显示屏的上方或下方还有数据或菜单项
表示数据超出了当前显示屏的左边或右边
(3) 键
按 键，屏幕显示图 A-4 左图的一页
模式菜单，按 键显示图 A-4 右图的二页
×、÷四则运算符。
图 A-2 fx-5800P 关机界面
、功能键 、光标移动
卡西欧5800命令解析实例
卡西欧5800命令解析1.Norm 1 指数显示 Norm 2 小数显示2.?→x 只显示？字符+?→x 显示字符+？？x 显示 x? “字符”？x 显示字符+？有→则不显示该变量当前值3.（判断表达式）语句1 : 语句2。
如果判断表达式为真（或非零），则不跳过语句1.如果判断表达式为假（或是零），则会跳过语句1.4. If...then…else…ifend如果语句为真，则执行then（不执行else）,然后执行ifend.如果语句为假，则执行else（不执行then）,然后执行ifend.5. Break 中断语句中断For，Do，While循环，并从该循环的下个命令起继续运行6. Dsz使控制变量递减一，在变量的值为零时执行转移7. IszIsz<变量>:<语句1><语句2>，变量应为A~Z以 1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句2 8. ClsDsz<变量>:<语句1> <语句2>。
变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句29. Locate 定位显示语句句法 1：Locate <列数>, <行数>,<数值>句法2：Locate <列数>, <行数>,<表达式>句法3：Locate <列数>, <行数>, "字符串"fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。
10. Lbi n ~ Goto n Goto n~Lbl n无条件转移至 Lbi n 位置11. Getkey返回与上次按键相对应的代码,Getkey=12. DO ~ LpWhile循环语句Do <语句块> LpWhile<条件>先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。
卡西欧fx-5800p计算器 公路测量常用程序
FX-5800p计算器公路测量常用程序一、程序功能本程序由6个主程序、5个次子程序及5个参数子程序组成。
主要用于公路测量中坐标正反算，设计任意点高程及横坡计算,桥涵放样，路基开挖口及填方坡脚线放样。
程序坐标计算适应于任何线型.二、源程序1.主程序1：一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离)程序名:1ZD-XYLb1 0:Norm 2F=1：(正反算判别，F=1正算，F=2反算,也可以改F前加？，改F为变量)Z[1]=90（与路线右边夹角）Prog＂THB＂：F=1=>Goto 1:F=2=>Goto 2Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂3JS”:Goto 0:Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢Ｇoto 0２．主程序２：高程序横坡程序(设计任意点高程及横坡)程序名：2GCLbI 0:Norm 2“KM”?Z:?D:Prog”H”:Fix3:”H=”:Locate 6,4,H◢“I=”: Locate 6,4,I◢Goto 03.主程序3：极坐放样计算程序(计算放样点至置仪点方位角及距离)程序名：3JSX：Y：1268．123→K(置仪点X坐标)2243．545→L（置仪点Y坐标，都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦）Y-L→E：X-K→F：Pol(F,E):IF J<0:ThenJ+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示)Fix 3:”S=”:Locate 6,4,I◢4．主程序4：涵洞放样程序（由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离)程序名：4JH-XYLbI 0:Norm 290→Z[1](涵洞中心桩与右边夹角，手工输入，也可以修改成前面加？后变为变量)1→F:Prog”THB”:?L:Z[2]-Z[1] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3: ＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂3JS”:Goto 0:5．主程序5:路基开挖边线及填方坡脚线放样程序（输入大概桩号及测量坐标、地面标高计算出偏移距离、桩号、距中距离、填挖高度）程序名：5FBXLbI 0:Norm 2: 18→DimZ:2→F:90→Z[1]:Prog“THB”:Z:D:”M0”?M:M→Z[4]:D→Z[3]:Prog”6GD”:L→Z[6]:If D<0:Then 0.75-L→D:GotoH:Else L-0.75→D:Goto H:IfEndLbI H:Prog”H”:H-0.03-Z[4] →Z[5]:Z[6] →L:If Z[5]<0:Then –z[5] →G:Goto W:Else Z[5] →G:Goto T:LbI W:Prog “W0”:Z[10]+Z[11] →A: If G>A:Then Goto 1:Else If G>Z[10]:Then Goto 2:Else Goto 3:IfEnd:LbI 1:L+Z[12]+Z[13]+Z[14]+(G-A)×Z[9]+Z[11]×Z[8]+Z[10]×Z[7]:Goto Z:LbI 2:L+Z[12]+Z[13]+(G-Z[10])×Z[8]+Z[10]×Z[7]:Goto Z:LbI 3:L+Z[12]+G×Z[7]:Goto z:LbI T:L+0.5→N:If G>Z[17]:Then (N+Z[18]+(G-Z[17])×Z[16]+Z[17]×Z[15])→S:Goto Z:Else (N+G×Z[15])→S:Goto z:LbI Z:Z[3]→D:Fix 2:Abs(D)-S→T:”L0=”:L Locate 6,4,T◢＂Ｄ＝＂：Locate 6,4,Ｄ◢“TW=”: Locate 6,4,Z[5]◢Goto 06．主程序6：路基标准半幅宽度计算程序(对于设计有加宽渐变的有用，如路基宽度无变化，则把此程序直接输入半幅宽度值至L)程序名：6GDProg “G0”Z-C→E:(B-A)×E/S+A→L:L:7．坐标计算次程序（ＴＨＢ）程序名：THB18→DimZ：＂ＫＭ＂?Z：Prog ＂Ｘ０＂1÷P→Ｃ： (P-R)÷(2HPR) →Ｓ：180÷π→Ｅ：Ｆ=1=>Goto 1：Ｆ=2=>Goto 2←┘Lbl 1：?Ｄ： Abs(Ｚ－O) →W：Prog "Ａ"：X：Ｙ：Ｇoto 3LbI 2:Ｘ：Ｙ：Ｘ→I：Ｙ→J：Prog ＂Ｂ＂：Ｏ＋Ｗ→Z：Ｄ→Ｄ：Ｇoto 3LbI 3:IF Ｆ＝１Then Ｘ：Ｙ：Else Ｚ：Ｄ8. 正算子程序(Ａ)程序名：A0.1184634425→A： 0.2393143352→B：0.2844444444→N 0.046910077→K：0.2307653449→L：0.5→M： U+W(Acos(G+QEKW(C+KWＳ))+Bcos(G+QELW(C+LWＳ))+Ncos(G+QEMW(C+MWＳ))+Bcos(G+QE(1-L)W(C+(1-L)WS))+Acos(G+QE(1-K)W(C+(1-K)WS))) →X：V+W(Asin(G+QEKW(C+KWＳ))+Bsin(G+QELW(C+LWＳ))+Nsin(G+QEMW(C+MWS))+Bsin(G+QE(1-L)W(C+(1-L)WS))+Asin(G+QE(1-K)W(C+(1-K)WＳ))) →Y：G+QEW(C+WＳ)+Ｚ［１］→Ｚ［２］：X+Ｄcos（Ｚ［２］）→Ｘ： Y+Ｄsin（Ｚ［２］）→Ｙ9. 反算子程序(Ｂ)程序名：BG-90→Ｔ： Abs((Y-V)cos(T)-(X-U)sin(T)) →Ｗ：0→Ｄ：Lbl 0：Prog "Ａ"： T+QEW(C+WＳ) →Ｌ： (J-Y)cos(L)-(I-X)sin(L)→Ｄ：IF Abs(Ｄ)<0.01:Then Goto1：Else W+Ｄ→W:Goto 0←┘Lbl 1:0→D：Prog "Ａ"：(J-Y)÷sin(Ｚ［２］) →D:10．高程计算子程序（H）程序名：HProg “S0”:R:T:C:G:I:C-T→F:Z-F→L:C+T→E:G-TI→Q:If T=O:Then Q+LI→H:Goto 0:Else IfZ<F:Then Q+LI→H:Goto 0:Else If Z≤E:Then Q+LI+L2÷2÷R→H:Goto 0:LbI 0:H:If D=0:Then Goto I:Else Prog “I”:H+V→H:Goto I:LbI I:H:I:11.高程超高计算程序（I）程序名：IProg”I0”:W=1=> Goto 0:W=2=>Goto 1:LbI 0:If L=0:Then Abs(D)×M→V:Goto 2:Else Abs(D)×((N-M)×(Z-C)÷L+M)→V:Goto 2:IfEnd: LbI 1:If L=0:Then Abs(D)×M→V:Goto 2:ElseAbs(D)×(((3((Z-C)÷L)2-2((Z-C)÷L)∧(3))×(N-M))+M)→V:Goto 2:IfEnd:LbI 2:Abs(D)→E:V÷E→I:I(E-K)→V:12．数据子程序(附后示例)①程序名：X0（坐标计算要素程序）If Z≥25900 And Z≤26615.555:Then 25900→O:11587.421→U:1847.983→V:101。
卡西欧5800计算器所有编程命令
1.Norm 1 指数显示Norm 2 小数显示2.?→x 只显示？字符+?→x 显示字符+？？x 显示x?“字符”？x 显示字符+？有→则不显示该变量当前值3.（判断表达式）语句1 : 语句2。
如果判断表达式为真（或非零），则不跳过语句1.如果判断表达式为假（或是零），则会跳过语句1.4. If...then…else…ifend如果语句为真，则执行then（不执行else）,然后执行ifend.如果语句为假，则执行else（不执行then）,然后执行ifend.5. Break 中断语句中断For，Do，While循环，并从该循环的下个命令起继续运行6. Dsz使控制变量递减一，在变量的值为零时执行转移7. IszIsz<变量>:<语句1> <语句2>，变量应为A~Z以1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句28. ClsDsz<变量>:<语句1> <语句2>。
变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句29. Locate 定位显示语句句法1：Locate <列数>, <行数>,<数值>句法2：Locate <列数>, <行数>,<表达式>句法3：Locate <列数>, <行数>, "字符串"fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。
10. Lbi n ~ Goto n Goto n~Lbl n无条件转移至Lbi n 位置11. Getkey返回与上次按键相对应的代码,Getkey=12. DO ~ LpWhile循环语句Do <语句块> LpWhile<条件>先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。
打桩程序CASIO-fx4850P(5800P)
10,Y=? 桩中心计算Y坐标, 11,T=? 桩的平面扭角 12,V=? 桩的斜率,直桩为0,斜桩输入设计值 13,H=? 桩的提高量,无提高输入0
第5页 共7页
Casio fx5800P计算器程序 (打桩程序)
计算结果如下: NA: 测站A点瞄准B点置角度0后的拨角值 1,W1=? 2,W2=? 3,W3=? NB: 4,W1=? 5,W2=? 6,W3=? NC: 7,W1=? 8,W2=? 9,W3=? 测站点A的左瞄准角 测站点A的右瞄准角 测站点A的船尾瞄准角 测站点B的左瞄准角 测站点B的右瞄准角 测站点B的船尾瞄准角 测站点C的左瞄准角 测站点C的右瞄准角 测站点C的船尾瞄准角
★
: -> ? S ? ? G
Z
P B B " C E
G
r : : : : :
★
o " " X " "
★
g X < -> Y Y A B C B C
Y g X X L
> : = " = = "
" Y " S " " ?
圆桩定位角[5800P] " S S " : = " ? A : > " : P r : Y -> D : = " ? D : = " ? F :
4
R : + ( i ) > t > :
->
S c W K
->
( o ) + G
->
) + ( S 7 0 l N
R s s W K o K
X
S : o ) ) : : T e G
卡西欧5800P完整程序(两套)
<ROAD-1>(逻辑运行运算公式主程序): Deg:Fix 3:20→DimZ（回车符号）“ZS[1]，FS[2]”？J（回车符号）If J=1：Then Goto 0：Else Goto 4：IfEnd（回车符号）Lbl 0（回车符号）“ROAD？[1-5]”?E(回车符号)“XS”？U：“YS”？V（回车符号）Lbl 1（回车符号）“KP”？P（回车符号）Prog “ROAD-DATA”（回车符号）M+O→N（回车符号）Prog “ROAD-SUB1”（回车符号）Prog “ROAD-SUB2”（回车符号）“XP=”：F（黑色三角）“YP=”：G（黑色三角）“BP=”：Z（黑色三角）DMS（黑色三角）If U=0：Then Goto 3:Else Pol(F-U，G-V)：IfEnd（回车符号）Lbl 2（回车符号）If J〈0：Then J+360→J：IfEnd（回车符号）“A1=”：J（黑色三角）DMS（黑色三角）“D1=”：I（黑色三角）Lbl 3（回车符号）“DANGLE”？H：If H=0：Then Goto 1：IfEnd：？D（回车符号）“XB=”：F+Dcos（Z+H）→Z[11]（黑色三角）“YB=”：G+Dsin(Z+H)→Z[12]（黑色三角）If U=0：Then Goto 3：Else Pol（Z[11]-U，Z[12]-V）：IfEnd（回车符号）Goto 2（回车符号）Lbl 4（回车符号）“ROAD？[1-5]”?E(回车符号)“XS”？U：“YS”？V（回车符号）Lbl 5（回车符号）“XB”？U：“YB”？V：“KP”？P（回车符号）Lbl 6（回车符号）Prog “ROAD-DATA”（回车符号）M+O→N（回车符号）Prog “ROAD-SUB1”（回车符号）Prog “ROAD-SUB2”（回车符号）Z-90→A（回车符号）（V-G）cos（A）-（U-F）sin（A）→H（回车符号）If Abs（H）＞0.0001：Then P+H→P：Goto 5：IfEnd（回车符号）“K=”：P（黑色三角）“D=”：（G-V）÷sin（A）→D（黑色三角）Goto 4（回车符号）ROAD-DATAIf E=1：Then Prog“ROAD-DATA1”：IfEnd（回车符号）If E=2：Then Prog“ROAD-DATA2”：IfEnd（回车符号）If E=3：Then Prog“ROAD-DATA3”：IfEnd（回车符号）If E=4：Then Prog“ROAD-DATA4”：IfEnd（回车符号）If E=5：Then Prog“ROAD-DATA5”：IfEnd（回车符号）注：ROAD-DATA编几段对应的计算数据库就编几段，比如此例有五段，那么就编五段“ROAD—DATA1、2、3......”。
[正反算]卡西欧 CASIO fx-5800P连算程序
![[正反算]卡西欧 CASIO fx-5800P连算程序](https://img.taocdn.com/s3/m/e4cb1bef81c758f5f61f6726.png)
CASIO fx-5800P坐标正反算程序[已核对]一、程序内容1、主程序名:ABCYTDeg:Fix 3Lbl 4:＂1.DK=>XY＂:＂2.XY=>DK＂:＂J＂?N:＂DK＂?S:Prog＂CYT1＂↙1÷P→C:(P-R)÷(2HPR)→D:180÷π→E:N=1=>Goto1:Goto2:↙Lbl 1:＂W＂?Z:Abs(S-o)→W:Prog＂CYT2＂:＂X=＂:X◢＂Y=＂:Y◢F-90→F:＂FWJ=＂:F▲DMS◢Goto4↙Lbl 2:?X:?Y:X→I:Y→J:Prog＂CYT3＂:o+W→S:＂DK=＂:S◢＂W=＂:Z◢Goto4↙2、正算子程序名:CYT20.1739274226→A:0.3260725774→B:0.0694318442→K:0.3300094782→L:1-L→F:1-K→M:U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C +MWD)))→X:V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C +MWD)))→Y:G+QEW(C+WD)+90→F:X+Zcos（F）→X:Y+Zsin（F）→Y↙3、反算子程序名:CYT3G-90→T:Abs((Y-V)cos(T)-(X-U)sin(T))→W:0→Z:Lbl 0:Prog ＂CYT2＂:T+QEW(C+WD)→L:(J-Y)cos（L）-(I-X)sin（L）→Z:IF Abs（Z）<10^(-6):Then 0→Z:Prog ＂CYT2＂:(J-Y)÷sin（F）→Z↙Else W+Z→W :Goto 0:IfEnd↙4、数据库名:CYT1Goto1↙Lbl 1:IF S<7946.707:Then 98°56′56″→G:7586.707→o:3378605.445→U:453648.704→V:10^(45)→P:4500→R: 360→H: 1→Q:Return:IfEnd↙Lbl 1:IF S<11766.03:Then 101°14′26″→G:7946.707→o:3378544.714→U:454003.518→V:4500→P:4500→R: 3819.323→H: 1→Q:Return:IfEnd↙Lbl 1:IF S<12126.03:Then 149°52′11″→G:11766.03→o:3376389.890→U:457018.324→V: 4500→P: 10^(45)→R: 360→H: 1→Q:Return:IfEnd↙Lbl 1:IF S<13346.96:Then 152°09′41.68″→G:12126.03→o:3376073.846→U:457190.654→V:10^(45)→P: 10^(45)→R:1220.93→H:0→Q:Return:IfEnd↙CYT1数据库说明:Goto1↙表示同时保存多个曲线要素Lbl 1:IF S<***线元终点里程:Then***线元起点方位角→G:***线元起点里程→O:***线元起点X→U:***线元起点Y→V:***线元起点曲率半径→P:***线元终点曲率半径→R: ***线元起点至终点长度→H:0→Q:Return:IfEnd↙（H=0或1、-1，详情附后）。
5800P计算器)程序(附带高程)
一、功能及原理说明1. 功能说明：本程序由一个主程序(1-MAIN)和七个子程序——正算子程序(1-SUB-ZS)、反算子程序(1-SUB-FS)等构成，可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线元要素（起点坐标、起点里程、起点切线方位角、线元长度、起点曲率半径、止点曲率半径）及里程边距或坐标，对该曲线段范围内任意里程中边桩坐标进行正反算。
本修改版程序既可实现正算全线贯通，亦可实现反算全线贯通。
本程序在CASIO FX-5800P计算器运行。
2．计算原理：利用Gauss-Legendre 5点通用公式正算线路中边桩坐标、线外测点至曲线元起点和终点的垂距的符号是否相异（即Dca×Dcb<=0=>该测点在其线元内）进行判断并利用该线元要素反算中桩里程、支距，最后计算出反算结果。
3. 程序输入计算器后，请根据统计串列List X，Y，freq[N]在程序中实际可能被使用的维数，将其统计矩阵串列改为包含相应维数的任意数据的矩阵，即在list列表中随机输入相应维数的数据，保证矩阵大小符合维数要求。
4. 本程序正算速度在1-2秒左右，反算比正算慢点，可根据需要调整精度加快速度。
本程序可建立曲线要素数据库及高程变坡点数据库，一次输入整条线路数据，计算时自动调用数据库，实现全线贯通，也可临时手动输入线元计算要素进行计算。
5. 本程序由小骆在前人的基础上改进而成，经个人测试可用。
学识浅薄，不足之处，在所难免，欢迎提出改进意见。
交流邮箱：716118673@二、源程序1.主程序(1-MAIN)Deg:fix 320→DimZLbl 0:cls：“INPUT(0),ZX(1),YX(2)”?I (选择手动输入计算参数0，还是调用线路数据1,2）If I=0:Then Prog “1-DAT1”:IfEnd“SZ=>XY(1),XY=>SZ(2)”?N（正算，反算）If N=1 :Then Goto 1Else If N=2 :Then Goto 2Else Goto 3IfEnd:IfEndLbl 1:“KP=”?S（输入待求桩号）If S<0:Then Goto 0:IfEnd“JL(m)=”?Z （输入偏距）If Z≠0:Then “ANGLE→R(Deg)=”?M:IfEnd （输入斜交右角）If I≠0:Then Prog “1-DAT2”:IfEndS-O→W:If W<0:Then Goto 0:Else If W>H:Then cls:locate 6,2,"KP OUT"◢Goto 0:IfEnd:IfEnd(前半条针对“DAT”情况，后半条针对“INPUT”情况。
卡西欧5800计算器坐标正反算程序(带详细说明)
卡西欧5800程序完整版＂ZS=1,FS=2＂？N: 1÷P →C:(P-R)÷(2HPH)→D:180÷π→E: If N=1: Then Goto 1: Else Goto 2: IfE nd←┚LbI 1:1 →I:0 →Z：Abs(K-Ｏ) →W: Prog＂ZS＂←┚F-90→F←┚＂JJ＂?K:＂PJ＂?L: ＂ZX=＂：X+Lcos(F+K) →Z[3]◢＂ZY=＂: Y+Lsin(F+K) →Z[4]◢＂QXFWJ=＂:F DMS◢Abs(Z) →Z:Goto 8←┚LbI 2:＂X＂?I:＂Y＂?J: Prog＂FS＂:＂FSZH=＂:Ｏ+W→K◢＂FSJL=＂:Z◢Lbl 8正算子程序（ZS）（不运行）1÷P→C:(P-R)÷(2HPR) →D: 180÷π→E←┚0.1739274226→A：0.3260725774→B：0.0694318442→K：0.3300094782→L：1-L→F：1-K→M：U+W（Acos（G+QEKW（C+KWD））+Bcos（G+QELW（C+LWD））+Bcos（G+QEFW（C+FWD））+Acos（G+QEMW（C+MWD）））→X：V+W（Asin（G+QEKW（C+KWD））+Bsin（G+QELW（C +LWD））+Bsin（G+QEFW（C+FWD））+Asin（G+QEMW（C+MWD）））→Y：G+QEW（C+WD）+90→F：X+ZcosF→X：Y+ZsinF→Y3反算子程序（FS）（不运行）G-90→T：Abs（（Y-V））cos（T）-（X-U）sin（T）→W：0→Z←┚Lbl 0←┚prog＂ZS＂：T+QEW（C+WD）→L：（J-Y）cosL-（I-X）sinL→Z：If Abs(Z)＜0.001: Then Goto1：E lse W+Z→W：IfEnd :Goto 0←┚Lbl 1：0→Z：Prog＂ZS＂：（J-Y）÷sinF→ZZX-WN（运行主程序，该程序适用于匝道，对全段完整非对称曲线计算太过麻烦）＂CZX＂?S(仪站X坐标):＂CZY＂?W（仪站Y坐标）LbI 0: ＂K＂?K: If K≤126.9（第1条单一曲线的终点下面同上）: Then Goto A：Else If K≤176.9 And K＞126.9: Then Goto B:Else If K≤259.562 And K＞176.9: Then Goto C:Else If K≤309.562 And K ＞259.562: Then Goto D：IfEnd:IfEnd:IfEnd:IfEnd←┚LbI A:92094.336（起点X坐标）→U:8287.962（起点Y坐标）→V:0起点桩号→O:145°11＇54＂（方位角）→G:126.9（曲线长度）→H:10^(45) （起点半径）→P:10^(45) （止点半径）→R:+1（路线左右偏，左负右正，直线输0）→Q:Prog ＂WN＂:Goto WLbI B:91990.134→U:8360.388→V:126.9→O:145°11＇54＂→G:50→H:10^(45) →P:150 →R:+1→Q:Pr og ＂WN＂:Goto WLbI C:91947.609→U:8386.570→V:176.9→O:154°44＇51＂→G:82.662→H:150 →P:150 →R:+1→Q:Pr og ＂WN＂:Goto WLbI D:91867.101→U:8399.992→V:259.562→O:186°19＇19＂→G:50→H:150 →P: 10^(45) →R:+1→Q: Prog ＂WN＂:Goto WLbI W:＂PJ1＂?T←┚（该项是只左右边桩再左右偏距，输0为不再左右偏，可以直接出方位角、距离，适用于桥梁桥台、盖梁、涵洞八字墙等放样，以路线前进方向，前-，后+）If T=0：Then Z[3]→Z: Z[4]→M: Goto P: Else Goto V: IfEnd←┚LbI V:＂JJ1＂? O←┚（左右边桩再偏夹角，用180°减去路线夹角）＂X1=＂: Z[3]+Tcos（F+N+ O）→U◢＂Y1=＂:Z[4]+Tsin（F+N+ O）→V◢U→Z: V→M: GotoP←┚LbI P:Pol(Z-S,M-W): If J≤0：Then J+360°→J: IfEnd←┚＂JL=＂:I◢（仪站至测点的距离）＂FWJ=＂:J DMS◢（仪站至测点的方位角）Goto0备注：1．规定以道路中线前进方向（即里程增大的方向）区分左右；当线元往左偏时Q=-1；当元线往右偏时，Q=1：当元线为直线时，Q=0。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
卡西欧5800p计算器所有编程命令解释
1.
Norm 1 指数显示
Norm 2 小数显示
2.
?→x 只显示？
字符+?→x 显示字符+？
？x 显示x?
“字符”？x 显示字符+？
有→则不显示该变量当前值
3.（判断表达式）语句1 : 语句2。
如果判断表达式为真（或非零），则不跳过语句1. 如果判断表达式为假（或是零），则会跳过语句1.
4. If...then…else…ifend
如果语句为真，则执行then（不执行else）,然后执行ifend.
如果语句为假，则执行else（不执行then）,然后执行ifend.
5. Break 中断语句
中断For，Do，While循环，并从该循环的下个命令起继续运行
6. Dsz
使控制变量递减一，在变量的值为零时执行转移
7. Isz
Isz<变量>:<语句1> <语句2>，变量应为A~Z
以 1 为增量逐次增加变量的值，当变量的值不等于0 时，执行语句1，否则执行语句2
8. Cls
Dsz<变量>:<语句1> <语句2>。
变量应为A~Z。
以1 为减量逐次减小变量的值，当变量的值不等于0 时，执行语句1，否则执行语句2
9. Locate 定位显示语句句法1：Locate <列数>, <行数>,<数值>
句法2：Locate <列数>, <行数>,<表达式>
句法3：Locate <列数>, <行数>, "字符串"
fx-5800P 的屏幕最多可以显示4 行、16 列字符，因此定位语句中的列数值应为大于等于1、小于等于16 的整数，行数值应为大于等于1、小于等于4 的整数。
10. Lbi n ~ Goto n Goto n~Lbl n
无条件转移至Lbi n 位置
11. Getkey
返回与上次按键相对应的代码,Getkey=
12. DO ~ LpWhile循环语句
Do <语句块> LpWhile<条件>
先执行语句块，然后测试条件，条件为真时重复执行语句块，否则执行<条件>后的语句。
无,论条件是否为真，语句块至少被执行一次。
13. Pol
计算两坐标点之间距离,坐标为（4，4）,与原点的距离就是POL（4，4）=4√2
14. Abs
求绝对值
15. Fix
取整数函数Fix(Rnd*11) ,取0 ~ 11的随机整数16. Rnd
随机函数
17. 角度单位设置语句
Deg：设置角度单位为十进制度，按键输入Deg。
执行该语句后，状态行显示。
Rad：设置角度单位为弧度，按键输入Rad。
执行该语句后，状态行显示。
Grd：设置角度单位为哥恩，按键输入Grd。
执行该语句后，状态行显示。
18. Dim
定义变量
19. RCL
键面命令，Rcl+A 显示变量A的当前值
20. STO
键面命令,STO+A 给变量A赋值，显示→A
21. INS
键面命令,切换键标记样式，覆盖与插入切换
22. ←
键面命令，角度度分秒格式与小数格式转换
23. ▶DMS
常将反三角函数计算出的十进制角度转换成六十
进制度分秒形式，cos-1(x)▶DMS
24. Pol
键面命令，将直角坐标转换为极坐标，Pol（△x,
△y）
25. Rec
键面命令，将极坐标转换为直角坐标，Rec(r,θ) 26. CALC
键面命令，对一个表达式的变量代入不同的值27. And，Or，Not
<条件1>And<条件2>，<条件1>与<条件2>同时为真时为真。
<条件1>Or<条件2>，<条件1>与<条件2>有一个为真时为真。
Not<条件>，<条件>为假时为真。
28. If~Then~Else~IfEnd
句法1：If <条件> Then <语句块>IfEnd
条件为真时执行Then 后的语句块，否则从IfEnd 后开始执行
句法2：If <条件> Then <语句块1>Else<语句块2>IfEnd
条件为真时执行语句块1，否则执行语句块2，然后执行IfEnd 后的语句
29. For~To~Step~Next
句法1：For <始值> <控制变量>To<终值> <语句块> Next控制变量的取值从始值开始，步长为1，重复执行语句块，直至终值为止。
一般始值小于终值，如果始值大于终值，则不执行语句块而是直接执行Next 后的语句。
句法2：For <始值> <控制变量>To<终值>Step<步长> <语句块> Next
它与For~To~Next 句法的功能相同，唯一区别是增加了步长语句Step
30. While~WhileEnd 循环语句句法：While <条件> <语句块>WhileEnd
先测试条件，当条件为真时执行语句块，然后再测试条件，条件为真时重复执行语句块，直到,条件为假时执行WhileEnd 后的语句结束循环
31. Prog~Return 调子程序语句
句法：Prog "subfilename"
按键输入Prog。
fx-5800P 的子程序是独立于主程序的程序，它也保存在计算器内存中，主程序与子程序的变量都是全局的，子程序执行完成后通过Return 语句返回主程序，继续执行主程序中Prog 语句后的语句.
32. Return 返主程序语句
在子程序中应至少有一条Return 语句，当执行到该语句时，控制执行返回调用该子程序的主程序。
主程序中一般不应有Return 语句，若在主程序中使用了Return 语句，程序执行到该语句时会停止执行。
33.Stop 终止程序语句
程序被Stop 语句终止后就不再执行任何语句，通常用于调试程序设置临时中断点，程序调试通过后，将其删除。
34. 清除语句
①Cls：清除屏幕显示的文字、表达式及计算结果。
②ClrStat：清除统计串列List X，List Y，List Freq。
③ClrMemory：清除字母变量A~Z 与数值答案寄存器。
④ClrMat：清除矩阵Mat A~Mat F 与矩阵答案寄存器Mat Ans
的内容与维数。
⑤ClrVar：清除内置公式变量及用户自定义公式变量的值。
其中后四个语句为按(CLR)键调出清除语句菜单选择。
额外变量Z[n]的数值没有专门的语句命令清除，只能执行语句0 DimZ 清除。
35. 数值显示格式设置语句
Fix <n>：n 为0~9 间的整数，设置以n 位固定小数格式显示计算结果，按键输
入Fix。
执行该语句后，状态行显示FIX。
Sci <n>：n 为0~9 间的整数，设置以n 位固定小数科学格式显示计算结果，按键
输入Sci。
执行该语句后，状态行显示SCI。
Norm <n>：n 为1 或2，设置以正常格式显示计算结果，按键输入Norm。
ENG：其下有EngOn 与EngOff 两个语句，EngOn 为打开工程格式显示；按
键输入EngOn，执行该语句后，状态行显示ENG；EngOff 为关闭工程格式显示，按
键输入EngOff，执行该语句后，状态行的ENG 消失。
36. END
结束程序运行。