关于直线刀库

狼牙山3

最近，工厂买了一台二手卧式加工中心，参数都丢没了，最近几天把参数恢复了，只是机床用的是直线刀库，需要用宏程序换刀，看了几天梯形图，弄清了调用刀号的传递，但没弄清主轴刀号是怎么传递的，换刀前需要先还刀，主轴刀号传递不出来，怎么做到先还刀呢？哪位大侠有体验，特此求教！万分感谢！

远祥

直线刀库。刀具在刀库中直线排列、结构简单，存放刀具数量有限(一般8把-12把)，较少使用。

狼牙山3

在宏程序启动之前，应该给出主轴刀号，宏程序调用相应M指令，先走到主轴指示的刀号位置还刀。从现梯图上看不到这点，T码一出现，指令刀号就站据了刀号指示的宏变量。

muchwang

直排刀库是一对一的，不存在随机换刀选刀，所以简单安全。

狼牙山3

已经处理完毕。修改原梯图部分设计后，编制宏程序对应还刀、换刀，试用良好！

光辉岁月77832

狼牙山3 发表于 2018-8-3 09:28
已经处理完毕。修改原梯图部分设计后，编制宏程序对应还刀、换刀，试用良好！

! Z; R2 G1 h  A) |能否分享一下宏程序？

狼牙山3

基于不同的机床，M代码不同，基本上没有参考价值。

狼牙山3

光辉岁月77832 发表于 2018-10-1 22:22
能否分享一下宏程序？

O9020
M80
" |4 i- r$ }, C5 q8 D. }' fM19
#100=#4014
% o; b$ w6 ~$ ^" X# v6 I#101=#4003
G90G15G54
IF[#1000EQ0]GOTO40
1 o1 g( n# c2 I% mIF[#1003EQ1]GOTO40
2 e, R5 q0 N: R6 B  N9 L2 W$ dIF[#1004EQ1]GOTO40
IF[#1001EQ0]GOTO20
N10
G90G00Z0
IF[#1008EQ1]GOTO11
IF[#1009EQ1]GOTO12
$ X) L+ q3 }+ X) NIF[#1010EQ1]GOTO13
' J$ ]% {* E4 C" j6 h+ HIF[#1011EQ1]GOTO14
IF[#1012EQ1]GOTO15
IF[#1013EQ1]GOTO16
N11G00X#511Y#501
3 z5 @7 c9 p$ a- N, LG30Z0
M64
M65
G28Z0
GOTO20
+ H2 w, z, c7 E) x) C; u* R" oN12G00X#512Y#502
9 ~* R* c6 P) a4 f! v* P" G! \G30Z0
M64
4 n/ m/ h2 W+ d" I1 kM65
8 C6 f+ a' L% b& ~$ ZG28Z0
+ c7 f/ n8 Q; J/ Y2 F! e. C- tGOTO20
& R* f& r0 u( w6 AN13G00X#513Y#503
G30Z0
M64
5 d' k7 m1 B$ v& dM65
# e5 P/ L& j8 x" y+ i9 BG28Z0
, D& v# \1 v* ]GOTO20
7 V4 E) [& V  s$ B; b& b( s( DN14G00X#514Y#504
4 o& \' u0 Z* Z- ], E* AG30Z0
M64
5 k# T& m' q  d* {/ E, dM65
  P2 \8 ]! i8 ?  b$ BG28Z0
9 Y2 s& W1 d% r& E( AGOTO20
N15G00X#515Y#505
G30Z0
M64
- x+ o$ i4 V3 P: ?+ g0 z" |M65
G28Z0
GOTO20
N16G00X#516Y#506
G30Z0
M64
M65
G28Z0
N20
( g2 c: \% G4 K( sM84
M83
G04X0.5
IF[#1003EQ1]GOTO30
G90G28Z0
7 K% F5 _8 W! v6 d1 q8 `M64
M65
IF[#1008EQ1]GOTO21
3 Q7 \/ A9 ], }IF[#1009EQ1]GOTO22
6 B4 ^' c0 y( t* C8 E: O6 vIF[#1010EQ1]GOTO23
1 L7 j* n; T5 H& S2 {IF[#1011EQ1]GOTO24
& l" b7 h1 j$ [- WIF[#1012EQ1]GOTO25
IF[#1013EQ1]GOTO26
N21G00X#511Y#501
G30Z0
- _7 I8 {+ E4 i& _3 p3 tM66
M67
GOTO30
N22G00X#512Y#502
  ~* J6 L0 [$ e9 S( `1 kG30Z0
M66
. \: x- W' q' L' BM67
GOTO30
N23G00X#513Y#503
6 h2 d9 r! H) L" a/ V6 oG30Z0
4 c- k. ~2 P) ]; xM66
( b5 {( b- F) RM67
) P7 I5 C1 j* y. T7 }GOTO30
N24G00X#514Y#504
' v! O; E4 o) H+ z, e) a7 NG30Z0
/ i- ~! \- m/ c, ?+ \M66
M67
GOTO30
, d' a/ R$ h9 E1 F! g" c! GN25G00X#515Y#505
  W( C3 \* I1 d: h+ `G30Z0
M66
6 w8 @3 O9 F6 v7 b  g! CM67
GOTO30
N26G00X#516Y#506
/ ]* s4 B  h5 RG30Z0
N30
! ?+ C6 O1 Z2 `9 hM66
* }4 L- G( B' qM67
M68
M86
1 @/ ~% a# q. e  J. YM81
, u$ S2 F8 x& r  H: @N40
" z) N% @9 T/ ]1 kM81
; q" |4 W0 M* O, |% _$ nG0Z0
; K+ y- f6 J/ S5 C( C* ~0 x+ ?G#100
G#101
2 @& {: d' P1 [M99
* u. C$ ^) q$ P5 ^3 d: Z%
, k* b3 T# `2 e* w+ Y  H- p感觉还有可以优化的地方，现在没时间弄它，以后再说。欢迎指正！