找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 6582|回复: 29

[求助] 别得地方看到的我不会,请高手

  [复制链接]

1

主题

13

回帖

252

积分

注册会员

积分
252
QQ
发表于 2011-11-3 20:40:04 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

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

×
是发那科加工中心宏程序。我弄了个用小刀倒大孔的倒角宏程序,然后指定了个G代码,比如-101,然后用G101呼叫,用负号就相当于模态呼叫,然后问题是每个孔位置都必须把变量写全,不写全的话它会认为这个变量为空,如何能让后面跟的孔位置只需要XY坐标就行,其他变量默认第一次的?举个例子:用12的倒角刀倒20的孔,我让它转半径6的圆G101 X0 Y0 Z-10 R1 I6 F300(Z为深度,R为进给落刀点,I为转圆的半径)X50(就是这里不行了,要把所有变量写全才可以)X100(就是这里不行了,要把所有变量写全才可以)要写成这样才可以:G101 X0 Y0 Z-10 R1 I6 F300(Z为深度,R为进给落刀点,I为转圆的半径)X50 Z-10 R1 I6 F300X100 Z-10 R1 I6 F300请高手帮忙解决下
发表于 2011-11-4 08:18:25 | 显示全部楼层
我给你一个类似的实例,你可以参考下,每个孔位置如果有重复的可以不用写重复的那一个坐标4 J7 E! P! V7 G7 a1 J
O30. I6 D, A! a  G3 N0 t9 t  _
#100=54    (坐标号)
" n, H: _# a- n: M( N, F) z9 y" I #1=3       (下刀点)
3 e9 ~1 G+ n" T  u3 I #2=0.5     (每层切深)
* S4 y9 C+ Q1 M #3=30      (加工深度)) E' M" D$ _5 J4 _8 {# {
#30=50     (圆直径)
& a+ a/ i3 O% w3 Y7 Y+ n4 M #102=2000  (转速)
  E1 k  z2 I  [/ k2 y #103=8     (M代码), N1 X, R1 @4 y  q1 s0 @$ N1 f# P
#104=81    (加工模式)7 v& c, g0 ]% F+ U
#21=1000   (进给)
* A; l. w! E+ G: E9 z" a #109=20    (刀半径)
" M' k6 P8 Z- t M98 P319 Q# w4 R/ _4 g. t
(*-*-*-*-*-*-*-*-*)
1 p# j( o; s, Y- F" R$ Y X30. Y-30.1 y; Z+ a$ M( D) v0 S) C
X0. Y-30.2 A- m2 J/ K- R
X-30. Y-30.
! ~& x9 T( f! `) { X-30. Y0.1 \8 Q+ f+ h/ h- T, K: h
X0. Y0.) g: j" o- r4 _/ d2 n7 V% ?, A  v
X30. Y0.
& G' \8 D  d9 F' E  z1 L. e X30. Y30.$ k- r8 Y1 X2 s" |$ }4 @, F
X0. Y30.5 B2 s# O0 w$ [  g  N# L
X-30. Y30./ w7 ~* ?/ M# ]
(*-*-*-*-*-*-*-*-*)
0 h* \/ ]5 F' H% S  @ M98 P32
- |' \+ x- s1 P& P M30
5 c, w: u& z0 J4 C+ U
. q! `- T0 ^" n  h* g+ B, qO31
  y7 U0 w4 b" t+ s. F G80 M5- X! ]* c- f) Z
M9
% q* J9 E2 K, i' Y# \/ T G52 X0 Y0 Z00 J( B' u, n3 B  a( e7 k
G69/ }+ A0 N8 l+ H+ ?: e" [7 Y, E- w
#100=FI[#100]
  `) ^6 g0 K5 E, R G91 G28 Z0  i, N/ T5 r* n
G90 G0 G#100 X0 Y0
1 Q" S5 d$ R8 B) U4 f G43 H0 Z150.5 A" i2 F7 u5 s/ h
M3 S#102- T- E6 R0 U1 Q9 l
M#103, ~) e  u/ C' v) ?/ E6 d; D
IF[#104 EQ 3]GO 10. h% [  [0 A* d- X9 ?
IF[#104 EQ 76]GO 1
$ T3 c5 {8 S# ~" z) ]: I! @/ [ IF[#104 EQ 87]GO 1
7 y. p  o* k3 l" v) H9 \' H0 O  S GO 2
% i- O, i4 m4 MN1
+ `' O, m8 ~7 N, Z% H #2=0.1
  L" \! Q$ D; y9 G1 ?. ~. g. ]) @N2! p# K' H7 N+ q/ q1 C+ G' T1 k
G#1042 q6 m' z3 D- w4 |9 k  F
IF[#4009 EQ 80]GO 3001( B( x& O/ [' q
G98 G#104 R#1 Q#2 Z-#3 F#21 L0 K0
% {9 `7 q1 g% n* z& A' f  t GO 20
' C- s2 a: e: F4 N6 a/ UN10
0 r" P) ~- B- s3 C G66 P9221 A#1 B#2 C#3 D#30 F#21' B+ _' h( K) V
N204 @0 o( @* c! H; u1 N4 |# I' q: n
M990 f$ h3 r* U$ H/ V! _5 ~( g* w5 y
& Y0 t6 H1 q6 ~/ J* i
O32
& O4 d1 c0 ?* V0 f IF[#4012 EQ 67]GO 1  L# j; @* M+ u6 m- W
G67
% h$ R3 }8 d3 u! C- ZN19 A% w1 _5 N; d2 Y
G80 M59 F$ y7 u' f6 J7 S
M9
7 k* g+ C) x1 @& Q G91 G28 Z0) O! y8 `5 g" v% H% S, O$ Z- r4 d# `; \! c
M99
6 w; @' b, Q' d" W8 t8 YN3001
: |' O0 {* \2 C- S3 W #3000=1 (#104-DATA-ERROR)
$ C& G% X& x! l
: h( g" S. ?; M6 r9 O# [O9221 (FORMAT G66 P9221 A_ B_ C_ D_ F_)
6 V9 j9 Q( G5 L! v7 V5 Q IF[#1 EQ #0]GO 3001             /判断下刀点是否传入
% N1 ^' A+ t1 [) A+ X- Y  y# f IF[#2 EQ #0]GO 3002             /判断每层切深是否传入
* U; W" n& g5 K, @ IF[#3 EQ #0]GO 3003             /判断加工深度是否传入
8 x' _) M4 l5 x$ l+ |* U" A IF[#7 EQ #0]GO 3004             /判断圆框直径是否传入
" Y: G# N6 R, N IF[#9*1 LE 0]GO 3005            /判断进给量是否传入或异常) X8 v: A( D' k- h7 [$ j3 [- j* Z
#4=#5021-#[5201+[#4014-53]*20]  /计算当前X坐标点
8 r* B" r: y2 L8 s, R9 r0 Z #5=#5022-#[5202+[#4014-53]*20]  /计算当前Y坐标点8 p" |) `; O; j
#6=#5003 /记忆当前Z轴高度                    
) Y1 H* Y7 k6 ~/ ?( f1 s #10=#1+#2                       /起始下刀深度2 D9 ~# Y* }& O8 }: w8 X! H
IF[#10 GT #3]GO 3006            /判断起始下刀深度是否异常: ^2 _8 P0 @: r1 q2 u  F. I
#21=#9                          /还原主程序变量
5 F6 d4 M- m6 U #30=#7                          /还原主程序变量
+ s* K6 ]  `( q #20=#30/2-#109                  /切宽
7 z; k+ J) i+ N& q6 }+ S IF[#20 LE 0]GO 3007             /判断切宽是否异常
1 `$ w8 C% {' I1 A' SN1, I8 H# {8 [4 {$ ]
G90 G1 Z-[#10-#2] F1500         /下刀前深度* J4 a. ?4 r/ T. o
G1 Z-#10 F100                   /到Z加工深度
4 a" E8 {8 ~: V* L% z! g G1 X[#4+#20] Y[#5] F#9          /移动至框边
! g' ~5 C# Q/ B3 W5 Q1 e* d  c. o" \/ ^ G3 X[#4+#20] Y[#5] I-#20 J0     /螺旋一圈. M0 R; S  h  l4 f4 N6 B
G0 Z-[#10-.5]                   /抬高Z轴0.5,防止框底打花) V0 r/ _! R7 p
G0 X#4 Y#5                       /移动至圆心位置
% z( p6 }* ~# t, a" m; t IF[#10 GE #3]GO 2               /判断加工深度是否到位" B1 S3 @( ]7 x4 [2 y: q
#10=#10+#2
& |7 p! Q) R3 [. c' Y IF[#10 LE #3]GO 1
" k: g3 _* ~9 `# U5 [5 J" ?/ q* } #10=#3
1 s3 j" F) L% Q2 F GO 1
6 G% |# z& q: x) _/ f$ B9 _N2+ K. }1 C# d6 P
G0 Z#6( |4 W- i+ O; e5 Y
M99$ D; n  |5 J. x9 ~8 a5 Y7 u
N3001
& j% K/ t8 _8 r6 y0 z" d& E+ R2 c #3000=1 (A-DATA-ERROR)
) s) E, I0 `! n5 ]% t2 ]) A: xN3002, J1 i* v% m3 n/ x) J- q
#3000=2 (B-DATA-ERROR)- d/ Q& E/ y9 x7 n9 A
N30039 G5 ?* I4 p, @; [- h  t
#3000=3 (C-DATA-ERROR)- W7 a! p& D: S6 A. P# q8 F
N3004. ^9 {4 T! y) [( V- G; _& T
#3000=4 (D-DATA-ERROR)
. e  K: Q4 n6 H4 r5 U) p! ]; [8 X! o* RN3005$ K8 e0 f* {& {& B
#3000=5 (F-DATA-ERROR)
& P; X( s* W0 ]) M- b) ]6 r5 N* IN3006
( Z  X7 d) T! u' n #3000=6 (CHECK-#1\#2-DATA)8 Q. y" A" ?5 M# d( M0 O
N3007+ g; n/ U1 U: h" e  g- ?
#3000=7 (CHECK-#30\#109-DATA)

评分

参与人数 1金钱 +5 收起 理由
若枫 + 5 鼓励应助

查看全部评分

回复

使用道具 举报

1

主题

13

回帖

252

积分

注册会员

积分
252
QQ
 楼主| 发表于 2011-11-4 20:34:22 | 显示全部楼层
谢大神,关注好久了,对你的知识就是羡慕忌妒恨啊,我什么时候才能达到啊!我基础还不太好,要努力努力在努力
回复

使用道具 举报

发表于 2011-11-5 09:29:10 | 显示全部楼层
回复 3# 253804985
/ n9 C' o- x" F" {呵呵,好好学习,天天向上,你可以实现的。
回复

使用道具 举报

发表于 2011-11-6 08:09:38 | 显示全部楼层
回复 5# gono9981
3 ?3 X5 Q+ h8 x- `' g6 {1 g4 J8 u8 ?8 z/ K1 Q% D" _2 l
! C8 T- w1 }" a6 }4 T
机床会报警,GOTO只针对于当前执行的程序有效。
回复

使用道具 举报

0

主题

53

回帖

36

积分

注册会员

积分
36
发表于 2011-11-10 11:09:14 | 显示全部楼层
回复 5# gono9981 ' i: ]+ I4 R7 A5 Q4 s; I9 I

: }! Y& {4 B+ \" ?) p( K+ o
9 {/ I" }" O& y% J  M; z/ v4 {    不会!这个一试不就知道了还问大师!
回复

使用道具 举报

0

主题

5

回帖

7

积分

新手上路

积分
7
发表于 2011-11-11 19:53:52 | 显示全部楼层
一步一步来
回复

使用道具 举报

0

主题

2

回帖

3

积分

新手上路

积分
3
发表于 2012-1-9 03:43:11 | 显示全部楼层
谁教教我OKUMA 车床的宏程序啊
回复

使用道具 举报

0

主题

224

回帖

346

积分

注册会员

积分
346
发表于 2021-11-24 09:04:16 | 显示全部楼层
学习了,感谢大家
回复

使用道具 举报

0

主题

224

回帖

346

积分

注册会员

积分
346
发表于 2021-11-24 14:43:27 | 显示全部楼层
感谢楼主,学习了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

QQ|Archiver|手机版|小黑屋|若枫后处理论坛 ( 苏ICP备11015087号-1|苏公网安备32059002001368号 )

GMT+8, 2025-12-14 22:46 , Processed in 3.559966 second(s), 23 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

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