PM2016宏应用之三：一键安全高度设置

xingyue* · 发表于 2016-12-29 08:51:12

本帖最后由 xingyue 于 2016-12-29 09:59 编辑

很简单的一个宏！昨晚给朋友写的！希望大家喜欢！他的Z行程是650！所以我加了句判断！为零防止有时候一不小心输入错误，我又加了句判断！DIALOGS MESSAGE OFF
DIALOGS ERROR OFF
GRAPHICS LOCK
STRING prompt="请设置安全高度："
REAL i=0
bool err=0
bool flag=0
do {
$i=input $prompt
$err=ERROR i
if err {
   $prompt="输入的不是数值，请重新输入："
} ELSE {
   IF i>650 {
         $flag=1
         $prompt="输入的值大于设定的Z行程，请重新输入："
   } ELSE {
         $flag=0
      FOREACH Toolpath IN folder('TOOLPATH') {
         ACTIVATE TOOLPATH $Toolpath.Name
         EDIT TOOLPATH SAFEAREA SIZE $i
         RESET TOOLPATH RAPID
      }
   }
}
} while err OR flag
GRAPHICS UNLOCK
DIALOGS MESSAGE ON
DIALOGS ERROR ON

←￠塰涯の誌 · 发表于 2018-11-14 23:28:21

非常感谢楼主

zhanmusi · 发表于 2018-7-8 23:06:11

你好，麻烦加一下我ＱＱ，我想引用你的资料．
ＱＱ：378289925

wen19900219 · 发表于 2018-6-26 14:24:38

不管怎么样，如果能用，就非常感谢楼主。

31242341 · 发表于 2018-6-3 15:21:36

~！支持UG爱好者

94不坏 · 发表于 2017-9-5 09:02:48

谢谢分享！

i186q · 发表于 2017-5-19 16:29:39

大师，PM批量重命名文件夹的宏怎么写？

b69722 · 发表于 2017-1-6 22:39:31

感謝樓主

y107620560 · 发表于 2017-1-6 22:24:04

这个也可以设置啊,不错,收藏了

LIZHIMIN363 · 发表于 2017-1-6 11:15:59

好东西

[原创] PM2016宏应用之三：一键安全高度设置

相关帖子