CASIOfx-5800P计算程序(国外英文资料).docVIP

CASIOfx-5800P计算程序 卡西欧fx-5800p程序 =========================================================================== 1坐标计算程序主程序（aking-zb）。 5→背侧内卷边缘区···········（增加5个变量） “0 ry.1 = = “？Z···········（0计算任意线元，输1计算道路一......） “x（CZ）”？A：“Y”？B···········（输入测站点坐标，不计算极坐标X（CZ）输0） LBL 0：“1，K = XY，2，XY =“K”？N：“碘化钾”？K（K···········输桩号） n = 1 = 转到1：n = 2 = 跳转到2···········（N输1为正算2为反算） LBL 1：前卫”pqx”：？L：3～→W：前卫”的内容，“···········（L输与中桩距离左负右正） 如果一个≠0：Pol（沙、镱）：我◢···········（显示仪器与放样点距离） J＜0＝＞J + 360→J J▼DMS◢···········（显示仪器与放样点方位角） 其他的“西”：X◢···········（显示X坐标） “一”：Y◢···········（显示Y坐标） “fwj”：F▼DMS◢···········（显示切线角） 如果结束：转到0 LBL 2：前卫”pqx”：？X：？Y···········（输入要反算的坐标，注意在反算时K要尽量输与实际相接近的桩号） X→我：Y→J：前卫“子” “K”：O + W→Z [ 5 ]◢···········（显示反算出的桩号） “D”：我◢···········（显示反算出的与中桩距离） 跳转到0 --------------------------------------------------------------------------- 1-1、（坐标计算子程序1（SUB1） 0.1739274226→Z [ 1 ]：0.3260725774→Z [ 2 ]：0.0694318442→Z [ 3 ]：0.3300094872→Z [ 4 ]···········（常数，出处未知） 1-z [ 4 ]→F：1-z [ 3 ]→M:（P-R）÷（2prs）→D：180÷π→E G + eqwz [ 3 ]（1÷P + DWZ [ 3 ]）→Z [ 3 ]：G + eqwz [ 4 ]（1÷P + DWZ [ 4 ]）→Z [ 4 ] G + efqw（1÷P + DFW）→F G + emqw（1÷P + DMW）→M u + W（Z [ 1 ] COS（Z [ 3 ] [ 2 ] COS）＋Z（Z [ 4 ]）+ Z [ 2 ] COS（F）+ Z [ 1 ] COS（M））→X V + W（Z [ 1 ]罪（Z [ 3 ] [ 2 ]罪）+ Z（Z [ 4 ]）+ Z [ 2 ]罪（F）+ Z [ 1 ]罪（M））→Y G + EQW（1÷P + DW）→F F＜0＝＞F + 360→F X + LCOS（+ 90）→X：Y + lsin（+ 90）→Y --------------------------------------------------------------------------- 1-2、坐标计算子程序2（子） 0→L：90→T：ABS（（Y-V）cos（t）-（x-u）sin（t））→W 0：程序”的内容“层层 （1÷EQW T + P + DW）→C：（j-y）cos（C）-（1-X）罪（C）→L 如果ABS（L）＜0.0001：然后去1：其他W + L→W：转到0：如果结束 1：0→LBL：前卫“内容”：（j-y）÷罪（+ 90）→L --------------------------------------------------------------------------- 1-3、数据库（pqx）（计算任意线元） 如果Z＞0：然后PROG”sj-pqxa”：返回：如果最终···········（Z＞0计算一道路） “K”？O：“X”？u：“Y”？V：“fwj”？G：？S：“R1”？P:“R2”？R：？Q 1-4、一数据库（pqx-a）（一道路平曲线数据库） 如果Z＞1：然后PROG”pqx-b”：返回：如果最终···········（有B数据库输入此行） 如果K＜起点桩号：CLS：停止：如果结束 如果K≤终点桩号：然后起点桩号→O：起点X坐标→U：起点Y坐标→V：起点方位角（度分秒）→G：起点与终点距离（直线输非0）→：起点半径（直线输10 ^ 45）→P：终点半径（直线输10 ^ 45），→R：（