Mill/Turn coordinate switch

[alia]

Hi all!


I have a problem posting program for lower turret on a subspindel machine with upper and lower turret.


I wish to have the NC code exactly the samefor both turrets. That means without switching any axis.


Below I tried to switch the direction for X-axis. that works fine , but I will not get the correct codes when doing circular interpolation. G2 becomes G3 and vice versa.


Does anyone have a good solution for my problem, don't hesitate to answer!?
CIMFIL/ON,SET<?:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" />
FIXTYP=POSTF(6,5)
FIXT=POSTF(7,5)
pprint / 'head', hdnum

IF (FIXT.EQ.54) THEN $$G54=Mainspindel
DMY=POSTF(2,1,1981,4)
DMY=POSTF(2,1,1982,3)
DMY=POSTF(2,1,1983,5)
if (hdnum.eq.1) then $$ HEAD / 1
DMY=POSTF(2,1,(1350),+2) $$ x=+x
DMY=POSTF(2,3,1635,+1) $$ y=+y
DMY=POSTF(2,3,1633,+1) $$ z=+z
endif
if (hdnum.eq.2) then $$ HEAD / 2
DMY=POSTF(2,1,1350,-2) $$ x=-x
DMY=POSTF(2,3,1635,+1) $$ y=+y
DMY=POSTF(2,3,1633,+1) $$ z=+z
endif
ELSE IF (FIXT.EQ.55) THEN $$ G55= Subspindel
DMY=POSTF(2,1,1981,54)
DMY=POSTF(2,1,1982,53)
DMY=POSTF(2,1,1983,55)
if (hdnum.eq.1) then $$ HEAD / 1
DMY=POSTF(2,1,(1350),+2) $$ x=+x
DMY=POSTF(2,3,1635,+1.) $$ y=-y
DMY=POSTF(2,3,1633,+1.) $$ z=-z
endif
if (hdnum.eq.2) then $$ HEAD / 2
DMY=POSTF(2,2,1350,-2) $$ x=-x
DMY=POSTF(2,3,1635,+1.) $$ y=+y
DMY=POSTF(2,3,1633,+1.) $$ z=-z
endif


CIMFIL/OFF

 

[Don.Rhea]

Alia,


Get out your GPOST manual and look at intcom veriables 498 & 499.


You may have to consider the I axis signif you change the X axis sign.


Do not forget to restore anything you change.


Does PTC offer this kind of GPOST support?