关于直线刀库

狼牙山3

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

远祥

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

狼牙山3

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

muchwang

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

狼牙山3

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

光辉岁月77832

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

) D: V6 \. x+ k' n3 Y! C% ]8 e能否分享一下宏程序？

狼牙山3

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

狼牙山3

3 Q& t- c( `) |8 d6 X

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

' r, {) b( _$ h/ B$ {) a$ rO9020
9 o7 m0 i* H0 [, ?8 Y+ |, OM80
M19
% `; t* {: e* n' |8 }5 a! m1 o9 A#100=#4014
#101=#4003
G90G15G54
IF[#1000EQ0]GOTO40
IF[#1003EQ1]GOTO40
! }  {- R! X+ u" u1 K- M" @IF[#1004EQ1]GOTO40
IF[#1001EQ0]GOTO20
N10
G90G00Z0
IF[#1008EQ1]GOTO11
  D# O( o. G: C' I' L/ kIF[#1009EQ1]GOTO12
IF[#1010EQ1]GOTO13
IF[#1011EQ1]GOTO14
IF[#1012EQ1]GOTO15
" C; e. w/ @/ A5 g& w( O: iIF[#1013EQ1]GOTO16
' a& {  D9 @) v  Q- `( eN11G00X#511Y#501
G30Z0
M64
, g5 q! X) M$ j8 F: \; X; x( L0 YM65
/ A3 s: g2 a" v' s! b9 UG28Z0
% P) k2 H& {! j* y6 K/ s$ X) H& U6 eGOTO20
# c% g; B3 M* T, D  ~% @+ F: BN12G00X#512Y#502
G30Z0
1 A  a" u( G% e& r* [' d- pM64
M65
9 @* m& C' ^- u. m7 L$ OG28Z0
& R/ p  H# g3 P6 V+ GGOTO20
N13G00X#513Y#503
G30Z0
M64
M65
G28Z0
% M9 Q* o1 n, H4 PGOTO20
2 j3 R$ o/ f) T. R8 yN14G00X#514Y#504
G30Z0
8 R" s4 z. g" `2 E8 g% S3 tM64
2 c. a8 C9 H3 ^3 `0 E# H5 w* f" E9 NM65
G28Z0
GOTO20
+ f1 Z2 ~6 x9 P/ }# r* TN15G00X#515Y#505
# |1 V( ]7 l- I" kG30Z0
M64
M65
9 e5 r) ~- ?+ ]( y5 TG28Z0
$ \. g$ |1 c* j$ kGOTO20
N16G00X#516Y#506
- @* s! d9 Z  O0 O% R5 C# ]G30Z0
M64
M65
  C+ s; p6 K: Z0 s3 n+ K; L, ?G28Z0
N20
M84
6 m) \( I" g) `6 K+ @# U9 kM83
" H6 K# e/ A7 ~! q# V& Z! R( x8 `G04X0.5
IF[#1003EQ1]GOTO30
G90G28Z0
! A6 W$ k3 f/ d* V- v: g" JM64
M65
' k* x5 x6 @0 E+ a% SIF[#1008EQ1]GOTO21
8 W( }- {( ?# \0 FIF[#1009EQ1]GOTO22
& h) F5 B% s% ]* `3 K/ xIF[#1010EQ1]GOTO23
IF[#1011EQ1]GOTO24
) q! R& [; k" l% b  u2 z2 bIF[#1012EQ1]GOTO25
$ k- p+ n( K7 Z7 VIF[#1013EQ1]GOTO26
9 y+ F7 H+ d3 |- v* kN21G00X#511Y#501
G30Z0
M66
M67
GOTO30
- N: C- R) y& I: Z; ~  L* h+ FN22G00X#512Y#502
. T' c- F* x2 T- I9 N3 YG30Z0
) S- F) p  T7 X2 ]. ~M66
M67
% P# r5 P# {! {GOTO30
& a& u5 g( `# j: z6 QN23G00X#513Y#503
6 d) o; T8 |( n9 nG30Z0
+ {  ~. u) B5 p/ ]8 @( NM66
M67
GOTO30
N24G00X#514Y#504
9 Y! G+ a9 |) W4 C: w" bG30Z0
M66
6 F: P/ b, C+ y' x* QM67
GOTO30
N25G00X#515Y#505
) V! p3 H, W0 |8 u6 oG30Z0
M66
8 r: Z+ Y0 Z. k5 r& u( W5 WM67
) F& W6 K( L: G  t0 E$ _  v8 t$ ?0 GGOTO30
N26G00X#516Y#506
! `+ j6 t! K$ F4 H% P" M$ RG30Z0
+ F2 b% D$ U2 ]7 J2 d0 aN30
2 H- s5 X* {8 fM66
M67
2 G5 c7 J) ~/ q  |3 x9 ]M68
M86
M81
N40
" I: T1 Q9 p2 i: kM81
2 x# A- i3 J- \8 X5 CG0Z0
' Y- T9 m' M) f% uG#100
  c2 z6 k9 e+ e8 P0 x; R% j' }G#101
M99
6 n/ ?( O# `0 ^%
感觉还有可以优化的地方，现在没时间弄它，以后再说。欢迎指正！