下载文档原格式
于AutoLISP程序在数字化成图中对等高线应用摘要：本文介绍了AutoLISP（以下简称LISP）程序设计语言以及AutoCAD （以下简称CAD）实体联结表的一般概念，阐述了应用AutoLISP程序图解AutoCAD在工程中的应用原理、编制方法和LISP程序的执行步骤，证实这一方法确实是方便、简洁、成果准确且工效高。
关键词：LISP语言CAD实体联结表等高线在进行地形图编辑过程中，图内经常会有很多的等高线，由于作业的水平不同，等高线的质量也是五花八门，这就给编辑等高线带来很大的作业量。
在编辑过程中，我们会局部修改它的形状，使其光滑，还会根据等高距进行内插，以及等高线的赋值。
这些工序需要花费很大的人工时间。
鉴于以上情况，我们在具体工作中，利用LISP语言方法编辑，省略了很多繁琐的过程，使编绘等高线即方便、又快捷、准确无误、效率极高。
1. LISP程序设计语言简介Lisp语言最早是在20世纪50年代末由麻省理工学院（MIT）为研究人工智能而开发的。
Lisp 语言的强大使它在其它方面诸如编写编辑命令和集成环境等显示其优势。
Lisp代表LISt Processing，即表处理，这种编程语言用来处理由括号（即“(”和“)”）构成的列表。
LISP语言具有下列特点：(1)主要数据结构是表(符号表达式)，而不是作为算术运算对象的数。
(2)特性表简单，便于进行表处理。
(3)最主要的控制结构为递归，适于过程描述和问题求解。
(4)LISP程序内外一致，全部数据均以表形式表示。
(5)能够产生更复杂的函数和解释程序。
(6)对大多数事物的约束发生在尽可能晚的时刻。
(7)数据和过程都可以表示成表使得程序可能构成一个过程并执行这个过程。
(8)大多数LISP系统可以交互方式运行，便于开发各类程序，包括交互程序。
LISP数据结构在基本LISP中，仅有一种数据类型，即表结构。
大多数LISP程序设计中，数据是以表或者原子为专门形式。
基于Surfer和AutoCAD的等高线地图的绘制方法作者：陈朗坤童城黄学敏赵志根来源：《教育教学论坛》2017年第34期摘要：为了解决人工绘制等高线地图效率低、易出错等问题，提出了基于Surfer和AutoCAD的绘制方法。
Surfer软件具有绘制等值线图的强大功能，同时可以导出*.dxf文件；AutoCAD具有强大的图形编辑功能，同时可以调用*.dxf文件。
利用Surfer和AutoCAD软件的各自优点，可快速完成符合要求的等高线地图的绘制。
关键词：等高线地形图；绘制；Surfer软件；AutoCAD；dxf文件中图分类号：G642 文献标志码：A 文章编号：1674-9324（2017）34-0082-02一、引言等高线是地图上高程相等的各相邻点所连成的闭合曲线；等高线地图有很多种绘制方法，也有很多的成图软件，但不同的软件往往各具特色，应用于不同的具体案例。
AutoCAD具有强大的图形编辑功能，在工程界十分普及，目前很多图件是基于AutoCAD软件绘制的[1]，同时要求地形图也在AutoCAD环境下显示，但AutoCAD不能够实现等值线的自动成图，而如果人工绘制则具有效率低、易出错等缺点。
美国Golden Software公司开发的Surfer绘制等值线图软件，包含多种插值方法，可以编辑插值公式，绘制各种符合用户要求的等值线图，在测绘[2]、气象[3]等诸多领域有着广泛的应用。
Surfer软件可以导出*.dxf文件，被AutoCAD直接调用，基于Surfer和AutoCAD软件的各自优点，将Surfer软件导出的等值线图，供AutoCAD调用，从而可以实现等高线地图的快速绘制。
二、用Surfer软件绘制等值线图（一）基础数据的获得采用全站仪或其他测量设备，在研究区域实测地形点，完成数据的采集，从而直接获得或对数据整理后间接获得基础数据文件。
二维数据格式的基础数据，第一列为X坐标，第二列为Y坐标，第三列为标高，形成数据文件，如data.xls。
利用AutoCAD与Surfer软件相结合绘制等高线许捍卫,程 亮(河海大学测绘工程系,江苏 南京210098)[摘 要] 目前,国内利用AutoC AD进行数据采集,图形管理非常普及,其中有相当一部分在CAD上开发的数据采集软件没有DTM内容,本文试用在AutoCAD中集成Surfer OLE Automation来解决诸如等高线的绘制、土方量的计算等问题。
[关键词] AutoCAD;Surfer OLE Automation;等值线;土方量;三维可视化[中图分类号] P209.P283.7 [文献标识码] A [文章编号] 1007-3000(2002)02-0022-041 前言目前,国内有相当一部分的单位使用Auto-C AD软件来作为基础图形的管理平台,其数据采集功能也在AutoC AD上经二次开发完成。
其中部分软件没有DTM这一块内容。
等高线的生成、土方量的计算如编程则比较复杂,为快速地满足部分作业人员的需求,本文作者在使用Surfer软件的基础上认为两者的结合可解决这一难题。
Surfer软件是Golden公司开发的一个三维数学绘图软件包,可用来绘制各类等值线图及在此基础上的三维表面可视化,如测绘专业上的等高线、土方量计算及其他专业的各类等值线图。
生成的图形可直接存贮为C AD格式的文件与CAD 中原图形可完全融合在一起以达到完美的结合。
本文以作者为某大型企业总图管理系统开发过程中关于等高线,土方量计算的解决方案入手介绍两者相结合的等高线绘制方法。
2 等高线生成流程作者在AutoC AD上利用ObjectARX开发了一个大型企业总图管理系统。
在计算机上安装Surfer软件以后,计算机上自动装有Surfer OLE Automation,利用Visual Basic与Surfer OLE Automa-tion相结合,通过Set SurferAPP=Crea te Object( Surfer.Application ) Set Doc=Surfer App.Documents.AddSet Contour MapFrame=Doc.Shapes.AddContourMap (sGridFileName)Set Contour Map=C ontourMapFrame.Overlays(1)等联结Surfer开发出一个动态链接库D11 (类似与Visual Basic与MapInfo、Visual Basic与AutoC AD的结合),并经由ObjectARX嵌入到界面风格完全一致的总图管理系统中,使用户感觉不到系统的切换,系统浑然一体。
CAD 如何创建等高线CAD（计算机辅助设计）是一种广泛应用于工程设计和建筑设计领域的软件工具。
在地理信息系统（GIS）中，等高线是一种常见的表示地形高度变化的方式。
在 CAD 软件中，我们可以利用一些简单的技巧来创建等高线。
首先，打开你的 CAD 软件并建立一个新的绘图文件。
在你的绘图文件上选择合适的坐标系，以确保等高线的准确性。
接下来，选择合适的绘图单位和比例尺。
这将决定你绘制等高线时的精度和绘图的大小。
在你的绘图文件上，你可以使用线条工具绘制主要地形特征的轮廓线。
根据需要，你可以使用不同的线条粗细和颜色来表示地面的高低差异。
当你绘制轮廓线时，确保选择适当的高度间隔。
这将决定你的等高线的间距和密度。
通常，较小的高度间隔可以提供更详细的地形信息，而较大的间隔可以更好地显示整体地形特征。
你可以通过将地形数据导入 CAD 软件来获取准确的高程数据，或者使用现有的地图来作为参考。
在绘制主要等高线后，你可以使用描边工具来绘制次要的高度变化。
这将为你的等高线图添加更多的细节和深度。
在创建等高线时，还可以使用 CAD 软件提供的一些辅助工具来帮助你更准确地绘制。
例如，你可以使用捕捉工具来对齐和连接不同的轮廓线，以确保它们形成一个连续的地形表面。
此外，你还可以添加文字和注释来标示不同的地形特征和高度值。
这将帮助其他人更好地理解你的等高线图。
最后，保存你的绘图文件并导出等高线图为常见的图形文件格式，如 JPEG 或 PNG。
这样，你就可以轻松地与他人共享和展示你的等高线图。
总之，利用 CAD 软件创建等高线是一种方便且有效的方式来表示地形高度变化。
通过正确使用绘图工具、选择合适的高度间隔和添加必要的标示，你可以创建出清晰准确的等高线图。
这将为工程设计、地质研究和其他领域的专业人士提供宝贵的参考和信息。
开始使用CAD 软件来创建你自己的等高线图吧！。
在AutoCAD环境下不规则三角网构建及等高线生成代莉;陈春华;聂炎【摘要】对不规则三角网的生成进行了分析,在AutoCAD环境下使用三角形生成算法,将离散点构建成不规则三角网,并在此三角网的基础上生成相应的等高线.【期刊名称】《地理空间信息》【年(卷),期】2011(009)002【总页数】3页(P40-42)【关键词】数字高程模型;不规则三角网;Delaunay三角网;等高线【作者】代莉;陈春华;聂炎【作者单位】湖北省测绘工程院,湖北,武汉,430071;湖北省测绘工程院,湖北,武汉,430071;湖北省测绘工程院,湖北,武汉,430071【正文语种】中文【中图分类】P208地球表面高低起伏，呈现为一种连续变化的曲面，这种曲面无法用平面地图来确切表示。
于是我们就利用一种全新的数字地球表面的方法--数字高程模型（DigitalElevationModel，缩写DEM）表示，这种方法已经被普遍广泛采用。
DEM是一定范围内规则格网点的平面坐标（X，Y）及其高程（Z）的数据集，它主要是描述区域地貌形态的空间分布，是通过等高线或相似立体模型进行数据采集（包括采样和量测），然后进行数据内插而形成的。
DEM 是对地貌形态的虚拟表示，可派生出等高线、坡度图等信息，也可与DOM或其他专题数据叠加，用于与地形相关的分析应用，同时它本身还是制作DOM的基础数据。
在地理信息系统中，DEM最主要的三种表示模型是：规则格网模型，等高线模型和不规则三角网模型。
目前常用的算法是通过等高线和高程点建立不规则的三角网(Triangular Irregular Network,简称TIN),然后在TIN基础上通过线性和双线性内插建DEM。
不规则的三角网是由Peuker和他的同事于1978年设计的一个系统，它是根据区域的有限个点集将区域划分为相等的三角面网络，数字高程由连续的三角面组成，所有三角面相互邻接，互不相交，互不重叠，三角面的形状和大小取决于不规则分布的测点的密度和位置，能够避免地形平坦时的数据冗余，又能按地形特征点如山脊、山谷线、地形变化线等表示数字高程特征。
cad2006等高线拟合用法：1：启动AUTO_CAD；2：在Command中输入vbaload命令，装载需要运行扩展名为dvb文件（本程式名为：“Celiang_Project.dvb”）。
3：在Command中输入vbarun命令（快捷键Alt+F8），选取需要运行的功能。
其中:CeliangToolbar功能为增加一个本程式包的工具条；celiang1为展点程式；celiang2为等高线生成程式；celiang3为断面图生成程式。
查看原代码：在Command中输入vbaide命令（快捷键Alt+F11）。
celiang1是展点程式，暂只能展Cass扩展名为dat文件格式。
Cass格式：1,name1,2904.500,2637.800,-4.5002,,2910.900,2644.700,-5.000 ......其中：1为点序号；name1为点名；2904.500为X坐标；2637.800为Y坐标；-4.500为高程。
功能：生成层指定名；可选择展出三维坐标点、点名、序号、坐标；坐标X、Y轴对换；使用方法：1：在CAD用vbaload命令装载Celiang_Project.dvb 程序；2：后运行-vbarun命令，输入celiang1,回车；3：按开始键，装入需要展点的原始dat文件。
速度如下表：(CPU：1.8G内存：256M测试)展点数；商业测量软件；未打开过程显示的本程式式；65000个点；1.5分钟；1分钟；celiang2是生成三角网和等高线程式。
只能由图面点生成，暂无边界选取功能。
（偶尔有边角部分三角网生成不合理，有三角网交叉。
原因是取点距离判断太短，修改“三角网边长”项数值可减少这钟情况。
三角网边长值越大用时越长。
）所以在点分布有凹形明显地方生成等高线会有许多不合理的如果是无中生有地绘制，需要采集地面的三维坐标点，导入到cass中，构网，修改网形，绘制等高线。
1、电脑打开AutoCAD2007版本软件。
在CAD中实现等高线自动内插的一种方法
李洪玉;唐诗华;李景文;李永香
【期刊名称】《海洋测绘》
【年(卷),期】2004(024)003
【摘要】针对实际工作中内插等高线这一问题,分析了内插等高线算法的基本原理以及实际绘图时可能遇到的几种特殊情况,给出了用ObjectARX语言实现该算法的程序,提出了一些需要注意的问题.该算法及程序可以解决大部分地形图等高线的内插问题,在实际工作中具有较高的实用价值.
【总页数】3页(P52-54)
【作者】李洪玉;唐诗华;李景文;李永香
【作者单位】桂林工学院土木工程系,广西,桂林,541004;桂林工学院土木工程系,广西,桂林,541004;桂林工学院土木工程系,广西,桂林,541004;昆明理工大学国土资源工程学院,云南,昆明,650093
【正文语种】中文
【中图分类】P208
【相关文献】
1.一种等高线内插的新方法 [J], 林春峰;闵世平;黄华平
2.基于AutoCAD Lisp局部等高线自动内插新方法 [J], 唐争气
3.一种基于启发式算法的等高线局部内插方法 [J], 安晓亚;孙群;肖强;赵国成
4.地图等高线自动内插算法的设计与实现 [J], 曾玲
5.用程序型计算器内插等高线的一种方法 [J], 黄立本
因版权原因，仅展示原文概要，查看原文内容请购买。
在AutoCAD2000中应用VBA技术自动绘制等高线王永新福州市土地管理局计算机中心 350004摘要：应用AutoCAD进行地形图的计算机辅助制图能够极大地提高工作效率，但其没有自动生成等高线的功能，本人用VBA技术，将外业采集的离散点通过建立三角网，在三角形边上内插等高点的方式，能够在AutoCAD中实现等高线的自动绘制。
内容：VB是最为常用的支持ActiveX Automation技术的开发工具，其语法简单、功能强大。
VBA是VB的子集，由于AutoCAD2000的VBA是嵌入在AutoCAD 内部的，共享AutoCAD内存空间，可以很好地与AutoCAD沟通。
运用VBA 技术自动绘制等高线将极大地提高绘图效率，缩短项目的周期。
平面等高线自动绘制有很多方法，其中较为简单和比较常用的是三角网法。
用三角网方法绘制等高线包括四个主要过程：根据离散分布的数据点（离散点）建立不规则的三角形网；在三角形边上内插等高点；找等高线的起迄点并追踪全部等高点；连接等高点绘成光滑曲线。
下面介绍三角网法绘制等高线具体的算法过程。
一、建立三角网假设在AutoCAD模型空间的平面上已经有n个离散点，点的类型为具有3D坐标的Point实体。
为了保证等值点内插的精度，要使形成的每个三角形尽可能呈锐角三角形，并保证各个三角形之间互不交叉且不重复。
具体联结的方法是：1、确定第一个三角形设L为每次自动连成的三角形编号，K为每次用来扩展的三角形编号。
首先设L=1，从n个离散点中找出左下角的点赋给Ver(L,1)，作为第一个三角形的第一个顶点，找出距离该点最近的点赋给Ver(L,2)，作为第一个三角形的第二个顶点，找出距离这两点连线中点最近且不和这两点在一条直线上的点赋给Ver(L,3)，作为第一个三角形的第三个顶点。
这样，就形成一号三角形的顶点信息，K=1。
2、三角形扩展由第一号三角形向外扩展，直到将全部的离散点连成三角网的过程是：首先从K 号三角形的第一条边（Ver(K,1)、Ver(K,2)）向外扩展，为了避免三角形的交叉，以第一条边为界，显然，位于顶点Ver(K,3)同侧的离散点必须被排除，（见图1），利用直线判别正负区的原理可以实现这一要求。
基于Auto CAD等高线绘制的算法及程序设计【摘要】采用AutoLISP(Visual LISP)语言在AutoCAD环境下进行二次开发,设计平面等高线绘制程序,为地形图制图时等高线绘制提供方便易用的工具,从而提高绘图效率,并使AutoCAD真正地起到辅助设计作用。
并为基于AutoCAD环境下进行二次开发的应用与研究提供参考。
【关键词】AutoLISP ; 离散高程点;Delaunay三角网;等高线The calculate way and program design drawn according to the contour line in maps of Auto CAD【Abstract】Adoption the AutoLISP(Visual LISP) language carry on under the AutoCAD environment two development, design the flat surface contour line in maps draw procedure, for geography diagram graphics the contour line in maps draw to provide convenience easy use of tool, thus exaltation painting efficiency, and make the AutoCAD really have assistance design bine for according to AutoCAD environment bottom carry on two development of application provide reference with research.【Key words】AutoLISP; Long-lost high point;The Delaunay triangle net;Contour line in maps1. 引言Auto CAD是由美国Autodesk公司开发的通用计算机辅助设计软件。
由于其使用方便、灵活,尤其是其良好的开放性,使AutoCAD已成为全世界微机CAD系统的主流产品。
目前广泛应用于测绘、机械、建筑等行业。
由于其是通用软件,所以对于一些专业性功能受到限制,因此在实际的应用中通常要根据专业的需要进行二次开发。
AutoLISP语言就是Auto CAD内部的一种二次开发工具。
Visual LISP作为AutoLISP的更新换代产品被正式集成其中。
Visual LISP给用户提供了一个集成的开发环境,使用户可在易于使用的完全可视化的开发环境下编写、调试代码;经过编译的LISP程序不但提高了运行性能,并可防止他人试图获得用户程序代码;通过Windows的ActiveX与AutoCAD的对象模型接口可与其它软件集成。
2. Auto LISP语言的特点与结构AutoLISP 基于简单易学而又功能强大的LISP 编程语言。
它语法简单,编写程序便捷、灵活、数据类型丰富。
AutoLISP应用程序或例程可以通过多种方式与AutoCAD交互。
也可以在应用程序中使用对话框语言DCL(Dialog Control Language)、控制菜单,还能够提示用户输入、直接访问内置AutoCAD命令,以及修改或创建图形数据库中的对象,向AutoCAD 添加专用命令等。
实际上,某些标准AutoCAD命令就是AutoLISP应用程序。
AutoLISP通过VLISP (Visual LISP)进一步得到增强,VLISP提供了一个集成开发环境(IDE),其中包含编译器、调试器和其他提高生产效率的开发工具。
通过IDE用户可以进行试验:在命令提示下输入代码后可立即看到结果。
这使AutoLISP语言容易试验,而不管用户的编程经验如何。
VLISP 添加了更多的功能,并对语言进行了扩展以与使用ActiveX 的对象进行交互,也允许AutoLISP通过对象反应器对事件进行响应。
因此在IDE下用户可以便捷、高效地开发AutoLISP 程序,经过编译得到运行效率高、代码紧凑、源代码受到保护的应用程序,且程序的兼容性很强。
AutoLISP的数据类型丰富,除了具有一般程序设计语言的整型、实型、字符串等数据类型之外,还有表、函数、文件描述符、AutoCAD选择集、AutoCAD图元、VLA(Visual LISP ActiveX)对象、函数分页表和外部函数等数据类型。
AutoLISP处理的对象是符号表达式(简称表达式),相当于其他编程语言中的语句。
表达式由原子或表构成。
这里值得注意的是AutoLISP表达式采用前缀表示法,即将函数放在所有操作数之前(在AutoLISP语言里运算符也属于函数)。
利用AUTOLISP(VLISP)表处理语言进行二次开发可以将许多繁琐、易出错的工作简单化、程序化.。
这样不但可减少航测制图的出错机率,而且大大提高了其作业效率。
3. 等高线绘制的算法及程序设计等高线是地面上高程相等点的连线,可以反映地面高程、山体、谷地、坡形、坡度和山脉走向等地貌基本形态。
由等高线可以量算地面点的高程、地表面积、地面坡度、和山体的体积。
描绘等高线时必须满足下列要求:(1)等高线通常是连续的曲线,可能是闭合曲线也可能由于区域的限定,从区域的边界开始到区域的边界结束。
(2)给定某一高度时,等高线有时不止一条。
(3)等高线一定不能相交。
等高线绘制的基本流程如图1:图12.1 自动展离散的高程点。
首先建立高程点文件,然后程序自动读取文件进行展点。
数据文件格式为:点号坐标X 坐标Y 高程H1, 0.000, 8.264, 100.3982, 4.943, -4.942,98.7513, 3.163,-6.863,98.2884, 6.660,-3.872,98.8445, 7.509,-7.509,97.3636, 9.757,-5.901,97.5287, 5.353,-9.353,97.2358, 10.007, -10.006,96.2799,8.380,-11.500,96.285……展点程序流程如图2,展点后图形如图3。
图2图32.2 由离散的高程点构建三角网。
首先根据离散点生成delaunay三角形。
Delaunay三角网的定义:有公共边的V-多边形称为相邻的V-多边形。
连接所有相邻的V-多边形的生长中心所形成的三角网称为Delaunay三角网(简称D-三角网)。
D-三角网的外边界是一个凸多边形,它由节点集中的凸集形成,通常称为凸壳。
D-三角网具有两个非常重要的性质。
(1)空外接圆性质:在由点集V所形成的D-三角网中,其每个三角形的外接圆均不包含点集V中的其他任意点。
(2)最大的最小角度性质:在由点集V所能形成的三角网中,D-三角网中三角形的最小角度是最大的。
由于这两个性质,决定了D-三角网具有极大的应用价值。
同时,它也是二维平面三角网中唯一的、最好的。
具体方法步骤如下:(1)获得所有离散点选择集,并将所有点按照坐标x进行排序后的选择集S。
(2)构造超大三角形,使得所有离散点均落在该三角形的内部;(3)以该超大三角形作为Delaunay三角形集D的首个成员;(4)对所有离散点集S里的每个点,搜索D中满足外接圆包含该点的三角形集T;(5)新点与三角形集T中的所有三角形顶点构成三角形集N,在D中删除T,并加入N;(6)重复第4、5步;(7)删除D中所有与超大三角形有关的三角形。
三角网判断流程图如图4,最后绘制的三角网图形如图5。
图4图52.3 根据已构建的三角网生成等高线。
首先需要在三角网中的每个三角形的边上插补等值点。
要确定某个三角形的边上是否有等值点,需要进行判断和处理。
奇异点处理:如果某原始数据点(离散点)的高程和等高线值相同,将该点的高程值改变一个微量。
判断等高线经过的三角形:(1)如果一个三角形三顶点的值相同则各边无等值点。
(2)如果一个三角形的任意边两端点(A、B〕的Z值(Z a、Z b)满足满足(Z d-Z a)×(Z d-Z b)<0 (1)则该边必有等值点。
(其中:Z d代表等高线的高程值)等值点的平面位置坐标是:X d=X a+(X b-X a) ×(Z d-Z a)/(Z d-Z a)(2)Y d=Y a+(Y b-Y a) ×(Z d-Z a)/(Z b-Z a)(3)由于经过奇异点处理,不必考虑等值线穿过端点,如果一个三角形的边上存在等值点的话,只可能在某两条边上存在等值点,而不可能三条边上同时都有。
也就是说,只要三角形一边上存在等值点,则其余的两条边中必有一边存在等值点。
图6根据上面的判断条件,我们对每个等高线高程值遍历整个三角网选择集,如果等高线经过该三角网,求得两个等值点,连接这两个等值点,便得到该高程值的等高线的一小部分。
将整个三角网选择集遍历完后,我们把所有的这些高程值相等的线段连接起来就构成该高程值的等高线。
然后还可以对等高线进行拟合等处理。
最后绘制的图形如图6。
3. 结束语本程序不仅实用于绘制地形等高线图,同样也使用于绘制其他等值线图,因此用途很广。
通过利用该程序进行数据读取并绘制图形,首先避免了一般绘图数据输入时的错误,它通过计算机自动计算,省去了人工计算并进行等高线内插的繁琐和错误。
使得设计人员有更多的时间和精力来构思和创新设计方案。
大大提高了设计人员的工作效率和设计质量。
总之,在AutoCAD环境下使用AutoLISP进行二次开发实现图形自动绘制值得我们去学习和研究,能够带来很大的方便,带来可喜的经济效益。
参考文献[1] 李学志.Visual LISP 程序设计(AutoCAD 2006).北京:清华大学出版社.2006[2] 王来生等.大比例尺地形图机助绘图算法及程序.北京:测绘出版社.1993[3] 电力工程勘测制图(DL/T5156.1~5156.5-2002)北京:中国电力出版社2000[4] 国家基本比例尺地图图式(GB/T 20257.1-2007)北京:中国标准出版社2007[5] 王金山周园等测量学基础北京:教育科学出版社2003[6] 宁津生等测绘学概论武汉: 武汉大学出版社2008[7] 蒋围恒等测量学北京:测绘出版社.1993。
