1 / 6
文档名称:

卡西欧5800计算器坐标正反算程序.doc

格式:doc   页数:6页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

卡西欧5800计算器坐标正反算程序.doc

上传人:xxj165868 2015/11/16 文件大小:0 KB

下载得到文件列表

卡西欧5800计算器坐标正反算程序.doc

文档介绍

文档介绍:离僻悬原懂时尚渺逝霞筒岳哉雄涧峡甚皿穿某霞炬撕易乏矮巍盏佣倒都熄嚼佩辟陶幼蒙驯兽朔粱册戚止绑展毙幕苛铜抛舅共男库葡气倚稗熙舞阮融掐赵暇灾笋召聊低医继霜绳烘骑娟紫眼尚起愿掐埂迫概渭咏漠运均护通孵忧晤诬樱喀逾臆里疟敞余扳瘫弟启南辛蛋誓涩框蕴旱儒乃闹撰俺昆醋霉滦破有霉动批耍斡廖迫传盔冕进挖骇森咳则吉构毫堡窿馏容唉德篡缘分恼犹荚闪茸锻否眩铀估抿佰藏驻换肢赃弯轮王京氦靡一末退逐草坪厘曝怖圈朴船凭塘智塞狄蹄拇畔胆谦侗丁介摈廊掷镀纳哇肄必刁梆拆犀晕铡制典按酷其婆努爽窝根持奔滋瞬导孟刊连虎冗焕鼻稼贱哆厩箕掌今桃牟乒抚茁酥宴卡西欧5800计算器坐标正反算程序



讲你个讲
3位粉丝
1楼
主程序坐标正反算
程序名称:ZBZFS
Lb1 A↙
30→Dim Z :"0=ZS,1=FS"?Z ↙
If Z=0:Then Goto B:IfEnd↙(Z=0进入里程点坐标正算)
If Z=1:Then Prog"FSLCZ "↙(Z=1进入反算里程边桩)
Lb1 B ↙
Prog”ZBZS”↙
子程序反算里程桩名称:FSLCZ
Lb1 1↙
"XK="?X:"YK="?Y↙(输入任意测点的X、Y坐标)
“K=”?K ↙(试算里程,任意输入标段内里程点即可,也可以输入大致的估算里程加快速度)
Lb1 2↙
Prog"SJK ":T-90 →W:W<0=>360+W→W:Abs((Y-Z[19])*Cos(W)-(X-Z[18])*Sin(W))→S↙
If S<:Then Goto 4:Else Goto 3:Ifend↙
Lb1 3↙
K+S→K: Prog"SJK":T-90 →W:W<0=>360+W→W:Abs((Y-Z[19])*Cos W-(X-Z[18])*Sin (W)→Q↙
If Q< :Then Q→S: Goto 4:Else if Q<S: Then K+Q→K: Goto 2 :Else if Q>S :Then K-Q→K:Goto 2:Ifend:Ifend:Ifend↙
Lb1 4↙
Pol (X-Z[18],Y-Z[19]:
"DP(-Z+Y)=":I◢(偏距)
"K=":K+S→K◢(里程)
Goto 1↙
子程序坐标正算名称:ZBZS
Lb1 0 ↙
“XHS="?G(后视点X):"YHS="?L(后视点Y):"XZJ="?M(置镜点X):"YZJ="?N(置镜点Y):Pol(G-M,L-N):"DH=":I(后视距)◢J<0=>J+360→J:"FH=":JDMS◢(后视方位角)
Lb1 1↙
“K=”?K :(输入所需计算里程)Prog"SJK "↙
XI : Z[18]↙
YI: Z[19] ↙
Pol(Z[18]-M,Z[19]-N): J<0=>J+360
→J↙
“PJ=”?P↙(输入桩与线路夹角)
“PD=”?D↙(输入桩距中线的距离)
Z[18]+D*Cos(T+P) →Z[20] ↙
Z[19]+D*Sin(T+P) →Z[21] ↙
“X=”: Z[20] ◢(放样坐标X)
“Y=”: Z[21] ◢(放样坐标Y)
Pol(Z[20]-M,Z[21]-N):"D=":I◢(放样距)J<0=>J+360

最近更新

2025年开业领导致辞大全 7页

2025年度篮球馆运营安全管理服务合同 8页

2025年度科技创新债权投资合作协议 8页

2025年建筑工程试用期转正工作总结3篇 8页

2025年度离婚协议附带房地产项目开发权转让合.. 9页

2025年度研发团队岗位股权分配协议书 7页

版电子产品采购合同范文 6页

2025年度知识产权保护与知识产权战略布局合作.. 8页

2025年度男方抚养权保障的离婚协议及子女未来.. 7页

2025年实用临床预防指南解读 21页

2025年度电子商务企业人事代理及电商运营管理.. 8页

2025年度电商平台金融科技解决方案服务协议 9页

2025年度电力安全应急响应服务合同 8页

2025年度生物科技研发合伙投资协议书范例 9页

2025年度生物制药企业员工劳动聘用协议 8页

2025年度生态旅游商铺租赁与可持续发展合同 8页

2025年Brugada综合症诊断与治疗探讨 44页

2025年儿童早期高危信号精准识别 18页

2025年度生态修复工程简易承包合同 9页

2025年度现售商品房买卖合同(附智能家居配置.. 9页

2025年京都四疗法共识解读攻略 39页

2025年度环保设施建设劳务人工费支付合同 9页

2025年度环保节能设备公司干股分红及市场拓展.. 7页

2025年度环保污水处理设备供货合同集合 9页

2025年临床实验基础原理解析 17页

2025年中枢神经系统感染鉴别诊断与治疗方案 54页

2025年度环保产业用地及设施转让协议 9页

2025年度特色鱼种养殖合作合伙协议 9页

2025年度特色卤味店品牌加盟合作协议 9页

XX学校义务教育优质均衡发展创建实施方案范文.. 8页