改VLX插件命令

l18c19

很给力，值得一试。

清风明月名字

谢谢楼主分享，很实用啊！

xiaomm250

好强大!!!!!!!!!!!!!!!

陌然-回首

楼主你好 ， 我想请问下。你发的这些类似代码的东西要怎么样处理才能变成可用。对于这些编程我是小白。

鱼与熊掌

不错 不错  收藏了

nadaloveluna

嗯，学习到了一个技巧。可以定义左手键了、

太阳的艺术

自贡黄明儒 发表于 2012-4-6 09:28
这个实用！

不知道能不能用 看看

自贡黄明儒

太阳的艺术 发表于 2014-8-8 13:15
不知道能不能用 看看

;;假如a.vlx  b.vlx两个文件都定义了函数zbbz
;;现在分别定义一个命令
(defun C:z1 (/ FILE)
  (cond
    ((and C:zbbz
          (VL-ACAD-UNDEFUN 'C:zbbz)
          (setq file (findfile "a.vlx"))
     )
     ;;(VL-ACAD-DEFUN 'C:zbbz)
     (load file)
     (C:zbbz)
    )
  )
)
(defun C:z2 (/ FILE)
  (cond
    ((and C:zbbz
          (VL-ACAD-UNDEFUN 'C:zbbz)
          (setq file (findfile "b.vlx"))
     )
     ;;(VL-ACAD-DEFUN 'C:zbbz)
     (load file)
     (C:zbbz)
    )
  )
)

nedy001

这个问题我也终于解决了，大家一起分享！
(vl-acad-undefun 'C:原文件命令);;取消定义原文件命令
(defun c:新命令 () (if (not c:原文件命令)(load "原文件名称.VLX")) (c:原文件命令))

血司

学习了，大神