欢迎光临测量协同网!https://www.fffsky.com/blog
Loading
1

[原创]CASIO fx-FD10Pro JDF交点法 V1

CASIO fx-FD10Pro JDF交点法 V1

 

FD10Pro计算器介绍

卡西欧Casio fx-FD10 Pro属于英文菜单中文版工程测量多功能编程计算机,可通过以下视频了解相关介绍!

FD10Pro计算器有那些优势?

1、中文程序显示,2、三防设计,3、电脑编程,数据共享,4、按键屏幕背光,5、可使用内存卡储存,6、运算速度流畅

程序说明:

本程序适用于卡西欧 CASIO fx-FD10Pro计算器,可对全线贯通坐标正反算、竖曲线高程计算。包含:交点前直线、第一缓和曲线、圆曲线、第二缓和曲线、交点后直线的线路中、边桩坐标及切线方位角计算,该程序可计算不对称缓和曲线坐标,还可以通过坐标反算该点里程和距中线的距离,适用测量员专用。备注:CASIO fx-FD10pro程序已通过VBA编写到标准模块中,点击表中按钮即可生成相应的txt程序。

 

程序清单:

DJDF——主程序(提供输入一个交点曲线要素)

JDF——主程序

JDFDAT——子程序“修改平曲线数据库”

JDFDATA——主程序“修改竖曲线数据库”

JDFDMS——子程序“度格式转为六十进制格式显示”

JDFFSLC——子程序“坐标反算”

JDFFSLC——子程序“坐标反算公用”

JDFQXYS——子程序“显示曲线要素”

JDFSJK——子程序“平曲线数据库”

JDFSQX——子程序“竖曲线”

JDFSQXGC——子程序“竖曲线公用”

JDFSQXSJ——子程序“竖曲线数据库”

JDFXSYS——子程序“显示平曲线要素”

JDFZB——子程序“坐标正算”

JDFZSZB——子程序“坐标正算公用”

 

坐标正算运行演示:

运行主程序JDF

(1)平面坐标

(2)竖曲高程

(3)查询要素?

按数字1→EXE

(1)坐标正算

(2)坐标反算?

按数字1→EXE

请输入计算里程K?

10000? 里程超出范围会提示超限

偏距D(左负右正)?

0? 左边桩为负数,右边桩为正数

请输入计算偏角P?

0? 正交输入90

K(m)=10000.000

D(m)=0.000

X(N)=3377706.668

Y(E)=455858.5251

F(d)=127.230323(格式为dms:127°20'03.23")

 

坐标反算运行演示:

运行主程序JDF

(1)平面坐标

(2)竖曲高程

(3)查询要素?

按数字1→EXE

(1)坐标正算

(2)坐标反算?

按数字2→EXE

请输入近似里程K?

10000? 里程超出范围会提示超限

请输入实测坐标X?

3377706.668? 实测坐标X

请输入实测坐标Y?

455858.5251? 实测坐标Y

X(N)=3377706.668? 坐标回显

Y(E)=455858.5251? 坐标回显

K(m)=10000.000里程

D(m)=0.000 ?偏距

 

高程计算运行演示:

运行主程序JDF

(1)平面坐标

(2)竖曲高程

(3)查询要素?

按数字2→EXE

请输入计算里程K?

10000? 里程超出范围会提示超限

请输入坡比±%?

0? 向下为负数,向上为正数

请输入偏距D?

0? 路面宽度

K(m)=10000.000

P(%)=0.000

D(m)=0.000

H(m)=333.319

 

查询要素运行演示:

运行主程序JDF

(1)平面坐标

(2)竖曲高程

(3)查询要素?

按数字3→EXE

请输入查询里程K?

10000? 查询里程

p1=1.199931——内移量1

p2=1.199931——内移量2

q1=179.990400——切垂距1

q2=179.990400——切垂距2

Bo1=2.291831——缓和曲线切线角1

Bo2=2.291831——缓和曲线切线角2

T1=2434.6521——第一切线长

T2=2434.6521——第二切线长

Ly=3819.3231——圆曲线长

Eo=534.3123——外失距

Lo=4539.3231——曲线长

ZH=7586.7070——直缓里程

HY=7946.7070——缓圆里程

QZ=9856.3685——曲中里程

YH=11766.0301——圆缓里程

HZ=12126.0301——缓直里程

ZH(X)=3378605.445——直缓坐标X

ZH(Y)=453648.7040——直缓坐标Y

HZ(X)=3376073.846——缓直坐标X

HZ(Y)=457190.6542——缓直坐标Y

JD(X)=3378226.731——交点坐标X

JD(Y)=456053.7210——交点坐标Y

AZ(d)=53.124606——曲线转角

FA(d)=98.565562——切线方位角

 

DJDF坐标正算运行示范

运行主程序DJDF

输入交点桩号K?6601.258

输入交点坐标X?3378819.247

输入交点坐标Y?452290.956

输入曲线半径R?5000

第一缓和曲线长LS?330

第二缓和曲线长LS?330

输入曲线转角A?-17°37ˊ32.80″(左转输入负数,右转输入正数)

输入切线方位角F?116°34ˊ28.42″

(1)坐标正算

(2)坐标反算?

按数字1→EXE

请输入计算里程K?6600

偏距D(左负右正)?0(中桩输入0,左偏输入负数,右偏输入正数)

请输入计算偏角P?90(正交输入90,斜角输入实际)

K(m)=6600

D(m)=0.000

X(N)=3378875.487

Y(E)=452314.2211

F(d)=107.421577(格式为dms:107°42'15.77")

 

DJDF坐标反算运行示范

运行主程序DJDF

输入交点桩号K?6601.258

输入交点坐标X?3378819.247

输入交点坐标Y?452290.956

输入曲线半径R?5000

第一缓和曲线长LS?330

第二缓和曲线长LS?330

输入曲线转角A?-17°37ˊ32.80″(左转输入负数,右转输入正数)

输入切线方位角F?116°34ˊ28.42″

(1)坐标正算

(2)坐标反算?

按数字2→EXE

请输入实测坐标X?3378875.487

请输入实测坐标Y?452314.2211

X(N)=3378875.487 坐标回显

Y(E)=452314.2211 坐标回显

K(m)=6600.000 里程

D(m)=0.000 偏距(负数为偏左,正数为偏右)

 

计算机与计算器传送程序方法:

使用数据线

1、当计算器与电脑链接成功后会在计算器上显示“Select Connection Mode USB Flash:[F1]”

2、按F1键,计算器上显示“Do not disconnect USB.”

3、将程序txt文本复制到粘贴到U盘根目录,图示如下:

4、退出数据线链接,当计算器上显示“Complete!Press:[EXIT]”表示传送完毕。

5、此时按PROG键计算器上会显示“Program List ?

No Programs“表示无可用程序”

6、按MENU→PROG:2→若计算器上显示“History ?”需按“右键”换到“Program List ?”→按F6→F4:LOAD→选中程序按F1:OPEN打开

7、重复“步骤6”以此方法将所有程序打开即可正常运行。

 

使用内存卡

1、将程序txt文本复制到粘贴到内存卡根目录。

2、按MENU→选中MEMORV→按EXE→按F3:SD Card→按F1:SEL选中所有程序“[SYSTEM~1]不选”→F2:COPY→按数字键2“选Storage Mem:[2]”→按F1:SAUE,若提示重复按F1

3、此时按PROG键计算器上会显示“Program List ?

No Programs“表示无可用程序”

4、按MENU→PROG:2→若计算器上显示“History”需按“右键”换到“Program List”→按F6→按F4:LOAD→选中程序按F1:OPEN打开

5、重复“步骤6”以此方法将所有程序打开即可正常运行。

 

坐标正反算【REC、POL】计算结果获取方式:

卡西欧计算器fx-5800P坐标正反算【REC、POL】自变量为I、J,而卡西欧FX-9750GII、FX-9860GII自变量为List Ans[1]、List Ans[2],在CASIO fx-FD10Pro计算器版面上无法直接找到[]中括号,需要通过以下方法查找:

步骤:按SHIFT+CATALOG(数字键0)——向下选即可找到[]中括号。

小提示:依次找到List按F2收藏、按F6(CTGY)继续找到Ans按F2收藏、找到[按F2收藏、找到]按F2收藏,下一次使用时按SHIFT+CATALOG可在当前页面显示这些函数以方便使用。

您必须登录才能阅读本文的其余部分【用户登录


测量协同网诚邀您投稿,文章主题与工程测量、大地测量等相关即可,可以是理论介绍,也可以是实务分析,还可以是工作总结。➮点击投稿

最后编辑于:2019/4/5作者: 测量测绘

23 条评论

发表评论

  1. 112txw 112txw说道:
    19#

    主程序YS
    0→K
    Lbl 0: K+1→K: K→N:Prog"YS-1":K≥N+1=> Goto 1:A→C:B→D:K-1→N: Prog"YS-1":A→X:B→Y: Pol(C-X,D-Y):ClrText:List Ans[1]→I:List Ans[2]→J: JJ+360→J:J→List K[14]: Goto 0
    Lbl 1: K+1→K: List (K+1)[14]- List K[14] =List K[4]: If List K[4]>0:Then List K[3]=1:Else List K[3]=-1:IfEnd :Abs(List K[4]) →List K[4]:Goto 1
    子程序YS-1
    If N=0:Then 9559.963→Z:25→A:30→B:Return:IfEnd
    If N=1:Then 10621.756→Z:19→A:60→B:Return:IfEnd
    If N=2:Then 11547.895→Z:48→A:92→B:Return:IfEnd
    If N=3:Then 13113.213→Z:127→A:32→B:Return:IfEnd
    If N>3:Then 3→N:0→K:Return:IfEnd

    总是提示Pol(C-X,D-Y)后面错误,部知道错误在那个

  2. wxz16899052 wxz16899052说道:
    18#

    专家请问下可以考虑一下隧道测量程序吗?

    • 测量测绘 测量测绘说道:

      谢谢您的建议

  3. 陈先生 陈先生说道:
    17#

    请问FD10之前下载的程序在计算器里如何删除呢

    • 测量测绘 测量测绘说道:

      您好,在计算器上面按MENU→2→F4(选中需要删除的程序)→F1(YES)删除成功。

  4. 小天 小天说道:
    16#

    楼主,怎么下载解压后没有txt文件呀

    • 测量测绘 测量测绘说道:

      您好,txt文档是通过“CASIO_fx_FD10Pro_JDF_V1.xlsm”生成的,请阅读操作步骤!

扫一扫关注公众号

扫一扫关注公众号