找回密码
 立即注册

QQ登录

只需一步,快速开始

微信扫码登录

搜索
楼主: xingyue*

[原创] PM2016宏应用之十六:以第一个模型名命名档案

 火... [复制链接]

0

主题

17

回帖

89

积分

上等兵

积分
89
发表于 2019-1-19 03:25:11 来自手机 | 显示全部楼层
这个你不了解

0

主题

29

回帖

189

积分

上等兵

积分
189
发表于 2019-2-10 16:09:40 | 显示全部楼层
xzzzzzzzz

0

主题

25

回帖

170

积分

上等兵

积分
170
发表于 2019-2-28 23:43:55 | 显示全部楼层

好久没有发帖了!!!今趁着有空,发两个大家感兴趣的宏!它们分别可以实现刀具路径,刀路,边界等等的扩展和收缩,当然包括这些根节点下的文件夹!!!大家看一下效果演示:

回复可以直接看到宏的源代码
1)收缩
本帖隐藏的内容

//适用PM版本:2016
//星月   修订
INCLUDE 'C:\dcam\config\MyFunction.inc'
FUNCTION MAIN() {
    GRAPHICS LOCK
    ECHO OFF DCPDEBUG UNTRACE COMMAND ACCEPT
    TOOLBAR COMMANDBAR LOWER
    MACRO STOP
    STRING ARRAY EntType[]={'Machinetool','NCProgram','Toolpath','Tool','Boundary','pattern','Featureset','Workplane','Level','Model','StockModel','Group'}
    FOREACH str IN EntType {
          CALL LeftAndFolder(str)
    }
    CALL LEFT('MACRO')
    GRAPHICS UNLOCK
}



2)扩展
本帖隐藏的内容

//适用PM版本:2016
//2017-10-18   星月   修订
INCLUDE 'C:\dcam\config\MyFunction.inc'
FUNCTION MAIN() {
    GRAPHICS LOCK
    ECHO OFF DCPDEBUG UNTRACE COMMAND ACCEPT
    TOOLBAR COMMANDBAR LOWER
    MACRO STOP
    STRING ARRAY EntType[]={'Machinetool','NCProgram','Toolpath','Tool','Boundary','pattern','Featureset','Workplane','Level','Model','StockModel','Group'}
    FOREACH str IN EntType {
          CALL RightAndFolder(str)
    }
    GRAPHICS UNLOCK
}

0

主题

25

回帖

117

积分

上等兵

积分
117
发表于 2019-3-3 14:14:49 | 显示全部楼层
学习学习学习学习学习学习

0

主题

36

回帖

137

积分

上等兵

积分
137
发表于 2019-3-10 20:41:13 | 显示全部楼层
5454554545

0

主题

32

回帖

287

积分

二级士官

积分
287
发表于 2019-3-11 23:51:53 | 显示全部楼层
1111111111111

0

主题

76

回帖

292

积分

二级士官

积分
292
发表于 2019-3-14 10:50:36 | 显示全部楼层
学习学习学习学习学习学习

1

主题

30

回帖

262

积分

二级士官

积分
262
发表于 2019-3-18 22:44:28 | 显示全部楼层
学习学习学习学习学习学习

0

主题

24

回帖

364

积分

二级士官

积分
364
发表于 2019-3-21 10:03:39 | 显示全部楼层
大神大神

2

主题

364

回帖

5388

积分

上尉

积分
5388
发表于 2019-3-24 09:47:01 | 显示全部楼层
很好很好很好
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

咨询QQ:1359218528|发帖须知!|Archiver|手机版|小黑屋|UG爱好者论坛 ( 京ICP备10217105号-2 )

GMT+8, 2025-2-1 00:04

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表