❶ 卡西欧5800计算器如何编程
公路平/竖曲线放样、坐标反算桩号GL.3-25PHF程序fx-5800p
F1 GL.3-25PHF (K+,XY ≠ 0?)输入其他进入反算。输入0时进入测站点、后视点坐标(X0,Y0,H0)、(X1,Y1)输入及两点距离(D0)、方位角(T0)输出。H0=0时,不计算竖曲线。
L1 Z[1→Q:Lbl 8:“GL.3-25PHF=”?Q:Q→Z[1]:IF Q<3 Or Q>25:Then Goto 8:IfEnd:0→V:0→N:“K,X≠0”?V:V≠0=>Goto 0:“X0”?C:“Y0”?D:“H0”?H:“X1”?E:E-C→I:“Y1”?F:F-D→J:Prog“1”:“T0O=”:J▲DMS◢“D0=”:I◢ 放样点桩号(Kp+)斜交角(ApO)距离(Sp)输入 143
L2 Lbl 0:Z[1→Q:If V=0:Then 90→Z:“Kp+”?K:“ApO”?Z:“Sp”?B:Goto 4:IfEnd:If N≠-2:Then“Xp”?C:“Yp”?D:1T→P:1→G:IfEnd:Lbl 7:C-Z[4+G→I:D-Z[Q+4+G→J:Prog“1”:If N=-2:Then I→P:J→Z:G→B:Goto 4:IfEnd:If P-I>0:Then I→P:J→Z:G→B:IfEnd:If G<Q-2:Then G+1→G:Goto 7:IfEnd:Lbl 4:1→G:Z[3]→W:Lbl 5:Z[1→Q
L3 Q-2→N:Z[3→A:Z[4+G→X:Z[Q+4+G→Y:Z[2Q+3+G→R:R=0 =>1μ→R:Z[3Q+1+G→L:Z[3+G]-X→I:Z[Q+3+G]-Y→J:Prog“1”:J→O:Z[5+G]-X→I:Z[Q+5+G]-Y→J:Prog“1”:J→U:Prog“P”
L4 If V≠0:Then If G<B:Then G+1→G:W+I-2T+S→W:Goto 5:IfEnd:Prog“F”:Goto 0:IfEnd:N=0=> Goto 0:N=-1=>Goto 5:H=0=>Goto 0:1→G:Lbl 6:Z[1→Q
L3 Q-2→N:Z[4Q+1→A:Z[4Q+G→W:Z[5Q+G→U:Z[6Q-1+G→R:Z[5Q-1+G]-U→I:Z[4Q-1+G]-W→J:Prog“1”:J→O:Z[5Q+1+G]-U→I:Z[4Q+1+G]-W→J:Prog“1”:Prog“H”:N=-1=>Goto 6:Goto 0
F2 CS.3-25PHF (参数输入完成时,可取消此子程序) I?输入0时进入转点号N?(N-P为平曲线、N-H为竖曲线,均输入1至8、15、25的整数)及其参数的输入(平曲线K?、X?、Y?、R?、L?)、(竖曲线K?、H?、R?)输入桩号、坐标或高程、园半径、缓和曲线长度。
L1 ?I:If I=0:Then 172→DimZ:1→N:IfEnd:Z[1→Q:Lbl 8:“GL.3-25PHF=”?Q:Q→Z[1]:IF Q<3 Or Q>25:Then Goto 8:IfEnd:While N≤Q:“N-P”?N:N>Q=>Goto 1:If N=2:Then ?K:K→Z[3]:IfEnd:?X:X→Z[3+N]:?Y:Y→Z[Q+3+N]:N=1 Or N=Q=>Goto 0:?R:R→Z[2Q+2+N]:?L:L→Z[3Q+N]:Lbl 0:WhileEnd:Lbl 1:1→N
L2 While N≤Q:“N-H”?N: N>Q=>Goto 8:?K: K→Z[4Q-1+N]:?H:H→Z[5Q-1+N]:N=1 Or N=Q=> Goto 2:?R:R→Z[6Q-2+N]:Lbl 2:WhileEnd
F3 P
L1 Prog“2”:If M=180:Then 0→T:Goto 1:IfEnd:L÷2-L^3÷240÷R2+(L2÷24÷R+R)tan(.5M→T:Lbl 1:RMπ÷180+L→S:V≠0=>Goto 0:If K<A-T:Then“K+!”:K◢0→N:Goto 0:IfEnd:If G≥N And K>W-T+S:Then“K+!”:K◢0→N:Goto 0:IfEnd:If K>W-T+S:Then G+1→G:W+I-2T+S→W:-1→N:Goto 0:IfEnd:Prog“5” 警告桩号(K+!)的输入已超出范围。 测站点、放样点间的距离(Dp)、方位角(TpO)输出。放样点的坐标(Xp,Yp,Hp0)输出。
L2 X+TA-MA+NJ→X:Y +TJ-MJ-NA→Y:X-C→I:Y-D→J:Prog“Z1”:“TpO=”:J▲DMS◢“Dp=”:I◢“Xp”:X◢“Yp”:Y◢1→N:Lbl 0
F4 1
L1 If I=0 And J=0:Then 180→J:Else Pol(I,J:J<0=>J+360→J:IfEnd
F5 2
L1 O-J→M:M<0=>M+360→M:If M<180:Then 180-M→M:1→Q:Else M-180→M:-1→Q:IfEnd
F6 3
L1 90(2I-L)÷π÷R→A:RsinA+L÷2-L∧(3)÷240÷R2→M:L2÷24÷R+R(1-cosA→N:A-J→A:M-QBcosA→M:QN-BsinA→N
F7 4 (缓和段计算:可适当选取2至6项,当无缓和曲线时,可仅选1项,以减少字节。)
L1 RL→A:I-I∧(5)÷40÷A2+ I∧(9)÷3456÷A∧(4)-I∧(13)÷599040÷A∧(6)+I∧(17)÷175472640÷A∧(8)-I∧(21)÷78033715200÷A∧(10→M
L2 I∧(3)÷6÷A-I∧(7)÷336÷A∧(3)+I∧(11)÷42240÷A∧(5)-I∧(15)÷9676800÷A∧(7)+I∧(19)÷350096640÷A∧(9)-I∧(23)÷1880240947200÷A∧(11→N: 90I2÷π÷A-J→A:M-Qbcos(A→M:QN-Bsin(A→N
F8 5
L1 K-W+T→I:Z→J:If I<S-L:Then If I≤0:Then I+Bcos(Z→M:BsinZ→N:Goto 2:IfEnd:Q=1=>180-Z→J:If I≤L:Then Prog“4”:Else Prog“3”:IfEnd:Lbl 2:O→J:Goto 3:IfEnd:S-I→I
L2 If I≤0:Then I-Bcos(Z→M:-Bsin(Z→N:Else Q≠1=>180-Z→J:Prog“4”:-N→N:IfEnd:U→J:Lbl 3:cos(J→A:sin(J→J
F9 H (不需要计算中桩高程时,可取消此子程序) 警告桩号(K+!)的输入已超出范围
L1 Prog“2”:If M=180:Then 0→T:Goto 1:IfEnd:Rtan(.5M→T:Lbl 1:If K< Tsin(O+A:Then“K+!”:K◢Goto 0:IfEnd:If G≥N And K>W-Tsin(O:Then“K+!”:K◢Goto 0:IfEnd:If K>W-Tsin(O:Then G+1→G:-1→N:Goto 0:IfEnd
L2 U+Tcos(O+Rcos(O-90Q→M:W+Tsin(O+Rsin(O-90Q→N:K-W-Tsin(O→L:If L≤0:Then U+(T+L÷sin(O))cos(O→H:“Hp0=”:H◢Goto 0:IfEnd:M+Q√(R2-(K-N)2)→H:“Hp0=”:H◢Lbl 0 中桩高程输出(Hp0=)
F10 F (不需要反算时,可取消此子程序) 转点半径为0时可能输出的两种桩号、偏离距离(K1+=、K2+=、Sp1=、Sp2=)情况
L1 Z-O→I:U-Z→J:IF Abs(I≤90:Then If T≤Pcos(I:Then W-Pcos(I→K:-Psin(I→B:If Abs(J≥90:Then Goto 9:Else“K1+=”:K◢“Sp1=”:B◢IfEnd:IfEnd:IfEnd:IF Abs(J≤90:Then If T≤Pcos(J:Then W-2T+S+ Pcos(J→K:-Psin(J→B:If Abs(I≥90:Then Goto 9: Else“K2+=”:K◢“Sp2=”:B◢Goto 0:IfEnd:IfEnd:IfEnd:If Pol(C-X-Tcos(O),D-Y-Tsin(O))<Pol(C-X-Tcos(U),D-Y-Tsin(U)):Then-1→H:Else 1→H:IfEnd:(R+L2÷24÷R)÷cos(.5M→N:O-Q(90-.5M→J:C-X-Ncos(J→I:D-Y-Nsin(J→J:Prog“1”
L2 cos-1((I2+N2-P2)÷2÷I÷N→N:If N≤.5M-90L÷π÷R:ThenW-T+.5S+HπNR÷180→K:Q(R-I→B:Goto9:IfEnd:If L=0:Then-2→N:G+H→G:Goto 0:IfEnd:“Z.H.Y-100!-Y.H.Z”◢0→B:0→Z警示准备进入缓和段的桩号反算,计算约需100秒。
L3 If H=-1:ThenW-T→E:E+L→G:ElseW-T+S→E:E-L→G:IfEnd:Lbl8:Z+1→Z:(E+G)÷2→F:Z=1=>E→K:Z=2=>F→K:Z=3=>G→K:Prog“5”
L4 C-X-TA+MA-NJ→I:D-Y-TJ+MJ+NA→J:C-I→M:D-J→N:Prog“1”
L5 If Z=1:Then I→P:Goto 8:IfEnd:If Z=2:Then I→V:Goto 8:IfEnd:If Abs(E-G>1μ:Then If P>V And P>I:then F→E:0→Z:Goto 8:IfEnd:If I>P And I>V:Then F→G:0→Z:Goto 8:IfEnd:IfEnd:F→K:I→B:J→V
L6 If H=-1:Then X+Tcos(O)-M→I:Y+Tsin(O)-N→J:Else X+Tcos(U)-M→I:Y+Tsin(U)-N→J:IfEnd:Prog“1”:J→O:V→J:Prog“2”:-HQB→B:Lbl 9:“K+=”:K◢“Sp=”:B◢N=0:Lbl 0 反算桩号、偏离距离输出(K+=、Sp=)
全站仪后方交会(两已知点,任意设站,观测两边多余一角可计算测站点坐标)
F D1�6�1D2–XY
L1 “X1”?C:“Y1”?D:“X2”?E:“Y2”?F:(E–C)2+(F–D)2→M:“D1”?S:T“D2”:“Ap°”?U
L2 cos -1((M+S 2–T 2)÷2÷S÷√(M→V:cos -1((M+T 2–S 2)÷2÷T÷√(M→W
L3 180–U–V–W→P:If Abs(P≥0°0°30°:Then“Μp°!”:P▲DMS◢IfEnd:1÷tan(V→V:1÷tan(W→ W
L4 (CW+EV+D–F)÷(V+W→X:(DW+FV+E–C)÷(V+W→Y:“Xp=”:X◢“Yp=”:Y
两线交点、坐标变换
F L×L�6�1XY–AB
L1 “0–1–2=>L×L�6�1X–A�6�1A–X”?I:If I=0:Then Lbl 0:“XA-1”?C:“YA-1”?D:“XA-2”?E:“YA-2”?F:C–E→K:D–F→L:“XB-1”?O:“YB-1”?P:“XB-2”?Q:“YB-2”?R:O–Q→M:P–R→N
L2 (K(OR–QP)–M(CF–ED))÷(ML–KN→X:“Yp”:(LX+CF–ED)÷K→Y:“Xp”:X◢“Yp”:Y◢Goto 0:IfEnd
L6 If I=1:Then“X0”?C:“Y0”?D:“T°=”?J:Lbl 1:“Xp=”?E:“Yp=”?F:(E–C)cos(J)+(F–D)sin(J)→A:(F–D)cos(J)–(E–C)sin(J)→B:“Ap=”:A◢“Bp=”:B◢Goto 1:IfEnd
L7 If I=2:Then:“X0”?C:“Y0”?D:“T°=”?J:Lbl 2:E“Ap=”:F“Bp=”:C+Ecos(J)–Fsin(J→X:“Xp=”:X◢D+Esin(J)+Fcos(J→Y:“Yp=”:Y◢Goto 2:IfEnd
坡顶开挖线放样程序
F P�6�1D�6�1×–– H0、H0×为任意点(下点)的设计、地面高程,S0×、H1δ为坡度方向到另外1点(上点)的距离、高程,i设计的坡度,上点平移⊿Sp距离后到达坡顶开挖线。
L1 “H0=”?H:“H0×=”?M:“S0×=”?P:“H1δ=”?N:“i=”?I:P((M–H)÷(M–N+P×I)–1→S:B=P+S:“◢Sp=”:S
地形图等分线程序
F H1-0�6�15-H2
L1 Lbl 0:“H1”?A:“H2”?B:“S0”?S:(A–B)÷S→K
L2 10A–10 Int A→L:If L-5≥0:Then L–5→L:0.1L÷K→E:“S1=”:E◢0.5÷K→F:“Sn=”:F◢Int(KS÷0.5→G:“N=”:G◢Goto 0:IfEnd
方格网4点求格交点高程程序
F H1-H4�6�1�6�1S0-3
L1 “H1”?A:“H2”?B:“S01”?K:“SP1”?L: A+(B-A)L÷K→E:“H3”?C:“H4”?D:“S02”?M:“SP2”?N: C+(D-C)N÷M→F:“S03”?O:“SP3”?P:E+(F-E)P÷O→H:“H=”:H
方格网2点求格交点高程程序
F H1-H2�6�1�6�1S0-2
L1 “H1”?A:“H2”?B:“S0”?L:“S1”?M:A+(B-A)M÷L→H:“H=”:H
❷ 卡西欧计算器怎么编程
卡西欧计算器有很多种的,,每一种卡西欧计算器编程语言都大不一样,就比如卡西欧4800和卡西欧5800计算器,编程语句和关键字很多不一样的了,如果你问的仅仅是进入计算器编程界面的话,对于卡西欧5800计算器那就是:“MODESRTUP”——5号键,PROG——1号键,NEW——输入程序名称——选择程序模式(一般情况下都是在COMP模式下)——进入代码输入界面,输入程序代码再运行就行了。
一、使用简单,最大的一个优点就是只要具有初中水平会运用数学公式对函数有一般的了解的人,能基本理解casio4x00的内装函数即可进行简单的编程。非常适合测量初学者和数学程序爱好者学习,也适合专业的测量人员的使用和能力提高。不像其它的专业一定要具有较高的专业技术水平才能进行电脑编程。
二、成本低廉,价格在400元左右。
三、携带方便,体积很小可随时放在口袋里随拿随用。casio系列较好的编程型号有casio4500(以下简称4500)、casio4800(以下简称4800),(好象近来还推出了一款casio4850)前者较内存小,只有1103个字节,能应付一些较为简单的公式计算和科学计算,但由于内存有限,对一些较复杂或子程序过多的程序就力不从心了,不能出色的完成测量任务。4800就比4500有较大的改进,4800内存达到的4500个字节,而且显示屏是4500的几倍大,能更准确的显示数据,内装函数字符一目了然。且具有简单的人机对冲灶好话功能,出现了菜单子菜单。4800还在4500增加了啊佛加德罗常数、万有引力长常数、详见《操作说明书》。4800有很多很实用的功能如他有一个公式散铅解答功能,其原理是用牛顿法解方程。
举个例子:有一方程式:a=2b-c求当a=2、c=5时的b值。将该方程式存入公式存贮器中,:先按按解答键“SOLVE”a输入2、c输入5,再按解答键“SOLVE”计算器就会显示:b=3.5。此项功能被称为自动解答功能。同时它也是非常实用的,在实际工作中通常要有一个经常使用的小公式,可借助它来完成。4800使用的程序语言可以算做简单的BASIC语言,有的命令如GOTO(转移到)、PAUSE(暂停)就与BASIC语言的一模一样。现在4800的程序语言来说说。其主要命令有:
1、=>??条件转移成立符号,其用法相当于BASIC中的IF??THEN(假设语句相当于假如??然后,IF相当于条件??THEN相当于结果)语句
2、≠>??条件转移不成立符号,其用法相当于BASIC中的IF??ELSE语句通常二者连用,相当于BASIC中的IF??THEN??ELSE语句(它的英语形式一般为ifa>bthenc>delseifb>athe??)
3、_??条件转移结束符号,与=>和≠>配合使用,放在条件语句最后面。
4、LbI??标记命令。用于将一段语句作转换标记。后可接字母、数字、符号,但不能超过两个字节,如不能用≥10的数字作行标,否则会出现出错信息。
5、Goto??(条件)转移命令。前面可加条件语句,与BASIC中的GOTO作用相同。通常与LbI一起用,如果所转移的行号无效,则会显示:GOERROR(详见说明书)出错信息
6、Dsz??减量循环命令。可减少未知数的数量。
7、Isz??增量循环命令。
8、Pause??暂停命令。后可接0~9之间的整数n,可使某一数据显示n/2秒钟,然后继续运行下面的程序。它被认为是一个语句。
9、Fixm??变量锁定命令。该命令能使其所有变量值(A~Z)均当成定数处理。当程序运行时,将不需要辩颂输入变数(“{}”内的变数除外),而是将存贮器中原有的数值来完成计算。
10、{}??变量输入命令。只程序在循环使用时经常发生改变的数字,如里程、和宽度。它的输入方式可以使很多种如{AB}{A,B}{AB}都可以。注意“{”和“}”必需成对输入。否则会出现SynERROR(详见说明书)出错信息。
11、=、≠、>、<、≤、≥??条件运算关系算子,常与Goto命令构成条件转换语句。
12、Prog??在正常情况是下打开程序的快捷键。在编程过程中是运行子程序命令,后接子程序名(一定要加引号,且要注意空格,否则会出现SynERROR(详见说明书)的出错信息。
13、↓??换行,只保留计算过程不显示计算结果。当不想对其换行时也可用:代替。
14、_??数据显示命令。该命令输入后会自动换行。保留计算过程并显示计算结果。有一条总原则即:①学会运用程序的语言,尽可能使程序变得简明扼要;我们编写程序应该尽可能地使程序变得简明扼要,能省略的要一定省略。烦琐的语句过多的字节只能使计算器的运算速度变慢没有任何好处,而且相当站用内存。学会节省字节和使用符号是相当重要的。尤其要灵活运用计算器语句因为它会使你更多的节省字节达到预期效果。比如下程序就灵活运用了Dsz(减量循环命令)。比如使其能输入10个数值,并计算10个数值的平均值。一般程序求10个数字的平均值需要有11个数字的提示符号。但学会灵活运用了Dsz(减量循环命令)那么只要有三个就可以了,这样就大大节省了字节的占用。例程序如下:
A=10
C=0
Lbi1
{B}
C=B+C
DszA
Goto1
C÷10
但要注意的是:如果你是初学者或你对程序的编程不熟练,首先一定要先按照你的思路把程序步骤一步一步的列好在确定它能正确的计算后在想办法对其进行精简修改,否则只会使程序出现过多的错误;②尽可能使程序所包含的子程序减少;子程序过多就会造成程序结构松散,有的计算器主程序需要三个或四子程序,过多的子程序只会引起程序之间紊乱、混淆。子程序过多对在使用时查找也比较麻烦。而且子程序过多如果其中某个环节出现错误很难发现其错误所在,在编写程序时要尽量的少编写子程序,即使要编写子程序时也要注意尤其在容易出错的地方要多加注意。有弊就有利如果你对子程序了解得多了那么可以几个主程序合用一个之程序也到到了要求的减少程序的字节使程序更简化。例程序如下:
CXCD
Lbi1Lbi1
Prog”V”Prog”V”
B=L-(K-S)_B=L+(K-S)_
Goto1Goto1
V
Y=√A2B2+B2X2÷A
③尽量少用或不使用扩充变数存贮器,如A[1]、A[2]等:使用扩充存贮器是一个利少弊多的做法。每扩充一个存贮器就要减少10个字节的容量,而每个扩充存贮器至少要占四个字节,比一个A~Z变量净增三个。有时你会觉得变量存贮器不够用。其实不尽然,一般程序变量数很少会超过26个,只是你不懂得去使用。一般来说,两个相对独立的程序步骤之间根本不需要考虑变量重复问题。针对某一个程序,只要不是固定变量({}内的变量),也就是那些通过计算出来的用于下一步计算的数值。我们就可以通过重复赋值来得到某些计算量。反正在下一轮循环中该量是变化的。明白了各种命令的含义和注意事项就可以编程了。举例有公式如下:
CX程序名称
Lbl0↓起始标记命令语句
QMNFJ↓数据输入语句(指公式循环运算时的不变量)
{KDE}↓数据输入语句(指公式循环运算时变量)
S=K—Q:G=F+J↓公式运算命令
X=M+ScosF↓公式运算命令
Y=M+SsinF↓公式运算命令
Prog”j”↓运行子程序命令
Goto0↓循环运算语句
J子程序名称
H=X+DcosG_公式运算、数据显示语
I=Y+DsinG_公式运算、数据显示语
T=X—EcosG_公式运算、数据显示语
U=Y—EsinG_公式运算、数据显示语
最后计算器状态设定语句是大家最容易忽视的。如果将单位进行预设那么计算器就会默认其使用单位在进行下一单位换算时要一定要进行单位转换,否者会使计算结果错误。在显示屏幕的左下角可以清楚地发现小提示符号:如D代表度为现在的缺省单位、R代表弧度为现在的缺省单位、G代表梯度为现在的缺省单位。
❸ 卡西欧5800测量程序
可以登陆亦文轩文具网免费下载测量程序
Fx-5800价格和fx-4850相当,但程序不能共享,Fx-5800的编程语言更接近BASIC程序语言。
2、5800变量输入语句改为?,赋值语句改为—>。程序中和1850一样,除可以使用26个字母变量A~Z存储数据和独立于字母变量存储器的额外变量存储器Z[1],Z[2],Z[3],Z[4]……外,另外可以使用统计串行存储器List X,List Y,List Freq。
3、程序命令由4850的16个增加到了34个,取消了⊿、≠=>、{}命令,使得由⊿、≠=>、{}等重要程序命令构成的fx-4850程序无法在5800上运行。
同时,5800的条件语句修改为更易于使用的If~Then~Else~IfEnd形式,新增For~To~Step~Next循环、条件循环Do~LpWhile与While~WhileEnd语句。
4、5800增加了数据通讯功能,使用SB-62数据线连接好两台机器的3Pin通讯口可方便地传输程序与数据,避免了4850只能以手工输入的方式录入程序,容易出现程序输入错误的弊端。
5、5800有矩阵计算功能,可以编写严密平差程序时组成与解算法方程,能够满足测量专业测量平差编程的计算要求。同时字母变量除了可以输入26个大写英文字母外,还能用小写英文字母、希腊字母。
现在购买的可以送大礼包,
FX-5800P计算器大礼包说明:
1.FX-5800P计算器
2.SB-62(与fx-5800配套进口的数据线)
3.<<casioFX-4800P/4850P与FX-5800P编程计算器功能比较与程序转换>>覃辉编着 同济大学出版社(与书配套程序)全路段主线坐标正反算(正交/斜交)
匝道全段坐标正反算(正交/斜交) 全路段中边桩高程(带超高,加宽)
有电子版的范例,初学者使用简单,快捷.让你短时间成为一个熟练的测量者
4.FX-5800P与FX-4800P/FX-4850P语言的对比及特点说明