lsp文件怎么打开

lsp文件怎么打开,第1张

lsp是AutoCAD软件的Lisp脚本文件

当打开AutoCAD图形dwg文件时会自动运行相同文件夹中的名为acadlsp的脚本文件。这使得lsp文件成为计算机病毒在装有AutoCAD软件的电脑之间传播的一种方式。

lsp文件怎么打开:

直接用记事本就可以打开。

直接拖入CAD里就可以加载使用了。或者用APPLOAD命令,找到LSP文件加载。

1、输入命令APPLOAD并空格。

2、路径中找到并选中LSP文件,点击加载。

3、点击始终加载。

4、加载成功后,点击内容。

5、点击添加在选择一遍LSP文件,点击关闭使用即可。

注意事项:

CAD技术已经广泛地应用在机械、电子、航天、化工、建筑等行业。并行设计、协同设计、智能设计、虚拟设计、敏捷设计、全生命周期设计等设计方法代表了现代产品设计模式的发展方向。

(defun checkver ( / ver arx )

(setq ver (getvar "acadver"))

(cond

((= (substr ver 1 5) "1506") (setq arx "xxx")) ;;对应 AutoCAD 2002的arx文件

((= (substr ver 1 4) "160") (setq arx "xxx")) ;;对应 AutoCAD 2004的arx文件

((= (substr ver 1 4) "161") (setq arx "xxx")) ;;对应 AutoCAD 2005的arx文件

((= (substr ver 1 4) "162") (setq arx "xxx")) ;;对应 AutoCAD 2006的arx文件

((= (substr ver 1 4) "170") (setq arx "xxx")) ;;对应 AutoCAD 2007的arx文件

((= (substr ver 1 4) "171") (setq arx "xxx")) ;;对应 AutoCAD 2008的arx文件

((= (substr ver 1 4) "172") (setq arx "xxx")) ;;对应 AutoCAD 2009的arx文件

((= (substr ver 1 4) "180") (setq arx "xxx")) ;;对应 AutoCAD 2010的arx文件

((= (substr ver 1 4) "181") (setq arx "xxx")) ;;对应 AutoCAD 2011的arx文件

)

(arxload arx)

)

(checkver)

新建一文本文件,将以上代码复制进去,存为checkverlsp后,将它加入到cad的启动加载程序列表中,即可 "xxx"为对应的arx文件,若文件不存在于cad的搜索路径中,则需将完整文件路径名也写上

中科检测是化妆品检测备案服务机构,可开展化妆品风险服务检测,具备开展特殊化妆品备案检测资质,符合《化妆品注册和备案检验工作规范》和《中华人民共和国计量法》关于化妆品检验资质要求,是经国家药品监督管理部门确认的可承担化妆品注册和备案检验工作的服务机构。

中科检测是国家药监局认可的化妆品注册和备案检验机构,在化妆品检测领域,具备CMA、CNAS等资质,多次承担国家级、省级政府主管部门的监督抽检和风险监测任务,并为京东、天猫等电商平台提供质量监督服务。

中科检测可开展风险物质测试、人体功效评价、毒理实验、产品型式检验、安全评估等一站式检测服务项目。

(defun c:nnn() ;

(setq ColorCode (getint "\n请输入字体颜色代码(红1/黄2/绿3/青4/蓝5/紫6/白7):")) ;

(command "-layer" "m" "编号" "c" "7" " " "") ;

(command "-style""编号""romans""0""05""0""n""n""n") ;

(command "osmode" "0") ;

(command "_color" ColorCode) ;

(setq Radius (getdist "\n请输入圆圈半径: ")) ;

(setq Num (getint "\n请输入起始编号:")) ;

(while (> ColorCode 0) ;

(setq CenterPt (getpoint "\n请指定下一个点: ")) ;

(if CenterPt ;

(progn ;

(command "circle" CenterPt Radius) ;

(command "text" "j" "m" CenterPt ( 12 Radius) "0" Num) ;

(setq Num (+ Num 1)) ;

) ;

(setq ColorCode 0) ;

) ;

)

(command "-layer" "m" "0" "c" "7" " " "")

(command "-style""standard""宋体""0""1""0""n""n""n")

(command "color" "bylayer")

(command "osmode" "699")

(princ)

)

;;;

;;;以下为新建圆形视口程序

(defun c:wc()

(setq CenPt (getpoint "\n请指定圆心: "))

(setq SenPt (getpoint CenPt "\n请指定圆周点: "))

(command "-vports" "p" SenPt "a" "ce" CenPt "a" 35999999 SenPt "cl")

(princ)

)

;;;

(defun c:tt()

(command "undo" "1" )

(princ)

)

(prompt "\n<<NNN>>")

(prin1)

看这个行不行。把代码复制到记事本,扩展名改为lsp 打开CAD,工具-->AutoLISP-->加载 加载保存的lsp文件 然后在命令行打nnn 就可以使用了》

能用的话记得加分哦 o(∩_∩)o

以上就是关于lsp文件怎么打开全部的内容,包括:lsp文件怎么打开、如何用cad加载这个LSP、cad里面如何写一个lsp程序来cad的版本!等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10115052.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存