2013-08-04 QQ群：ALISP＆VLISP(143438137) 聊天记录：签到

CCarch · 发表于 2013-8-4 15:34:55

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

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

×

风轻云淡(570295552)于2013-08-04 15-34-55：
签到

孔即是涩 · 发表于 2013-8-4 15:35:14

无动于衷(460826125)于2013-08-04 15-35-14：
签到

孔即是涩 · 发表于 2013-8-4 15:35:35

无动于衷(460826125)于2013-08-04 15-35-35：
签到

ucuc2003 · 发表于 2013-8-4 16:17:45

易水(1175577149)于2013-08-04 16-17-45：
签到

炫翔 · 发表于 2013-8-4 17:20:59

炫翔(2363673534)于2013-08-04 17-20-59：
[qqimg]{5F963F40-9335-9A56-085D-1FED5F4B9A86}.gif[/qqimg]

関吣 · 发表于 2013-8-4 17:21:47

関吣(67512820)于2013-08-04 17-21-47：
签到

eachy · 发表于 2013-8-4 17:24:35

eachy(124471899)于2013-08-04 17-24-35：
(defun c:plpy (/ ss s1)
  (if (setq ss (ssget))
(progn
   (xd::begin)
   (xdrx_setmark)
   (vl-cmdf ".pedit" ss "" "y" "j" "")
   (setq s1 (xdrx_getss))
   (xdrx_setenttodb s1 0)
   (initget "0 1")
   (setq kw (getkword "\n[0 - inner/1 - outer]: "))
   (while (setq e (xdrx_getentdata 0))
(setq box (xdrx_entity_box e))
(if (= kw "1")
   (vl-cmdf ".offset"

   )
)
   )
)
  )
)

炫翔 · 发表于 2013-8-4 17:24:57

炫翔(2363673534)于2013-08-04 17-24-57：
[face0.gif]

eachy · 发表于 2013-8-4 17:24:58

eachy(124471899)于2013-08-04 17-24-58：
没时间写了

炫翔 · 发表于 2013-8-4 17:25:19

炫翔(2363673534)于2013-08-04 17-25-19：
这个晓东的函数库哪有？

eachy · 发表于 2013-8-4 17:25:38

eachy(124471899)于2013-08-04 17-25-38：
还有一个函数 xdrx_curve_offset

eachy · 发表于 2013-8-4 17:25:52

eachy(124471899)于2013-08-04 17-25-52：
不过这个函数有些问题

eachy · 发表于 2013-8-4 17:26:16

eachy(124471899)于2013-08-04 17-26-16：
不过对直线的应该可以

eachy · 发表于 2013-8-4 17:26:28

eachy(124471899)于2013-08-04 17-26-28：
生成点表

eachy · 发表于 2013-8-4 17:27:19

eachy(124471899)于2013-08-04 17-27-19：
Pedit J 后用 xdrx_curve_offset 生成点表，然后用 xd::polyline:make 这个表

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