For those of you that care to have the bar puller program here it is. It is separated into 1 main program as a template and 2 sub programs TEMPLATE-------- -------------------- V1 = 36 (Length of bar to be inserted into the lathe) V2 = 1 (Length to be replaced or pulled) V3 = V1-1/V2-V2 (Lets calculate about how many pieces we get out of this bar with some room to spare) IF [V4 EQ 0] N101 N001 N100 IF[V4 GT 0] N200 N101 G00X60Z60 M00 (REPLACE BAR STOCK PLEASE!) CALL OBUMP IF [V4 EQ 1] N1000 N200 IF[V4 EQ V3] N1000 N201 CALL OPULL IF [V4 GE V3] N001 N1000 (OK LETS GET SOME WORK DONE SHALL WE!) M01 M30 OBUMP.SSB--------- ----------------------- OBUMP M05 M84 G00 X60 Z60 G00 X6.0 Z1.0 T1212 X.5 G94 G01 Z.02 F500.0 M00 (OPEN DOOR PULL OUT MATERIAL TO BUMP STOP) (CLOSE DOOR PUSH CYCLE START) G01 Z1.0 F500.0 G95 G00 X60 Z60 V4=1 RTS OPULL.SSB--------- ----------------------- OPULL G50 S4500 M19 (Lets orient the spindle and lock it into position) G00 X60Z60 G00 X2 Z = -V2+0.5 T070707 Z = -V2 G0 X0 F20. M84 G94 G01 Z = V2 F40. X0 M83 G01 X2.0 F60. G95 G00 X60 Z60 V4=V4+1 RTS
Posted on: Wed, 07 May 2014 03:41:45 +0000
Trending Topics
Recently Viewed Topics
© 2015