乐筑天下

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

[编程交流] 沿u轴移动对象

[复制链接]

56

主题

256

帖子

230

银币

后起之秀

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

铜币
253
发表于 2022-7-5 23:35:10 | 显示全部楼层
大家好,
 
我想知道你是否知道如何复制[多个]。我很惊讶你们到目前为止都没有提到这件事。
 
我有自己的lisp,我对其进行了修改以使其工作(结果有些不满意):
 
见下文:
  1. (defun c:CX ()
  2. (setq ss (ssget))
  3. (command "._copy" ss "" "M" pause ".yz" "@" pause)
  4. (setq ss nil);; add this line to clean the selection
  5. (princ)
  6. )
  7. (defun c:CY ()
  8. (setq ss (ssget))
  9. (command "._copy" ss "" "M" pause ".xz" "@" pause)
  10. (setq ss nil);; add this line to clean the selection
  11. (princ)
  12. )
  13. (prompt "\n:: Lock_Copy_X&Y.lsp loaded ::") (princ)
  14. (prompt "\n:: Invoke by typing 'CX' (Copy on X-axis) or 'CY' (Copy on Y-axis) ::") (princ)
这会锁定第一个副本,但不会锁定之后的副本。如有任何帮助,将不胜感激。谢谢
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-11 06:28 , Processed in 0.364956 second(s), 53 queries .

© 2020-2025 乐筑天下

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