少尉
UID2759808
U币408
G币1870
技术0
主题29
精华1
阅读权限75
注册时间2016-12-27
最后登录2024-5-26
在线时间70 小时
手机18855358125
少尉
|
好久没有发帖了!!!今趁着有空,发两个大家感兴趣的宏!它们分别可以实现刀具路径,刀路,边界等等的扩展和收缩,当然包括这些根节点下的文件夹!!!大家看一下效果演示:
回复可以直接看到宏的源代码
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
}
|
评分
-
查看全部评分
版权声明 |
|
本人声明此帖为本人原创帖,未经允许,不得转载!
|
|