- 1、本文档共6页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
使用对实体访问的功能快速标注尺寸
1999 9 September1999
13 3 Journal of Nanchang Institute of Aeronautical Technology Vo1. 13No. 3
袁 群
( 南昌航空工业学院 应用工程系, 江西 南昌 33 34)
: AutoCAD ( ) ; ;
AutoL ISP ,
: ; ; ; ;
: TH126. 2
AutoCAD ,
, Dim: ;
, ,
LISP , ,
, command AutoLISP Dim
AutoCAD
1
AutoCA D , AutoCAD ( )
: ,
AutoLISP ( LISP ) ,
AutoLISP AutoCAD :
command AutoLISP AutoCAD ,
AutoLISP AutoCAD
收稿日期: 1999- 6- 27 第一作者:袁群, 女, 1966 年生, 讲师。
46 1999
getvar/ setvar , AutoLISP , AutoCAD
entselentget , AutoLISP AutoCAD
AutoCAD
( LineCircleA rc ) ,
( )
Pline polygon
LISP , DXF
- 1, AutoLISP
: , , command
AutoLISP DIM AutoCAD
2
entsel, ,
, :
:
Command Line
From point: 1, 1
To point: 6, 6
:
To point Return
: ( ( : ) )
Command setq e entsel please choose an entity
Please choose an entity : 3, 3
( Entity name: 6 14( 3. . 3. . . ) )
entget,
LISP , assoc
,
: ( ( ( ) ) )
Command setq a entget car e
( ( -1. : 6 14)
Entity name
( . LINE )
( 8. )
( 1 1. . 1. . .
( 11 6. 6. . 6. . . )
)
( ( ) )
LISP cdr assoc a
, ( ( 1 ) ) ( ( 11 ) )
cdr assoc a cdr assoc a
, distance
3 : 47
( ) , ( cdr ( assoc 1 a) ) ,
( ( 4 ) ) ( )
cdr assoc a
, ( setvar LAST POINT ( cadr el) )
, ( osnap( cadr e2) PER)
( ) ,
您可能关注的文档
最近下载
- 人教版英语八年级上Unit3整单元课件(共190张ppt).ppt
- 茶叶加工工(高级、三级)理论考试复习题库(含答案).docx
- 数据通信基础认知—数据通信系统的基本概念.pptx
- 2024年宠物食品行业分析报告:从零食到主粮,从代工依赖到海内外均衡发展.pdf
- 床上用品供货及售后服务方案.docx VIP
- 一种双偏振雷达降水优化反演方法.pdf VIP
- 亲子农场体验园设计.pptx
- 刘京焕财政学模拟测试题.doc VIP
- 荣威-360-产品使用说明书-荣威360PLUS 1.5L 自动尊享版-CSA7154ADAC-荣威360用户手册-2018.7.11.pdf
- 财政学原理刘京焕陈志勇李景友第十章节.ppt
文档评论(0)