QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
我想把任意的NC程序名,和刀具路径名,边界名,自动批量改成1,2,3,4,5……听说有人可以的,但我就是找不到方法,向大侠们求助。) `* z! Y3 W$ O, k
我有VB改名工具,求助只是为了研究宏,比如在刀具路径中对任意程序进得复制修改合并等等,如果可以用宏改名,宏就不会再受名字的限制,
9 P: S* \% Q; M* F1 P/ j: ?2 m3 i9 Y! W# |
顺便分享一下我今天搞定的宏,用宏来把模型移动到X,Y中心和Z的最高点,不知道有没有人这样做过, 反正我从没见过.这个宏会删除所有的线,点和坐标系,用的话,要看情况了,我用的是PM8.0. X6 h- [' o# h$ |* x

- P# q2 q6 b/ a5 R4 d% `5 H        DELETE WORKPLANE ALL
+ h% o6 b* e0 d8 W1 M4 Z5 I: X        EDIT MODEL ALL SELECT WIREFRAME
9 c* W, ]: l, z( m% K6 U& Y* K2 s        DELETE MODEL  SELECTED
. S& x( a4 X, T        edit autocam model flip9 e$ s5 }+ b5 O4 {
        TRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED  ; ?' |: o3 j! D. ]& l
        DELETE WORKPLANE ALL
9 ^& s8 e* ?: k0 ]        TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE& |: y' s& {  ^3 ?) a
        180
4 U+ `% ^: j0 P6 u% K# z, ^) J        TRANSFORM MODEL ALL
$ P* a( V; G- R        ROTATE TRANSFORM ISO2 VIEWMILL RESIZEVIEW1 H' t& `: d+ _, h" ?
        VIEW MODEL ; WIREFRAME OFF
+ |& ^4 S8 V% a; F; J2 V( _- ~        VIEW MODEL ; SHADE NORMAL. ]7 s/ ]  J/ Z, ]$ I, L) J
        EDIT BLOCKTYPE BOX& [3 a% l% k, `
        EDIT BLOCK ALL UNLOCK' R. J" E7 [5 _: T
        EDIT BLOCK LIMITTYPE MODEL' f6 O$ P% K, t: ^. G) p3 f- @
        EDIT BLOCK RESETLIMIT "0"
9 P1 o# o  h4 `; y) y1 h9 |        DRAW BLOCK
% @6 ~& c  F7 t0 Z0 u        EDIT BLOCK DRAWMODE 06 P* U6 N( A* i# N( H& P- F
        EDIT BLOCK RESET * G3 p* @; i% Y8 w; P

1 O' P' l' G6 F1 `, k. t如果大家做了有新意的宏,希望能跟贴和大家分享,共同进步,

评分

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

查看全部评分

发表于 2008-12-12 20:16:25 | 显示全部楼层 来自: 中国浙江温州
好深奥哦!不懂你的意思。
发表于 2008-12-12 22:52:43 | 显示全部楼层 来自: 中国山东济南
上面的宏在9版是不能用滴!
4 V/ k6 B7 p/ V, \+ B- Q7 wedit 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
- m* A  b/ X" g0 R; p上面的宏在9版是不能用滴!1 z1 b+ U5 N& Y: B) }
edit autocam model flip,没有这个命令了

* X  e" K" |$ ^+ v; T
1 D$ H2 F& [" |" b& N
! ~% G, x8 V$ l% \9 j* \8 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 | 显示全部楼层 来自: 中国江苏苏州
楼上高人,我刚才试着弄一个单边分中,搞了好久,用一个很麻烦的方式解决了,不知楼上有什么简单的方法,还希望能说一说,) F% U7 d/ I7 ]! |
2 |: Y+ V3 p& H: P6 C( g9 b
DELETE WORKPLANE ALL
1 C. x9 o. N0 Q4 D' w7 k9 _% SEDIT MODEL ALL SELECT WIREFRAME
* b2 t$ ]0 s( h2 w  Z: N7 lDELETE MODEL  SELECTED  T" l+ _+ L8 E- D3 E3 r# b6 A. t
edit autocam model flip; j. ?: q; f/ d+ I
TRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED  : ^/ I9 @" c  e% f6 Y5 }
DELETE WORKPLANE ALL' d& {5 C* R, c8 }+ W% T
TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE
6 c2 m  G" T7 G1 d  x180" Y, a$ I( G8 W. t) X2 n7 l
TRANSFORM MODEL ALL
2 K. @7 f6 S1 Q8 t0 [: dVIEW MODEL ; WIREFRAME OFF2 q. J- V/ n3 D: d. u/ Z
VIEW MODEL ; SHADE NORMAL
6 G. \: k# P2 f+ J; kEDIT BLOCKTYPE BOX
. X: |: Z, f7 i& P  uEDIT BLOCK ALL UNLOCK; _8 R+ k/ V( L# l: ~3 Q
EDIT BLOCK LIMITTYPE MODEL
# V9 v$ Y7 z& {) b5 C+ f* eEDIT BLOCK RESETLIMIT "0"- M7 u4 \. l" J! G- Z+ |. c
EDIT BLOCK RESET
7 O+ l) s) v6 G( h( WDELETE MODEL ALL
/ g; }8 |8 H6 k# qCREATE PLANE ;2 U% Z. ]& ?; l+ ]) ^7 B
0- ]# d3 Z- b( t6 B
TRANSFORM RESET TRANSFORM TYPE ROTATEY TRANSFORM ANGLE! l7 y0 I2 s' m0 y
90$ q0 O! U* @- V; S3 z) a
TRANSFORM MODEL ALL
, ^* w" m4 f7 Q9 j4 `" L7 Oedit autocam model flip
, ]6 b( ~4 n2 T" nEXPLORER SELECT Workplane "Workplane\1" NEW
7 v2 Z. B# z0 K' X  V9 D2 r; B  ]FORM WPEDIT EDIT WORKPLANE "1" INTERACTIVE# }# G" g1 y' `) [5 N1 M
ACTIVATE WORKPLANE " "6 X$ f$ e: t6 H# t
TRANSFORM ANGLE "-90"
, _% z; d2 P8 I- S' xTRANSFORM TYPE ROTATEY TRANSFORM WORKPLANE "1"5 n* x: j% l: h( X
ACTIVATE WORKPLANE "1", V1 |, U) }; n2 Q- h. D
TRANSFORM ANGLE "90"
' M: s# B5 i* I& n" MTRANSFORM TYPE ROTATEY TRANSFORM WORKPLANE "1"0 i# |7 W) w5 H. |/ q2 b: H$ v
WPEDIT ACCEPT9 K# z" L) g! [1 V
SPLITTER TABRECYCLER. C& U! |) h# y7 w3 B
EDIT RECYCLER RECOVER Model ALL
# }) L# x/ g1 b) ^- X" Z/ `SPLITTER TABEXPLORE7 D& I1 s0 z2 }! _
EXPLORER SELECT Model "Model\Planes" NEW+ S) K3 g( l) W) p2 H
DELETE MODEL "Planes"
0 {. O2 A% X, v8 ySPLITTER TABRECYCLER6 q6 |. I; X6 o& @$ B1 h) s
EDIT RECYCLER DELETE Model "Planes"
' H5 d/ G: _4 C' M; fSPLITTER TABEXPLORE
/ k0 ^1 D2 A) H- p- z2 R0 rTRANSFORM RESET TRANSFORM TYPE WORLD TRANSFORM MODEL ALL SELECTED
! {/ w2 J) r" r* w- l7 ^- C  UDELETE WORKPLANE ALL# l5 V1 Y7 }4 |% Y$ N
ROTATE 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 )

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