[LISP程序]：求解lisp小程序

[复制链接]

lzy821025

发表于 2007-1-31 22:40:20 | 显示全部楼层 |阅读模式

【广而告之】积分规则、D豆获取攻略 窝窝空间装扮攻略

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

各位师兄,小弟写了个小程序,想把"改层""移动"两个命令合并操作//

输入力命令ay,选择物体,就能改层,再能移动.

可小弟写在下面的,只能改层,不能把移动命令连接操作.

////////

////////

////////

(defun c:ay ()

(princ "change_p_la ")

(setq en (ssget))

(command "change" en "" "p" "la" "2" "")

)

嘿嘿//小弟只能写到这里,不知道那位师兄能帮小弟解决这个问题

本人邮箱: liming@hk-digitall.com

谢谢//////
*-*b

小弟, 命令, 移动