分享 超级递增复制

gc666666

sharetow 发表于 2019-12-19 11:06
上dwg，你确定01不是普通块？

这个是文字。。。

sharetow

gc666666 发表于 2019-12-19 11:24
这个是文字。。。

文字的确实有个Bug，1楼已修改

liuxiooang

可惜我刚注册 下载不了这个神器。

sharetow

liuxiooang 发表于 2019-12-19 12:16
可惜我刚注册 下载不了这个神器。

权限已经改了

再见熊猫衣服

gc666666 发表于 2019-12-19 11:02
在这。。。。。。。。。

你这样，有意思吗？自己指定阵列基点，直接用AR阵列，不就好了？

gc666666

再见熊猫衣服 发表于 2019-12-19 12:59
你这样，有意思吗？自己指定阵列基点，直接用AR阵列，不就好了？

这位同学，你行你上啊。有劲没地方使！

1028695446

sharetow 发表于 2019-12-18 19:59
1楼已更新，下载 v1.1版本

报告楼主，依然有bug，，，，
先提供几点建议
1、首先你的这个插件不开放源码，然后命令又占用了最常用的FF键，所以建议你把命令改长一点比如SH_FF，然后再配个简单的lsp文件让用户自己去定义新的快捷键，就不会冲突了
2、递增不递增的，不用集中在一个命令里面，可以多设几个命令，比如SH_FF，SH_FF1，这样可以快速准确的执行命令
3、关闭递增后，如果选择的选择集包含多个图元，其中有一个是字符类的（比如单行文字），那么动态复制出来的东西就只有文字了，其他类型的图元不会动态复制，这个bug需要修正下
4、显示的复制次数的文字，可以与视窗比例管理起来，不然有时候太小了
5、这个版块是源码共享哦，建议放源码，（一个挑事的微笑）

sharetow

1028695446 发表于 2019-12-20 09:54
报告楼主，依然有bug，，，，
先提供几点建议
1、首先你的这个插件不开放源码，然后命令又占用了最常用 ...

已修复，可自定义快捷键。     第一次发帖发错版块了

gc666666

sharetow 发表于 2019-12-20 10:25
已修复，可自定义快捷键。     第一次发帖发错版块了

你好，能给看一下这个标记的程序为啥运行不出来吗？
(defun XD::Pnt:Mark (p col / p1 p2 p3 p4)
  (grvecs
    (list col
          (polar p (/ pi 4) (* (getvar "viewsize") 0.05))
          (polar p (* pi 1.25) (* (getvar "viewsize") 0.05))
          col
          (polar p (* pi 0.75) (* (getvar "viewsize") 0.05))
          (polar p (* pi -0.25) (* (getvar "viewsize") 0.05))
          col
          (setq p1 (polar p (* pi 0.75) (* (getvar "viewsize") 0.025)))
          (setq p2 (polar p (/ pi 4) (* (getvar "viewsize") 0.025)))
          col
          p2
          (setq p3 (polar p (* pi -0.25) (* (getvar "viewsize") 0.025)))
          col
          p3
          (setq p4 (polar p (* pi 1.25) (* (getvar "viewsize") 0.025)))
          col
          p4
          p1
    )
  )
  t
)

sharetow

gc666666 发表于 2019-12-20 15:53
你好，能给看一下这个标记的程序为啥运行不出来吗？
(defun XD:nt:Mark (p col / p1 p2 p3 p4)
  (gr ...

可以运行啊，不过你这函数好像不是标准写法吧

1. (defun c:tt()
   
2.         (setq
   
3.                 a (getpoint  "\n请选择参照点:")
   
4.                 b 1
   
5.         )
   
6.         (XD:nt:Mark a b)
   
7. )
   
8. (defun XD:nt:Mark (p col / p1 p2 p3 p4)
   
9.   (grvecs
   
10.     (list col
    
11.                         (polar p (/ pi 4) (* (getvar "viewsize") 0.05))
    
12.                         (polar p (* pi 1.25) (* (getvar "viewsize") 0.05))
    
13.                         col
    
14.                         (polar p (* pi 0.75) (* (getvar "viewsize") 0.05))
    
15.                         (polar p (* pi -0.25) (* (getvar "viewsize") 0.05))
    
16.                         col
    
17.                         (setq p1 (polar p (* pi 0.75) (* (getvar "viewsize") 0.025)))
    
18.                         (setq p2 (polar p (/ pi 4) (* (getvar "viewsize") 0.025)))
    
19.                         col
    
20.                         p2
    
21.                         (setq p3 (polar p (* pi -0.25) (* (getvar "viewsize") 0.025)))
    
22.                         col
    
23.                         p3
    
24.                         (setq p4 (polar p (* pi 1.25) (* (getvar "viewsize") 0.025)))
    
25.                         col
    
26.                         p4
    
27.                         p1
    
28.     )
    
29.   )
    
30.   t
    
31. )

(defun c:tt()<br />         (setq <br />                 a (getpoint  "\n请选择参照点:")<br />                 b 1<br />         )<br />         (XD:nt:Mark a b)<br /> )<br /> (defun XD:nt:Mark (p col / p1 p2 p3 p4)<br />   (grvecs<br />     (list col<br />                         (polar p (/ pi 4) (* (getvar "viewsize") 0.05))<br />                         (polar p (* pi 1.25) (* (getvar "viewsize") 0.05))<br />                         col<br />                         (polar p (* pi 0.75) (* (getvar "viewsize") 0.05))<br />                         (polar p (* pi -0.25) (* (getvar "viewsize") 0.05))<br />                         col<br />                         (setq p1 (polar p (* pi 0.75) (* (getvar "viewsize") 0.025)))<br />                         (setq p2 (polar p (/ pi 4) (* (getvar "viewsize") 0.025)))<br />                         col<br />                         p2<br />                         (setq p3 (polar p (* pi -0.25) (* (getvar "viewsize") 0.025)))<br />                         col<br />                         p3<br />                         (setq p4 (polar p (* pi 1.25) (* (getvar "viewsize") 0.025)))<br />                         col<br />                         p4<br />                         p1<br />     )<br />   )<br />   t<br /> )