(Store Current Machine Position - into given Parking Position registers)
(#100 - number of Parking point)
(#5021...#5026 Current Machine position registers)
(#7801...#7806 Parking 1  Postion registers)
(#7991...#7996 Parking 20 Postion registers)

#100 = [ #100 -1 ]*10 + 7800


G10 L81 P[#100+1] Q5021 (store current position X )
G10 L81 P[#100+2] Q5022 (store current position Y )
G10 L81 P[#100+3] Q5023 (store current position Z )

debug #100
debug #5021
debug #5022
debug #7821
debug #7822


M02


