|
|
请高手帮我看看下面这个小程序，主要是想自动的对一个三维实体进行一些操作，具体操作步骤如下第（2）部分（下面这些是我按手工方式在命令行进行的，结果ok），但自己写了几行程序却报出怪怪的错误。有时只能执行到一个命令而不能继续下去。有时又不能认出我给定的点坐标（0，0，0）之类的；有时又说什么AutoCAD只能允许4层嵌套，然后自动跳出CAD。怎么这么几行程序出了这么多问题呢？请高手更正。另:我上传了要处理的三维实体，见图: 被投影对象.dwg
;;;（1）自己的lisp程序;;;
(defun c:ty()
(command "_rotate3d" "all" "" "z" "" "-45" "")
(command "_rotate3d" "all" "" "x" "" "-55" "")
(command "_copy" "all" "" '(0 0 0) "" '(70 0 0) "")
(command "_dview" "all" "" "po" '(35 0 0) "" '(35 0 300) "" "d" "" "")
)
;;;;（2）命令行操作步骤;;;;
命令: _rotate3d
当前正向角度: ANGDIR=逆时针 ANGBASE=0
选择对象: 找到 1 个
选择对象:
指定轴上的第一个点或定义轴依据
[对象(O)/最近的(L)/视图(V)/X 轴(X)/Y 轴(Y)/Z 轴(Z)/两点(2)]: z
指定 Z 轴上的点 :
指定旋转角度或 [参照(R)]: -45
命令: _rotate3d
当前正向角度: ANGDIR=逆时针 ANGBASE=0
选择对象: 找到 1 个
选择对象:
指定轴上的第一个点或定义轴依据
[对象(O)/最近的(L)/视图(V)/X 轴(X)/Y 轴(Y)/Z 轴(Z)/两点(2)]: x
指定 Z 轴上的点 :
指定旋转角度或 [参照(R)]: -55
命令: _copy
选择对象: 找到 1 个
选择对象:
指定基点或位移，或者 [重复(M)]: 0,0,0
指定位移的第二点或 : 70,0,0
命令: dview
选择对象或 : all
找到 2 个
选择对象或 :
输入选项
[相机(CA)/目标(TA)/距离(D)/点(PO)/平移(PA)/缩放(Z)/扭曲(TW)/剪裁(CL)/隐藏(H)/关(
O)/放弃(U)]: po
指定目标点 : 35,0,0
指定相机点 : 35,0,300
输入选项
[相机(CA)/目标(TA)/距离(D)/点(PO)/平移(PA)/缩放(Z)/扭曲(TW)/剪裁(CL)/隐藏(H)/关(
O)/放弃(U)]: d
指定新的相机目标距离 :
输入选项
[相机(CA)/目标(TA)/距离(D)/点(PO)/平移(PA)/缩放(Z)/扭曲(TW)/剪裁(CL)/隐藏(H)/关(
O)/放弃(U)]:
本帖以下内容被隐藏保护；需要你回复后，才能看到！ 游客，如果您要查看本帖隐藏内容请 回复 |
|
置顶卡
