找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 3703|回复: 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 r# |! ^  c9 ~7 w2 z' W- S  L
O30$ x# q) W- M: g8 H1 s& e. X5 C
#100=54    (坐标号)
* o3 u" o5 U  ~: R7 U) ^# [" J0 y5 a #1=3       (下刀点)
$ Y/ a% W, O, L& A* M: m #2=0.5     (每层切深)
) A  `3 x- }* l7 w9 }! a8 I7 m4 n #3=30      (加工深度)3 ?9 ~% S7 K3 [# n
#30=50     (圆直径)" x+ R6 f! F; `6 p
#102=2000  (转速)
/ x; k! R8 s$ q* E( e #103=8     (M代码)
* x' Q# N3 @/ b  x$ u5 L8 A2 ^/ f #104=81    (加工模式)3 g$ Z0 o/ L6 f% h" X. Q2 d! v: D$ J- D
#21=1000   (进给); t) V; p3 E5 `
#109=20    (刀半径)
, t3 K" F7 j: L  z2 O M98 P31
! V7 E% ^# ^: a% [ (*-*-*-*-*-*-*-*-*)
( {7 x% p- a; ]' }" v* s; H X30. Y-30.
) ?3 e; S. Z4 r6 E  z9 Z- b* e X0. Y-30.8 C4 {9 I3 N) Q% _
X-30. Y-30.6 u8 L4 j7 C( l5 O$ T$ O& Y$ b
X-30. Y0.! B4 K% _4 T) o1 w8 W! H5 N
X0. Y0.8 Z& i8 C+ n& k0 x) g' B
X30. Y0.5 J8 F8 V+ s5 E# v+ I0 {6 _
X30. Y30.5 v( p' T, Z8 U- ^
X0. Y30.
, ]9 }- j$ T, A4 V* b0 h+ j6 g X-30. Y30.4 s! e) L2 w/ {: W  y/ [5 T5 [
(*-*-*-*-*-*-*-*-*)/ q% I" m2 |! |" C# D
M98 P320 X3 b% u; O  E! z
M30
8 Y; s1 F% @" f5 m& q( x$ f
% f3 _7 h- M% g9 t8 a( [/ t" h" K' qO31
0 ]0 C! `. ^; [+ P! g* q G80 M5+ z+ o1 _! `) ?4 n5 D. u
M9
3 K- ?# j3 q. l8 F6 p G52 X0 Y0 Z0; P) {) Z6 E$ L) \. U3 B
G69
0 J- A1 ^! ~$ Q8 F0 |2 h #100=FI[#100]
, A# I6 z6 Z9 }; x5 C+ u, a/ N G91 G28 Z0
6 W. q7 i, x4 Z! v- ]% k, h G90 G0 G#100 X0 Y01 [9 I3 V% O3 w, F
G43 H0 Z150.
/ c2 T' g7 v! g- V/ E4 {. A M3 S#102  z2 Q* F& {) I6 J, c
M#103
4 f6 Y! A% p+ `" `* Y IF[#104 EQ 3]GO 10
- |4 o) R# Y& u1 c/ X8 w0 r6 U" V; R; X IF[#104 EQ 76]GO 1/ C8 G$ \9 y3 w9 F2 S$ D) I: B: l
IF[#104 EQ 87]GO 13 p- H5 \5 W! |0 `
GO 2
! C) o3 U: o7 P: h' GN1
, ?! B- v/ U+ z' V #2=0.12 y$ }5 Q4 ?: Z& f6 i4 J
N2
) |0 Y+ Z3 R! A: q G#104
1 |. A0 k0 x" T% y# |+ b IF[#4009 EQ 80]GO 3001; S8 j+ [- m% N, z+ E
G98 G#104 R#1 Q#2 Z-#3 F#21 L0 K0. ?" \7 H- E' N8 M
GO 20# s( }# o, [% o0 G) j/ ^
N10
4 Z% }0 O- e! o. P! D G66 P9221 A#1 B#2 C#3 D#30 F#21  L  D% F. h1 e' z* h9 H6 }' W
N20" O7 X/ m8 z) B# d3 \, e9 k
M99
" D; v$ i( L9 a5 X. F4 V5 ^3 v+ x! B4 k6 b7 p5 t
O32' I* ?2 N6 v" |4 R: `
IF[#4012 EQ 67]GO 1
: l! C" @. e& ]0 O- f G67$ @- {2 ~- f, l
N16 u6 C  [( T/ @
G80 M54 y$ }/ X, j" b0 v* v: q/ c8 }
M97 K. m: z/ W. j$ _
G91 G28 Z0
# u7 c& X/ z  \- F$ s# Y' j M99& J! O" f& f! X( M& w$ W
N3001$ M. ?5 J: N  ~9 S& T+ t
#3000=1 (#104-DATA-ERROR)
, ]- p/ V, ?5 a/ H0 b8 c' L5 c8 y. T4 u5 ]& J% @
O9221 (FORMAT G66 P9221 A_ B_ C_ D_ F_)- h- G' |- L# u
IF[#1 EQ #0]GO 3001             /判断下刀点是否传入, S- ?/ R+ L( a0 n4 _
IF[#2 EQ #0]GO 3002             /判断每层切深是否传入/ ]; X1 f$ ~. l3 Z( K: B) o
IF[#3 EQ #0]GO 3003             /判断加工深度是否传入1 {9 C  u3 v+ B) Q
IF[#7 EQ #0]GO 3004             /判断圆框直径是否传入( _, i1 H$ _( y4 O
IF[#9*1 LE 0]GO 3005            /判断进给量是否传入或异常
* J' ?) D6 T  u* {1 D. `) K #4=#5021-#[5201+[#4014-53]*20]  /计算当前X坐标点1 v# A1 a. ?+ w: {
#5=#5022-#[5202+[#4014-53]*20]  /计算当前Y坐标点3 B" |. D1 i$ g& e) p
#6=#5003 /记忆当前Z轴高度                    6 W" O2 P* w! d8 L9 ]/ {) B
#10=#1+#2                       /起始下刀深度
9 P3 m" S& a; s1 _1 J IF[#10 GT #3]GO 3006            /判断起始下刀深度是否异常5 W) d! p; w! [! r
#21=#9                          /还原主程序变量
$ y% i  `) M: r6 m #30=#7                          /还原主程序变量
0 l8 i  O- Z: y' O& I3 j #20=#30/2-#109                  /切宽2 G" A, D3 u; D) M; x  q9 G6 c
IF[#20 LE 0]GO 3007             /判断切宽是否异常/ {8 w! l8 i: q& I3 C9 s( V; W
N1# `$ E( a2 M' v% O
G90 G1 Z-[#10-#2] F1500         /下刀前深度# F4 r3 `4 i1 z' d. B4 H; z2 G
G1 Z-#10 F100                   /到Z加工深度
4 |" N+ r5 }3 o G1 X[#4+#20] Y[#5] F#9          /移动至框边
' j6 s/ h. w9 x% X G3 X[#4+#20] Y[#5] I-#20 J0     /螺旋一圈
* q" H3 j! d5 L G0 Z-[#10-.5]                   /抬高Z轴0.5,防止框底打花" X2 [2 C5 I% k5 W. n; U
G0 X#4 Y#5                       /移动至圆心位置
7 D# l* q0 o  F4 x IF[#10 GE #3]GO 2               /判断加工深度是否到位
8 J% V& u$ N1 M  E9 y #10=#10+#2. G0 t9 j3 P4 ?
IF[#10 LE #3]GO 1/ R! b- l# e  Q( s
#10=#3
, D( k' i2 p' S& I  j! |7 o" I GO 1& F4 N1 Q* m# t* z7 b( v
N22 x8 n( i& D$ t3 W
G0 Z#6
9 k$ C% H' F( ?1 j+ R) U M99
  K' |- ^* a1 T6 Y6 ^3 v: |N3001; x/ x1 Y' G0 z7 i% U0 H
#3000=1 (A-DATA-ERROR), e! t: U! g# [; G7 c
N3002; I5 a. L5 F3 A) Z" |" m7 U
#3000=2 (B-DATA-ERROR)/ _& W5 [0 C3 r* C: Y
N3003
" X+ z; H3 @  e- Y #3000=3 (C-DATA-ERROR)9 ]% _) R' l/ z' p9 X" v# z& G
N3004& s9 r4 I6 c' _( L* |4 {
#3000=4 (D-DATA-ERROR)
5 p3 ~3 }; w5 QN3005. [& t, c3 |5 T+ x5 V* I
#3000=5 (F-DATA-ERROR)
& T4 }3 C$ i, S. Q8 K; Y; G, qN3006
7 n1 c& d: Z: | #3000=6 (CHECK-#1\#2-DATA)8 W8 ~0 p, A3 h+ r
N3007
& E/ b$ M! X2 H$ N+ E: m #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
& e/ J- I/ |' d! I$ e: M' j5 ^呵呵,好好学习,天天向上,你可以实现的。
回复

使用道具 举报

发表于 2011-11-6 08:09:38 | 显示全部楼层
回复 5# gono9981 3 N# k+ Y$ x, h+ Z
7 J0 p  Z" R' N) L3 q9 |1 }; R

# m6 x+ f+ J- P机床会报警,GOTO只针对于当前执行的程序有效。
回复

使用道具 举报

0

主题

53

回帖

36

积分

注册会员

积分
36
发表于 2011-11-10 11:09:14 | 显示全部楼层
回复 5# gono9981 3 b0 l+ E, @" L) F! J$ q% [' y

: \' U% f2 G' Z- H
4 c0 r* w3 g0 ~, t    不会!这个一试不就知道了还问大师!
回复

使用道具 举报

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-2-19 06:27 , Processed in 0.299612 second(s), 25 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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