CASIO5800计算器测量计算程序
CASIO 5800计算器测量计算程序
来自: ritsing(祥瑞之士) 2009-08-17 14:51:21
简要介绍：
1. 新版程序把线元法和交点法已经集成在一个模块中了，用户只需修改JD程序和ZA程序中的数据部分即可,其余不需作任何的改动。
2. 因为每条路高程计算不尽相同，且比较复杂，现在可利用PC机EXCEL计算好打印成表格带到工地上使用，所以本版程序未对线路高程序进行专门的编程计算，而是利用统计计算模式中来输入桩号（第一列X）及左、右高程（第二、三列Y，Freq），这种输入数据的方式最为直观，易发现错误，也易修改，输入完毕后运行S程序对数据按桩号进行排序，在程序中通过调用GG 程序来进行内插计算，SG=-1得左标高，SG=1得右标高（若SG输入0,则可进行一般的线性内插计算）。
3. 在JD程序和XY程序中，先将一个计算单元的数据置入矩阵F中（1行8列或1行9列），这样程序可读性极好。
4．相比原CASIO4850程序操作习惯，作了一点小小的改动，测站坐标存在Z[10]，N中，X 坐标原存在M中容易被误操作修改，而设计标高存在M中，这样易于修改，因为CASIO5800没有IN，OUT功能，很不方便。
4. 程序利用Z[2]变量值来判断是采用交点法还是线元法模型计算，Z[2]＝0为线元法，否则为交点法。
一、PQX程序：计算中边桩坐标及近似的桩号反算，在运行模式直接调用。
①Z[10]→S:”XO”?S:S→Z[10]:”YO”?N:Prog “AU”
②L bl 2:?L:Prog “Z”:Prog “E”:1n→O:90→S
③Lbl 4:”JJ”?S:”YC”?O:SO=0 =>Goto 2‘原来lbl 后没有标号４的。
④O=-1 =>Goto 6
⑤“X,Y”:R+OCos(Z+S)→X▲U+OSin(Z+S)→Y▲Prog “D”:Goto 4
⑥Lbl 6:Z[7]→X:Z[8]→Y:”XF”?X:”YF”?Y:XY=0 =>Goto 4
⑦
X→Z[7]:Y→Z[8]:Pol(X-R,Y-U+1p):Z+S-J→J:”YC,DL,L”:ICos(J)→O▲ISin(J)→I▲L+I▲Goto 6二、P程序：在程序中提供一个自由运算的模式。
①Lbl 1:”TMP”?I:If I≠0:Then “RST”:I▲Goto 1:IfEnd
二、LYC程序：进行桩号反算及边坡放样，在运行模式直接调用。
①Prog “AU”
②Lbl 1:Z[7]→X: Z[8]→Y: Z[6]→S: ”XF”?X :X→Z[7]:”YF”?Y:Y→Z[8]: ”ZF”?S: S→Z[6]
③Lbl 2:Prog “Z”:Y=U =>Y+1p→Y
④Pol(X-R,Y-U):J-Z→J:Isin(J)→O:Icos(J)→I
⑤If Abs(I)≤0.1:Then Prog “E”:”L,YC”:L+I→L▲O▲Goto 3:IfEnd
⑥If Z[9]≠0:Then Pol(Z[9]-SO,I):πJZ[9]÷180→I:IfEnd
⑦”DL”:I▲L+I→L:Goto 2
⑧Lbl 3: Z[6]→S:If S=0:Then Goto 1:IfEnd
⑧M→Z
⑨Lbl 4:”SG”?Z:Z→M:If Abs(Z)=1: Then Prog “GG”:Y→Z:If X=1:Then
X→Z:IfEnd:Z→M:IfEnd
⑾If Z=0:Then Z[11]→C:Z[12]→D: Z[13]→E:
Z[14]→F:”LA”?C:C→Z[11]: ”HA”?D:D→Z[12]: ”LB”?E:E→Z[13]: ”HB”?F:F→Z[14]:D+(E-C)-1(F -D)(L-C)→Z:Z→M:IfEnd
⑿Lbl 5:”SG”:Z:”TW”:Z-S→C▲:Z[3]→P:
Z[4]→Q: :Z[5]→T:”YC0”?P:P→Z[3]: :”HC0”?Q:Q→Z[4] :”M”?T:T→Z[5]:O÷Abs(O)→I:”BL”:I(P+ TC(C+Q)÷Abs(C))→U▲”DB”:IU-IO→J▲
Ans→I:Prog “P”:Goto 1
四、I程序：通过手工方式输要素
①Z[2]=0 =>Goto 2
②
Z[1]→R:Z[2]→U:”JL”?K:”JX”?G:”JY”?H:”JA”?V:”JJ”?W:”R”?A:”LS”?B:”L1”?R:”L2”?U:R→Z[1]:
U→Z[2]:ReTurn
③Lbl 2:”L0”?K:”X0”?G:”Y0”?H:”A0”?V”:”L1”?F:”L-0 Z=-1 Y=1”?W:W=0 =>ReTurn
④”R0”?A:”R1”?B
五、D程序：根据测站点的坐标及放样点的坐标计算水平距离及方位角
①Y=N =>Y+1n→Y
②Pol(X-Z[10],Y-N):J<0 =>J+360→J
③”A,D”:J→DMS▲I▲
六、E程序：桩号出界判断
①Z[2]=0 =>Goto 2
②If L>Z[2]: Then “>L2”:L▲IfEnd
③If L ④Goto 3 ⑤Lbl 2:If L ⑥If L>F:Then “>L1”:L-F▲IfEnd ⑦Lbl 3 七、GG程序：用统计数据中桩号，左右高程数据进行内插计算。 ①FreqOff : n→C:FreqOn:If L ②If L>maxX: Then “L>maxX”:C-1→I:Goto 8:IfEnd ③For 1→I To C-1 ④If L≤List X[I+1]: Then Break:IfEnd:Next ⑤Lbl 8 : (L-List X)÷(List X[I+1]- List X)→J : List Y+J(List Y[I+1]-List Y)→X : List Freq +J(List Freq [I+1]-List Freq )→Y 八、S程序:对统计数据列表中数据按桩号进行排序。 ①FreqOff : n→C:FreqOn“WAIT…n=”:Locate 10,1,C ②If C<2 Then Return:IfEnd ③For 1→D To C: D→I: ④For D+1→E To C: ⑤If List X[E] ⑥If I≠D: Then List X[D]→F:List X→List X[D]:F→List X: List Y[D]→F:List Y→List Y[D]:F→List Y: List Freq[D]→F:List Freq→List Freq [D]:F→List Freq :IfEnd:Next ⑦Locate 1,2,”minX:”Locate 6,2,minX ⑧Locate 1,3,”minX:”Locate 6,3,maxX 九、X程序:计算缓和曲线坐标增量xx,yy ①AB→U:U÷O→Z[9]:0.5O2÷U→R:O-0.1OR2→I:6-1OR(2-7-1R2)→J:Rr→R 十、JS程序:内插计算的接口程序，在运行模式直接调用。 ①Prog “S” ②Lbl 1:”L=”?L:L=0 =>Return ③Prog “GG”:”X,Y”:X▲Y▲Goto 1 十一、GZW程序：构造物坐标放样计算，在运行模式直接调用。 ①Z[10]→S:”XO”?S:S→Z[10]:”YO”?N：0→T ②Lbl 1;”X0”?R:”Y0”?U:”A0”?Z:IF Z=-1 :Then “A0,DD”:J→Z▲I▲IfEnd ③If Z=0:Then R→X:U→Y:Prog “D”:Goto 1:IfEnd '在④后增加一句，解决了程序再次运行时，交角的初值被置为测站点的Ｘ坐标的BUG. ④O-Z→S:”J0”?S:Z+S→O:”0-XX,YY→X,Y”:”1-X,Y→XX,YY”?T:If T≠0: Then Goto 3:IfEnd ⑤Lbl 2:”XX”?P:”YY”?Q:If PQ=0:Then Goto 1:IfEnd ⑥”X,Y”:R+Pcos(Z)+Qcos(O)→X▲U+Psin(Z)+Qsin(O)→Y▲Prog “D”:Goto 2 ⑦Lbl 3:”XF”?X:”YF”?Y:If XY=0: Then Goto 1:IfEnd ⑧”XX,YY”:((X-R)sin(O)-(Y-U)cos(O))÷sin(S)→P▲((Y-U)cos(Z)-(X-R)sin(Z))÷s in(S)→Q▲ ⑨Goto 3 十二、Y程序：线元法计算匝道坐标 ①L-K→C:If L>F:Then F-K→C:IfEnd ②If W=0 or C<0:Then G+Ccos(V)→R:H+Csin(V)→U:0→Z[9]:Goto 8:IfEnd ③W÷Abs(W)→W:If A=B:Then 0→B:IfEnd ④If B=0:Then (A-1C)r→C:Asin(C)→I:A(1-cos(C))→J:A→Z[9]:Goto 7:IfEnd ⑤A-B→S:B(F-K)÷Abs(S)→R:AR→U:S÷Abs(S)→S:0.5R2÷U→D:R+SC→T: ⑥ 0.5T2÷U→E:U÷T→Z[9]:T(1-0.1E2+E22÷216-E^(6)÷9360)-R(1-0.1D2+D22÷216-D^(6)÷9360)→I: ⑦3-1(TE(1-E2÷14+E22÷440-E^(6) ÷25200)-RD(1-D2÷14+D22÷440-D^(6) ÷25200))→J:Pol(1n+Abs(I),Abs(J):Rec(I,Abs(J-Dr):Abs(E-D)r→C ⑧Lbl 7:G+Icos(V)-WJsin(V)→R:H+Isin(V)+WJcos(V) →U:V+WC→Z ⑨Lbl 8:If L>F:Then R+Rec(L-F,Z) →R:U+J→U:0→Z[9]:IfEnd 十三、Z程序：交点法计算中桩坐标 ①If Z[2]=0:Then Prog “Y”:Return:IfEnd ②B2÷A÷24→P:0.1B(5-P÷A) →Q:Q+(A+P)tan(0.5Abs(W)) →T:K-T→C:C+B→D:D+πAAbs(W) ÷180→F:F-B→E ③W÷Abs(W)→S:0→Z[9]:If L≤C:Then L-K→O:V→Z:Goto 2:IfEnd ④If L≥F:Then L-F+T→O:V+W→Z:Goto 2:IfEnd ⑤If L≥E:Then F-L→O:Prog ”X”:V+W→O:O-SR→Z:G+(T-I)cos(O)-SJsin(O)→R:H+(T-I)sin(O)+Sjcos(O) →U:Goto 3:IfEnd ⑥If L>D:Then ((L-D+0.5B)÷A)r→O:Q+Asin(O)→I:P+A(1-cos(O)) →J:A→Z[9]:V+SO→Z:Goto 4:IfEnd ⑦L-C→O:Prog “X”:V+SR→Z ⑧Lbl 4:G+(I-T)cos(V)-Sjsin(V)→R:H+(I-T)sin(V)+Sjcos(V)→U:Goto 3 ⑨Lbl 2:G+Ocos(Z)→R:H+Osin(Z)→U ⑩Lbl 3 十四、AU程序: 注：L0-输测段桩号近似值，”AU”子程序根据桩号近似值自动调用曲线要素（包括线元法和交点法要素），Z[2]=0则调用线元法数据，否则为交点法数据 （L0=0-默认为原曲线要素L0=-1-手工输入曲线要素） ①Cls:” L0= 0-Conti.”:” L0=-1-Input”:If Z[2]=0:Then Locate 13,2,”(XY)”:Else Locate 13,2,”(JD)”:IfEnd ②Z[2]→S:”0－XY E.－JD”?S:S→Z[2]:”L0”?L:If L=0:Then ReTurn:IfEnd ③If L=-1:Then Prog “I”:ReTurn:IfEnd ④If Z[2]=0:Then Prog “ZA”:Else Prog “JD”:IfEnd ⑤Mat F[1,1]→K: Mat F[1,2]→G: Mat F[1,3]→H: Mat F[1,4]→V: Mat F[1,5]→W: Mat F[1,6]→A: Mat F[1,7]→B: If Z[2]=0:Then Mat F[1,8]→F:Else Mat F[1,8]→Z[11]: Mat F[1,9]→Z[12]:IfEnd 十五、JD程序：交点法矩阵每一行数据依次为交点桩号，交点X坐标,交点Y坐标,起始边方位角，偏角，圆曲线半径,缓和曲线长度,计算单元起点，计算单元终点 ①If L＜24900: Then “L＜minX”:L▲Stop:IfEnd ②If L＞30801.27: Then “L＞maxX”:L▲Stop:IfEnd ③IF L≤26227.359:Then [[25676.236, 142225.377,504270.949,6°24°59.6°,-70°50°10.6°,770,300.007,24900,26227.359]]→Mat F:Return:IfEnd ④IF L≤27318.276:Then [[27026.458, 142873.016,502918.028,295°34°49.°,-15°31°18.5°,1500,180.003,26227.359,27318.276]]→M at F: Return:IfEnd ⑤IF L≤28522.182:Then [[28148.818, 143069.516,501810.234,280°03°30.5°,41°45°02.1°,780,206.532,27318.276,28522.182]]→Ma t F: Return:IfEnd ⑥IF L≤29246.112:Then [[28895.742, 143666,501341,321°48°32.6°,-22°33°08.8°,1250,215.74,28538.355,29246.112]]→Mat F: Return:IfEnd ⑦IF L≤30801.27:Then [[30431.525, 144420,499995,299°15°23.8°,49°29°52.7°,720,160.598,29246.112,30801.27]]→Mat F: Return:IfEnd 十六、ZA程序 注2：线元法矩阵每一行数据依次为起点桩号，起点X坐标，起点Y坐标，起点方位角，左右转标志，起点曲率半径，终点曲率半径，终点桩号 ①If L＜0: Then “L＜minX”:L▲Stop:IfEnd ②If L＞1479.85: Then “L＞maxX”:L▲Stop:IfEnd ③If L＞1000: Then Goto 2:IfEnd ④If L＞553.49: Then “L＞maxX”:L▲Stop:IfEnd ⑤IF L≤82.699:Then [[0,142872.513,502902.111,290°03°00°,-1,1509.5,1509.5,82.699]]→Mat F:Return:IfEnd ⑥IF L≤111.519:Then [[82.699,142898.724,502823.687,286°54°40°,-1,1509.5,1T,111.519]]→Mat F:Return:IfEnd ⑦IF L≤155.022:Then [[111.519,142906.932,502796.061,286°21°51°,-1,1T,1000,155.022]]→Mat F:Return:IfEnd ⑧IF L≤269.54:Then [[155.022,142918.885,502754.233,285°07°04°,-1,1000,1000,269.54]]→Mat F:Return:IfEnd ⑨IF L≤359.475:Then [[269.54,142942.363,502642.211,278°33°23°,-1,1000,1T,359.475]]→Mat F:Return:IfEnd ⑩IF L≤434.421:Then [[359.475,142953.072,502552.924,275°58°48°,1,1T,1200,434.421]]→Mat F:Return:IfEnd ⑾IF L≤463.597:Then [[434.421,142961.655,502478.474,277°46°09°,1,1200,1200,463.597]]→Mat F:Return:IfEnd ⑿IF L≤501.14:Then [[463.597,142965.95,502449.617,279°09°44°,1,1200,1T,501.14]]→Mat F:Return:IfEnd ⒀IF L≤553.488:Then [[501.14,142972.314,502412.618,280°03°31°,0,1T,1T,553.488]]→Mat F:Return:IfEnd ⒁Lbl 2:IF L≤1169.959:Then [[1000,142957.323,502388.342,102°55°07°,0,1T,1T,1169.959]]→Mat F:Return:IfEnd ⒂IF L≤1215.026:Then [[1169.959,142919.325,502554,102°55°07°,-1,1T,1500,1215.026]]→Mat F:Return:IfEnd ⒃IF L≤1261.836:Then [[1215.026,142909.471,502597.975,102°03°28°,-1,1500,1500,1261.836]]→Mat F:Return:IfEnd ⒄IF L≤1283.436:Then [[1261.836,142900.408,502643.898,100°16°11°,-1,1500,1T,1283.436]]→Mat F:Return:IfEnd ⒅IF L≤1307.44:Then [[1283.436,142896.66,502665.17,99°51°26°,-1,1T,700,1307.44]]→Mat F:Return:IfEnd ⒆IF L≤1346.219:Then [[1307.44,142892.686,502688.842,98°52°30°,-1,700,700,1346.219]]→Mat F:Return:IfEnd ⒇IF L≤1363.61:Then [[1346.219,142887.767,502727.303,95°42°03°,-1,700,1T,1363.61]]→Mat F:Return:IfEnd (21)IF L≤1387.958:Then [[1363.61,142886.183,502744.622,94°59°20°,1,1T,500,1387.958]]→Mat F:Return:IfEnd (22)IF L≤1451.374:Then [[1387.958,142883.869,502768.858,96°23°02°,1,500,500,1451.374]]→Mat F:R eturn:IfEnd (23)IF L≤1477.462:Then [[1451.374,142872.845,502831.266,103°39°03°,1,500,1490.5,1477.462]]→Mat F:Return:IfEnd (24)IF L≤1479.848:Then [[1477.462,142866.175,502856.486,105°38°50°,1,1490.5,1490.5,1479.848]]→Mat F:Return:IfEnd 辽宁省沈阳市第十五中学2013年高中数学论文图形计算器应用能力测试活动学生使用卡西欧图形计算器画“快乐柠檬” 研究目的： 通过计算函数及其定义域，运用图形计算器作图，绘制图形。进而熟悉计算器功能，进一步学习了解函数构造及定义域、值域的计算。 研究过程： 1、确定奶茶品牌“快乐柠檬”的商标图案，在纸上完成其大致构图。 2、确定所需的函数类型并估算函数解析式与定义域，通过实践微调函数解析式及定义域并确定。 3、进行视窗调整与细节修改。 4、完成图形。 具体步骤： 第一步：进入静态函数图像。 1、按O打开图形计算器。看到如下的界面： 2、通过B!N$这四个方向键，选中“图形”（即下图选中部分）。 按l 进入。 第二步：输入所需函数。 【1】画出快乐柠檬头像： 1）头顶 【颜色：黄，线型：粗】 222,[3,3]9y x =-- z2N9$fs-2,L+-3,3L-l 2）下巴 【颜色：黄，线型：粗】 222,[3,3]9 y x =-+- -z2N9$fs+2,L+-3,3L-l 3）刘海 【颜色：绿色，线型：默认】 210.4,[ 1.5,1.5]9y x =+- z1N9$fs+0.4,L+-1.5,1.5L-l 4）左脸庞 【颜色：蓝色，线型：默认】 220.2 1.8,[ 1.4,0.7]9x y y =+-- erz2N9$fs+0.2f-1.8,L+-1.4,0.7L-l 5）右脸庞 【颜色：蓝色，线型：默认】 []220.2 1.8, 1.4,0.79x y y =--+- -z2N9$fs-0.2f+1.8,L+-1.4,0.7L-l 6）左眼（1） 【颜色：黑色，线型：默认】 苏州市职业大学 课程设计说明书 名称___模拟简单计算器_______________ 2011 年12月26 日至2011年12月31 日共1 周 院系__ 计算机工程系 班级10嵌入式 姓名 系主任____李金祥 教研室主任刘文芝 指导教师徐丽华、刘文芝 目录 一.课程设计的目的与要求 (2) 1．课程设计的目的 (2) 2．课程设计的要求 (2) 二.题目说明 (2) 2.1开发背景 (3) 2.2 开发工具介绍 (4) 2.3 小组成员分工 (4) 三.硬件方案 (5) 3.1硬件设计 (5) 3.2电路原理图 (7) 四.软件设计 (8) 4.1 模块划分 (8) 4.2 模块结构图 (9) 4.3 液晶显示模块 (9) 4. 4 定时器模块 (6) 五.运行结果分析与系统改进 (10) 六.遇到的问题和解决方法 (11) 七.课程设计总结 (11) 八.参考文献 (11) 一．课程设计的目的与要求 1．课程设计的目的 《单片机原理与应用》是一门专业技术基础课，是一门实践性很强的课，单片机课程设计要求将所学的理论知识通过实践加强理解和认识，提高学生们对单片机的认识，同时提高同学们的设计能力和实践动手能力。 同时《单片机原理与应用》也是一门应用性很强的专业课，其理论与实践技能是从事嵌入式专业技术工作的人员所不可少的。本次课程设计选择AW60实验板进行模拟应用设计与开发，要求学生掌握使用 C 语言进行单片机程序设计和调试的方法，提高综合运用所学的理论知识独立分析和解决问题的能力。同时也为了提高学生的学习能力，锻炼同学之间的合作能力。 2．课程设计的要求 在本课程设计过程中要求学生：重视课程设计环节，用严谨、科学和踏实的工作态度对待课程设计的每一项任务；按照课程设计的题目要求，独立地完成各项任务，不允许相互抄袭；按时到机房上机，并接受教师的检查。 认真编写课程设计报告。 课程设计可以由2～4名同学合作完成一个课题。全体成员应共同完成选题，确定设计思想，进行功能模块划分，然后由组长为各成员分配任务。 整个设计期间，组长负责协调工作。各小组成员明确自己的任务后，应独立完成设计、编码和调试。 课题设计完成后，小组成员要理解同组其他成员设计的源程序，熟练操作本组设计，各自完成课程设计说明书。 1、对系统进行功能需求分析； 2、设计合理的模块结构和系统框架； 3、编程简练，程序功能齐全，能正确运行； 4、说明书、流程图要清楚； 5、课题完成后必须按要求提交课程设计报告； 阅览室馆友我的图书馆 kaixin100 | | 分享 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 反算子程序SUB2 G-90→T (Y-V)cosT-(X-U)sin(T) →W Abs(W)→W:0→Z Lbl6：Prog "SUB1" T+QEW(C+WD) →L：(J-Y)cos（L）-(I-X)sin（L）→Z IF Abs（Z）<1E-6：Then0→Z:Prog "SUB1":(J-Y)÷sin（F）→Z:Else W+Z→W：Goto6:IfEnd 数据库子程序SUB0 Goto 1(线元可输入多条，分离式可在前多加一位，匝道一样。例：左幅为K129+500,右幅输线元参数里程为1129+500，其他不变，前面 1为任意数字，计算机便于区分) Lbl 1：IF S<线元终点里程：Then@@@→O(线元起点里程) ：@@@ →U(线元起点X坐标)：@@@→V(线元起点Y坐标)：@@@→G(线元起点计算方位角)：@@@→P(线元起点半径)：@@@→R(线元止点半径)：@@@→H(线元长度)：@@@→Q(线元左、右偏标志，左偏-1，右偏1，直线为0)：Return：IfEnd IF S<线元终点里程：Then@@@→O(线元起点里程) ：@@@ →U(线元起点X坐标)：@@@→V(线元起点Y坐标)：@@@→G线元(起点计算方位角)：@@@→P(线元起点半径)：@@@→R(线元止点半径)：@@@→H(线元长度)：@@@→Q(线元左、右偏标志，左偏-1，右偏1，直线为0)：Return：IfEnd 。。。。。。。。。。。。。。。。。。。。。。。。。。。 一程序功能 本程序由一个主程序(ZBJS)和3个子程——正算子程序(SUB1)、反 算子程序( SUB2) 、数据库子程序（SUB0）构成，可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线 元要素（起点坐标、起点里程、起点切线方位角、线元长度、起点曲 率半径、止点曲 率半径）及里程边距或坐标，对该曲线段范围内任意里程中边桩坐标 进行正反算。另 外也可以将本程序中核心算法部分的两个子程序移植到其它相关的 程序中，用于对曲 线任意里程中边桩坐标进行正反算。本程序也可以在CASIO fx-4500P计算器及CASIO fx-4850P计算器上运行。 二、使用说明 FX5800计算器测量程序集版 一、程序功能 主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本优化：1、优化程序语句、2、以复数形式输入变量及做数据库，取消原矩阵数据库;3、修改隧道超欠挖程序为通用形，不受圆心个数限制、4、新增测量资料表计算 二、源程序（绿色为程序名；蓝色为输入计算器内容）紫色为新版改动处（可以根据自己标段情况用相关主程序及子程序，再在0程序中汇总）0.汇总程序（1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1)；2、坐标反算程序（2ZD、A、B、AB、HX、QX、F、ZD、X1)；3、高程计算查阅程序（3GC、H、I、QX、S1、I1）；4、路基半幅标准宽度查阅程序（4GD、C、QX、G1）；5、路基边坡及开挖口放样程序（5BP、 A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）； 6、路基标准距离放样（6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)； 7、桥梁锥坡计算放样程序（7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1)； 8、极坐标计算程序（8JS、JS、DS）； 9、隧道超欠挖计算程序（A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。 程序名：0（数子0） ClrMat:ClrVar:12→DimZ：Norm 2:Do:＂(XY=1，ZD=2 ，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9)===>QING AN 1-9＂：Getkey→Z[3]:While Z[3]=35:Prog＂1XY＂:WhileEnd:While Z[3]=36:Prog＂2ZD＂：WhileEnd: While Z[3]=37:Prog＂3GC＂：WhileEnd: While Z[3]=21:Prog＂4GD＂：WhileEnd: While Z[3]=22:Prog＂5BP＂：WhileEnd: While Z[3]=23:Prog＂6FM＂：WhileEnd: While Z[3]=31:Prog＂7ZP＂：WhileEnd: While Z[3]=32:Prog＂8JS＂： j a v a编写的简单的计 算器程序 -CAL-FENGHAI-(2020YEAR-YICAI)_JINGBIAN 计算器 项目内容：编写一个Applet，模仿windows附件所带计算器的功能，可以帮助用户完成计算功能，具体如下图所示。 项目要求：使用图形的方式借助窗口、菜单、按钮等标准界面元素和鼠标操作，来帮助用户方便地向计算机系统发出命令，启动操作，并将系统运行的结果同样以图形的方式显示给用户，这样更加直观和生动； 1.Applet容器中组件的添加与设置，包括面板以及菜单的使用； 2.容器中组件的布局管理； 3.Java核心包中数组、数学计算类的使用； 4.异常的处理； 5.事件处理模型中的三类对象的使用： 1.Event-事件，用户对界面操作在java语言上的描述，以类的形式出现，例如键盘操作对应的事件类是KeyEvent。 2.Event Source-事件源，事件发生的场所，通常就是各个组件，例如按钮Button。 3.Event handler-事件处理者，接收事件对象并对其进行处理的对象。 6.程序中事件处理的流程： 1.计算流程的细化 参考代码： import .*; import .*; import .*; import import import public class Calculator implements ActionListener { #############"); dd(panel); panel1 = new JPanel(); panel2 = new JPanel(); (new BorderLayout()); 键入计算的第一个数字。\n"); ("2. 单击“+”执行加、“-”执行减、“*”执行乘或“/”执行除。\n"); ("3. 键入计算的下一个数字。\n"); ("4. 输入所有剩余的运算符和数字。\n"); ("5. 单击“=”。\n"); aboutCal = new JMenuItem(" 关于计算器(A)"); (this); M = (1.0/Re-1.0/Rs)/Ls; x=∫｛cos(Ta + L/Rs + 0.5*M *L*L)，0，L｝; y=∫｛sin(Ta +L/Rs + 0.5*M *L*L)，0，L｝; a(i)= Ta +L/Rs + 0.5*M *L*L Rs:缓和曲线起点半径 Re:缓和曲线止点半径 Rs，Re （NE坐标系下，右偏为正，左偏为负） Ta:缓和曲线起点的真北方位角 Ls:不完整缓和曲线长度。 此公式为缓和曲线在坐标系下任意位置的通用积分公式，能完全适应缓和曲线左偏、右偏、Rs >Re 、Rs CASIO fx-5800P计算器测量程序设计2.1版 一、程序功能 主要功能：采用线元法与交点法相结合计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本特点：1、建主程序合并原所有计算类型，在主程序中可选择操作类型。隧道欠超挖增加变量衬砌厚度，因有设计衬砌厚度根据石岩来定的。增加锥坡放样计算。 二、源程序 1.总主程序（1、坐标计算放样程序2、坐标反算程序；3、高程计算查阅程序；4、路基半幅标准宽度查阅程序；5、路基边坡及开挖口放样程序；6、路基标准距离放样；7、桥梁锥坡计算放样程序；8、极坐标计算程序；9、隧道超欠挖计算程序）运行后输入1~9数子则选择1至9的程序，返回时，在桩号输入-1,返回选择选择计算类型。输入-2,返回选择线路。坐标计算中输入-3,则显示本段曲线要素。 程序名：0ZCX LbI Q: 15→DimZ：Norm 2:1→A：＂A:XY=1，ZD=2 ，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9＂?A: A=1=>Goto 1:A=2=>Goto 2:A=3=>Goto 3:A=4=>Goto 4: A=5=>Goto 5:A=6=>Goto 6:A=7=>Goto 7:A=8=>Goto 8: A=9=>Goto 9 LbI 1:Prog ＂DX＂:LbI A:Prog＂QX＂:90→B: ＂PJ1＂?B:B→C: ＂PJ2＂?C:B→Z[1]:C→Z[8]:LbI B:1→F: ＂KM＂?Z:Z= -1=>Goto 0:Z=-2=>Goto A:Z=-3=>Goto X:Prog＂KM＂:?D:Porg＂THB＂:O→L: ＂L0＂?L:Z[2]+Z[1]-Z[8] →E:X+L cos(E) →X:Y+Lsin(E) →Y:Prog＂XY＂:Prog＂JS＂:Goto B LbI 2:2→F:90→Z[1]:Prog＂QX＂:LbI C: ＂KM＂?Z: Z=-1=>Goto 0:Z=-2=>Goto 2:Z=-3=>Goto X:Prog＂KM＂: ＂X O＂?X: ＂Y0＂?Y:Prog＂THB＂:Porg＂ZD＂:Goto C: LbI 3:Prog＂QX＂:0→B: ＂H-B＂?B:B→Z[9]:LbI D: ＂KM＂?Z: Z=-1=>Goto 0:Z=-2=>Goto 3:?D:Porg＂H＂:Fix 3: ＂H=＂:Lc oate 6,4,H-Z[9] ◢ ＂I=＂:Locate 6,4,I◢Goto D LbI 4:Prog＂QX＂:LbI E: ＂KM＂?Z:Z=-1=>Goto 0:Z=-2=>Goto 4:?D:Prog＂GD＂:Fix 3: ＂SJGD=＂:Locate7,4,L◢Goto E LbI 5:Prog＂QX＂:0.5→B:＂TH-GD＂?B:B→Z[15]:LbI F:2→F:90→Z[1]:＂KM＂?Z:Z=-1 =>Goto 0:Z=-2 =>Goto 5:Prog＂KM＂: ＂X0＂?X: ＂Y0＂?Y:0→M:”M0”?M: M→Z[4]:Prog＂3FBZ＂Fix 2:Z[3] →D:Abs（D）-S→O: ＂L0=＂:Locate 6,4,O◢Prog＂ZD＂: Z[5]→T:＂TW=＂:Lcoate 6,4,T◢Goto F: LbI 6:Prog＂DX＂:LbI G:Prog＂QX＂:LbI H:1→F:90→Z[1]: ＂K M＂?Z:Z=-1=>Goto 0:Z=-2=>Goto G:Prog＂KM＂:?D:Prog＂TH 简单计算器程序设计 2010-01-20 16:44 1、编写一个程序实现十进制加减乘除运算 2、在命令提示后输入算式，运算符号不超过四个 3、回车后进行计算并以十进制显示结果 ;能做带括号的运算，输入错误能报警 data segment msg1 db 'Please Input an Expression:',0AH,0DH,'$' msg2 db 'the result is:$' db '(' num db 200 dup (0) temp1 db 200 dup(0),13 temp dw 0 data ends stack segment db 200 dup (?) stack ends code segment assume cs:code,ds:data,ss:stack start: mov ax,data mov ds,ax lea dx,msg1 mov ah,9 int 21h call input again2: lea si,num again1: inc si cmp byte ptr[si],13 je outt cmp byte ptr[si],')' jne again1 call chasc1 call count push ax jmp again2 outt:pop bx mov ah,2 mov dl,10 int 21h mov dl,13 int 21h lea dx,msg2 mov ah,9 int 21h call chaou mov ah,8 int 21h mov ah,4ch int 21h ;************************************** input proc ;输入子程序能纠错 push ax push bx push cx push dx push si push di xor si,si xor bh,bh mov bl,0ffh xor cx,cx top: mov ah,8 int 21h cmp al,8 jne next1 cmp si,0 jne ne1 mov bl,0ffh jmp next6 ne1: mov ah,2 mov dl,8 int 21h mov dl,0 int 21h mov dl,8 int 21h dec si FX5800计算器公路测量常用程序集2.3 版 一、程序功能 主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本优化：1、优化程序语句、2、取消原线元法计算，化线元法为交点法。 3、高程计算修改, 4、附计算坐标及高程参数设计要素输入实例 二、源程序（绿色为程序名；蓝色为输入计算器内容）红色为网友调试后修改笔误。 0.总主程序（1、坐标计算放样程序2、坐标反算程序；3、高程计算查阅程序；4、路基半幅标准宽度查阅程序；5、路基边坡及开挖口放样程序；6、路基标准距离放样；7、桥梁锥坡计算放样程序；8、极坐标计算程序；9、隧道超欠挖计算程序）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。 程序名：0（数子0） ClrMat:ClrVar:12→DimZ：Norm 2:Do:＂(XY=1，ZD=2 ，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9)===>QING AN 1-9＂：Getkey→Z[3]:While Z[3]=35:Prog＂1XY”:WhileEnd:While Z[3]=36:Prog＂2ZD＂：WhileEnd: While Z[3]=37:Prog＂3GC＂：WhileEnd: While Z[3]=21:Prog＂4GD＂：WhileEnd: While Z[3]=22:Prog＂5BP＂：WhileEnd: While Z[3]=23:Prog＂6FM＂：WhileEnd: While Z[3]=31:Prog＂7ZP＂：WhileEnd: While Z[3]=32:Prog＂8JS＂：WhileEnd: While Z[3]=33:Prog＂9SD＂：WhileEnd:LpWhile Z[3]≠25:”XIE XIE SHI YONG”: 1.主程序：一般坐标计算及放样程序 程序名:1XY Prog ＂DX＂:Prog＂QX＂:90→A: ＂PJ1＂?A:A→B: ＂PJ2＂?B:A→Z [1]:B→Z[9]: Do:＂KM＂?Z:Z=-1=>Stop:Z=-2=>Break: Prog＂K＂: ? D: 0→L: ＂L0＂?L:L→Z[10]: Porg＂A＂:Z[2]+Z[1] →A :A-Z[9]→E:I+Dcos(A)+Z[10]cos(E→X:J+Dsin(A)+Z[10]sin(E→Y:Prog＂XY＂: Prog＂JS＂:LpWhile Z≠-1 2.主程序：由大概桩号及坐标反算桩号及距离 程序名:2ZD Prog＂QX＂:Do: ＂KM＂?Z:Z=-1=>Stop:Z=-2=>Break: Prog＂K＂: ＂XO＂?X: ＂Y0＂?Y: Porg＂B＂: Prog＂ZD＂:LpWhile Z≠-1 3.主程序：任意点高程计算及横坡 程序名:3GC P rog＂QX＂:0→B: ＂H-B＂?B: B→Z[9]: Do: ＂KM＂?Z:Z=-1=>Stop: Z=-2=>Break:?D:Prog＂H＂:Fix 3: ＂ H=＂: Locate 6,4,H-Z [9]：＂ I=＂:Locate 6,4,I：LpWhile Z≠-1 简单计算器 一、基本功能描述二进制、八进制、十进制及十六进制数的加、减、乘、除、乘方、取模等简单计算 科学计算函数，包括(反)正弦、(反)余弦、(反)正切、(反)余切、开方、指数等函数运行 以角度、弧度两种方式实现上述部分函数 具备历史计算的记忆功能 对不正确的表达式能指出其错误原因 二、流程图 图1 输入数据子函数流程图 图2 三、 设计步骤 打开Microsoft Visual C++ ,在文件中点击新建，在弹出框内选择MFC AppWizard[exe]工程，输入工程名Calculter 及其所在位置，点击确定，如图3所示。 N 输入数据子函数 图3 新建MFC AppWizard[exe]工程 将弹出MFC AppWizard-step 1对话框，选择基本对话框，点击完成，如图4所示。 图4 基本对话框 这样，MFC AppWizard就建立了一个基于对话窗口的程序框架，如图5所示。 图5 新建的对话框 四、界面设计 1、创建控件 在图5所示的Resoure View选项卡中打开Dialog资源组，双击IDD_CALCULATOR_DIALOG，在右边的窗口中显示出待编辑的对话框。开始摆放控件，包括编辑框和按钮的创建。按钮的创建以“1”为例进行介绍，其他按钮的创建可参照此进行操作。 1）在图5中Controls的“编辑框”按钮上单击鼠标左键，在对话框编辑窗口上合适的位置按下鼠标左键并拖动鼠标画出一个大小合适的编辑框。在编辑框上单击鼠标右键，在弹出的快捷莱单中选择属性选项，此时弹出Edit属性对话框，如图6所示，在该对话框中输入ID属性。 图6 Edit属性对话框 2）在图3中Controls的“Button”按钮上单击鼠标左键，在对话框上的合适的位置上按下鼠标左键并拖动鼠标画出一个大小合适的下压式按钮。在按钮上单击鼠标右键，在弹出的快捷菜单中选择 1．”XLZB”：坐标计算主程序 ↓（与预留的自由变量数有关！） ｛O｝∶O“1.ZX 2.BX”↓ Q=0↓ LbI 1↓ O≠1=>｛QG｝:Q”L”:G”XJJD”:△（显示“L”输入边桩宽度，均为正值，显示“XJJD”输入边桩测点与线路中线上点的连线与线路中线上点的切线的夹角，如右法线为90度，左法线为270度或者-90度，其余同理。） Prog”ZB”:X=X+Rec(Q,T+G):Y=Y+J: ”X=”：X ：Pause 0 :”Y=”：Y▲(X”X=”：Pause 0 : Y”Y=”：▲) ”T=”：T→DMS▲(T”T=”▲) Goto 1 (注释：括号内写法为Casio4800P计算器显示方式) 2．“ZB”:坐标计算子程序 ↓（与预留的自由变量数有关！） （与预留的自由变量数有关！） ｛K｝:↓ LbI 2↓ F=0： △（注释：方框内数字27[第七段]为断链的 段号；方框内数字39.903为断链值，短链输“+”，长链输“-”; 如遇断链，依此增加即可！） E= Z[W+3a]+Z[W]+F： K≥Z[W+3a] =>K≤E =>V=W－1：≠＞W=W+1: Goto 2△△↓ K－F：△（方框为断链点的后桩号，即去向桩号，如遇断链，依此增加即可！） S=K－Z[V+3a+1]:P=(Z[V+2a+1] －Z[V+a+1])÷Z[V+1]: I=P*S:C=Z[V+4a+1]:D=Z[V+a+1]: J=C+(I+2D)*S*90/π:L=1： X=Z[V+5a+1]+S*(CosC+CosJ+4∑（Cos (C+((L+0.5)I/B+2D)×(L+0.5)*90*S/B/π),L,0,(B-1)）+2∑（Cos (C+(L*I/B+2D)*L*90*S/B/π),L,1,(B-1)))/6/B: Y=Z[V+6a+1]+S*(SinC+SinJ+4∑（Sin (C+((L+0.5)I/B+2D)×(L+0.5)*90*S/B/π),L,0,(B-1)）+2∑（Sin (C+(L*I/B+2D)*L*90*S/B/π),L,1,(B-1)))/6/B: T=J: ３．“SJK.DAT”:数据库主程序 Mcl:Defm(20+7a):Z[21]=?:……Z[21+3a]=?:Z[21+4a]=?:Z[21+5a]=?:Z[ 21+6a]=?:Prog”SJK”:(输入程序时，Defm后须换成相应数据，a为曲线元段数) 请大家不要因为我的程序去买5800计算器了,建议买9860,我有时间了,就把这个程序改成9860 本程序比较复杂.测量原理不是很明白的朋友慎用 请大家经常关注程序B-H的更新 2009,5,10日修改见超高子程序B-H黄色部分,另超高数据库增加在超高缓和段输入超高为公路外侧超高说明 2009，5，8日正反算选择程序：ZS-FS 更改小错，详见紫色修改内容 2009,4,30日更改如下：把原来的４个子程序分解成５个子程序，解决了一个大的竖曲线不能包含几个超高变化段，另外程序内也有两处改变请看红色区域． 本程序经过综合考虑５８００的设计缺陷，计算速度较慢故只使用高斯四节点法为计算内核．支持多条线路正反算,中桩,边桩高程计算,超高计算,超高缓和计算,加宽计算,加宽缓和计算,边坡开口线计算,挡土墙坡脚线计算，考虑了中间绿化带的影响，适用与国家高速公路至乡村四级公路计算和放样，路基路面工程可以直接得出中边桩的设计三维坐标，去掉加宽和超高影响的计算困难，边坡和坡脚线计算可直接在边坡上提取坐标带入程序，经过所有设计因素的综合，得出更改边距并显示修改偏差后的坐标．反算速度明显提高,只需要3秒.程序无错，可放心输入，另本程序可以增加隧道超欠挖计算子程序,非常方便,因为每个隧道的断面数据不一样,所以在此没有明确写出,有需要的可以联系我.本人QQ76805071,只为交友. 计算器主程序：ZHU-CHENG-XU Lbi0:“1，ZS=FS，2ZS，3FS，4XY＝＞SG，5。。。。。。。”？U: U=1＝＞Prog”ZS-FS”:进入公路三维程序 U=2＝＞Porg”ZS”:进入坐标正算程序 U=3＝＞Porg”FS”:进入坐标反算程序 U=4＝＞Porg”XY ＝＞SG”:进入大地坐标转施工坐标程序 …………Goto0: 说明：计算器总的主程序，进入选择各种分支计算程序。1为公路三维计算，2为普通正算，3为普通反算，4为大地坐标转施工坐标。。。。。。。。选择错误重新选择。此程序可以不用输入，只为给大家一个思路,可以把计算器所有程序集中到一个主程序内管理. 公路三维部分 正反算选择程序：ZS-FS Deg: //设置角度模式 20→DimZ: //扩展变量 “1LZ＝＞XY，2XY＝＞LZ,3BIANPO-FY”？U：//正反算选择，正算选1，反算选2,坡口坡脚选3 If U=1: ThenProg”ZS-XH”:IfEnd://进入正算循环主程序 IfU=2:Then Prog”FS-XH”:IfEnd: //进入反算循环主程序 IfU=3:ThenProg”BP-FY”:IfEnd://进入边坡开挖主程序 正算循环主体程序ZS-XH “1PT-2SJ”？W：//普通计算和设计边距计算选择 “XL-XZ“？U：//选择线路1～N 简单的计算器模拟程序的设计和实现1.问题描述 对任意给定的正确四则运算表达式，程序计算其结果值并输出。程序无需查错功能，假定所输入的都是正确的四则运算表达式，并且表达式中运算分量均为无正负号整数，运算符为 +、-、*、/，表达式以字符 "=" 结束。程序应有操作提示、输入和输出，界面追求友好，最好是菜单式的界面。 2.设计说明 2.1简要的分析 根据要求，要先输入包含有+，-，*，/的运算符的表达式，然后经过计算得到正确的答案。从键盘中输入的是ASCII码，因此要将其转换为十进制的数据然后才能进行计算。如果输入混合表达式，要将中缀式先变化成后缀式，然后再进行计算。 2.2概要分析 2.2.1 定义的数据段 用于定义一些中间变量，并将显示在试验界面上，以及提示信息。data segment stri db 50 dup(0) exp db 30 dup(0) track db 30 dup(0) instr db 100 dup(0) msg0 db 'please input your formular:',0dh,0ah,'$' msg1 db 0dh,0ah,'wrong input','$' msg2 db 0dh,0ah,') and ( does not match','$' msg3 db 0dh,0ah,'div zero error','$' msg4 db 0dh,0ah,'sorry,minus data appears','$' msg5 db 0dh,0ah,'any key to continue,esc to exit','$' data ends CASIO 5800计算器测量计算程序 来自: ritsing(祥瑞之士) 2009-08-17 14:51:21 简要介绍： 1. 新版程序把线元法和交点法已经集成在一个模块中了，用户只需修改JD程序和ZA程序中的数据部分即可,其余不需作任何的改动。 2. 因为每条路高程计算不尽相同，且比较复杂，现在可利用PC机EXCEL计算好打印成表格带到工地上使用，所以本版程序未对线路高程序进行专门的编程计算，而是利用统计计算模式中来输入桩号（第一列X）及左、右高程（第二、三列Y，Freq），这种输入数据的方式最为直观，易发现错误，也易修改，输入完毕后运行S程序对数据按桩号进行排序，在程序中通过调用GG 程序来进行内插计算，SG=-1得左标高，SG=1得右标高（若SG输入0,则可进行一般的线性内插计算）。 3. 在JD程序和XY程序中，先将一个计算单元的数据置入矩阵F中（1行8列或1行9列），这样程序可读性极好。 4．相比原CASIO4850程序操作习惯，作了一点小小的改动，测站坐标存在Z[10]，N中，X 坐标原存在M中容易被误操作修改，而设计标高存在M中，这样易于修改，因为CASIO5800没有IN，OUT功能，很不方便。 4. 程序利用Z[2]变量值来判断是采用交点法还是线元法模型计算，Z[2]＝0为线元法，否则为交点法。 一、PQX程序：计算中边桩坐标及近似的桩号反算，在运行模式直接调用。 ①Z[10]→S:”XO”?S:S→Z[10]:”YO”?N:Prog “AU” ②Lbl 2:?L:Prog “Z”:Prog “E”:1n→O:90→S ③Lbl 4:”JJ”?S:”YC”?O:SO=0 =>Goto 2‘原来lbl 后没有标号４的。 ④O=-1 =>Goto 6 ⑤“X,Y”:R+OCos(Z+S)→X▲U+OSin(Z+S)→Y▲Prog “D”:Goto 4 ⑥Lbl 6:Z[7]→X:Z[8]→Y:”XF”?X:”YF”?Y:XY=0 =>Goto 4 ⑦ X→Z[7]:Y→Z[8]:Pol(X-R,Y-U+1p):Z+S-J→J:”YC,DL,L”:ICos(J)→O▲ISin(J)→I▲L+I▲Goto 6二、P程序：在程序中提供一个自由运算的模式。 ①Lbl 1:”TMP”?I:If I≠0:Then“RST”:I▲Goto 1:IfEnd 二、LYC程序：进行桩号反算及边坡放样，在运行模式直接调用。 ①Prog “AU” ②Lbl 1:Z[7]→X: Z[8]→Y: Z[6]→S: ”XF”?X :X→Z[7]:”YF”?Y:Y→Z[8]: ”ZF”?S: S→Z[6] ③Lbl 2:Prog “Z”:Y=U =>Y+1p→Y ④Pol(X-R,Y-U):J-Z→J:Isin(J)→O:Icos(J)→I ⑤If Abs(I)≤0.1:Then Prog “E”:”L,YC”:L+I→L▲O▲Goto 3:IfEnd ⑥If Z[9]≠0:Then Pol(Z[9]-SO,I):πJZ[9]÷180→I:IfEnd ⑦”DL”:I▲L+I→L:Goto 2 ⑧Lbl 3: Z[6]→S:If S=0:Then Goto 1:IfEnd ⑧M→Z ⑨Lbl 4:”SG”?Z:Z→M:If Abs(Z)=1: Then Prog “GG”:Y→Z:If X=1:Then 数据结构课程设计 题目名称：模拟计算器程序 计算机科学与技术学院 课程设计任务书 一、设计任务 设计一个模拟计算器的程序 二、设计要求 1、要求对包含加、减、乘、除、括号运算符及SQR和ABS函数的任意整型表达式进 行求解 2、程序基本功能要求实现完整，并有简单的验证。 3、设计报告要求格式规范，符合学校课程设计报告要求。 4、报告中流程图要求描述规范，算法设计清楚正确。 三、设计期限 2018年3月5日到2018年3月30日 前言 利用本学期所学的《数据结构》课程，运用相关知识，查阅相关资料，编写C语言程序，设计一个简单计算器，要求编写的简单计算器能够模拟windows系统的计算器，用户能够用键盘输入相关数据，要求对包含加、减、乘、除、括号运算符及SQR和ABS函数的任意整型表达式进行求解，并且在程序运行过程中能够正常的退出程序。 这个程序实际上就是对一个表达式进行计算。而一个算术表达式中包含各种运算符，每个运算符的等级可能会不同，这就成了本程序需要解决的一个主要的问题之一了。另外计算器中需要有各种数学函数，比如：abs sqrt sin cos tan等，如何对这些函数进行处理，也是本程序能成功的一个关键。还有一个问题就是如何处理操作符和操作数之间的关系也是一个要点。例如：1+2*(3-2/1)，经过怎么样的变换和处理能得出结果５。数据的输入这里应该要用字符，然后通过字符和整形之间的关系进行转换即可，这样处理的话，就方便很多了。 在计算器程序运行中，输入数据时如果遇到输入错误的情况，能够能过键盘上的退格键进行删除，并且重新输入正确的数据。在数据输入完成后，如果需要放弃本次计算操作，可以利用程序中设置好的按键进行清零，并为下一次运算作准备。 本课程设计主要解决的是传统计算器中，不能对表达式进行运算的问题，通过制作该计算器模拟程序，可以做到快速的求解表达式的值，并且能够判定用户输入的表达式是否合法。该模拟计算器的核心部分就在用户输入的中缀表达式的转化，程序中用到了“栈”的后进先出的基本性质。 目录 第1章需求分析‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 5 1.1系统设计流程图‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 5 1.2 主要功能表‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥‥ 6 工程测量中fx-5800P计算器基本程序 的编写及实际放线的应用 刘兵策刘杰 摘要在日常工程测量工作中，计算器是必不可少的工具。目前行业内用fx-5800P。 本文介绍测量工作中坐标正反算、大地转施工、施工转大地等常用程序的原理及编写，并 对其比较复杂的实际放线的灵活应用进行解析，为类似的测量工作提供借鉴。 关键词工程测量fx-5800P程序应用 1 引言 控制测量是施工的基础，为了便于施工，放线一般使用施工坐标系，坐标轴平行于建筑物主轴线。对于建筑物主轴线与坐标轴不平行的，为了方便放线，一般不再改变坐标系，用计算器程序进行计算，迅速判断需要定位的点。 利用fx-5800P计算器根据测出的坐标数据计算出与设计图纸上的差值，指挥棱镜进行移动，找到准确的设计位置。测量工作中主要用到坐标正反算，大地转施工，施工转大地等常用程序，下面介绍这几个程序的原理和编写，总结一些在实际工作中的应用。 2 Fx-5800计算器程序的原理与编写 2.1 大地坐标转换为施工坐标 大地坐标转换为施工坐标见图1。 Xp、Yp分别是P点在XOY坐标系中的纵横坐标，xp， yp分别是xo’y坐标系中的纵横坐标值，Xo，Yo分别是 xo’y坐标系的坐标原点o’在XOY坐标系中的纵、横坐 标值，Δα为两坐标系坐标纵轴的夹角。 将P点从XOY坐标系转换到xo’y坐标系中， 即大地转施工的公式如下：图1 大地坐标与施工坐标转换图 xp=（Yp-Yo）sinΔα+（Xp-Xo）cosΔα； yp=（Yp-Yo）cosΔα-（Xp-Xo）sinΔα； 用fx-5800P编制程序时，只要输入大地坐标的原点o’的坐标和要转换的点P点的大地坐标，即在坐标系XOY坐标系中的坐标，再用上述公式带入，输出P点的施工坐标。基本程序如下： 卡西欧计算器编程指导 在计算能力飞速发展的今天，各种计算工具应运而生代替了以往我们大量、繁琐的分析计算工作，简化了计算步骤节省了计算时间。在种类繁多的计算工具中适合测量工作的计算器也大有所在。比如有一款SHAPPC-E500计算器，它相当于是基于BASIC语言的微型电脑，功能也相当齐全能编写较复杂的程序、内存也相当大有32KB、64 KB、128 KB、256 KB、几种型号，同时具有输入输出通讯设备。但价格不菲，现在市场价格大约为2000元到3000元，个人经济承受能力有限。通过几年的实际测量工作我个人为认为真正适合测量人员较为专业的计算器应首推基于科学计算器具有简单程序语言的casio4x00计算器。它有很多优点：一、使用简单，最大的一个优点就是只要具有初中水平会运用数学公式对函数有一般的了解的人，能基本理解casio4x00的内装函数即可进行简单的编程。非常适合测量初学者和数学程序爱好者学习，也适合专业的测量人员的使用和能力提高。不像其它的专业一定要具有较高的专业技术水平才能进行电脑编程。二、成本低廉，价格在400元左右。三、携带方便，体积很小可随时放在口袋里随拿随用。casio系列较好的编程型号有casio4500（以下简称4500）、casio4800（以下简称4800），（好象近来还推出了一款casio4850）前者较内存小，只有1103个字节，能应付一些较为简单的公式计算和科学计算，但由于内存有限，对一些较复杂或子程序过多的程序就力不从心了，不能出色的完成测量任务。4800就比4500有较大的改进，4800内存达到的4500个字节，而且显示屏是4500的几倍大，能更准确的显示数据，内装函数字符一目了然。且具有简单的人机对话功能，出现了菜单子菜单。4800还在4500增加了啊佛加德罗 FX5800计算器测量程序集2.0 版 一、程序功能 主要功能：计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本特点：1、优化原所有主程序，所有参变量（如导线点置仪点坐标、正反算选择、偏角、线路选择等），全部在程序头次显示一次，以后运行不需输入。运行中也可以返回再次选择线路、可以直接以矩阵形式调出线路参数。 2、坐标计算考虑了线元法与交点法相结合，即是一条线路也可以一段用线元法，一段用交点法。参数置放矩阵中，输入和可读性极好。 3、新增隧道断面欠超挖值放样计算 4、高程程序中考虑了初次输入线路选择、计算面与设计面高差，输出中加入显示本桩号路基标准宽度。 二、源程序 1.主程序1：一般放样正反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离) 程序名:1ZD-XY Lb1 Q: Norm 2:14→DimZ：1→F：Prog＂DX＂: Lb1 X：Prog＂QX＂：90→B：＂PJ＂？B：B→Z[1]： Lb1 0: Norm 2 ：“KM”?Z：If Z=-1:Then Goto X:Else If Z=-2: Then 2→F :Goto 0: Else If Z=-3: Then Goto 9:IfEnd: Prog＂KM＂：If F=1:Then ?D:Else “X0”?X:“Y0”?Y: IfEnd: Prog＂THB＂:If F=1: Then Goto 1: Else Goto 2： Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢ ＂Ｙ＝＂：Locate 6,4,Ｙ◢ Ｐrog＂6JS”:Goto 0: Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢ ＂Ｄ＝＂：Locate 6,4,Ｄ◢ Ｇoto 0： Lbl 9:Mat F◢ Ｇoto Q ２．主程序２：高程、横坡、宽度程序(计算设计任意点高程、横坡及路基设计标准宽度) 程序名：2GC 14→DimZ：LbI 0:Norm 2: Prog＂QX＂：0→B:”H-B:”?B:B→Z[9]: LbI H: Norm 2: “KM”?Z:Z=-1=> Goto 0:?D:Prog”H”: Fix 3:”H=”:Loc ate 6,4,H◢ “I=”: Locate 6,4,I◢ Prog＂GD＂：“SJLG=”: Locate 6,4,L◢ Goto H高中数学论 图形计算器 使用卡西欧图形计算器画“快乐柠檬”
模拟简单计算器实训
5800计算器程序下载
Fx5800计算器公路测量程序设计
java编写的简单的计算器程序
卡西欧5800计算器坐标正反算程序
CASIO fx-5800P计算器测量程序设计2.1版
简单计算器程序设计
计算器编程(修改版5800)
简单计算器可视化程序编程
5800计算器程序辛普森公式程序(通用)
5800计算器公路三维全能程序.(丢掉图纸轻松测量)(棋走四方超牛)!
简单的计算器模拟程序的设计和实现
【2019年整理】CASIO5800计算器测量计算程序
数据结构课程设计 模拟计算器程序
工程测量中fx5800P计算器基本程序
卡西欧计算器编程指导
5800计算器程序5