xiehaoing 发表于 2022-3-17 10:58:18

请问如何让LISP程序直接启动一个外部程序

请问如何让LISP程序直接启动一个外部的EXE程序
我之前写的.bat文件 然后通过批处理来启动外部程序,能否直接定义一个程序路径,然后程序可以自己启动,或者定义一个相对路径,来启动程序也可以,我一开始直接填写程序路径总是报错或者无法启动。后来只能改成批处理文件
像这样:


;===============================================================
;               
;修改为你的Acadsee 程序路径      
;               
;===============================================================
;启动外挂图框
(defun c:qdtk ()
(startapp "C:\\Program Files (x86)\\Acme CADSee\\AcmeCADSee.exe"))
;===============================================================
;安装去教育补丁
(defun c:azqjybd ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\4.QuJiaoYuBuDing.bat"))
;===============================================================
;安装去安装图库管理
(defun c:azppsck ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\1.CADsee.bat"))
;===============================================================
;启动CAD杀毒
(defun c:azcadsd ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\2.CADshadu.bat"))
;===============================================================
;启动PDF虚拟打印机
(defun c:azpdfxldyj ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\3.PDFXuNi.bat"))
;===============================================================
;安装填充配置文件
(defun c:pztcgj ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\5.Tcpeizhiwenjian.bat"))
;===============================================================
;安装易出图
(defun c:azcadyct ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\7.yichutu.bat"))
;===============================================================
;安装贱人工具箱配置文件
(defun c:beifenjrgjx ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\14.BFjrgjx.bat"))
;===============================================================
;导入贱人工具箱配置文件
(defun c:daorujrgjx ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\13.DRjrgjx.bat"))
;===============================================================
;查看各种激活码
(defun c:azckcxjhm ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\8.chakanjihuoma.bat"))
;===============================================================
;安装2019制图环境
(defun c:azzthj2019 ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\9.2019zhituhuanjing.bat"))
;===============================================================
;打开插件安装目录
(defun c:azchajianmulu ()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\10.dakaichajianmulu.bat"))
;===============================================================
;打开字体安装目录
(defun c:zitimulu()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\11.dakaizitmulu.bat"))
;===============================================================
;打开填充目录
(defun c:dktcmulu()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\12.dakaitiancongmulu.bat"))
;===============================================================
;打开图库目录
(defun c:dktkmulu()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\15.dktkmulu.bat"))
;===============================================================
;转T3格式
(defun c:zhuanT3()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\16.zhuanT3.bat"))
;===============================================================
;打开图层说明
(defun c:tuchengshuoming()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\17.tuchengshuoming.bat"))
;===============================================================
;JPG转DWG程序
(defun c:jpgzhuandwg()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\18.jpgzhuandwg.bat"))
;===============================================================
;PDF合并工具
(defun c:pdfhebing()
(startapp "C:\\ACAD_plugin\\5.Batch_processing\\19.pdfhebing.bat"))


这个是我之前写的,求大神指教。


springwillow 发表于 2022-3-17 11:51:00

第一个启动外挂图框的不就是启动exe程序的吗

xiehaoing 发表于 2022-3-17 14:35:02

springwillow 发表于 2022-3-17 11:51
第一个启动外挂图框的不就是启动exe程序的吗

;===============================================================
;安装去教育补丁
(defun c:azqjybd ()
(startapp "C:\\ACAD_plugin\\3.应用程序\\AutoCAD永久去教育版破解补丁.exe"))

比如这样
返回的是

APPLOAD 已成功加载 01_[批处理命令].lsp。
命令:
命令:
命令: AZQJYBD nil
命令:

wo870711 发表于 2022-3-17 15:21:37

以前搜到一个大神做了一个软件,能生成可以打开EXE的一个文件,就能和lisp连起来了

xiehaoing 发表于 2022-3-17 17:44:27

wo870711 发表于 2022-3-17 15:21
以前搜到一个大神做了一个软件,能生成可以打开EXE的一个文件,就能和lisp连起来了

那不就我这个BAT批处理一个意思么、、感觉有点绕了

664571221 发表于 2022-3-17 19:08:24

springwillow 发表于 2022-3-17 11:51
第一个启动外挂图框的不就是启动exe程序的吗

大哥又看到你了:lol

664571221 发表于 2022-3-17 19:09:03

你好兄弟可以加下我的qq吗3298554767

自贡黄明儒 发表于 2022-3-18 08:27:38

"4.QuJiaoYuBuDing.bat"这个是什么,你自己写的吗?

wo870711 发表于 2022-3-18 20:46:50

xiehaoing 发表于 2022-3-17 17:44
那不就我这个BAT批处理一个意思么、、感觉有点绕了

他是生成了lisp

panliang9 发表于 2022-3-20 20:33:57

看这个:Lisp调用Exe程序代码生成器
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=113028&highlight=exe
页: [1] 2
查看完整版本: 请问如何让LISP程序直接启动一个外部程序