QQ登录

只需一步,快速开始

快捷登录

登录 或者 注册 请先

UG爱好者

楼主: xingyue*
打印 上一主题 下一主题

[原创] PM2016宏应用之六:刀路文件夹批量复制为NC

  [复制链接]

三级士官

Rank: 3Rank: 3

0

主题

107

帖子

634

积分
200#
发表于 2018-7-24 13:34:20 | 只看该作者
好好好好好好好好
回复 支持 反对

使用道具 举报

爱好者终身VIP

Rank: 11Rank: 11Rank: 11Rank: 11

1

主题

433

帖子

8530

积分

VIP会员

198#
发表于 2018-7-22 16:49:51 | 只看该作者
2016宏应用之六:刀路文件夹批量复制为NC [修改]
回复 支持 反对

使用道具 举报

三级士官

Rank: 3Rank: 3

0

主题

102

帖子

596

积分
197#
发表于 2018-7-17 21:35:11 | 只看该作者
e4111111111111111111
回复 支持 反对

使用道具 举报

上等兵

Rank: 1

0

主题

11

帖子

156

积分
196#
发表于 2018-7-17 11:54:27 | 只看该作者
E: PM2016宏应用之六:刀路文件夹批量复制为NCE: PM2016宏应用之六:刀路文件夹批量复制为NC
回复 支持 反对

使用道具 举报

少尉

Rank: 5Rank: 5

1

主题

296

帖子

2333

积分
193#
发表于 2018-7-11 19:39:27 | 只看该作者
66e4111111111111111111111
回复 支持 反对

使用道具 举报

四级士官

Rank: 3Rank: 3

0

主题

87

帖子

740

积分
192#
发表于 2018-7-11 10:20:16 | 只看该作者
//适用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
}
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

 
 
QQ:1359218528
工作时间:
9:00-17:00
 
微信公众号
手机APP
机械社区
微信小程序

手机版|UG爱好者论坛 ( 京ICP备10217105号-2 )    论坛管理员QQ:1359218528

本站信息均由会员发表,不代表本网站立场,如侵犯了您的权利请联系管理员,邮箱:1359218528@qq.com  

Powered by UG爱好者 X3.2  © 2001-2014 Comsenz Inc. GMT+8, 2024-11-23 05:52

返回顶部