[编程申请]：原地旋转命令

鬼魔 · 发表于 2007-6-3 13:03:57

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

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

×

能满足批量选择、过滤选择（只需图块、单行文字、多行文字、属性文字），按各自对象的插入点进行原地旋转
哪位朋友能帮忙下，感谢！*-*4

xyp1964 · 发表于 2007-6-3 16:36:43

[php];; 需先加载通用函数xyplib.vlx
(defun c:test ()
  (CMDLA0)
  (setq NO1 (UREAL 7 "" "旋转角度" NO1)
ss  (ssget '((0 . "*TEXT,INSERT,ATTDEF,ATTRIB")))
i -1
  )
  (while (setq s1 (ssname ss (setq i (1+ i))))
(command "rotate" s1 "" (xyp-get-dxf 10 s1) no1)
  )
  (CMDLA1)
)[/php]

鬼魔 · 发表于 2007-6-3 23:57:13

3种文本格式的旋转经常出错，有时候不是根据INS旋转
xyplib.vlx里面的东西似乎会跟我其他工具冲突，能不能单独提取个

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

[编程申请]：原地旋转命令

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

相关帖子

浏览过的版块