PM2016宏应用之十六：以第一个模型名命名档案

chenp1121 · 发表于 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
}

wuhuxingyun · 发表于 2019-3-3 14:14:49

学习学习学习学习学习学习

鑫迪哥哥 · 发表于 2019-3-10 20:41:13

5454554545

Mate_M · 发表于 2019-3-11 23:51:53

1111111111111

z124094912 · 发表于 2019-3-14 10:50:36

学习学习学习学习学习学习

3D1063 · 发表于 2019-3-18 22:44:28

学习学习学习学习学习学习

ZJM134752170 · 发表于 2019-3-21 10:03:39

大神大神

junjunli0921 · 发表于 2019-3-24 09:47:01

很好很好很好

临泽 · 发表于 2019-3-25 09:57:46

111111

紫色清水 · 发表于 2019-4-5 01:11:04

星月的宏很厉害的。快看看

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