乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 35|回复: 12

[编程交流] 使用不带VLA的LISP

[复制链接]

52

主题

156

帖子

104

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2022-7-5 23:12:20 | 显示全部楼层 |阅读模式
我目前有一个安装程序,可以在AutoCAD的完整版本中向AutoCAD添加支持路径目录。
有一个称为CADSTA的第三方应用程序,使AutoCAD Lt能够运行lisp命令,但不能使用VLA
 
 
我想知道是否有可能在没有VLA的情况下运行纯lisp驱动的例程来完成同样的事情?
 
 
我当前使用但不适用于AutoCAD LT的CADSTA的示例代码
  1. (defun c:SMC-setup (/ FilePrefs addEnviron EnvironBase acadEnviron)
  2. (setq  FilePrefs (vla-get-files
  3.      (vla-get-preferences (vlax-get-acad-object))
  4.    )
  5. )
  6. (setq acadEnviron (vla-get-supportpath FilePrefs))
  7. (setq
  8.    EnvironBase  "C:\\Program Files\"
  9. )
  10. (setq  addEnviron
  11. '("Shadow Multi Cast" "Shadow Multi Cast\\Data"   );;;add any others you want to this list
  12. )
  13. (if (not (vl-string-search
  14.      (strcat EnvironBase (car addEnviron))
  15.      acadEnviron
  16.    );;;make sure we haven't already done this
  17.      )
  18.    (progn
  19.      (mapcar
  20. '(lambda (x)
  21.    (setq acadEnviron (strcat acadEnviron ";" EnvironBase x))
  22. )
  23. addEnviron
  24.      )
  25.      (vla-put-supportpath FilePrefs acadEnviron)
  26.      (princ "\n....Shadow Multi Cast Installed")
  27.    );progn
  28.    (princ
  29.      "\n....Shadow Multi Cast already Installed...nothing done."
  30.    )
  31. );if
  32. (princ)
  33. )
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-5 23:21:19 | 显示全部楼层
  1. (setenv "ACAD" ... )

示例:支持文件搜索路径功能
回复

使用道具 举报

52

主题

156

帖子

104

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2022-7-5 23:27:15 | 显示全部楼层
谢谢你,工作顺利
回复

使用道具 举报

35

主题

2471

帖子

2447

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
174
发表于 2022-7-5 23:28:05 | 显示全部楼层
在过去的几年里,我看到许多这样的LT使能技术正在兴起,但很快就会被Autodesk淘汰。从看来,所有这些用户使用的访问在EULA条款下是不可接受的。在某些情况下,这些工具的开发人员被迫揭露其用户数据库,以便Autodesk也与他们作对(甚至只是通过停止通知)。
在决定依赖LT enabler时,您可能需要考虑到这一点,更重要的是要对其进行投资。
回复

使用道具 举报

4

主题

194

帖子

192

银币

初来乍到

Rank: 1

铜币
25
发表于 2022-7-5 23:34:04 | 显示全部楼层
为什么不干脆把铂金版的总成本降到1000美元以下,全部交付给BricsCAD呢。运行带有VLA、BRX、ARC、DLL和更多扩展的LISP不需要特殊的插件,而且它们有LISP函数和ACAD没有的VLA函数。
回复

使用道具 举报

52

主题

156

帖子

104

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2022-7-5 23:37:42 | 显示全部楼层
是的,我实际上使用的是AutoCAD的完整版本,但我认识的一家公司在其3台机器上安装了AutoCAD LT,并希望能够使用lisp。所以这对我来说不是什么问题,只是对他们来说。
回复

使用道具 举报

15

主题

243

帖子

228

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
75
发表于 2022-7-5 23:46:15 | 显示全部楼层
很多人想要很多他们买不起的东西。。。。。
说真的,如果是一家公司。。。。。。在进入法庭之前,告诉他们要正确行事。1000美元以下的BricsCAD?拜托。。。
 
这就像用1美元租了一个月的租金,想要免费的电力,呵呵,我一点都不在乎,但如果你说“嘿,如果你想要这个……你不想付autodesk的价格……这是你最好的选择”,你可能会得到一些分数。。。。否则,就像Msasu说的那样,你承担着项目完成率达到90%的风险,然后突然公司不存在或在法庭上被绑住。。。。无论哪种方式都不适合你的支出。
 
我的两分钱只是小心点,但当然这取决于你,抱歉,如果这是粗鲁的
回复

使用道具 举报

52

主题

156

帖子

104

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2022-7-5 23:49:25 | 显示全部楼层
不,一点也不粗鲁。我同意你的观点。我认为他们赚的钱足以支付购买合适软件的费用。但归根结底,他们是否愿意冒险取决于自己。遗憾的是,它没有lisp功能,而不需要3D组件。
我会调查一下那个砖块,看看它是怎么回事,然后告诉他们它是否值得投资。
回复

使用道具 举报

15

主题

243

帖子

228

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
75
发表于 2022-7-5 23:54:15 | 显示全部楼层
是的,我现在可以听到他们的反应。。。。(当然是上下文启发的最佳猜测!)
 
“我们买它是为了省钱”
 
“与autocad中的相同功能相比,它确实做到了这一点-然而,LT是LT并且LT不是autocad full的原因是省略了LISP,除其他外,因此……我们可以欺骗系统,您可能会接到autodesk的电话……。”
“我们可以是这个列表中的下一个……。或者,对于任何一位经理来说,一周的工资相当于多少,我们可以拥有这一切,一个完整(但备用)的CAD版本,它可以自由合法地使用LISP……”
 
这是我个人处理问题的方式,但从我在这篇文章中读到的内容来看,上下文可能与我所描述的大不相同。我可以想象,任何不愿意做出这种转变的人,要么是因为公司实际上没有看起来那么多的钱,要么是因为做出决定的人不知道bricsCAD。我自己从来没有用过。。。。大部分时间都被最新版本的autoCAD破坏了。。。。。然而,坦率地说,如果它特别适合这个论坛上的人(与其他autolisp论坛一起,但与常规绘图论坛不同),那么BRICScad对我来说就足够了。或者至少。。。如果需要
无论如何,我只是希望能有所帮助。
回复

使用道具 举报

4

主题

194

帖子

192

银币

初来乍到

Rank: 1

铜币
25
发表于 2022-7-6 00:00:03 | 显示全部楼层
我运行ACAD和BricsCAD,主要是因为我在ACAD中使用Architectural Desktop,并在BricsCAD中进行土木工程。如果我能抛弃ACAD,我会在一瞬间(仍在使用2004年),必须有许多房屋计划备案才能废除它。BricsCAD在几年内取得了长足的进步,他们似乎是一群雄心勃勃的年轻人,非常致力于自己的事业,非常愿意解决可能出现的任何问题。比面向股东的ACAD更面向客户/用户。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-11 03:29 , Processed in 0.665132 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表