找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
楼主: wendellz

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

[复制链接]
发表于 2010-12-1 05:02:09 | 显示全部楼层
这是一个三坐标同时变化的宏程序,其实前面的#500到#504的参数可以省略不要写,直接赋值到下面就可以,至于下面的跳转可以选用镶嵌式跳转,while___DO方式,本来很简单的程序被你复杂化了
发表于 2010-12-5 09:49:53 | 显示全部楼层
鄙人操作OKUMA系统的。对法拉克系统略知一二。既然没有高手出来指点。那我来抛砖引玉吧。
4 C! F1 G  l1 G楼上那位兄弟所说的我不太认同。,我自已编程也喜欢把条件数据放在程序最前面。方便。明了,
0 g$ u% V1 I4 b2 N; k+ Q9 S( ? O5 N  B. B, w& U3 b% m6 Q9 ^
(HUAHUI-GAN )      (此程序加工原点在工件表面X-Y-方向。X方向必须离开刀具半径)- P  |0 C1 y+ H
G90 G54 M3 S3000    不解释
& f0 E4 g9 D, D0 @" [% |) |/ y* K#500=1100.          工件长度  D3 _4 R3 L; g
(CHANG  DU )       7 c  |" A' S0 }; s# m: u! @
#501=310 .          工件宽度
8 Q( A/ C: t9 E* p4 v; J(KUAN  DU)# A% M) A8 I5 O& y, C+ c
#502=50.            刀具直径
3 O: w" _# {$ w& @- [  o(BAN  JING): G; t; d" h+ y) t* l
(START)
8 |0 H+ ?7 I) L- N: M+ z#503=2.             每刀下刀量# |2 I: ?4 G) N. I( j6 }
#504=0.             最终想切到的Z位置
' r' \& d, d, R* H+ l! ~1 _#101=0.             第一刀下刀位置( c( n* }3 _& z8 D; U
#101=-#101- Q- y5 T1 u9 u9 r" u/ }  H7 e
#502=#502*0.8       每刀Y方向进刀具直径的80%2 s& d" V- ~* p& e! f6 \- I
#102=-#502          ( Z$ D9 q' H* A- U
#501=FUP[#501/#502]* #502     取整数并且每刀Y方向进刀量平均化& X( c: u: e: V+ m: s1 m  A( _- D
N10  G0 Z100.
2 i/ D; ~2 C, \5 g5 G1 AX0 Y#102                      Y移动到工件外面为第一刀Y位置做准备(无实际意义,作者思路不是很完美)              ! q: s; I7 s- z  z- g, p: B
Z15.; a- \% v* |$ Z" {! o
G1 Z-#101 F2000
8 Q, w% h! `) [: b, F9 EN20   #102=#102+#502          自动计算下一刀Y位置。
2 W# z" g) e; p9 I$ C  t3 ~IF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N100: [; L! Y. q5 _
Y#102                         移动到第一刀Y位置。
" }, a9 ~# W+ }% E- [: ^X#500                         切削加工X方向。( Y( K/ l) K. c$ e1 W- q
#102=#102+#502                计算下一刀Y位置。
' d% _( {) i8 ?7 ^* d: IIF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N1003 J* b* A+ P* P* z* Z# g9 l
Y#1024 E7 q, c/ V/ D5 h9 P; k- x
X0
3 u; T4 y8 W4 i) pIF[#102LE#501]GOTO 20         假如下一刀Y位置小于工件宽度则跳回N20继续加工4 f- |6 P5 D3 L: Z& ?
N100   #101=#101+#503         计算下一刀Z位置(作者有误,这样计算出来为正数。)! M+ v  k) C7 }$ V
IF[#101LE#504]GOTO 10         假如下一刀Z位置小于或等于目标值时跳回N10继续加工(同上。难道作者是想Z方向从下往上切?)* N+ T" J$ l" y3 _2 Q8 [0 b. P# K
#100=#100+1                   (无实际意义。应该是计算切了几刀)
. N& a6 }5 x$ D#101=#5041 r3 N9 V2 s: Z) O# d9 c! S6 v
IF[#504EQ1]GOTO 10           (这程序执行下来这一步永远不会跳转。不理解), b' M" k6 g& {* t1 V7 l9 w$ k0 e
     G0  Z100.: n8 `5 y' D2 U8 i8 G! L
     M05
9 B( U: C2 c; V8 ~' b4 I" a3 U     M30
: \& Z$ A* J2 Z* P9 m$ k这段程序是能执行的,执行的效果就是Z方向在0的位置上切一遍就结束。
. _6 ?) [% e6 ~# o! d* s思路有很多不完善的地方。比如对原点,估计只有作者本人才知道对在那个位置最合适,反正是不能对在工件表面上
7 b+ ^% k; H3 S% V# z还有Z方向下刀第一刀数值设定如果不是2的倍数那就没法切到想要的厚度了。
# ~9 e# F2 E9 q# r" L$ n

点评

解释的不错!!!注释的也很好。。。  发表于 2013-11-26 10:17
发表于 2010-12-9 19:24:54 | 显示全部楼层
挣点威望...顶个  嘿嘿
" B+ g" @( _: u" i. `5 `2 z( e4 z0 [准备学习  表示鸭梨很大呀... ( {' O! G5 H$ ?' [, _8 v( G$ _5 f
发表于 2010-12-9 20:59:12 | 显示全部楼层
关注高手讲解                                            
5 }* h/ L- W4 D5 H5 P1 d- Z3 i
发表于 2010-12-9 21:08:57 | 显示全部楼层
回复 uwycui 的帖子' V% j/ D! O4 I, @* H# R6 K. Y
+ c, |: K- z; D
呵呵不懂          还是很高兴看到                  
发表于 2010-12-10 21:44:15 | 显示全部楼层
顶一下
发表于 2010-12-10 22:26:55 | 显示全部楼层
本帖最后由 少年游 于 2010-12-10 22:31 编辑 1 Z5 G, f0 B8 b+ N) v

' D) i& a( t7 H5 M$ U不好意思,没注意有人解释了。我的东西删除。1 O! o: q1 z2 ?- M7 ]' 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-8-6 19:41 , Processed in 0.074938 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

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