明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
123
返回列表 发新帖
楼主: 明经快报

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

 关闭 [复制链接]
 楼主| 发表于 2013-5-6 19:49:45 | 显示全部楼层
[Bagu]Cyb 19:49:45
这小机器人 真勤快
 楼主| 发表于 2013-5-6 20:59:26 | 显示全部楼层
[alwtyp][alwtyp] 20:59:26
请问有不固定内容的表(a b c d e ……),只有(a b c d e)是固定出现的,怎么把其他的内容提取出来
 楼主| 发表于 2013-5-6 21:22:56 | 显示全部楼层
[仑通]仑通 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
 楼主| 发表于 2013-5-6 22:45:43 | 显示全部楼层
[仑通]仑通 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]
就是把斜交柱网转正方便画图
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-27 13:50 , Processed in 0.195622 second(s), 16 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表