参数化绘制

2024-07-01

参数化绘制（精选四篇）

参数化绘制篇1

1在旁切航路点转弯

1.1概述

PBN的一个典型特征, 就是脱离了传统陆基导航台的约束, 不要求从一个导航台飞向另一个导航台, 而是从一个航路点飞向另一个航路点, 当然导航台所在位置的坐标也可以作为一个航路点。 PBN程序中转弯处的航路点类型主要有两类: 旁切航路点FB (Fly—By) 和飞越航路点FO (Fly—Over), 如图1所示。

从图1可以看出, 旁切转弯是飞机在未到达航路点之前就已经开始转弯, 整个转弯过程飞机没有从航路点上空经过, 稳定距离较短; 而飞越转弯是飞机在飞过航路点上空才开始转弯的, 稳定距离较长。因此在PBN飞行程序设计过程中除了等待航路点和复飞点MAPt等个别航路点使用飞越航路点, 其余的通常使用旁切转弯航路点。

1.2旁切转弯的保护区

飞行程序的保护区是为了评估离场、进场或进近复飞航迹旁对飞行有影响的障碍物而绘制的, 它的目的是为了保障飞行的安全。与传统的转弯程序相比, 旁切转弯保护区有如下特点:

(1)使用风螺旋法或圆弧法绘制转弯保护区。

(2)最大转弯角度:120°(DF折返除外)。

(3) 旁切航路点转弯的最晚转弯点, 无需考虑坡度建立时间。

另外, 对于旁切转弯, 为了保护航空器在要求的速度范围内, 主区的外边界做如下扩张:

(1) 对于小于等于90°的转弯: 主区由一条平行于转弯前航段的直线和一条平行于下一航段并且与风螺线相切的直线来扩张的, 风螺线是由最大速度来定义的。

(2) 对于大于90°的转弯: 主区由一条平行和一条垂直于转弯前航段的两直线来扩张, 正交线与风螺线相切, 风螺线是由最大速度来定义的。

1.3旁切航路点的应用

旁切航路点广泛应用于PBN飞行程序中, 无论是离场、进场还是进近程序, 随处可见旁切航路点的身影, 可以说对于一个机场的PBN程序保护区的绘制工作而言, 90%以上都是旁切转弯保护区。

2 Auto CAD手工绘制旁切转弯保护区

2.1保护区绘制依据

该保护区的绘制严格遵守国际民航组织ICAO文件DOC8168-OPS/611第二卷航行服务程序 — 航空器运行《目视和仪表飞行程序设计》, DOC 9613 《PBN手册》等文件。

2.2保护区参数计算

以旁切转弯点在离场程序ARP 15NM以内, 转弯高度1200米, 转弯角度64°, 限速380km/h为例来进行参数计算。计算的旁切转弯保护区参数如表1所示。

注: 其中的负号表示在航路点之前。

2.3保护区手工绘制

基于表1手工在Auto CAD中绘制的旁切转弯保护区如图2所示。

3 Auto LISP参数化绘制旁切转弯保护区

3.1保护区参数化绘制

采用Auto LISP绘制保护区可以大大缩短绘图时间, 使本来需要20分钟的工作可以在调用代码后一分钟以内完成, 并且以文档的形式保存程序计算参数, 方便查询修改。主要编程思路如图3所示。

(1) 首先根据设置的旁切转弯点条件计算转弯保护区所需参数, 如: 真空速、转弯率、 KK线、 SS线、转弯半径和E90等。本例中以A表示转弯角度, 以B表示转弯点前航迹与X轴正方向夹角;

(2) 确定p0为基本点, 采用 “polar” 函数, 确定p1点, 角度为B, 距离为SS线距离;

(3) 以p1为基本点, 确定p2点, 角度为0.5π+B, 距离为转弯半径radius;

(4) 以p2为基本点, 确定p3点, 角度为 π+B, 距离为E90;

(5)以p3为基本点,确定p4点,角度为1.5π+B,距离为确定p5点,角度为1.5π+B-A,距离为rr;确定p6点,角度为4/3π+B-A,距离为rr;

(6) 以p6为基本点, 确定p7点, 角度为5/6π+B-A, 距离设置一个大于半宽的距离d;

(7) 以p5为基本点, 确定p8点, 角度为2π+B-A, 距离为rr=tan ;

(8) 以p1为基本点, 确定p9点, 角度为1.5π+B, 距离为二分之一半宽; 以p4为基本点, 确定p10点, 角度为1.5π+B, 距离为二分之一半宽; 以p5为基本点, 确定p11点, 角度为1.5π+B-A, 距离为二分之一半宽; 以p6为基本点, 确定p12点, 角度为4/3π+B-A, 距离为二分之一半宽; 以p8为基本点, 确定p13点, 角度为1.5π+B, 距离为二分之一半宽; 以p8为基本点, 确定p14点, 角度为1.5π+B-A, 距离为二分之一半宽;

(9) 以p0为基本点, 确定p15点, 角度为B, 距离为KK线距离; 以p15为基本点, 确定p16点, 角度为0.5π+B, 距离为半宽; 以p16为基本点, 确定p17点, 角度为0.5π+B, 距离为二分之一半宽;

(10) 以p16为基本点, 确定p18点, 角度为 π+B-0.5A, 距离为d; 以p17为基本点, 确定p19点, 角度为 π+B-0.5A, 距离为d;

(11) 使用command函数中的arc命令, 将p3、 p4和p5以及p3、 p6和p5连成圆弧;

(12) 使用command函数中的line命令, 将p4和p8、 p8和p5、 p6和p7连成直线;

(13) 使用offset函数, 将上述主区的边界偏置到副区;

( 14) 使用command函数中的arc命令, 将p8、 p14和p13连成圆弧;

(15) 使用command函数中的line命令, 将p16和p18、 p17和p19连成直线。

3.2绘图结果比较

将图2与图3合并到一张图中, 结果如图4所示, 可以看出两者的形状完全重合, 最后只要人工剪裁一些多余线条即可。但是通过参数化绘制, 大大缩短了绘图时间, 减小工作量, 降低了人工出错的可能性。

4结语

教你如何写参数化程序篇2

由于我对siemens840D比较熟悉，所以以下说讲的一切都是在siemnes840D系统上测试过的，是经过实践检验的编制，可靠性应该是很好的。

先让我来给大家介绍一下参数化的几种形式：

1）用DEF命令，在MPF或者SPF程序中制定变量，以达到调用的目的；

2）通过siemens自带的1000个R参数进行参数的编制；

3）直接调用siemens系统变量，进行参数化程序编制。

大概也就这几种常见的形式了。我一个个给初学者进行讲解：

1）用DEF命令，在MPF或者SPF程序中制定变量，以达到调用的目的。

这是一种很灵活的参数化编制形式。

请看一下例子：

＝＝＝＝＝＝＝＝＝＝

MPF：

DEFINE Z_MAX AS G0 G90 G40 G17 SUPA Z850 D0 SPOS=0

DEF REAL DiaMAX=50,DiaMIN=45.8,CAO_KUAN=5

EXTERN XICAO_1(REAL,REAL,REAL)

$P_UIFR[1]=CTRANS(X，Y，Z，B,);G54 B=?

;$P_UIFR[2]=CTRANS(X，Y，Z，B,);G55 B=?？

;$P_UIFR[3]=CTRANS(X，Y，Z，B,);G56 B=?？？

...N320 CS_TOOL(“"，1);XI CAO B#

CS_TP(”“，1)

G56 G90 G17 G40

MIRROR X0

R90=85.3 R91=WIDTH-110.3 R92=31.3

XICAO_1（DiaMAX，DiaMIN，CAO_KUAN）；也可以写成XICAO_1

R90=235.3

XICAO_1

MIRROR

Z_MAX

...SPF:

%_N_XICAO_1_SPF

;$PATH=/_N_SPF_DIR

PROC XICAO_1(REAL DiaMAX,REAL DiaMIN,REAL CAO_KUAN)SAVE

;R90 is X Coordinate

;R91 is Y Coordinate

;R92 is Z Coordinate

;R93 is S Value

;R94 is OutSide F Value

;R95 is InSide F Value

;DEF REAL DiaMAX,DiaMIN,CAO_KUAN

;MUST SET D1,D2,D3

S=R93 M03

G01 X=R90 Y=R91 F=R94

M08

R40=DiaMAX R41=DiaMIN R60=2 R61=1

R0=0 R1=R92 R3=(R92-CAO_KUAN)R5=20 R6=5 R72=50

F=R95

L8000

M05

M09

STOPRE

M17

＝＝＝＝＝＝＝＝＝＝＝＝

以上是一个我编制的挖槽程序截取。

在MPF中，在程序最开头进行了三个参数点定制：DiaMAX=50,DiaMIN=45.8,CAO_KUAN=5

并用EXTERN命令进行SPF程序XICAO_1的声明，一般情况如果词程序位于siemnes的标准循环文件夹里面，或者是MPF相同的目录下是没有必要进行EXTERN的，这是一种习惯，我习惯把SPF文件放在SUBPROGRAM文件夹里面，便于管理，所以每次在调用XICAO_1这个程序的时候必须进行程序的声明，这很重要，否则，如果你不能调用SPF文件就不要怪我了，当然，也有其他方式进行参数传递的SPF调用的，比如：PCALL等等命令，这里我就不多说了。

DEF命令是定义你需要的参数，REAL是说明参数点类型是实数型的，如果是整数型的，就是INT，这个和VB语言很相似，如果有VB程序语言基础的朋友应该很容易理解，只不过VB里面是用DIM进行变量的定义的罢了。你也可以定义STRING[50]这种字串型，还有布尔型的，我就不多说。

在MPF程序的后面将会引用这三个参数，并将这三个参数传递到SPF中去。

请大家注意SPF的编制格式，是：

PROC XICAO_1(REAL DiaMAX,REAL DiaMIN,REAL CAO_KUAN)SAVE

括号里面的参数顺序直接控制了你传递参数时填写的数字传递顺序。

比如：XICAO_1（50，48.5，5）就是按照PROC后面的那个括号里面的顺序进行传递的。

这也就是siemens的CYCLE标准循环里面的格式一样的，如果你使用过siemens的CYCLE循环，那么在定义参数的时候，你的定义顺序必须按照说明书上的顺序来，否则，参数将会传递错误的信息，后果自负„„ SAVE可以要，也可以不要，没有关系的。SAVE的作用是在执行完SPF以后，回到MPF时，将保留原MPF中的制定格式，怎么理解呢？简单的距离就是：当你的SPF中时G91编程的，而MPF中是G90编程的，那么加上SVAE以后，在M17执行完后，回到MPF以后，保留G90的形式进行下面的工作，否则就是按照SPF中的G91进行执行，也许就会出错。

用个在siemens的CYCLE里面在SAVE后面添加了一个DISPLOF参数的，用这个参数可以“拟制”SPF中的每一段程序的显示，当然也可以用SBLOF来单块拟制。

不过，通常没有必要拟制程序的显示，因为不便于程序的检查，什么叫拟制呢？简单的说就是在运行SPF时，加上DISPLOF后，以下的程序段，一直到M17结束，在AUTO界面教你嘎时，你无法看见这些程序段的执行过程。

编制格式为：

PROC XICAO_1(REAL DiaMAX,REAL DiaMIN,REAL CAO_KUAN)SAVE DISPLOF

大概这种形式的参数化程序就是这样子的了。当然，这方面还有其他的一些编制参数，不过一般的朋友没有必要要，我讲的应该可以满足一般的要求了。

值得一提的是MACROS的编制。

格式为：DEFINE...AS........在我的前面程序例子前面已经提到了，就是：DEFINE Z_MAX AS G0 G90 G40 G17 SUPA Z850 D0 SPOS=0 在MPF以前定义这个以后，在整个MPF中的任何位置都可以调用这个“宏”，DEFINE Z_MAX AS G0 G90 G40 G17 SUPA Z850 D0 SPOS=0的作用就是用G0，取消所有坐标（采用机床原点坐标），取笑刀具几何补偿，C轴转到O°以后，回到Z＝850的位置。

这个很简单，你也可以进行“全局MARCO”的编制，有点象VB程序语言中的“定义全局变量”的功效，往UMAC文件中添加就行了。不熟悉的朋友就不用管这个了。

2）通过siemens自带的1000个R参数进行参数的编制；

请参考前面的程序例子，值得提示的是，请确定是否你的设备供应商已经占用了一些R参数，如果有设备制造商占用了一些R参数，最好不要使用

这些R参数，选取其他R参数就可以了。

其实，R参数的用法和用DEF定义的变量用法是一样的，重要的区别是R参数不用定义，可以直接在程序中任何位置进行调用就可以了。而且不受SPF,MPF的控制，任何程序都可以直接调用。

不过，最好在使用R参数的时候，进行一些约定俗成，以便以后不会因为人员的变动造成参数含义的错乱，那时候就非常麻烦了！！

其他关于R参数的就没有讲的。

3）直接调用siemens系统变量，进行参数化程序编制。

最简单的引用就是前面治理中的$P_UIFR[1]=CTRANS(X，Y，Z，B，);G54 B=?

其中$P_UIFR[1]就是系统的变量中的“框架数据”，这和在“参数”里面的“坐标设置”是一样的功效，只是“坐标设置”中不能设定B罢了„„

这种格式也是可以直接进行坐标的变换的，比如：

$P_UIFR[1]=CTRANS(X，Y，Z，B，)：CROT(Z,180)

具体情况就不多说了„„

接下来说说系统变量中常见的一些变量。

$P_Txxx,这个变量的作用是激活主轴上的刀具数据；

$P_TOOL，是激活刀边补偿，D1,D2,D3,D4...；

$P_TOOLL[1]，激活整个刀具的几何补偿，通常是指的刀具的悬长，G17-Z,G18-Y,G19-X；

$P_TOOLL[2]，激活整个刀具的几何补偿，通常是指的刀具的悬长，G17-Y,G18-X,G19-Z；

$P_TOOLL[3]，激活整个刀具的几何补偿，通常是指的刀具的悬长，G17-X,G18-Z,G19-Y；

$P_TOOLNO,激活siemens内部的刀号，T1,T2,T3，T32000；

$_P_TOOLR,激活刀具半径补偿；

$P_SEARCH,搜索变量，值为TRUE＝1或者0；

以上参数仅做参考，也许会因为设备制造商的不同有所小区别。

以上这些参数都是可以在程序编制中直接编制的。

大概参数化编程就讲完，还有很多东西没有来得及讲，希望感兴趣一起研究之„„

＝＝＝＝＝＝＝＝＝＝

至于还有朋友提高的IF...ELSE...ENDIF的条件语句结构，这好像不是属于参数化编程的一部分吧。严格上来讲应该属于“柔性编程”的一部分更贴近些。

写个程序，给感兴趣的朋友，一个简单程序。你可以直接做成MPF，进行调用，看看结果就晓得是怎么回事情了。

条件：某工厂是中午12：00下班，晚上18：30下班。程序功能，在MDA中运行，显示时间，提示操作者是否到了下班时间。

＝＝＝＝＝

%_N_SHOWTIME_MDF

;$PATH=/_N_MPF_DIR

DEF INT SHI,FEN

SHI=$A_HOUR

FEN=$A_MINUTE

IF(SHI=11)AND(FEN>=50)

MSG(”TIME IS : “<<2000+$A_YEAR<<”.“<<$A_MONTH<<”.“<<$A_DAY<<”, “<<$A_HOUR<<”:“<<$A_MINUTE<<”:“<<$A_SECOND<<” ,Good noon!Let us have a rest!“)

ELSE

IF(SHI=18)AND(FEN>=20)

MSG(”TIME IS : “<<2000+$A_YEAR<<”.“<<$A_MONTH<<”.“<<$A_DAY<<”, “<<$A_HOUR<<”:“<<$A_MINUTE<<”:“<<$A_SECOND<<” ,Good evening!Let us go home!“)

ELSE

MSG(”TIME IS : “<<2000+$A_YEAR<<”.“<<$A_MONTH<<”.“<<$A_DAY<<”, “<<$A_HOUR<<”:“<<$A_MINUTE<<”:“<<$A_SECOND<<” , Let us go on!")

ENDIF

＝＝＝＝＝

这就是简单的条件语句的程序，拷贝一下，去试试会出现什么情况呢？呵呵„„

参数化绘制篇3

关键词：垂直形变速率；网格化；梯度

4. 小结

本文首先完成了对不均匀形变资料的网格化处理，利用了克里格网格法和最小曲率网格法。然后在网格化的基础上，利用Fortran语言分别求取出了形变速率的梯度、剪切分量以及扩张分量。根据这三个量数学公式上的关系，可以从定性上相互验证正确性。但是，还有不足的地方：一，需要从三者的物理含义上分析异常的区别与联系；二，本文用到的是网格化处理方法，需要利用曲面拟合法求取同样的物理参数，并对比哪一种方法更有效率。

参考文献：

[1] 江在森，丁平，王双绪，等.中国西部大地形变监测与地震预报.北京：地震出版社，2001.

[2] 黄立人.中国大陆地壳垂直运动梯度图的编绘.地壳形变与地震，1995，15（2）：30—34.

[3] 黄立人，杨国华，刘天奎.用速度面拟合法研究华北部分地区的现今地壳垂直运动.地壳形变与地震，1989，9（3）：26—35.

[4] 张祖胜，尤晓青.垂直形变速度梯度图的编绘.地震，1997，16（3）：232—238.