SIO+fx4500P计算器程序

1、 CASIO fx450OP 计算器 实用程序 肇庆市市政建设有限公司 2005年04月12日 本程序稿由于时间仓促及编者水平有限，缺点、错误以及疏漏与不足之处在所难免, 恳请大家批评指正。 程序步骤计算：1个字符的文件名算3步（每增加一个字符多算一步），行号算1步, 每个字符算1步。CASIO fx-4500P共有1103步。 ZQSZ 二OO五年四月 程序1角度判断 程序2角度换算 程序3角度换算 程序4角度换算 程序5角度换算 程序6视距测量 程序7坐标反算 程序8坐标方位角计算 程序9坐标正算 程序 10坐标方位角交会计算 程序 11垂距计算 程序 12视差法测距计算 程序 13剖面交

2、点计算 程序 14前方交绘计算 程序 15附合导线近似平差 程序 16渠道中线里程计算 程序 17多边形面积计算 程序 18闭合导线近似平差 程序 19直线交点坐标计算 程序20极坐标法放样计算 附录1: CASIO fx-4500P错误标示一览表 附录2:常用数学公式 附录3:常用测量公式 附录4:单一附合导线内业平差计算 附录5:勘察分院CAD制图试行规定 2. 2. 2. 3. 3. 5. 6. 6. 9. 13 14 15 16 1.7 1.7 20 21 11 CASIO fx4500P计算器实用程序 断29步 程序1角度判断 文件名 A L1 B 36 B=B 360厶 B 9二

3、Defm 2(A 业Lbl l:C二C+1:l:Prog 3:AC+8=D:C 工A= GotoB: Prog B:B=D B:D=B/A: Prog C C=0 L2 Lbl 2:C=C+1:AC+8=AC+8 DC:B=AC+8:Prog C Cm A二 Goto 2C= 8:D=0:E=0:F=0 L3 Lbl 3:C=C+1:B:D=D+B:E=E+Bcos AC:F=F+Bs in AC:AA+C =B:C 工 A +7= Goto 3 D BI:BGHI:E=E+B H F=F+G I D/ V (E2+F2 E=E/D :F=F /D L4 C=8:Lbl 4:C=C+1:B=A

4、A+Ccos AC+B EAA+C G=AA+C sin AC +G FAA+C Cm A+7= Goto4 Defm 0 说明：程序10用以单一附合导线的近似平差计算; 程序中：A=测站数、B=起算边坐标方位角、附合边坐标方位角、导线边边长、起 点纵坐标、1=观测角（左角）、终点横坐标、G=起点横坐标、H=终点纵坐标; 程序设计可以计算9个测站，大于是9站时只要计算器剩余有步骤数，程序会自动 扩充储存器增加储存变量； 算例如表：按Prog 10调用程序显示A ?输入测站数5,按EXE键、显示B ?输入 起算边的坐标方位角169.5359,按EXE键、显示I ?输入B点的观测角93.3642,

5、按EXE 键、显示I?输入C点的观测角179.56,依次输入各观测角,，按EXE键、显示B ?输 入附合边的坐标方位角250.06,按EXE键、显示导线的角度闭合差0.003699999(- 37), 按EXE键、显示平差后B点至C点的坐标方位角83.30484,按EXE键依次显示各导线 边平差后的坐标方位角,，按EXE键、显示B ?输入B点至C点的边长126.11,按EXE 键、显示B ?依次输入各导线边的边长,，按 EXE键、显示各边长之和508.96,按EXE 键、显示B ?输入起点纵坐标801.53,按EXE键、显示G?输入起点横坐标724.84,按 EXE键、显示H ?输入终点纵坐标

6、959.29,按EXE键、显示I ?输入终点横坐标1158.41, 按EXE键、显示纵坐标闭合差0.093449934,按EXE键、显示横坐标闭合差0.02045631, 按EXE键、显示导线全长相对闭合差 5320.360577(K=1/5320),按EXE键、显示C点纵 坐标815.754,按EXE键、显示C点横坐标850. 148，按EXE键依次显示D、E、F、G 点的纵横坐标。 点号 观测角 A B 93 36 42 C 179 56 00 D 180 0318 E 12128 36 F 45 06 48 G 坐标方位角 边长 169 53 59.0 83 30 48.0 126.11

7、 83 26 55.8 126.92 83 30 21.2 129.65 24 59 04.0 126.28 250 06 00.0 纵坐标X 横坐标Y 801.530 724.840 815.754 850.148 830.211 976.244 844.850 1105.067 959.290 1158.410 N=5 f p = 37 E D=508.96 fx=+0.093 fy= 0.020 f= V(fx2+fy2)K=1/( E d/f) k=1/5350 角度闭合差容许值：25術(图根导线65N) 导线全长相对闭合差：K 2= B=N P:B18 B=B 360aB .忘 V+

8、.1 U 10U . V+.1 U10Uv.fe V U 为:100U.弄V+.01 U 100U . V+.1 U 10U . V+.001 U 1000U 8= Defm 2(A 8dbl 1:C二C+1:B: Prog B:AC+8=B:E二 E +B:Cm A= Goto 1B=E A8 180(A 2:E=B/A: Prog C C=1:F=A9 E+A8 L2 B:Prog B:B=B+F 180:Prog A:D=B:A9=B:Prog C Lbl 2:C=C +1:F=A C +8 E:B=D:B=B+F 180:Prog A:AC+8=B:D=B:Prog C Cm A= L

9、3 Goto 2 C=8:E=0:F=0:D=0:Lbl 3:C=C+1:B:D=D+B:E=E+BcosAC:F=F +Bsin AC:AA+C=B:C 工 A+8= Goto 3 L4 DF D/ V (E2+F2 E=E/D:F=F/D L5 GH:C=8:Lbl 4:C=C+1:G=AA+CcosAC+G EAA+C H=AA +CsinA C+H FAA+C Cm a+8= Goto 4Defm 0 说明：程序13用以闭合导线近似平差计算; 程序中：A=测站数、B=连接角丫、观测角、闭合边坐标方位角、导线边边长、G= 控制点（闭合点）纵坐标、H=控制点（闭合点）横坐标; 程序设计计算

10、8站，大于8站时只要计算器内还有步骤数，程序会自动扩充储存器； 算例如表：按Prog 13调用程序显示A ?输入测站数，按EXE键、显示B?输入连 接角，按EXE键、显示B ?输入A点的观测角（左角），按EXE键、显示B ？,依次输入 B、C、D、E点的观测角后，按EXE键、显示角度闭合差，按EXE键，显示B?输入闭 合边坐标方位角，按EXE键、依次显示平差后的各个方向的坐标方位角,，按EXE键、 显示B ?输入A点至B点边长，按EXE键、显示B ?,依次输入各边的边长后，按 EXE 键、显示边长之和，按EXE键、显示纵坐标闭合差，按EXE键、显示横坐标闭合差，按 EXE键、显示全长相对闭合差

11、，按EXE键、显示G?输入控制点（闭合点）纵坐标，按EXE 键、显示H ?输入控制点（闭合点）横坐标，按EXE键、”依次显示各导线点平差后的 纵横坐标。 点号 观测角 M =2804943.6 A 2102 03.4 B 19117 00.0 C 5612 38.7 D 10919 47.3 E 162 09 48.3 A 坐标方位角 边长 127 07 22.2 248 59 00.7 198.616 26015 52.1 169.596 136 28 22.3 122.116 56 48 01.0 130.396 47 57 05.8 201.331 纵坐标X 横坐标Y 25267.832

12、 69220.780 25196.638 69035.380 25167.992 68868.229 25079.475 68952.333 25132.951 69071.272 25267.832 69220.780 A=5 fF+42.7 刀 D=822.005 检校：a MA= fx= 0.155 K=1/5200 a EA 丫 fy= 0.015 程序19直线交点坐标计算 74步 AX0C Y0: Pol(X A,Y C:M二W:DX1E Y1FX2G Y2P ol(F D, 文件名14 L1 直线交点坐标计算 G E:(A tgnM D tamW+E C)/(ta n M tan

13、血 C+ta n M (Ans A 说明：程序14用以计算直线交点坐标； 程序先输入直线上任意两点坐标，然后计算直线相交点P的坐标。算例如下: XEjaty.jji |r7C?.0；3 / / XQi lUCl YOlOCC X亠n宫目 i L十一汕段 程序20极坐标法放样计算 文件名15 极坐标法放样计算 I 74步 Li AXC YDXE Y: Pol(D A,E C:B二W: Prog A:M二B: Pol(X A, Y 6B二W: Prog A:N=B:B=N M:P rog A:Prog C 说明：程序14用以计算直线交点坐标; 程序先输入测站点坐标, 再输入后视点坐标及前视点坐标，

14、最后显示转折角及距离。 算例如下: IhK. -jr F严F 、 距离 A 70 46 52 附录1: CASIO fx-4500P错误标示一览表 标示 原因 时策 Ma ERROR 计算超出演算容量 计負时瞅超出函数位容量的数值 不合逻融操作（使用D当分母）等尊 确认所输入的数值是否在指定范m 內；当愎用储存器时确认存在储存器內 的数字数值星否适当 縫 ERROR 引数输入不正确-例：将负数数值当成 DEfni输入.在踱计宜时将13以外的数 值当成晰入1等等. 重新输入正确的引数 Stk ERROR 在数值堆檢或计辔中壮堆檢的涯算时超 出K容量. 将计直方程式简化囲不超出数字堆 桟9段和计算

15、堆校24段的范围 将计宜方程式分割成汗或2亍以上的较 小部分再各亍实行- Syn ERROR 计算方程式内容育諳俣. 程序方程式内容有諸误- 使用光标找出发生错俣的位置后加以 订正. Mem ERROR 砖存扩夭超出了程序内的啟数- 当储存没有加以扩大而将如可习当成储 存区名称使用时 当储存区內已经没有徑内程序的位査时 输入程序- KivIODEWms犍Dftn）以扩大储存器 至所需的段数- 使用有代码名称的皤存器 简化程序使它合乎储勰内剩下的可输 入位置或是先将不需要魂序删除掉再行 存人 Ne ERROR 子行列PS实行时超出了 1U段的限制. 确认谨程序（文件名）是否没有使用主例 行程序的

16、子行列回位n若有1谙将不必要 的程序（文件名）删除.检查子行列转穆 指定和确认原始稈序区有无转移发主-谙 确认回位是否正确- Go ERROR 迥分类名称）与Golo（分类名称）不相符 时 指定的P询文件名冲没有存入程序时 将职符合的正确形式输入； 将程序储存程序HP吨（文件名这内或 是将已不缠要的P如惑文件名）删除掉 附录2:常用数学公式 sin a二对边/斜边=a/c cos a =邻边/斜边=b/c tg a =对边/邻边=a/b S=(a*b)/2 2.解斜三角形: 附录3:常用测量公式 直觇：仪器架在已知高程点上，测量该点与末知高程点之间的高差称为直觇。 Hb =Ha +hAB =H

17、A + Dtga +K-L 反觇：仪器架末知在高程点上，测量该点与已知高程点之间的高差称为反觇。 Hb =Ha -hAB =HA-(Dtga +K -L) 前视方向BP 后视方向 BA=放样点P的转角P （左角） B 即 P = BP -BA ( P d80 f p = a bn bn hma -GbnP -nx180 当计算的fP在容许值范围内，将其反号，平均分配; 图根导线的f宙=20jN 转折角改正数Vp fp/n 转折角的残余误差优先分配给短边的邻角。 闭合导线的fp=S P-(n-2) 80 fx =2 AX (Xb Xa) f 也丫 -(Yb -Ya) 闭合导线的fx =2： AX

18、f ay 全长闭合差fs = Jfx2 + fY? 生长相对闭合差K=ZS 1心 S/fs) K 1/2000 1 25 CASIO fx4500P计算器实用程序 29 坐标增量的残余误差优先分配给长边。 附录5:勘察分院CAD制图试行规定 1.总则 1.1为实现分院分院计算机CAD成图的标准化，规范化特制定本标准。 1.2 本标准以SL73.1 - 95水利水电工程制图标准基础制图、SL73.1 - 95水利水电工 程制图标准勘测图为依据，结合计算机成图特点及分院制图规定编写的。 1.3 1.4 1.5 本规定适用于勘察分院工程地质勘察中的所有图纸。 工程地质勘察图件除遵守本规定外，还应符合

19、现行的有关规程规范。 电子文件的命名。 1.5.1文件名称的组成。 阶段代码-单位代码-流域号-工程代码-专业代码-顺序流水号.后缀 例如：0942-SCD-45-044-31-008.DWG代表初步设计阶段四川省水利水电勘测设计 研究院-该工程位于岷江流域-是该流域上的第44个工程项目（即天龙湖电站）-地质 专业-第8张工程地质图的图形文件。 1.5.2 阶段代码。 SCD 四川省水利水电勘测设计研究院在水利部的代码。 水库 项目 规划 测量 项目 建议书 可行性 研究 初步 设计 招标 设计 施工 设计 设计 总结 监理 竣工 其他 电站 项目 预可研 可研 设计 阶段 代码 0920 0

20、921 0922 0942 0943 0944 0949 0959 0960 0099 单位代码。 1.5.3 流域 名称 金沙江 雅砻江 长江 干流 大渡河 青衣江 岷江 沱江 涪江 嘉陵江 渠江 乌江 其他 流域 代码 40 41 42 43 44 45 46 47 48 49 50 60 流域号。 1.5.4 1.5.5 工程代码。 代表在某一流域上的第几号工程，由院科技信息处给出。 1.5.6 专业代码。 专业 名称 综合 规划 试验 水文 水能 水库 经济 环评 水保 经济 评价 勘察 地质 测量 水工 水机 金属 结构 电一 电二 施工 建筑 消防 概 预 算 专业 代码 01 0

21、2 10 21 22 23 24 24 31 32 40 51 52 53 60 70 80 1.5.7顺序流水号。 由工程项目负责人发放，从001顺序号开始。 1.5.8 电子文件后缀。 文件类型 CAD图形文件 CAD图形交换文件 数据库文件 纯文本文件 字处理文本文件 后缀 .dwg .dxf .dbf .txt .doc 注：本表未列出的电子文件后缀，应按标准规范电子文件后缀列出。 2 .一般规定 2.1图纸幅面 此处的图纸幅面主要是对图纸的宽度作出规定，长度要求不大于1米。 幅面代号 A0 A1 A2 A3 A4 图纸宽度（mm） 841 594 420 297 210 图纸幅面及图

22、纸宽度 表2.1 2.2标题栏（图签） 采用院统一制定的图题标准图块。其中， AOA1幅面图幅标题栏尺寸180X 71mm, 与其相对应的图例框规格为 20X 10mm； A2A3幅面图幅标题栏尺寸为120X 61mm，与 其相对应的图例框规格为15X 10mm。 2.3 比例尺 2.3.1当整张图纸中只用一种比例尺时，应统一注写在标题栏内，否则应按如下形式 注写比例：平面图1: 2000。 2.3.2纵、横比例相同的工程地质剖面图不绘制比例标尺；否则，应在图名下面标注 横向比例尺。平面图均应绘制比例标尺。 2.3.3图中需要绘制比例标尺时，其形式如图 2.1所示： 160 2.4 字体 2.

23、4.1采用国家正式公布实施的简化字，并尽可能采用仿宋体。同一图纸中只允许使用一种字体。 2.4.2字号（Width）: 一般采用5mm、3.5mm、2.5mm、1.8mm等规格，各种字号推 荐用途如下： 字号 推荐 用途 5 地层代号。 2.5 钻孔中的岩心获得率、透水率。（若用2.5mm顶满格，则选用1.8mm） 3.5 除以上外的其它一般标注字。 2.4.3字体宽度（Width Factor）：宜采用1;若确需改变，推荐采用0.70.9。 2.4.4河流、地名等标注字采用斜体字，斜体字字头向右倾斜，与水平方向成 75, 即倾斜角（Obigue Angle）为 25。 2.5图线线宽 2.5

24、.1 一张图纸中的图线宽度一般不宜超过 3种。 2.5.2 CAD制图系统出图是以颜色来确定线宽，线宽及颜色规定应按表2.2执行。 表2.2图纸幅面及图纸宽度 名 称 线宽（mm 颜色及色号 粗线 0.7 红（1） 中粗线 0.35 黄（2） 细线 0.18 绿（3） 2.6 图层 2.6.1工程地质剖面图。 图层名 随层颜色（色号） 存放内容 参考线宽（mm） 30（粗线层） 红（1） 全、强风化线、卸荷线、重要地质界 线（大层界线、断层上、下盘界限、软、 弱夹层界限等）、建筑物轮廓线、平洞、 竖井、钻孔中心线、图例框。 0.7 31 （中粗线层） 黄（2） 地面线、弱、微风化线 、一般地质

25、 分界线（岩层分界线、透水性分界线等） 、 说明栏框线。 0.35 32 （细线层） 绿（3） 除第1、2层中以外的线。 0.18 Hw （花纹层） 绿（3） 岩性花纹、透水性花纹。 0.18 Text1 （文字层） 黄（2） 汉字、字符、数字等。 注：1.图层名及编号必须按此规定执行; 2.内图框存放在第 32层（细线层），一般用多义线编辑命令 （PLINEDIT）调整线宽至 1.0mm 2.6.2工程地质平面图。 图层名 随层颜色（色号） 存放内容 参考线宽（mm） 30 红（1） 重要地质界线-粗线层：存放重要地质界线 （大层分界线，基岩与覆盖层分界线、覆盖层与 覆盖层分界线、断层线等重要地质内容）以及图 例框、钻孔、平洞、竖井、麻花钻、坑、槽等。