yaojing38 发表于 2023-3-1 13:17:09

高版本CAL 怎么默认开启，高版本s::startup怎么开启。。

如题,除了(command "CAL" "")还有其他启动方式吗？、
还有高版本CAD 为什么以下s::startup无法在自启动文件中开启，，插件。。

(defun mystartuph1 ()
(load "。。。.lsp")
(netload "。。。.DLL")

(command "cal" "")
)



(if s::startup
(setq s::startup (append s::startup (quote (mystartuph1))))
(defun s::startup () (mystartuph1))
)




菜卷鱼 发表于 2023-3-1 15:26:21

(defun acal (str)
(if (null (type c:cal))
    (and (or
           (and (findfile "GEOMCAL.CRX") (ARXLOAD "GEOMCAL.CRX"))
           (and (findfile "GEOMCAL.ARX") (ARXLOAD "GEOMCAL.ARX"))
       )
       (princ "\n**LOAD:CAL**")
    )
)
(c:cal str)
)

yaojing38 发表于 2023-3-1 18:17:55

本帖最后由 yaojing38 于 2023-3-1 18:18 编辑

菜卷鱼 发表于 2023-3-1 15:26
(defun acal (str)
(if (null (type c:cal))
    (and (or

谢谢
s::startup怎么设置在自加载文件内?因为还有其他插件需要加载，，用load写多了就卡s::startup界面，但当按网上设置的办法设置s::startup时却无法启动，，不然长老一般是怎么加载比较多的插件的？？VLX,LSP类，困于找不到什么比较好的启动方法。。。

菜卷鱼 发表于 2023-3-1 19:56:27

获取程序文件列表，再自动写一个加载程序，加载这个自动生成的程序就好
内容如下
(load "E:/我的文档/加载程序/测试命令1.lsp")
(load "E:/我的文档/加载程序/测试命令2.lsp")
页: [1]
查看完整版本: 高版本CAL 怎么默认开启，高版本s::startup怎么开启。。