找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
楼主: wendellz

谁能帮我解释下这个宏程序

 火... [复制链接]
发表于 2010-12-1 05:02:09 | 显示全部楼层
这是一个三坐标同时变化的宏程序,其实前面的#500到#504的参数可以省略不要写,直接赋值到下面就可以,至于下面的跳转可以选用镶嵌式跳转,while___DO方式,本来很简单的程序被你复杂化了
发表于 2010-12-5 09:49:53 | 显示全部楼层
鄙人操作OKUMA系统的。对法拉克系统略知一二。既然没有高手出来指点。那我来抛砖引玉吧。
( x3 _) j$ s6 J楼上那位兄弟所说的我不太认同。,我自已编程也喜欢把条件数据放在程序最前面。方便。明了,6 g; j. b& t$ n, A
O
, C( I* C0 v' i3 a6 B(HUAHUI-GAN )      (此程序加工原点在工件表面X-Y-方向。X方向必须离开刀具半径)
# k# D7 A- y; w& GG90 G54 M3 S3000    不解释
1 O8 n+ G* f# d% Z2 t#500=1100.          工件长度
  g% d4 \) d2 n+ L0 t(CHANG  DU )      
, l/ s( t  i* F$ K0 K#501=310 .          工件宽度6 Y7 C# c* X9 g4 F$ S0 @! d
(KUAN  DU)
1 H0 z4 M6 x1 ~#502=50.            刀具直径
% V% e, `5 K+ h3 ^* M(BAN  JING): P+ m0 s, b, K- U
(START)
! _% n$ q2 V! H; L#503=2.             每刀下刀量
0 W! Q' f% ~$ q' V( [0 s% p#504=0.             最终想切到的Z位置
7 p/ H3 d/ c' `7 Q9 Z' P' w" M#101=0.             第一刀下刀位置
  ^; l+ ~9 W! l+ S#101=-#1015 u, U) }+ F3 i; w  K
#502=#502*0.8       每刀Y方向进刀具直径的80%& I/ ?2 S. l1 y6 y
#102=-#502         
9 ~, p" a9 s% a3 I6 [" k# R#501=FUP[#501/#502]* #502     取整数并且每刀Y方向进刀量平均化
2 m; F$ P4 l, R9 pN10  G0 Z100., ?- N( _. p# |2 W2 ~6 c0 }
X0 Y#102                      Y移动到工件外面为第一刀Y位置做准备(无实际意义,作者思路不是很完美)              5 P& Q. g* k& ]4 {" S2 a
Z15.2 C% E. H. i  Q- S: ]  O; H$ W
G1 Z-#101 F2000
# i9 ]+ F4 P  F3 T4 d/ V0 ~- b. KN20   #102=#102+#502          自动计算下一刀Y位置。
- ]" K5 m  L, c) MIF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N100
- w- o! N, D" p$ r: o0 i, mY#102                         移动到第一刀Y位置。: C% ~' J* E9 b" G- J; R5 C
X#500                         切削加工X方向。6 w6 B; o5 ~3 _  Y: C
#102=#102+#502                计算下一刀Y位置。
7 k9 n7 V3 O7 X! w3 @& mIF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N1003 j  d& g: p/ R5 n' Y! D* t- X0 m
Y#102
2 O/ W) ~( i# \X0
/ x% S. D& D+ U; n4 r- r% J5 OIF[#102LE#501]GOTO 20         假如下一刀Y位置小于工件宽度则跳回N20继续加工
' _0 j5 z$ e* G5 C  P% ZN100   #101=#101+#503         计算下一刀Z位置(作者有误,这样计算出来为正数。)8 L) y! _% N& j4 I# }
IF[#101LE#504]GOTO 10         假如下一刀Z位置小于或等于目标值时跳回N10继续加工(同上。难道作者是想Z方向从下往上切?)
% z( U' a. v' @2 m1 {7 ^#100=#100+1                   (无实际意义。应该是计算切了几刀)
. h7 l$ l4 h* N; f! Z0 P#101=#5047 l8 ]$ F/ Z2 p2 M
IF[#504EQ1]GOTO 10           (这程序执行下来这一步永远不会跳转。不理解)
4 k! Y2 z: c$ n$ L' ?0 @1 l" ]     G0  Z100.: \( w5 T6 y8 v  o8 j
     M05
! N. F* r% ?" h4 U     M30
2 `8 D2 d$ z( x9 U' [- D* q( o这段程序是能执行的,执行的效果就是Z方向在0的位置上切一遍就结束。2 H& b. T" v$ t# V+ l
思路有很多不完善的地方。比如对原点,估计只有作者本人才知道对在那个位置最合适,反正是不能对在工件表面上1 A# i9 d) H: ?" a7 M! F
还有Z方向下刀第一刀数值设定如果不是2的倍数那就没法切到想要的厚度了。
8 E2 u, m2 p- w0 C+ V1 i

点评

解释的不错!!!注释的也很好。。。  发表于 2013-11-26 10:17
发表于 2010-12-9 19:24:54 | 显示全部楼层
挣点威望...顶个  嘿嘿
. g2 W% p# T( @: `+ T1 x. `5 `2 z( e4 z0 [准备学习  表示鸭梨很大呀... . J. X8 s! o" b' s
发表于 2010-12-9 20:59:12 | 显示全部楼层
关注高手讲解                                            
0 l$ e& t/ s0 H! I. ]: B  L
发表于 2010-12-9 21:08:57 | 显示全部楼层
回复 uwycui 的帖子2 R( D. C& c/ G& I$ g8 i) q7 D

) d  m0 t# Z! I呵呵不懂          还是很高兴看到                  
发表于 2010-12-10 21:44:15 | 显示全部楼层
顶一下
发表于 2010-12-10 22:26:55 | 显示全部楼层
本帖最后由 少年游 于 2010-12-10 22:31 编辑 % _. w1 Y- n( |- ?8 v' E, e) k3 V0 p

- s: f- B7 r$ \! S不好意思,没注意有人解释了。我的东西删除。* |2 l" ]$ e* M- Y7 A$ S
发表于 2010-12-11 23:24:57 | 显示全部楼层
這東西真的實用嗎?真的不懂,宏程序要系統邊算邊加工,有直接給他指令來的快嗎?說法不一。。。
发表于 2010-12-12 10:25:31 | 显示全部楼层
还是用MASTERCAM快...............
发表于 2010-12-12 17:23:03 | 显示全部楼层
不是很同意楼上的见地啊~!宏程序这么经典的东西,怎么能用MASTERCAM 来替换,那你不说UG 更安逸~!
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Archiver|手机版|小黑屋|机械社区 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-9-21 21:18 , Processed in 0.069608 second(s), 14 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

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