2013-05-06 明经 AutoLISP 编程(102918348) 群聊记录：[image={19D73B62-AF38-61EC-B666-093DC6

明经快报

[Bagu]Cyb 19:49:45

这小机器人 真勤快

明经快报

[alwtyp][alwtyp] 20:59:26

请问有不固定内容的表(a b c d e ……)，只有(a b c d e）是固定出现的，怎么把其他的内容提取出来

明经快报

[仑通]仑通 21:22:56

(defun c:Get_MinMax( / en vl-en minext maxext)
  (vl-load-com)
  (setq *acadobject*   (vlax-get-acad-object)
 *acaddocument* (vla-get-activedocument *acadobject*)
 *mspace*       (vla-get-modelspace *acaddocument*)
  ) ;_ Endsetq
  (setq en (entsel "lease select a object: "))
  (setq vl-en (vlax-ename->vla-object (car en)))
  (setq minext (vlax-make-safearray vlax-vbdouble '(0 . 2)))
  (setq maxext (vlax-make-safearray vlax-vbdouble '(0 . 2)))
  (vla-getboundingbox vl-en 'minext 'maxext)
  (list (vlax-safearray->list minext) (vlax-safearray->list maxext))
) ;_ EndDEFUN

明经快报

[仑通]仑通 22:45:43

这两天怎么不见小蜜蜂了

 我好怀念他

[HNFSF](看海) 22:46:55

怎么将坐标系旋转180度？

[ZZXXQQ] 22:47:28

UCS

[HNFSF](看海) 22:47:58

具体怎么用不晓得

[qqimg]oldimg/{10ACC02F-CF37-B984-30BD-023C0ECD15B8}.jpg[/qqimg]

[仑通]仑通 22:48:23

USC  LAN

[HNFSF](看海) 22:48:58

我用plan转了，但是正好差180度

[仑通]仑通 22:49:26

那是你 ucs 没设置好

[HNFSF](看海) 22:50:56

ucs基本用不来

[HNFSF](看海) 22:53:45

(command "ucs" "3" p1 p2 "0,0")
(command "plan" "")

这正好差180

[HNFSF](看海) 22:57:41

[qqimg]oldimg/{A7AE12E7-EBF5-49E4-3A38-94D17C868418}.jpg[/qqimg]
[qqimg]oldimg/{5C756CEE-96E9-9447-6456-1DA08458A40F}.jpg[/qqimg]
[qqimg]oldimg/{464FC710-B562-EEAD-DA86-9CB146932B79}.jpg[/qqimg]

就是把斜交柱网转正方便画图