Problem- G50 zero shift

[03clipse]

MAZAK QT Nexus 250 with pc fusion 640t EIA program.
I feel stupid that I can not get it to work so i hope someone can help. I am cutting 13 pcs off a slug. The program is structured with a face skim cut, m00 flip then a sub to cut the 13 pcs. My problem is that I can not get the g50 shift to work. I have read all the books and done what it says. I am having to use a common varible to shift each part "ie X7.5 Z-0.100-#100" and add to it at the end of the loop it works but is a pain. after I post I have to add the varible to each line. I use G50 shifts on a Murata, and Tsugami with no problem. I added a sample program of how I have to do it. PLZ help

O00001736()
(15195 29-1)
(ROUGH AND FINISH)
(MAZAK NEXUS 250)
(RSL)
(ALL TURN TOOLS ARE .015 N.R.)
(USE SANDVIK CUTOFF .078 WIDE)
(.200)
#100=0.0 (SAFE LINE)
G00 G18 G20 G40 G80 G90
G50 S1500

/T0220
/G99 G96 S250 M3
/(FACE)
/(OFFSET#20)
/G00 X8.75 Z0.0 M8
/G01 X7.4688 F0.005
/Z0.02
/G0 Z0.05
/X8.4188
/Z0.03
/(TURN)
/G01 Z0. F0.005
/G03 X8.47 Z-0.0256 R0.0256
/G01 Z-0.55
/X8.5 Z-0.53
/G0 X8.6
/X10. Z6.

/T0919
/G99 G96 S300 M3
/(TAPER BORE)
/(OFFSET#19)
/G00 X7.6705 Z0.1 M8
/Z0.05
/G01 Z0. F0.006
/G02 X7.6344 Z-0.0074 R0.0256
/G01 X7.5756 Z-0.0366
/G02 X7.5605 Z-0.0546 R0.0256
/G01 X7.5546 Z-0.5655
/X7.5 Z-0.5405
/G00 X7.0 Z0.1
/X10. Z2.
/M00

G00 G18 G20 G40 G80 G90
G50 S1500

(FACE)
T0202
G99 G96 S250 M3
G00 X8.65 Z-0.0003 M8
G01 X7.45 F0.003
Z0.025
G00 X10. Z6.
M98 Q6969 L13
Z10.
M30
N6969

(ROUGH TURN OD)
T0202
G99 G96 S350 M3
G00 X8.4 Z0.05-#100 M08
G01 Z-0.280-#100 F0.01
X8.42 Z-0.270-#100
G00 X8.45
Z0.05-#100
X8.2719
G01 Z0.-#100
G03 X8.3162 Z-0.0128-#100 R0.0256
G01 X8.3402 Z-0.0335-#100
G03 X8.38 Z-0.1078-#100 R0.1486
G01 Z-0.280-#100
X8.4 Z-0.27-#100
G00 X8.55 Z0.05-#100
M9
G00 X10. Z6.-#100

(ROUGH TURN ID)
T0909
G99 G96 S350 M3
G00 X7.615 Z0.05-#100 M08
G01 Z-0.280-#100 F0.01
X7.6 Z-0.27-#100
G00 X7.55
Z0.05-#100
G00 X7.731 Z0.05-#100
G01 Z-0.280-#100 F0.01
X7.7 Z-0.27-#100
G00 X7.65
Z0.05-#100
X7.8652
G01 Z0.-#100
G02 X7.81 Z-0.0276-#100 R0.0276
G01 Z-0.280-#100
X7.79 Z-0.27-#100
G00 X7.65 Z0.05-#100
M9
G00 X10. Z2.-#100

T0303
(FINISH TURN OD)
G99 G96 S400 M3
G00 X8.2383 Z0.05-#100 M8
G01 Z0.-#100 F0.005
G03 X8.2826 Z-0.0128-#100 R0.0256
G01 X8.3152 Z-0.041-#100
G03 X8.351 Z-0.1078-#100 R0.1336
G01 Z-0.28-#100
X8.37 Z-0.27-#100
M9
G00 X10. Z6.-#100

T1111
(FINISH TURN ID)
G99 G96 S280 M3
G00 X7.8983+#105 Z0.05-#100 M8
G01 Z0.-#100 F0.005
G02 X7.837+#105 Z-0.0306-#100 R0.0306
G01 Z-0.1528-#100
X7.870+#105 Z-0.1814-#100
G01 Z-0.272-#100
X7.8+#105 Z-0.262-#100
G00 Z0.1-#100
M9
G00 X10. Z2.-#100

(CUT-OFF)
T0707
G99 G96 S250 M3
G00 X8.6 Z-0.2772-#100 M8
G01 X8.33 F0.003
G00 X8.6
Z-0.254-#100
G01 X8.38 F0.005
X8.33 Z-0.2792-#100 F0.002
X7.835 F.003
G00 X8.65
M09
M05
G00 X10. Z6.-#100
#100=#100+0.2792
#105=#105+0.0002
M00
M99
%

[CNCRim]

In your carse it's not a big problem since you have macro variable. But before I attempt suggest any change, my question is you want to shift 0.2792 in Z and reset it after 13 piece?

[03clipse]

Yes. I want to shift .279 for each part so there is 13 shifts. then reset back to the original Z zero for a new slug. I know I could use MAZATROL to do this and get the first and second side and all shifts much easier. But there is some geomotry that MAZATROL doesnt like to do and I would have to sorta trick the machine or lie in the program to get it done"if you do alot of MAZATROL you probably know what i meen". I feel stupid I have been doing this for 14 years and can not figure it out on thise dang mazak. I want to make it as easy for my operators as I can. Thanks for any help

[CNCRim]

Double check it, I hope that is what you want.

test - is without change work offset.
test1- is work offset change for particular machine.

[03clipse]

thanks I am going to try it soon as I get done helping one of the guys clean out our vtc 200c "time to change coolant". I use the if and goto statement on our OKUMA's when using the bar feeder and just use VZSHZ=VZSHZ-0.??? to make the offset never thought of that for the MAZAK. the line at start
"G10L2P0Z-8.55(Write the Z in work offset)" I never saw in the books Where could I find out more about it. and thanks

[03clipse]

on the test without change Z offset I will have to move the n2. I only want to face the first part off the slug. then after that the cutoff is my face. yes it is to break the part off i dont want an 8.5" part flopping around in there. I really like the way the program looks with the offset change. I will be looking for more info on that.