CASIO-fx4500P计算器程序

CASIOfx4500P计算器实用程序阿江编著水利部四川四川省水利水电勘测设计研究院勘察分院二○○○年八月说明本程序稿由于时间仓促及编者水平有限，缺点、错误以及疏漏与不足之处在所难免，恳请大家批评指正。程序步骤计算：1个字符的文件名算3步(每增加一个字符多算一步)，行号算1步，每个字符算1步。CASIOfx-4500P共有1103步。阿江二○○○年八月目录程序1——角度判断......................................................................................................................1程序2——角度换算①..................................................................................................................1程序3——角度换算②..................................................................................................................1程序4——角度换算③..................................................................................................................1程序5——角度换算④..................................................................................................................1程序6——视距测量......................................................................................................................2程序7——坐标反算......................................................................................................................2程序8——坐标方位角计算..........................................................................................................2程序9——坐标正算......................................................................................................................3程序10——坐标方位角交会计算................................................................................................3程序11——垂距计算....................................................................................................................4程序12——视差法测距计算........................................................................................................5程序13——剖面交点计算............................................................................................................6程序14——前方交绘计算............................................................................................................6程序15——附合导线近似平差....................................................................................................7程序16——渠道中线里程计算....................................................................................................9程序17——多边形面积计算......................................................................................................11程序18——闭合导线近似平差..................................................................................................13程序19——直线交点坐标计算..................................................................................................14程序20——极坐标法放样计算..................................................................................................15附录1：CASIOfx-4500P错误标示一览表...............................................................................16附录2：常用数学公式................................................................................................................17附录3：常用测量公式................................................................................................................17附录4：单一附合导线内业平差计算........................................................................................20附录5：勘察分院CAD制图《试行》规定.............................................................................21CASIOfx4500P计算器实用程序1程序1——角度判断文件名A角度判断29步L1B≥360B=B－360△B＜0B=B+360说明：①程序A为子程序，对≥360°或＜0°的角值进行判断处理。程序2——角度换算①文件名B角度换算①23步L1B=IntB+FracB/.6+Frac100B/90程序3——角度换算②文件名C角度换算②22步L1B=IntB+.6FracB－.004Frac60B程序4——角度换算③文件名D角度换算③25步L1F=B:B=I:ProgB:I=B:B=F:ProgB程序5——角度换算④文件名E角度换算④25步L1F=B:B=I:ProgB:I=B:B=F:ProgB说明：①程序B、C、D、E均为子程序，简化测量计算中角度的输入及显示。注：子程序应先输入CAISOfx-4500P中，以备其它程序调用。CASIOfx4500P计算器实用程序2程序6——视距测量文件名1视距测量41步L1Lbl0:{SCB}:HSC:ProgB:S(sinB)2▲Ans/tanB+H－C▲ProgC:Goto0说明：①程序用以计算视距测量中测站至照准点的平距及高程；②程序中：H=测站高程+仪高(程序只要求输入该值一次)；S=视距、C=切尺、B=竖盘读数；③算例：按Prog1调用程序显示H？输入测站高程+仪高445.79+1.41，按EXE键、显示S？输入视距39，按EXE键、显示C？输入切尺2.9，按EXE键、显示B？输入竖盘读数90.12，按EXE键、显示(计算结果)平距38.9995248，按EXE键、显示高程444.1638654，按EXE键、显示S？、输入视距……④竖盘读数90.12是将度分秒值(90°12′00″)以小数的形式输入；其它程序的角度值输入及显示均如此。程序7——坐标反算文件名2视标反算33步L1AX0CY0:Pol(X－A,Y－C▲B=W:PorgA:ProgC说明：①程序用以计算两点间的距离及坐标方位角；②程序中：A=起点纵坐标X0，C=起点横坐标Y0，X=终点纵坐标，Y=终点横坐标；③算例：按Prog2调用程序显示X0？输入起点纵坐标667.132，按EXE键、显示Y0？输入起点横坐标993.505，按EXE键、显示X？、输入终点纵坐标395.372，按EXE键、显示Y？输入终点横坐标914.821，按EXE键、显示两点间距离282.9216666，按EXE键、显示起点至终点的方位角196.0851267。程序8——坐标方位角计算文件名3坐标方位角计算26步L1ProgD:B=B+I－180:ProgA:D=B:ProgCCASIOfx4500P计算器实用程序3说明：①程序用以推算导线边的坐标方位角(左角公式)；②程序中：B=已知方位角、I=转折角(左角)；③语句B=D是为其它程序调用本程序而预设的，此处无具体用途；④算例：按Prog4调用程序显示B？输入已知方位角120.10214按EXE键、显示I？输入转折角160.01217，按EXE键、显示所求方位角100.11431；⑤若转折角为右角，将语句B=B+I－180改为B=B－I+180即可。程序9——坐标正算文件名4坐标正算22步L1ProgB:X=Rec(L,B)+X▲Y=Y+W说明：①程序根据已知坐标、边长及其坐标方位角计算待定点坐标；②程序中：B=坐标方位角、L=边长、X=已知点纵坐标、Y=已知点横坐标；③算例：按Prog3调用程序显示B？输入坐标方位角100.11431，按EXE键、显示L？输入边长151.213，按EXE键、显示X？输入已知点纵坐标1000，按EXE键、显示待定点纵坐标973.2346789，按EXE键、显示Y？输入已知点横坐标2000，按EXE键、显示待定点横坐标2148.825364。程序10——坐标方位角交会计算文件名5坐标正算100步L1Lbl0:{I}:ProgD:S=B+I:AX0CYOXYN:B=N:ProgB:E=(AtanS－XtanB+Y－C)/(tanS－tanB▲C+tanS(E－A▲Pol(A－E,C－Ans▲B=B－W:ProgA:ProgC▲B=F:Goto0说明：①程序利用已知方位角，计算测站上任意方向线与轴线相交的距离及交点坐标和该交点作为测站后与轴线的夹角；②如下图，程序中：B=已知方位角、I=观测角、A(X0)=测站纵坐标、C(Y0)=测站横坐标、X=轴线上任意点纵坐标