kucha007 发表于 2022-11-16 11:07:50

【SF】超级展平/Z轴归零

本帖最后由 kucha007 于 2022-11-17 09:43 编辑

最近遇到了需要Z轴归零的图纸....用了CAD自带的Flatten、天正的Z轴归零和明经上的各种插件都不顶用

就在我准备摆烂的时候,看到Lee Mac提到了Joe Burke的SuperFlatten,于是抱着试试看的心情找了相关的帖子。
结果真香,虽然有遇到部分填充被分解的情况,但大部分都能完美压平,救了我的狗命,分享给大家学习研究。
建议复制文件出来处理,处理完再对比一下源文件(嗯,做好备份)

原帖:http://www.theswamp.org/index.php?topic=18153.120

VVA做的修改:https://forum.dwg.ru/showthread.php?t=25474&page=4







1028695446 发表于 2022-11-16 23:16:38

本帖最后由 1028695446 于 2022-11-16 23:38 编辑

迷你工具箱里面收集的Z轴归0应该用的就是在这个程序上修改而来的,一直想单独收集这个功能,终于等到了



      (if WMFflag
      (progn
          (command "-view" "s" "SFview")
          ;; Visual styles were added in 2007. Two reasons for the following
          ;; command calls. First, set the view style to 2d wireframe.
          ;; Second, in some cases beta testing showed if the view was set to
          ;; 2d wireframe and then the view was saved, the saved wiew was not
          ;; 2d wirefame as expected. Seems like a bug. Whatever, this fixes
          ;; that problem and eliminates the need for the user to set the view
          ;; to 2d wireframe before running the routine.
          ;; Exmaple file: 2008 Sample folder Visualization - Conference Room.dwg.
          (if (>= version 17)
            (progn
            (command "-view" "E" "V" "SFview" "二维线框"
                     "B" "SFview" "N" "" "")
            (command "-view" "R" "SFview")
            )
          )
      )
      )






    ;; Added test for model space 2/9/2011. Aviods a non-fatal error message
    ;; at the command line regarding no active model space viewport when
    ;; flattening a block definition in paper space.
    (if (= 1 (vlax-get doc 'ActiveSpace))
      (command "-view" "o" "T")
    )

kucha007 发表于 2022-11-16 11:17:29

本帖最后由 kucha007 于 2022-11-16 13:16 编辑

顺便说一下,可能会出现视觉样式不存在的情况,这是因为作者只有英文版测试(虽然看简介应该已经做成国际版了)
我在2018改为改成中文版本的名称“二维线框”也不顶用,不知道为啥。
但看作者的解释,如果不需要压平三维实体,直接把这段注释掉就没事了。


(if WMFflag
(progn
    (command "._view" "_save" "SFview")
    (if (>= version 17)
      (progn
      (command "._view" "_settings" "_visual" "SFview" "2d wireframe"
                  "_background" "SFview" "_none" "" "")
      (command "._view" "_restore" "SFview")
      )
    )
)
)




kucha007 发表于 2022-11-17 00:04:03

1028695446 发表于 2022-11-16 23:16
迷你工具箱里面收集的Z轴归0应该用的就是在这个程序上修改而来的,一直想单独收集这个功能,终于等到了

...

我也是改成"二维线框",为什么你改的就不报错啊,气死个人:'(

行天下 发表于 2022-11-16 11:22:24

感谢分享,学习了

w379106181 发表于 2022-11-17 07:20:19


感谢分享,学习了

panliang9 发表于 2022-11-17 08:26:05

本帖最后由 panliang9 于 2022-11-17 08:28 编辑

楼主高产,不知道你是什么专业!

kucha007 发表于 2022-11-17 09:40:53

panliang9 发表于 2022-11-17 08:26
楼主高产,不知道你是什么专业!
景观专业小透明一个

孙玉坤 发表于 2023-2-27 14:29:06

很喔噻的功能   给大师点赞

哆啦A梦_oELxg 发表于 2023-2-27 21:13:51

先收藏再说。
页: [1] 2 3
查看完整版本: 【SF】超级展平/Z轴归零