乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 26|回复: 9

[综合讨论] 如何修改

[复制链接]

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-7 13:01:45 | 显示全部楼层 |阅读模式
因此,我目前正在开发一个项目,在这个项目中,如果需要的话,我需要在3ds max上轻松编辑我所有的圆和圆形。
 
问题是,我在这些CAD上有一些多段线,有超过100个点,这使得它们很难使用。
 
问题是:有没有办法修改非手动的点数?
140147jgwq5pbjgwol4qo5.jpg
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-7 13:12:09 | 显示全部楼层
看看杂草。lsp从未使用过它,但我认为它可以满足你的需求。
回复

使用道具 举报

8

主题

1647

帖子

1647

银币

初来乍到

Rank: 1

铜币
36
发表于 2022-7-7 13:18:18 | 显示全部楼层
 
将dwg导入3ds Max时,在“导入选项”对话框中,可以通过设置焊接阈值来选择焊接附近的顶点。这有助于减少一些非常靠近的顶点。
 
导入dwg并挤出形状后,可以应用“ProOptimizer”修改器,并将每个对象上的多边形数减少任意百分比。
 
 
回复

使用道具 举报

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-7 13:24:05 | 显示全部楼层
这正是我几个月来一直在寻找的!
非常感谢你!
回复

使用道具 举报

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-7 13:32:23 | 显示全部楼层
我以前试过这个,但对于autoweld的结果有很多问题,至于优化器,尽管它确实有助于减少,但在保持足够形状的同时,它很难减少(对手机应用程序的)需求。
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-7 13:41:35 | 显示全部楼层
如果你的形状在Autocad中是一个多边形,那么你可以得到所有的顶点,然后用一些因子重新制作它,比如2.3,即每秒删除一个顶点。我们来看看put obj的坐标。或者只是用一个简单的制作一个新的。
回复

使用道具 举报

8

主题

1647

帖子

1647

银币

初来乍到

Rank: 1

铜币
36
发表于 2022-7-7 13:45:13 | 显示全部楼层
 
虽然Weed-lisp例程对于减少多段线上的点数非常有用,但我不确定它对于需要对称的多边形之类的对象是否是一个好的解决方案。例如,一个有100个点的圆,除草例程肯定能够减少点的数量,但不能保证它会正确保持形状。它可能会在一侧删除更多点,在另一侧删除更少点,最终可能会出现一些不平衡的圆。如果由我决定,我会手动重新绘制多边形,以确保适当的对称性。
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-7 13:51:21 | 显示全部楼层
不确定发生了什么,但从这里丢失了代码。将再次重做。
 
请注意CMDactive崩溃Briscad。我会调查的。
 
  1. ; reduce polygon facets by AlanH OCT 2019
  2. (defun c:polred ( / x R lst co-ord plent)
  3. (setq plent (entsel "pick polygon"))
  4. (if plent (setq co-ord (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget (car plent))))))
  5. (setq  R (getint "Enter reduction factor 2 3 4 etc"))
  6. (setq x 0)
  7. (setq lst '())
  8. (setq lst (cons (nth x co-ord) lst))
  9. (repeat  (- (/ (length co-ord) R) 1)
  10. (setq lst (cons (nth (setq x (+ x R)) co-ord) lst))
  11. )
  12. (setvar 'clayer "0") ; add your layer or else erase plent
  13. ;(command "erase" plent "")
  14. (command "_pline")
  15. (while (= (getvar "cmdactive") 1 )
  16. (repeat (setq x (length lst))
  17. (command (nth (setq x (- x 1)) lst))
  18. )
  19. (command "C")
  20. )
  21. )
  22. (c:polred)

 
 
 
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-7 13:55:54 | 显示全部楼层
你有示例图吗?
 
你的PLDIET可能会更好。LSP和Express工具OVERKILL也会解决一些问题。图纸需要展平吗?
回复

使用道具 举报

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-7 14:02:12 | 显示全部楼层
事实上,我甚至没有找到杂草。lsp一个,但当我搜索它时,这个是唯一的结果,效果很好
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-9 09:47 , Processed in 0.600902 second(s), 86 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表