欢迎来到天天文库
浏览记录
ID:37733708
大小:44.50 KB
页数:3页
时间:2019-05-29
《自编卡西欧5800计算器程序_曲线段》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、卡西欧5800计算器程序曲线段主程序:“1.SZ→XY”:“2.XY→SZ”:?N:“XO”?U:“YO”?V:“SO”?O:“SN”?I:“FO”?G:“LS”?H:“RO”?P:“RN”?R:“JIAJIAO”?T:?Q:1÷P→C(P-R)÷(2HPR)→D:18÷π→E:IfN=1:ThenGoto0:ElseGoto1:IfEnd:Lbl0:?S:?Z:IfS>I:Then“CHUJIE”◢Goto0:IfEnd:Abs(s-0)→W:Prog“SUB1”:F-T→F:“X=”:X◢“Y=”:Y◢“F=”:F►DMS◢Goto0Lbl1:?X:?Y:X→
2、I;Y→Prog“SUB2”:“S”?S:O+W→S◢“Z”?Z:Z→Z◢Goto1字母表示:1:SZ→XY(XY→SZ)距离算坐标(坐标算距离)2:N选择1或2(一般选1)3:XO,YO起点的X,Y坐标4:SO,SN起点、终点桩号5:FO方位角6:LS切线长7:RO,RN起点、终点半径38:JIAJIAO90不变9:Q线路偏向(左-1,右+1)10:S求点的桩号11:Z距S桩的距离(左负,右正)子程序:FS2Pol(X-A,Y-B):J≤0=>J+360→J子程序:SUB10.1739274226→A:0.3260725774→B0.0694318442→K:0
3、.3300094782→L1-L→F:1-K→MG+QEKW(C+KWD)→Z[1]G+QELW(C+LWD)→Z[2]G+QEFW(C+FWD)→Z[3]G+QEMW(C+MWD)→Z[4]Acos(Z[1])→XX+Bcos(Z[2])→XX+Bcos(Z[3])→XX+Acos(Z[4])→XU+WX→XAsin(Z[1])→YY+Bsin(Z[2])→YY+Bsin(Z[3])→Y3Y+Asin(Z[4])→YV+WY→YG+QEW(C+WD)+90→FX+Zcos(F)→XY+Zsin(F)→Y子程序:SUB2G-90→T(Y-V)cos(T)-(X-U
4、)sin(T)→WAbs(W)→W:0→ZLbl4:Prog“SUB1”T+QEW(C+WD)→L(J-Y)cos(L)-(I-X)sin(L)→ZIfAbs(Z)<10^(-6):Then0→Z:Prog“SUB1”(J-Y)/sin(F)→ZElseW+Z→W:Goto4:IfEnd子程序:XBD“XP=”:A+Scos(F◢“YP=”:B+Ssin(F◢子程序:XBZJ+90→F:“R”?R:R→S:Prog“XBD”:“L”?L:-L→S:Prog“XBD”3
此文档下载收益归作者所有