wanhongron 发表于 2012-5-10 19:22:17

无名侠程序集，可惜找不到通用函数

无名侠收集的程序挺好，就是没有通用函数，按程序前面提示：
;;; 晓东空间下载：http://www.xdcad.net/forum/showthread.php?s=&threadid=325268
;;; CAD编程QQ群下载: 24942984
;(if (findfile "xcad.vlx")(load "xcad.vlx")(alert "\nCAD路径下未找到通用函数xcad.vlx!"))
找不到XCAD.vlx文件，在其他地方找到一个，好像也没有用。

wowan1314 发表于 2012-5-10 19:26:31

本帖最后由 wowan1314 于 2012-5-10 19:32 编辑

帮顶，谢谢分享。 看到xyp , 莫非是院长的？

xyp1964 发表于 2012-5-10 21:00:02


;; 批量闭合line线角度标注 伪源码
(defun c:test1077 (/ ss s0 ss1 i s1)
(CMDLA0)
(setq        ss(ssget '((0 . "line")))
        s0(entlast)
        ss1 (xyp-copy ss)
)
(xyp-PeditJoin (xyp-SSelEntnext s0) 0)
(setq        ss1 (setq ss (xyp-SSelEntnext s0))
        i   -1
)
(while (setq s1 (ssname ss1 (setq i (1+ i))))
    (xyp-PlDimAng s1 600)
)
(xyp-erase ss1)
(CMDLA1)
)

wanhongron 发表于 2012-5-10 21:08:14

是不是被骗了？最讨厌那些说共享源码而又遮遮掩掩留一手的人。。。

仲文玉 发表于 2012-5-11 08:38:25

这是院长的一贯作风，院长没说给的是源码，上面写着“伪源码”

daiguafan 发表于 2012-5-11 09:57:29

看到yxp院长了，顶一下

461045462 发表于 2012-5-11 10:02:12


加载院长的e派工具箱XCAD，应该就能解决

xiaoyuzj-503 发表于 2013-5-30 21:12:56

謝謝分享

dalin1985 发表于 2013-5-31 07:25:44

页: [1]
查看完整版本: 无名侠程序集，可惜找不到通用函数