QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
8天前
查看: 5470|回复: 12
收起左侧

[已解决] 谁可以用宏批量改名

[复制链接]
发表于 2008-12-12 19:39:32 | 显示全部楼层 |阅读模式 来自: 中国江苏苏州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
我想把任意的NC程序名,和刀具路径名,边界名,自动批量改成1,2,3,4,5……听说有人可以的,但我就是找不到方法,向大侠们求助。4 t/ E! `+ m% Y/ b" ]  H
我有VB改名工具,求助只是为了研究宏,比如在刀具路径中对任意程序进得复制修改合并等等,如果可以用宏改名,宏就不会再受名字的限制,$ c2 U  B/ G: c5 y# r* @
6 O. v1 K, A* m* Z4 j
顺便分享一下我今天搞定的宏,用宏来把模型移动到X,Y中心和Z的最高点,不知道有没有人这样做过, 反正我从没见过.这个宏会删除所有的线,点和坐标系,用的话,要看情况了,我用的是PM8.0
* w" i! g3 }- v3 V' |& a; ~7 N7 P; e3 j. }
        DELETE WORKPLANE ALL
# g3 g+ I) M: t2 X" i* T& H        EDIT MODEL ALL SELECT WIREFRAME2 L2 K  f0 m, j; J
        DELETE MODEL  SELECTED
# B8 g" u3 c9 {! h0 Z: C/ `; s        edit autocam model flip6 b$ E4 }) s2 |8 ]6 ?
        TRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED  & t1 B! A% W) j- \0 `0 V# D- T: m
        DELETE WORKPLANE ALL* F+ J, I7 K* w5 q
        TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE" k# ~& b2 w/ x; _
        180
# t/ b/ q* ^$ U  L' T4 P  y        TRANSFORM MODEL ALL
: |% R2 o# M) w  T: O$ P        ROTATE TRANSFORM ISO2 VIEWMILL RESIZEVIEW' ]  f: ^5 V9 X
        VIEW MODEL ; WIREFRAME OFF
; H7 s4 w; B9 q1 B; x& x; g        VIEW MODEL ; SHADE NORMAL
: Z/ Z. i. ^( V# Z        EDIT BLOCKTYPE BOX
  i# I8 g% y# b, D% d        EDIT BLOCK ALL UNLOCK
. B+ f* i' f8 R# y$ c9 a        EDIT BLOCK LIMITTYPE MODEL' s6 L* [" Q9 @# K% X
        EDIT BLOCK RESETLIMIT "0"
- B) S  L# R% m  n) g, |+ P        DRAW BLOCK
' M+ H, _% b  l) t1 {  @9 K+ N        EDIT BLOCK DRAWMODE 0/ m, M) s- G0 a% S8 R
        EDIT BLOCK RESET ! b& i5 |$ h8 E; E

+ O, }3 a$ j. d, Y如果大家做了有新意的宏,希望能跟贴和大家分享,共同进步,

评分

参与人数 1三维币 +5 收起 理由
hh749 + 5 \感谢您对论坛的支持!

查看全部评分

发表于 2008-12-12 20:16:25 | 显示全部楼层 来自: 中国浙江温州
好深奥哦!不懂你的意思。
发表于 2008-12-12 22:52:43 | 显示全部楼层 来自: 中国山东济南
上面的宏在9版是不能用滴!
9 J. R( G- B: v% g- H8 c6 _edit autocam model flip,没有这个命令了
发表于 2008-12-13 13:54:26 | 显示全部楼层 来自: 中国广东东莞
原帖由 zali_123 于 2008-12-12 22:52 发表 http://www.3dportal.cn/discuz/images/common/back.gif- s$ N. E% i( X. u3 I* n' \
上面的宏在9版是不能用滴!
* e% X& K( t( K' Vedit autocam model flip,没有这个命令了
# j5 H# n( `; P* \+ L: Y& y
1 v' M2 N+ n7 |1 l

* B2 W* f/ e4 s7 l: p是的.其实其它版本的PM只用edit autocam model flip这句就可以了
发表于 2008-12-15 19:45:55 | 显示全部楼层 来自: 中国广东深圳
模型移动到X,Y中心和Z的最高点。这个宏我自己也做了出来自己用。还做了模型碰单边的宏。无聊时搞出来的。嘻嘻
发表于 2008-12-15 19:47:11 | 显示全部楼层 来自: 中国广东深圳
改名的宏就没做了。因为有个不错的VB工具可以用。
 楼主| 发表于 2008-12-19 10:52:32 | 显示全部楼层 来自: 中国江苏苏州
楼上高人,我刚才试着弄一个单边分中,搞了好久,用一个很麻烦的方式解决了,不知楼上有什么简单的方法,还希望能说一说,
" B% Q% e4 l& X. e, D% \# K0 v/ r6 ?: ]+ O( ?1 m
DELETE WORKPLANE ALL
% E6 T$ }! Z5 cEDIT MODEL ALL SELECT WIREFRAME
$ }+ _( Q8 q7 q( P6 xDELETE MODEL  SELECTED
; L# X) M5 _0 J; Z) K8 |3 v3 vedit autocam model flip+ c% F3 t" B& Y0 A
TRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED  
6 F: |; @8 S) S+ J" I9 Z( Z' gDELETE WORKPLANE ALL/ p. ?8 d. L/ e+ ]2 G
TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE
( L. h( v3 h8 y* X. u180& {( i5 v! R& X4 m5 o
TRANSFORM MODEL ALL% S! z3 I/ l  E2 j# \' c/ y2 N
VIEW MODEL ; WIREFRAME OFF
. X$ l3 R, ?$ t% g6 `VIEW MODEL ; SHADE NORMAL
8 R: }! I! o9 n: [EDIT BLOCKTYPE BOX
$ m7 o/ K7 \  T+ m7 r, t* `! [* D$ A/ KEDIT BLOCK ALL UNLOCK: ~2 e/ h: D. c% q( f* ~
EDIT BLOCK LIMITTYPE MODEL
$ W) Q4 e" e4 zEDIT BLOCK RESETLIMIT "0"4 ~* r" l: _  }# Z) ^
EDIT BLOCK RESET 9 r4 u; L, y" G* |# X# N2 K+ p, e
DELETE MODEL ALL
4 h& q% O# |$ J' J! H) o8 r( j2 {$ ECREATE PLANE ;
( f: N/ `, B) {, ]; m& _: L01 x* c+ N8 R* h+ A4 o% `& ]* W; b/ j1 q
TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE" P3 o# Y* `. i  L3 l$ N* m+ E
90$ {* ]. [# J5 w$ S, Q* T
TRANSFORM MODEL ALL6 `3 _) \7 s  U5 [
edit autocam model flip6 S' K. M2 l# u, s
EXPLORER SELECT Workplane "Workplane\1" NEW2 ^$ h8 K' ^6 ~
FORM WPEDIT EDIT WORKPLANE "1" INTERACTIVE8 Q6 o) W" g" o# f, r
ACTIVATE WORKPLANE " "# j3 a" L1 t; O0 O; Z0 ^
TRANSFORM ANGLE "-90"
8 D  ^! o! @( y1 t" B6 UTRANSFORM TYPE ROTATEY TRANSFORM WORKPLANE "1"
; N3 u9 c/ J: XACTIVATE WORKPLANE "1"
7 e0 o( G  t& ^' k2 WTRANSFORM ANGLE "90"$ H1 S" d/ J; m: b6 q; y( A
TRANSFORM TYPE ROTATEY TRANSFORM WORKPLANE "1"0 E+ C" |, S4 P6 ]6 ]+ h8 Y
WPEDIT ACCEPT
0 a$ K* f- I1 m6 JSPLITTER TABRECYCLER! ?4 g$ X# z: G: n' \
EDIT RECYCLER RECOVER Model ALL/ V4 p# L7 u. Y* L3 X
SPLITTER TABEXPLORE7 b8 \& e& z* K8 _! y4 H& A: Z: O
EXPLORER SELECT Model "Model\Planes" NEW
5 o+ W9 g. G* A( DDELETE MODEL "Planes"
, e1 A: u# Q, GSPLITTER TABRECYCLER
- R1 j5 T& _( _& H3 g4 {6 kEDIT RECYCLER DELETE Model "Planes"
0 H/ e% u/ \5 P  sSPLITTER TABEXPLORE  k0 _6 S7 g4 `
TRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED
2 r# g- B9 p' s* B; ~+ V/ S& [DELETE WORKPLANE ALL
+ ~3 X7 Y6 t* g; z: X* gROTATE TRANSFORM ISO2 VIEWMILL RESIZEVIEW

评分

参与人数 1三维币 +5 收起 理由
hh749 + 5 好资料,感谢您对论坛的支持!

查看全部评分

发表于 2009-1-22 03:16:25 | 显示全部楼层 来自: 中国广东惠州
到此一游
发表于 2009-2-6 09:51:27 | 显示全部楼层 来自: 中国广东佛山
太高深了还有好多东西要学哦
发表于 2009-2-8 09:05:29 | 显示全部楼层 来自: 中国广东广州
高手呀,支持一下你们
发表于 2009-2-23 02:01:35 | 显示全部楼层 来自: 中国上海
分中宏有什么新鲜的 现在的版本中的宏都支持变量 做这个还不是小意思
发表于 2009-8-24 23:44:02 | 显示全部楼层 来自: 中国山东青岛
为什么,看不到答案,何为解决了
发表于 2010-5-27 09:12:51 | 显示全部楼层 来自: 中国浙江杭州
多谢版主的解释,太实用了
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

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