如何用LISP语言提取CAD中文本或直线的倾斜角度？
答案:1 悬赏:40 手机版
解决时间 2021-04-04 23:58
- 提问者网友：雪舞兮
- 2021-04-04 10:35
如何用LISP语言提取CAD中文本或直线的倾斜角度？
最佳答案
- 五星知识达人网友：人類模型
- 2021-04-04 11:55
直线的图元表：
((-1 . <图元名: 7ffffb05e20>) (0 . "LINE") (330 . <图元名: 7ffffb03990>) (5 .
"DF2") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "MOU") (100 .
"AcDbLine") (10 0.919113 2.15962 0.0) (11 4.32096 6.14953 0.0) (210 0.0 0.0
1.0))
10和11项是直线的两个端点(10 0.919113 2.15962 0.0) (11 4.32096 6.14953 0.0) ，要经过计算才会得出直线的角度
倾斜文字的图元表
((-1 . <图元名: 7ffffb05e40>) (0 . "TEXT") (330 . <图元名: 7ffffb03990>) (5 .
"DF4") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "MOU") (100 .
"AcDbText") (10 7.44934 1.78795 0.0) (40 . 1.235) (1 . "123456") (50 .
0.273648) (41 . 1.0) (51 . 0.0) (7 . "ROMAND") (71 . 0) (72 . 0) (11 0.0 0.0
0.0) (210 0.0 0.0 1.0) (100 . "AcDbText") (73 . 0))
其中第50项(50 . 0.273648) 是角度，单位是弧度，要转化成角度（15.6789度）
用命令
(entget (car (entsel)))
就可以提取到图元表追问非常感谢！！！
((-1 . <图元名: 7ffffb05e20>) (0 . "LINE") (330 . <图元名: 7ffffb03990>) (5 .
"DF2") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "MOU") (100 .
"AcDbLine") (10 0.919113 2.15962 0.0) (11 4.32096 6.14953 0.0) (210 0.0 0.0
1.0))
10和11项是直线的两个端点(10 0.919113 2.15962 0.0) (11 4.32096 6.14953 0.0) ，要经过计算才会得出直线的角度
倾斜文字的图元表
((-1 . <图元名: 7ffffb05e40>) (0 . "TEXT") (330 . <图元名: 7ffffb03990>) (5 .
"DF4") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "MOU") (100 .
"AcDbText") (10 7.44934 1.78795 0.0) (40 . 1.235) (1 . "123456") (50 .
0.273648) (41 . 1.0) (51 . 0.0) (7 . "ROMAND") (71 . 0) (72 . 0) (11 0.0 0.0
0.0) (210 0.0 0.0 1.0) (100 . "AcDbText") (73 . 0))
其中第50项(50 . 0.273648) 是角度，单位是弧度，要转化成角度（15.6789度）
用命令
(entget (car (entsel)))
就可以提取到图元表追问非常感谢！！！
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯