【RR】绘制云线_v4.0.7

zxfddz

学习了，谢谢分享

vladimir

非常好的代码，谢谢楼主分享啊。

vladimir

非常不错的代码，谢谢楼主分享錒

sammy

哥们新版本替换旧文件吧，不然钱包遭不住呀

kucha007

sammy 发表于 2023-2-24 17:40
哥们新版本替换旧文件吧，不然钱包遭不住呀

旧版还保留着，新版只能上传了，明经币多学习多发资料很容易赚到的啦，程序好用就觉得值了。

lxl217114

没想到又更新了，围观一下

kucha007

lxl217114 发表于 2023-2-24 22:38
没想到又更新了，围观一下

因为我自己也在用啊

依然小小鸟

感谢分享

669423907

非常感谢楼主分享好源码

kucha007

原来这样就可以判断command有没有产生新的对象= =
新文件entlast会出问题，最好在使用entlast前先创建一个临时实体，最后再删掉就是了

1. (setq e0 (entlast));记录实体起始点
   
2. (command "RECTANG" (getpoint) (getpoint))
   
3. (if (setq en2 (entnext e0));
   
4.   (princ "command产生了新的对象")
   
5.   (princ "command没有产生新的对象")
   
6. )

(setq e0 (entlast));记录实体起始点<br /> (command "RECTANG" (getpoint) (getpoint))<br /> (if (setq en2 (entnext e0));<br />   (princ "command产生了新的对象")<br />   (princ "command没有产生新的对象")<br /> )