;-----------------------------------------------------------------------
;阵列
;;;(defun c:tt()
;第一种(1):
;(command "array" 对象 "" "p" 阵列中心点坐标 数量 填充角度 "Y") ;环形阵列
;;;(setq obj (car(entsel)))
;;;(setq ro (getpoint"请指定圆心点:"))
;;;(command "array" obj "" "p" ro 6 180 "Y")
;第一种(2):
;(command "array" 对象 "" "p" "b" 数量 填充角度 "Y") ;环形(P) 环形阵列
;第一种(3):
;(command "array" 对象 "" "p" 阵列中心点坐标 数量 填充角度 "N") ;环形(P) 环形阵列
;第一种(4):
;(command "array" 对象 "" "p" "b" 数量 填充角度 "N") ;环形(P) 环形阵列
;第二种:
;(command "array" 对象 "" "r" 行数 列数 行间距 列间距) ;环形(P) 环形阵列
;;;(setq obj (car(entsel)))
;;;(command "array" obj "" "r" 5 6 -1000 1000) ;矩形(R) "r"可以写作"",为默认
;有人说，(command "array" 对象 "" "r" 行数 列数 行间距 列间距 角度)，可是我试了，根本没有角度。
;;;)
本帖最后由 yaokui25 于 2013-8-10 11:50 编辑
楼主，把你发的打个包上传一下好吗？
这些东西对新人来讲很有用
yaokui25 发表于 2013-8-10 11:49 static/image/common/back.gif
楼主，把你发的打个包上传一下好吗？
这些东西对新人来讲很有用
感谢师兄的支持！
你让我打个包全发上来，我目前还做不到，因为这是我整理一点就发上来一点的东西。
以后会随时更新。我也希望越来越多的人来参与，思考，讨论，整理。
我在整理过程中遇到不少疑问，都用红色字示出，还希望师哥师姐不吝赐教。
本帖最后由 yeahyeah 于 2013-8-10 16:34 编辑
;-----------------------------------------------------------------------
;打断
;(defun c:tt()
;第一种:打断于点
;(command "break" 对象 "F" 对象上坐标 "")
;;;(setq obj (car(entsel "\n指定对象:")))
;;;(setq pa (getpoint "\n指定打断点:" ))
;;;(command "break" obj "F" pa "@") ;[第一点(F)] ;为什么加"@"?我还不知道，CAD快捷键书上就这么教的。。
;第二种:打断
;(command "_break" 对象 "F" 对象上坐标 对象上坐标 "")
;;;(setq obj (car(entsel "\n指定对象:")))
;;;(setq pa (getpoint "\n指定打断第一点:" ))
;;;(setq pb (getpoint "\n指定打断第二点:" ))
;;;(command "break" obj "F" pa pb) ;[第一点(F)]
;以上我都加了"F",这是因为我在试的过程中，发现有两种模式，
;一种是把指定对象时的点当做打断的第一点，一种是打“F”后，自己指定打断第一点。
;两种模式因为使用前后顺序的不同，会切换进行。
;为了稳妥，我都加“F”，这样就不会混乱掉。
;)
好象简单的东西给你搞复杂了
所有的在帮助中都有。
ZZXXQQ 发表于 2013-8-11 09:42 static/image/common/back.gif
所有的在帮助中都有。
谢谢老师！迷茫之人往往忘记chm文件！哈哈哈！谢谢啦！
自贡黄明儒 发表于 2013-8-11 08:17 static/image/common/back.gif
好象简单的东西给你搞复杂了
嗯嗯……那怎么才能简单些呢？
看到一个很好的帖子：[原创]关于command函数的调用
还发现了关于使用不使用command调用CAD命令的争议。
看起来，自己真的还很肤浅。还有很长的路要走。
支持自己编写程序