浅谈Lisp在shp数据转换至南方cass中的妙用.pdf

浅谈Lisp在shp数据转换至南方cass中的妙用.pdf

ID:48112684

大小:514.50 KB

页数:2页

时间:2019-11-27

浅谈Lisp在shp数据转换至南方cass中的妙用.pdf_第1页
浅谈Lisp在shp数据转换至南方cass中的妙用.pdf_第2页
资源描述:

《浅谈Lisp在shp数据转换至南方cass中的妙用.pdf》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库

1、2017de16f(ge217f)hi6LÿmÊ<Ñ°ÚLispÇshpZî!ÒÓâ_cassÈ0Ôk■pXÿ■Õâæ)¡·

2、)Mÿ<·ÉÄ,×ص746000BC:de)lispcass'Ó9b'6,½"PcassK0ÿ-úw½ÃQp'úw,V^cassYZ¡õÓ9lb3。DEF:lispcassÿ-úwdxfF?tÃàÅ'·[n?ßb3úwcass91'!x]$,aàÅ3

3、Û©b、ß°¤ÔePcass91M[Pé,{Dlcassez].b5íǯ°QpÙ+,öf,þPtnshp

4、sðÁArcv2CAD70V^dxf,Ç¿l(5,׿úwa,Mlisp¸°×¿úw(entget(car(entsel))(list“”))Qb5°!x}~,úwiÔeuì@ib[cass91ñDz¡ôÍ,Álispè6Q°!xQp,Èj%²hÁcass91'éêõDilei.defs¤&QpÓ9lb3s¼Ã?ßX_。rsilispn?ßb3shpsðVM,eþPV^&.DLDMÃQ·,MW^Pcass'Ó9]$b'·[。(1000.“021”)_cassè°(310000)Èj%Ó9cass'lb1

5、}ã3Ã?ßX_。RiþÈ[lisp_sÄÿ-sð'½Pcass²¢£c

6、assl?ßb36,Ð~ÿ-úwôõ:è°(“SOUTH”(1000.“310000”)lªcassMj%²bÐôõ:Án[entgetj%ZD8abÐ.ÿ-sð。entget_sZDbÐ.#sð÷[6/(entgetn['È).ÿ-sð。O[entgetZDÿ-sðÅ,ÿ-sð.A¼²}-3°Èt。-?ß__iDLDM=0218ñÇÓ9l,A(eQp?ß3°WR8a+',À+%Ì8a1001°»¼。ôõ+nt,À_021×ÇÓ9l。1001°ÿTnZD.Ì8a¾<.·[0Í,éRAutoCAD²29©§clisp%°{,¬:¾<·[0Í。·[0ÍIM[À·[.abÐ.ÿ-s(1)

7、Álisp_sè6j%Ù+bÐ"Pè°gÀ¸ð8AÍô,ÎAPPID+'。¾<regapp_s&õ,AÈ8a°4ó6HXÉ·[0Í。ôªregapp_sí?t0ÍLlAPPID+(vl-load-com)',Ó嬷[0Í,þÓå¬nil。å¬nilÓ+tf0Í©ªÀ(defunc:att_south(/ss)X_+',Âñi8aX#.de,@i8a#.å¬,ö·(setqss(entsel“\nÎDQN:”))[Þb'G¾<8。(att(carss)“SOUTH”(cons1000“310000”))1.1CASS*t¶£{ìJ+·øh)CASSm¤'þnc.?ßb3,׿dxfs¤

8、'.ÿ-úw(defunatt(encass_NAMEatt_v/TMP1TMP2ENL)t:?ßb3úw¡(-3(“SOUTH”(1000.“310000”))(“TB(setqENL(entgetEN(listcass_NAME)))BH”(1000.“1”))(“DLDM”(1000.“013”))êà。°(setqTMP(cdr(assoc-3ENL)))1001+tÿ-sð.»¼,°1001õ©ª.1000úw,ߺ}(setqTMP1(cdr(assoccass_NAMETMP)))HXɺÃEκ。ô_Ì8a»¼.sð°1001.(ifTMP1SOUTH,Aõ,ea,8

9、aHXɺ310000,'310000i[.(setqTMP2(appendTMP1(listatt_v))CASSU°,AÍôRSOUTHõ,.Ì8aHXÉ',310000i+t?ENL(subst(list-3(conscass_NAMETMP2))(assoc-3ENL)ß(è°,ÌaHp0?ßè_,¸+ab3è_.Hp0,ÌENL)êaHp0?߸°,¸+a?ß_。)1.2KÍBöt¶shp]î?Ñ(setqENL(appendENL(list(list-3(listcass_NAMEatt_v)))))þPtnshpsðÁArcv2CAD70V^dxf,[)Arcv2CAD

10、70tshpsðDLDMúwV^FeatureAttributes->(regappcass_NAME)FeatureAttributesfields½V^Hp,AttributesType_Xdata-(entmodENL)>properties。)M}~CASS¡sð.ÿ-K0sð(Xdata)iÍôdxf±(2)õ,È4ó?ß_'“DLDM=”?߸°@ÿ-úw².âòúwÿ!。iÿ-úwiIaâÉÜ.,@°iQp4ó6gÀ¸°ôõ:%

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。