乐筑天下

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

[编程交流] Lisp'；s不在201工作

[复制链接]
kkleinchester

2

主题

10

帖子

8

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 12:39:18 | 显示全部楼层
这是reg move命令
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

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

铜币
438
发表于 2022-7-6 12:40:12 | 显示全部楼层 
  1.  (defun c:mxy (/ ss ptso ptre ptd) ;Move in X,Y only
  2.  (setvar "cmdecho" 1)
  3.  (setq ss (ssget))
  4.  (setq ptso (getpoint "\n Select source point"))
  5.  (setq ptre (getpoint "\n Select destination reference"))
  6.  (setq ptd (list (car ptre) (cadr ptre) (caddr ptso)))
  7.  (command "_.move" ss "" "_non" ptso "_non" ptd)
  8.  (setvar "cmdecho" 1)
  9.  (princ)
  10. )

 
运行该命令并将其打印的所有内容复制/粘贴到命令行。
回复

使用道具 举报

kkleinchester

2

主题

10

帖子

8

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 12:44:56 | 显示全部楼层
您的意思是将其保存为lisp，然后转到cmdline吗？还是只是粘贴？
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

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

铜币
438
发表于 2022-7-6 12:48:15 | 显示全部楼层
 
两者都可以。
回复

使用道具 举报

kkleinchester

2

主题

10

帖子

8

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 12:51:37 | 显示全部楼层
我仍然使用标准移动命令。感谢您的帮助，如果有帮助的话，这个lisp允许您在一个轴上移动一个对象，或者只移动xy。
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

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

铜币
438
发表于 2022-7-6 12:54:58 | 显示全部楼层
 
我理解它的作用。它在我这方面工作得很好，但我需要你加载它，执行它并粘贴它在命令行上显示的所有内容。
回复

使用道具 举报

kkleinchester

2

主题

10

帖子

8

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 12:56:39 | 显示全部楼层
我粘贴到命令行，得到了标准的移动
回复

使用道具 举报

alanjt

54

主题

3755

帖子

3583

银币

后起之秀

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

铜币
438
发表于 2022-7-6 13:00:36 | 显示全部楼层
你执行命令了吗？
 
对不起，我在上班。
回复

使用道具 举报

Lee Mac

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 13:03:40 | 显示全部楼层
在运行代码回复#12后，您是否没有收到错误？
 
如果是这样的话，你能在这里发布你的命令行历史记录吗？这样我们就可以对它进行诊断了
回复

使用道具 举报

kkleinchester

2

主题

10

帖子

8

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 13:05:01 | 显示全部楼层
也许我做得不对！
 
我粘贴了它，点击回车键，然后才开始移动。
回复

使用道具 举报

12
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-6-8 07:00 , Processed in 0.317096 second(s), 70 queries .

© 2020-2025 乐筑天下

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