三菱和发那科半自动分中程序

120817

三菱和发那科半自动分中程序，可完全避免抄数和计算错误。
6 K4 d" G# s/ w7 \$ u, M, s1 x

) w: N8 u9 F7 L; H+ X  t（以下全部 打单节执行）

: E; N# \4 T! A2 H; [%
O001（）
#5201=0
! g" i7 V! M* s- j. J3 o#5202=0
1 _% ?6 L4 ]0 \& @4 j, q: e' d#5203=0
#101=[100.+20.]（X-L）工件大致长(内部请相应减少尺寸)
5 S. J0 o; ]( T, k( k7 ]# ?! d; _#102=[100.+20.]（Y-L）工件大致宽(内部请相应减少尺寸)
#103=150.（Z）安全高度
! X! L5 f5 R  E/ d$ E$ R5 {, B#104=54(G54-G59)可分别设定所需写入的坐标系G54到G59.
6 e  U' d  n: B105=1(N)1表示由X方向开始四边分中,可改为2表示Y方向分中.
% q8 n3 p) w9 i4 W! q9 F! IS500M3
N1
IF[#104EQ54]QOTO14
) [; _2 z/ f$ r. Z2 JIF[#104EQ54]QOTO15
* Q" C9 v+ t+ v, u0 p1 C/ e- `IF[#104EQ54]QOTO16
IF[#104EQ54]QOTO17
N14
#114=#5221
#115=#5222
GOTO1
N15
) @: U7 I  r6 Q- u2 y#114=#5421
2 `' b6 Y0 L* [" q8 r- x! P#115=#5422
7 b+ M# Z9 \1 @. F. Y0 ^QOTO1
N16
  i. k; K; _, m, b' U8 @, I#114=#5621
* w  N! A+ y; F. \% i; E( k/ T#115=#5622
QOTO1
" d4 u  t/ u! r' Y  Q/ rN17
#114=#5821
  T* ^- V! `/ M/ p6 \#115=#5822
2 B; K# C% `3 d# VQOTO1
) ^* h' d) b* A' E/ W- EN1
  t$ x, `, z/ v( s( p+ H0 T7 x（手动碰边X方向右手边）
5 U& h1 l8 ]- }* M. r: |( VG0 G91 Z#103  
% x$ ]3 `& O8 v; d#110=#5021
  ^9 V9 L% R. X8 x4 w0 Q  z+ ]. [X[-#101]
Z-#103（停止后手动碰边X方向）
' P; T  K' t% c; o* C6 g% m. g#111=#5021
#112=[#111-#110]/2.0
! i% z8 {7 f9 R' |' ^X#112
#[#114]=#5021
N2
7 V" y  x& V- }& i# o（手动移动自Y面向人一边并碰边）
G0 G91 Z#103
#120=#5022
' z2 G4 q; x4 X0 [Y#102
) F7 l+ `) ~7 z: ?  }1 x* o  KZ-#103（停止后手动碰边Y方向）
, I& ~' ?9 n1 f8 WZ#103
#121=#5022
#122=[#121-#120]/2.0
' D7 _8 `# A9 k, F( t1 pY#122
- W( N  ~( O1 N, T1 O$ @( P% {#[#115]=#5022
G0 G91 G28 Z0.
0 r, D2 @; H" ^0 p' s8 v0 MG0 G90 G#104 X0. Y0. 本单节完成可效验工件数据是否自动抄写进需要的坐标系.
M5
M30
4 B1 D' ]: P/ Z2 \2 ]%

6 J: U7 ~6 o4 \  s2 N
# R. d3 |" g* o# J; @2 v6 {, y3 h使用过程中可以根据操机规则自由移动位置.部分数据可自由根据实际需要改写.

2 ^- ~$ u! D* V3 r7 O% F+ X: Z

yangzizhao

说的很详细，感觉很深奥，顶一个

zv1363

收下，感謝分享
* y. v) i4 V- z" ]9 ]: U$ U0 b

开hua结果

系统变量，现在宏越来越高级了。

philipchen

程序不错，不过不怎么 实用哦！

bird9077

謝謝分享.....

有人知道fanuc的G81 G83的Macro內容寫法嗎 ? 能否分享 謝謝

liangliangnihao

thanks for sharing

norno

LZ，其實可以在適當的地方加入M00，
$ U( F  }" ~1 ^% T: n6 V. E8 V5 W這樣就不用用"單節"了，
還有跳轉是"GOTO"，你有些地方打錯了。

threestone

现在宏程序是越用越多了，也越来越厉害了

120817

8 S/ ]! [' |* \' \& v- OLZ，其實可以在適當的地方加入M00，
這樣就不用用"單節"了，
3 Y1 O6 J  H0 q8 `& M( x  V還有跳轉是"GOTO"，你有些地方打錯了。
------------------
仔细看了下，确实有地方打错了，Sorry

' W7 [% E  q+ q8 I2 i6 J, V2 k有人搞过全自动分中的，搞不来,到那个公司晚了一步，没亲眼见到，这里有会弄的么？对定位要求高，容易变形的产品还是有用的

you3232001

120817 发表于 2013-8-1 18:04 static/image/common/back.gif
( {5 i9 l, H) J9 [# s2 I$ [LZ，其實可以在適當的地方加入M00，
1 w/ F$ e+ X( {2 [' g9 s# A( l這樣就不用用"單節"了，
還有跳轉是"GOTO"，你有些地方打錯了。

是要有专用的分中棒吗

guhongqing

bird9077 发表于 2013-8-1 00:59 static/image/common/back.gif
9 c/ L8 C9 {+ ]謝謝分享.....
0 J; W  l. N6 G6 A
  p, M1 z, Y. e( D8 @) T有人知道fanuc的G81 G83的Macro內容寫法嗎 ? 能否分享 謝謝

; x' A) |% T3 Y( S2 y+ ?9 p7 M6 K* k6 P三菱系统说明书有全部循环的宏调用程式，在说明书最后，和fanuc一样的

bird9077

guhongqing 发表于 2013-8-1 19:50 static/image/common/back.gif
三菱系统说明书有全部循环的宏调用程式，在说明书最后，和fanuc一样的

$ y5 I6 \1 o8 u) Y8 Z嗯...我手上沒有耶...有全部循環的呀 !!
方便貼上來嗎...

vinney777

现在大部分机床都有雷尼绍测头可供使用

民工都不如

还是测头比较方便

mchuihkhk

我在公司的cnc走了一次，但它沒有將X，Y，的中心數輸入座標裏，請問我那裏出錯，cnc系統是三菱m65s,謝謝大師兄

sclei9622

一直是到14，哪里能跳到15，16，17呀？

bird9077

這段宏有些問題的....

zrf0417

LZ的程序好长好其实可以更精简点！发个我用的求大神指点！功能不强够用！
%
O0001
     #100= 54.0
: |: e7 `! Z, A

5 ~% a3 `; r6 s0 h
! t8 ~' w( D! m+ w- L
     M3 S500
( Q8 F$ n* U- J& u. C
! m, z$ S/ w; b; R& ]3 x
% s* V/ A' ~$ S* n

" e9 |5 p4 `6 P# e
! Y6 \$ S2 B! w* N+ v: ~9 F
     #100=ABS[#100]
     #100=FIX[#100]
     IF[#100 LT 54] GOTO 10
     IF[#100 GT 59] GOTO 10
8 l9 w  p  J5 ?) s, ^     
   M00

(X Axis 1 Point)

     #101=#5021
( n/ `& l2 E* f( j5 T& q; i     G53 G0 Z[#5023+#100]
$ j7 H' l3 @) t9 p+ ?" j) A4 d
   M00

(X Axis 2 Point)
1 F4 ?- D4 M, L$ D- U6 Z
     #102=#5021
) u1 v$ l# x0 X/ A- `' L& t' U  S     #[2500+#100-53.0]=[#101+#102]/2
- \% w2 a0 c5 t& d% y  c  v) w0 T  I     G53 G0 Z[#5023+#100]

   M00

(Y Axis 1 Point)

( w2 ?* L- L3 d5 x5 d4 N& d2 Y     #101=#5022
4 h/ V, I- i! Q* n: r" f     G53 G0 Z[#5023+#100]
; E9 t5 d- `3 C: h* c2 y+ N* u
8 I# q- _7 H6 w" B3 c, S   M00
( P4 B& ]- T$ v
6 a& R2 n4 {8 j$ ]5 Z(Y Axis 2 Point)

     #102=#5022
     #[2600+#100-53.0]=[#101+#102]/2
     G53 G0 Z[#5023+#100]
% Q! k% d# g; _. Y! j5 @4 z     GOTO 20
N10  M5
     #3000 =1(#100 NO 54 TO 59)
9 s0 m/ O8 U& B3 q& }# sN20  M30
/ N6 a# \4 ?' J- J+ ~0 \* j%

网游

能具体讲讲宏程序么，最好发个教程。

liuhoulei920

对啊 最好发一个视频 这样让我们这些菜鸟也见见市面啊