社区 › AutoLISP/Visual LISP 编程技术 › VLX或者fas文件的命令忘了，怎么办？

sicky111 发表于 2015-8-27 11:20:56

G版的代码很好用，但有时候查不到命令，难道跟文件大小或者命令数量有关？

sachindkini 发表于 2015-8-27 14:27:09

see the hidden text

yjycad 发表于 2015-8-27 16:16:34

非常实用有东东，学学

hnsj2006 发表于 2015-8-28 00:18:23

[em0一样的问题

xufulai 发表于 2015-8-28 12:29:22

多谢分享了！

zhim0323 发表于 2015-8-28 12:46:09

我就来看看

xyp1964 发表于 2015-8-28 13:30:14

(defun c:tt (/ lst1 lst2)
(if (setq fl (getfiled "请选择程序文件" "" "vlx;fas;*" 8))
    (progn
      (setq lst1 (vl-remove-if-not '(lambda (x) (= (substr x 1 2) "C:"))(atoms-family 1)))
      (load fl)
      (setq lst2 (vl-remove-if-not '(lambda (x) (= (substr x 1 2) "C:"))(atoms-family 1)))
      (princ "\n命令: ")
      (foreach a (vl-remove-if '(lambda (x) (member x lst1)) lst2)
        (princ "\n")
        (princ (substr a 3))
      )
    )
)
(princ)
)

lucas_3333 发表于 2015-8-28 13:47:21

本帖最后由 lucas_3333 于 2015-8-28 13:51 编辑

xyp1964 发表于 2015-8-28 13:30 static/image/common/back.gif

院长,写个 判断程序加载前后, 获取程序的全局变量列表吧
(or *atoms* (setq *atoms* (atoms-family 1)))
(setq atoms2 (vl-remove-if '(lambda (x) (vl-position x *atoms*)) (atoms-family 1)))

llsheng_73 发表于 2015-8-29 08:49:21

lucas_3333 发表于 2015-8-28 13:47 static/image/common/back.gif
院长,写个 判断程序加载前后, 获取程序的全局变量列表吧
(or *atoms* (setq *atoms* (atoms-family 1))) ...

全局变量它不一定能在加载后都能表现出来
比如
(setq a 5)
(defun c:tt()
(setq b(* 2 a))
)
这里有两个全局变量，可加载前后只有一个能被检测出来，另一个需要运行程序后才能被检测到吧？

lucas_3333 发表于 2015-8-29 09:12:44

llsheng_73 发表于 2015-8-29 08:49 static/image/common/back.gif
全局变量它不一定能在加载后都能表现出来
比如
(setq a 5)


当然是要运行程序后才能检测出全部的全局变量, 所以程序中要有加载程序与执行程序这两步

查看完整版本: VLX或者fas文件的命令忘了，怎么办？