Submitted by G. Kilpatric of Nichol McKay.
Use this method to create extra work offsets if your machine is limited to just six (G54 TO G59).
In your main program assign a value to a variable, the example below uses #1,you can have hundreds of individual alterable offsets.
Every coordinate system is G54, it uses the sub program to set the work offset required, when finished it jumps down to the end of the sub program and back into the main machining program.
Make up a table so you can keep track of which work offset is used for what setup/part.
Be careful what variable (#) you use as these maybe used elsewhere for other purposes.
I’ve used this method for over 12 years and it works great!
O0001(EXAMPLE PROGRAM)
G90G80G40G17G21M9
G91G30Z0M5
G90
T1(A TOOL)
M6
T2
M1
P0002M98
G0G90G54X-50Y100S1000M3
M8
G43Z100.H1
G98G81Z-10R2F500
G80
G0Z100M9
G91G30X0Y0Z0M5
G90
T2(A TOOL)
M6
T3
M1
P0002M98
G0G90G54X50Y-100S1500M3
M8
G43Z100.H2
G98G81Z-20R2F500
G80
G0Z100M9
G91G30X0Y0Z0M5
G90
M30
O0002(WORK OFFSET SUB-SET UP FIXTURE OFFSETS HERE!)
G0TO#1 (Seq No / Line search)
N1G10G90L2P1X-111.Y-107.Z-300.(1ST WCS)
GOTO99
N2G10G90L2P1X-150.Y-152.Z-300.(2ND WCS)
GOTO99
N3G10G90L2P1X-150.Y-150.Z-300.(3RD WCS)
GOTO99
N4G10G90L2P1X-33.Y-114.Z-300.(4TH WCS)
GOTO99
N5G10G90L2P1X-120.Y-50.Z-300.(5TH WCS)
GOTO99
N6G10G90L2P1X-155.Y-10.Z-300.(6TH WCS)
GOTO99
N7G10G90L2P1X-103.Y-127.Z-300.(7TH WCS)
GOTO99
N8G10G90L2P1X-110.Y-10.Z-300.(8TH WCS)
GOTO99
N9G10G90L2P1X-120.Y-150.Z-300.(9TH WCS)
GOTO99
(AND SO ON..............)
N99 M99
