[求助]：这个选择集为什么不正确呀

lei_na521 · 发表于 2005-6-20 10:23:53

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

我编了一个程序,想通过图元过滤器表选择所要的图形.
(command "layer" "m" "压力表" "c" 2 "" "")
  (command "circle" dc 2)
  (setq hx (car dc))
  (setq hy (cadr dc))
  (setq hy1 (+ hy 1))
  (setq hy2 (- hy 1))
  (setq hx1 (- hx (* 2 (sin (/ (* 60 pi) 180)))))
  (setq hx2 (+ hx (* 2 (sin (/ (* 60 pi) 180)))))
  (setq zh1 (list hx1 hy1))
  (setq zh2 (list hx2 hy1))
  (setq zh3 (list hx1 hy2))
  (setq zh4 (list hx2 hy2))
  (command "line" zh1 zh2 "")
  (command "line" zh3 zh4 "")
  ;(setq a (entget (entlast)))
  (setq z1x (- hx 3))
  (setq z1y (+ hy 3))
  (setq z2x (+ hx 3))
  (setq z2y (- hy 3))
  (setq z1 (list z1x z1y))
  (setq z2 (list z2x z2y))
  (setq se1 (ssget "W" z1 z4 '((8 . "压力表"))))
  (setq bname (getstring "请输入块名"))
(command "-block" bname z1 se1 "")
  (command "-insert" bname z1 "" "" "")
可程序运行时却显示
错误: 错误的点参数
请哪位高手给看一下

zxq0220 · 发表于 2005-6-20 11:06:37

点变量DC未赋值。

lei_na521 · 发表于 2005-6-20 14:51:59

已经赋值了,只不过前面的程序我没有粘上

舟自横 · 发表于 2005-6-20 15:37:49

(setq se1 (ssget "W" z1 z4 '((8 . "压力表"))))
应该是(setq se1 (ssget "W" z1 z2 '((8 . "压力表"))))吧？

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：这个选择集为什么不正确呀

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子