Pozycja z JOG do bazy

Witam po dłuższej przerwie . Mam pytanko mianowicie jaką funkcją ustawić aktualną pozycje .
Tzn ustawiam jakiś punkt w JOG i chciałbym aby funkcja wyzerowała mi np G54 lub inny PPZ najlepiej dla każdej osi osobno . Zapewne coś z Ufirem ale co ?
Czekam z niecierpliwością na odpowiedz lub jakiś link do materiału na ten temat .

[ Dodano: 2014-08-29, 13:57 ]
Sam sobie odpowiedziałem na moje proste pytanie .
R1=$P_GG[8] ; SPRAWDZENIE OBOWIĄZUJĄCEGO PPZ
R1=R1-1
$P_UIFR[R1,X,TR]=$AA_IM[AX1] ; WCZYTANIE POZYCJI MASZYNOWEJ DO OBOWIĄZUJĄCEGO PPZ
$P_UIFR[R1,X,FI]=0 ; WYCZYSZCZENIE BAZY DOKŁADNEJ
POZDRAWIAM