[LISP函数]：AUTOCAD数据转入MAPGIS

huazhijia

AUTOCAD的数据输入接口



        在将AUTOCAD数据转入MAPGIS时，经常会遇到两边的线型库，颜色库的编码不一致，而且在AUTOCAD中有些图元是以块的形式组成，这样就造成转换后形成“张冠李戴”，有时两边无法对应；另外在转换时还经常需要将AUTOCAD的某层转为MAPGIS的对应层。因此，系统提供了一套对应表文件接口：符号对照表——“arc_map.pnt”,线型对照表——“arc_map.lin”,颜色对照表——“cad_map.clr”,层对照表——“cad_map.tab”,用户编辑生成这些表文件并将其放在系统库目录下，系统成批或单个文件转换时都会按这个表文件的对应情况来自动进行转换。其转换格式如下：

在下面的说明中，斜体部分为文件内容，其余为相应文件说明。

符号对照表：

AUTOCAD（块名）                       MAPGIS（编码）

        W-L                                                  9431



        718A                                                 9511



5261                9531



         …………

线型对照表：

AUTOCAD（线名）                        MAPGIS（编码）

CONTINUOUS                                         2110



DASH1                                                      1402



DASH4                                                       4320



DOT1                                                         1403



              ………..

颜色对照表：

MAPGIS（颜色号）                         AUTOCAD（颜色号）

        1                                                         10



        2                                                          4



        4                                                          2



        6                                                          1



7                            3



        …………

层对照表：

MAPGIS（图层号）                         AUTOCAD（图层名）

        0                                                          0



        1                                                          1



2                            3



               ……….



        255                                                      90

注意：1、先将系统库目录设为\mapgis\suvslib, 然后在slib目录下编写对照表，

                  编写完成后将四个对照表复制到 suvslib目录下(或将slib目录下的四个对照表复制到suvslib)，这样就可以进行

                  转换了。

2、在转换过程中要区分大小写。