批量重画四边形

500w008 · 发表于 2009-9-29 23:55

提示: 作者被禁止或删除内容自动屏蔽

500w008 · 发表于 2009-10-3 13:48

提示: 作者被禁止或删除内容自动屏蔽

淮上 · 发表于 2009-9-30 00:44

(defun c:aaa (/ a ent)
(setq a (entsel))
(setq a (car a))
(setq ent (entget a))
(setvar "cmdecho" 0)
(command ".extend" "" (list a (cdr (assoc 10 ent))) (list a (cdr (assoc 11 ent))) "")
(princ)
)

明经网友 *发表于 2009-9-30 07:25* · 发表于 2009-9-30 07:25

试过2楼楼主的程序,发现多段线,与SPL线,圆弧就不能两端延伸了,有时间加以完SHAN

露水2 · 发表于 2009-9-30 07:58

既然搞了就搞完善一些

1、不只是line 其他都可以加上；

2、再加个最近的修剪；

357785513 · 发表于 2009-9-30 12:20

我个人觉得,这个LSP应该对PL SPL ARC线也应该适用,慨然是两头延伸是吧,线也会有PL SPL ARC这些的

ZZXXQQ · 发表于 2009-10-1 19:58

游客，本帖隐藏的内容需要发帖数高于 5 才可浏览，你当前发帖数只有 0

zhaozwf · 发表于 2009-10-3 11:55

谢谢，

xjking007 · 发表于 2009-10-13 00:33

倒设了限制我看不到,

wudechao · 发表于 2009-10-13 00:39

是什么东西?

账号		自动登录	找回密码
密码			注册

[函数] 批量重画四边形

浏览过的版块

500w008 500w008 当前离线积分 6427 明经币个注册时间 2009-9-28 在线时间小时威望金钱个贡献激情	发表于 2009-9-29 23:55 \| 显示全部楼层 \|阅读模式提示: 作者被禁止或删除内容自动屏蔽

	回复使用道具举报置顶卡变色卡显身卡

500w008 500w008 当前离线积分 6427 明经币个注册时间 2009-9-28 在线时间小时威望金钱个贡献激情	楼主\| 发表于 2009-10-3 13:48 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡