KO你 发表于 2019-1-23 03:43:18

动态填充

本帖最后由 Gu_xl 于 2019-2-20 08:25 编辑

求源码：
填充动态旋转加上指定输入角度参数；
填充动态移动。

1291500406 发表于 2019-1-23 03:43:19

本帖最后由 1291500406 于 2019-3-23 00:36 编辑

Dynamic ToolPack Family       DynamicHatch V1.6.90210#TRINNOLOV3.2009

KO你 发表于 2019-1-23 03:45:22

这是海龙工具箱里面的，但我想要源码，填充旋转可以动态跟着方向转，也可以指定角度

669423907 发表于 2019-1-23 10:03:44

动态修改填充比例和角度的，但我使用时，无法输入值
http://bbs.mjtd.com/thread-110141-1-1.html

KO你 发表于 2019-1-23 10:43:27

669423907 发表于 2019-1-23 10:03
动态修改填充比例和角度的，但我使用时，无法输入值
http://bbs.mjtd.com/thread-110141-1-1.html

这个我已经收藏过了，这个只是动态调整填充比例的，没有填充旋转

669423907 发表于 2019-1-23 11:44:42

KO你 发表于 2019-1-23 10:43
这个我已经收藏过了，这个只是动态调整填充比例的，没有填充旋转

;(vla-put-patternangle obj (angle mpt p1));改角度
去掉前面的分号就可以了

KO你 发表于 2019-1-23 16:43:30

669423907 发表于 2019-1-23 11:44
;(vla-put-patternangle obj (angle mpt p1));改角度
去掉前面的分号就可以了

不需要缩放比例，只需要旋转怎么编辑

xyp1964 发表于 2019-1-23 18:47:48

(defun c:ddbl (/ s1)(if (and (setq s1 (entsel "\n选择: "))
           (= (xyp-get-dxf 0 (car s1)) "HATCH")
      )
    (xyp-Grread-Change s1 "填充角度" 52 3)
)
(princ)
)

KO你 发表于 2019-1-23 23:01:21

xyp1964 发表于 2019-1-23 18:47


错误: no function definition: XYP-GRREAD-CHANGE
运行不了

KO你 发表于 2019-1-28 00:48:03

请G版大师帮帮忙
页: [1] 2 3
查看完整版本: 动态填充