复制
收藏
提问
全网

(defun userDefinedColumnArray () (setq selSet (entsel "\n请选择要阵列的对象:")) (if selSet (progn (setq cols (getint "\n请输入列数:")) (if cols (progn (setq colSpacing (getreal "\n请输入列距:")) (if colSpacing (progn (command "_.undo" "_mark") ; 注意:这里使用 _ARRAY 命令并尝试设置矩形阵列 (command "_ARRAY" "" "_R" "_ON" "_COL" cols "_S" colSpacing "") ; 注意:_ON 表示对象之间的间距是通过列距和行距指定的,但这里我们只指定了列距 ; 默认情况下,行数可能由用户通过交互方式指定,或者您可以在这里额外添加一个参数来指定行数 (command "_.undo" "_end") (princ "\n根据用户输入和选择的对象创建的阵列已完成。\n") ) (princ "\n列距输入无效。\n") ) (princ "\n列数输入无效。\n") ) ) (princ "\n未选择任何对象。\n") ) ) (princ) ) (princ "\n脚本已加载。您可以通过在AutoCAD命令行中输入 'UDCAARRAY' 来运行用户定义的列阵列命令。\n") (defun c:UDCAARRAY () (userDefinedColumnArray) (princ) )

9809efb05
3个月前
全网
文档
学术
百科
知识库
时间不限
自动

理解问题(defun userDefinedColumnArray () (setq selSet (entsel "\n请选择要阵列的对象:")) (if selSet (progn (setq cols (getint "\n请输入列数:")) (if cols (progn (setq colSpacing (getreal "\n请输入列距:")) (if colSpacing (progn (command "_.undo" "_mark") ; 注意:这里使用 _ARRAY 命令并尝试设置矩形阵列 (command "_ARRAY" "" "_R" "_ON" "_COL" cols "_S" colSpacing "") ; 注意:_ON 表示对象之间的间距是通过列距和行距指定的,但这里我们只指定了列距 ; 默认情况下,行数可能由用户通过交互方式指定,或者您可以在这里额外添加一个参数来指定行数 (command "_.undo" "_end") (princ "\n根据用户输入和选择的对象创建的阵列已完成。\n") ) (princ "\n列距输入无效。\n") ) (princ "\n列数输入无效。\n") ) ) (princ "\n未选择任何对象。\n") ) ) (princ) ) (princ "\n脚本已加载。您可以通过在AutoCAD命令行中输入 'UDCAARRAY' 来运行用户定义的列阵列命令。\n") (defun c:UDCAARRAY () (userDefinedColumnArray) (princ) )

已完成理解(defun userDefinedColumnArray () (setq selSet (entsel "\n请选择要阵列的对象:")) (if selSet (progn (setq cols (getint "\n请输入列数:")) (if cols (progn (setq colSpacing (getreal "\n请输入列距:")) (if colSpacing (progn (command "_.undo" "_mark") ; 注意:这里使用 _ARRAY 命令并尝试设置矩形阵列 (command "_ARRAY" "" "_R" "_ON" "_COL" cols "_S" colSpacing "") ; 注意:_ON 表示对象之间的间距是通过列距和行距指定的,但这里我们只指定了列距 ; 默认情况下,行数可能由用户通过交互方式指定,或者您可以在这里额外添加一个参数来指定行数 (command "_.undo" "_end") (princ "\n根据用户输入和选择的对象创建的阵列已完成。\n") ) (princ "\n列距输入无效。\n") ) (princ "\n列数输入无效。\n") ) ) (princ "\n未选择任何对象。\n") ) ) (princ) ) (princ "\n脚本已加载。您可以通过在AutoCAD命令行中输入 'UDCAARRAY' 来运行用户定义的列阵列命令。\n") (defun c:UDCAARRAY () (userDefinedColumnArray) (princ) )

展开阅读网页

更专业一些
转笔记
专业
(defun userDefinedColumnArray () (setq selSet (entsel "\n请选择要阵列的对象:")) (if selSet (progn (setq cols (getint "\n请输入列数:")) (if cols (progn (setq colSpacing (getreal "\n请输入列距:")) (if colSpacing (progn (command "_.undo" "_mark") ; 注意:这里使用 _ARRAY 命令并尝试设置矩形阵列 (command "_ARRAY" "" "_R" "_ON" "_COL" cols "_S" colSpacing "") ; 注意:_ON 表示对象之间的间距是通过列距和行距指定的,但这里我们只指定了列距 ; 默认情况下,行数可能由用户通过交互方式指定,或者您可以在这里额外添加一个参数来指定行数 (command "_.undo" "_end") (princ "\n根据用户输入和选择的对象创建的阵列已完成。\n") ) (princ "\n列距输入无效。\n") ) (princ "\n列数输入无效。\n") ) ) (princ "\n未选择任何对象。\n") ) ) (princ) ) (princ "\n脚本已加载。您可以通过在AutoCAD命令行中输入 'UDCAARRAY' 来运行用户定义的列阵列命令。\n") (defun c:UDCAARRAY () (userDefinedColumnArray) (princ) )
不在提醒

更专业内容正在努力生成中
知识树
(defun userDefinedColumnArray () (setq selSet (entsel "\n请选择要阵列的对象:")) (if selSet (progn (setq cols (getint "\n请输入列数:")) (if cols (progn (setq colSpacing (getreal "\n请输入列距:")) (if colSpacing (progn (command "_.undo" "_mark") ; 注意:这里使用 _ARRAY 命令并尝试设置矩形阵列 (command "_ARRAY" "" "_R" "_ON" "_COL" cols "_S" colSpacing "") ; 注意:_ON 表示对象之间的间距是通过列距和行距指定的,但这里我们只指定了列距 ; 默认情况下,行数可能由用户通过交互方式指定,或者您可以在这里额外添加一个参数来指定行数 (command "_.undo" "_end") (princ "\n根据用户输入和选择的对象创建的阵列已完成。\n") ) (princ "\n列距输入无效。\n") ) (princ "\n列数输入无效。\n") ) ) (princ "\n未选择任何对象。\n") ) ) (princ) ) (princ "\n脚本已加载。您可以通过在AutoCAD命令行中输入 'UDCAARRAY' 来运行用户定义的列阵列命令。\n") (defun c:UDCAARRAY () (userDefinedColumnArray) (princ) )
如何使用AutoCAD的_ARRAY命令创建阵列?
AutoCAD中如何使用用户定义的函数?
AutoCAD脚本中如何获取用户输入?

以上内容由AI搜集生成,仅供参考

在线客服