乐筑天下

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

[编程交流] 需要帮助(复制到新Dra

[复制链接]

5

主题

22

帖子

17

银币

初来乍到

Rank: 1

铜币
25
发表于 2022-7-6 17:11:13 | 显示全部楼层 |阅读模式
我需要完成的。我想将这一切都编码到一个lisp中,但我在使用“New”或“Qnew”命令以及使它们在lisp例程中工作时遇到了麻烦。
 
1.带窗口选择的Copybase(完成)
  1. (command "copybase" "0,0" "W" pause pause "")
2。从模板创建新图形。我需要用一个每次都可以覆盖的文件名来自动命名。我已经完成了自动命名的代码,并且工作正常,但我无法运行“New”命令。
 
  1. (command "setvar""users1""-CNC")
  2. (command "setvar""users2""CNC/")
  3. (setq AA (GETVAR "USERS1"))
  4. (SETQ AB (GETVAR "USERS2"))
  5. (setq CT (getvar "CTAB"))
  6. (setq DP (getvar "DWGPREFIX"))
  7. (SETQ TM (STRCAT DP AB CT AA))""
  8. (command "new" TM )
  9. (command "tilemode" "1")
3。粘贴剪辑并将内容从复制库中的基点插入到特定点。(完成)
 
我不能使用-wblock,我更喜欢使用它,让一切都正常工作。我正在做的是从构造集中提取一个CNC图形,在某个时间点,draworder命令在图形中被使用,它不再与我们的“CNC”软件兼容。在导致问题的图形中的某些内容上使用wblock caries。
 
我曾尝试使用draworderctl(0)、sortents(0)、treedepth(0)禁用draworder,但没有成功。
 
我知道复制零件,然后将其粘贴到新图纸中,然后重命名。这是我不想做的很多额外步骤。
 
谢谢
回复

使用道具 举报

5

主题

22

帖子

17

银币

初来乍到

Rank: 1

铜币
25
发表于 2022-7-6 17:57:29 | 显示全部楼层
我做了一些研究,看起来这需要在VBA中完成,因为当打开一个新图形时,lisp会停止。
 
有人能帮我吗?
回复

使用道具 举报

5

主题

22

帖子

17

银币

初来乍到

Rank: 1

铜币
25
发表于 2022-7-6 18:33:20 | 显示全部楼层
我仍在寻求帮助。任何人
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-5-26 11:47 , Processed in 1.139075 second(s), 69 queries .

© 2020-2025 乐筑天下

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