找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
楼主: wendellz

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

[复制链接]
发表于 2010-12-1 05:02:09 | 显示全部楼层
这是一个三坐标同时变化的宏程序,其实前面的#500到#504的参数可以省略不要写,直接赋值到下面就可以,至于下面的跳转可以选用镶嵌式跳转,while___DO方式,本来很简单的程序被你复杂化了
发表于 2010-12-5 09:49:53 | 显示全部楼层
鄙人操作OKUMA系统的。对法拉克系统略知一二。既然没有高手出来指点。那我来抛砖引玉吧。
, g' L& L, c/ ^. f楼上那位兄弟所说的我不太认同。,我自已编程也喜欢把条件数据放在程序最前面。方便。明了,
* `2 a  D5 d+ n  x3 ]0 p O0 b% M' t! h* T3 e
(HUAHUI-GAN )      (此程序加工原点在工件表面X-Y-方向。X方向必须离开刀具半径): R& G4 q) z% l8 M
G90 G54 M3 S3000    不解释
, {3 z* O# m6 ?7 [- m. R% r* N#500=1100.          工件长度
" m9 q8 j7 ~5 t. e; o7 Z! M2 K0 ?(CHANG  DU )       / z6 u- n, G" C$ F* F2 a0 z' e8 ^6 M
#501=310 .          工件宽度
2 t3 Z' X! X& s: S# i. ~(KUAN  DU)
" P: R, A$ w! J! Q3 ^2 ?#502=50.            刀具直径
& l9 l9 J! W% @: Y4 s2 [! l(BAN  JING)& S' {0 M: u. V6 ?
(START)0 L7 R2 R" p9 Y& ]
#503=2.             每刀下刀量" h% M3 z# C: o+ ~: C# N
#504=0.             最终想切到的Z位置
2 ^9 h6 Y( k0 X2 K. f#101=0.             第一刀下刀位置
3 J% {6 |0 Y+ Y& o& @) s#101=-#101
' t4 t0 t; X* I#502=#502*0.8       每刀Y方向进刀具直径的80%4 q0 D! C8 r7 X0 n- I" Y7 V* ~/ o
#102=-#502          " f) _/ `8 O) M) V; u0 n
#501=FUP[#501/#502]* #502     取整数并且每刀Y方向进刀量平均化
% V3 j: Y* V& w5 ~! Q- ^0 fN10  G0 Z100.8 O' R( ]% v+ F
X0 Y#102                      Y移动到工件外面为第一刀Y位置做准备(无实际意义,作者思路不是很完美)              # _5 S/ J$ y# v$ E2 i( w% D- U
Z15., Q) |( A  U8 x
G1 Z-#101 F2000
) C& d) N: i/ T  t2 z* }N20   #102=#102+#502          自动计算下一刀Y位置。0 K+ g" P/ p4 J+ r5 b
IF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N1001 p6 b+ e/ ~( m9 t+ l% R1 b
Y#102                         移动到第一刀Y位置。
$ e- N) w: F  ^7 o# FX#500                         切削加工X方向。0 N$ r4 ~/ p  b! A" d4 v4 {0 \% g
#102=#102+#502                计算下一刀Y位置。- j! C( L; D, S: A; R. i. p
IF[#102GT#501]GOTO 100        假如下一刀Y位置大于工件宽度那就跳转到N100
$ l9 y7 X" i4 m1 [3 cY#102
  O  k( }) v9 Z; _4 g) n2 V5 HX05 G% e4 u" t  {
IF[#102LE#501]GOTO 20         假如下一刀Y位置小于工件宽度则跳回N20继续加工
$ x: L" c  ?  Z% C2 R$ k% f! R7 yN100   #101=#101+#503         计算下一刀Z位置(作者有误,这样计算出来为正数。)
3 j7 m! J) C+ T/ Q, {IF[#101LE#504]GOTO 10         假如下一刀Z位置小于或等于目标值时跳回N10继续加工(同上。难道作者是想Z方向从下往上切?)
8 s% A) r8 _9 S7 F; C$ A#100=#100+1                   (无实际意义。应该是计算切了几刀)
. d! G2 V; t; N, f# @  I0 M#101=#504
  x8 }: o/ j6 T: o2 U5 @IF[#504EQ1]GOTO 10           (这程序执行下来这一步永远不会跳转。不理解)
) {$ {$ B2 h: |     G0  Z100.; r8 }4 U5 l/ W" L
     M05
+ }3 x' h" f) F0 ~     M305 t. r; v$ T/ R2 L7 }' Y
这段程序是能执行的,执行的效果就是Z方向在0的位置上切一遍就结束。. x1 T( c& {& [5 `5 C
思路有很多不完善的地方。比如对原点,估计只有作者本人才知道对在那个位置最合适,反正是不能对在工件表面上0 [% W( }! A9 O: Z9 j+ x5 @; q
还有Z方向下刀第一刀数值设定如果不是2的倍数那就没法切到想要的厚度了。7 A- C' G0 `5 s1 d  l4 t

点评

解释的不错!!!注释的也很好。。。  发表于 2013-11-26 10:17
发表于 2010-12-9 19:24:54 | 显示全部楼层
挣点威望...顶个  嘿嘿
' |% S$ m% h) D0 s/ V. `5 `2 z( e4 z0 [准备学习  表示鸭梨很大呀...
7 o$ T5 \8 \, T0 |: L  T2 h( @7 c' V
发表于 2010-12-9 20:59:12 | 显示全部楼层
关注高手讲解                                            # k9 \8 I1 B' o  H$ Q( J
发表于 2010-12-9 21:08:57 | 显示全部楼层
回复 uwycui 的帖子+ d* K( `; T8 i' G# V
( B* [: o/ [" f7 B! U# w
呵呵不懂          还是很高兴看到                  
发表于 2010-12-10 21:44:15 | 显示全部楼层
顶一下
发表于 2010-12-10 22:26:55 | 显示全部楼层
本帖最后由 少年游 于 2010-12-10 22:31 编辑
' p# n- S" _0 Z* y& z3 s- X" Y. }2 u* g8 u. t
不好意思,没注意有人解释了。我的东西删除。" F8 m4 x  g/ w3 y. h( T, }" X
发表于 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-7-1 07:01 , Processed in 0.068098 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

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