G188 lub G184 Activation of the positioning axes- Macro

Hej czlowieki, mam zagwozdkę z kodem macro poczas uruchomienia gwintowania bocznego za pomocą kodu G188 w tokarce Leadwell fanuc, nie mogę tego rozgryzc stad ten post, moze ktoś wie z czym to jeść. Głownie chodzi mi o te formuły matematyczne (skąd one?) tzn:
#123=#122 x 15 (wtf)
#125=SQRT[#123 x #123 = #21 x #21] / #124
...
#105=ABS[#21 / 2] x 36. / #9

A oto oryginalny przykład programu z którym się męczę, z CD producenta maszyny Leadwella:

O9018(G188 U-TAPPING MM)
#130=0
#131=#4119
#122=ABS[#21/#9]/2
#123=#122*15
#124=#122/#131
#125=SQRT[#123*#123+#21*#21]/#124
#126=ROUND[#125]
IF[#21EQ0]GOTO3001
IF[#9EQ0]GOTO3002
IF[ABS[#21]GT100.]GOTO3003
IF[#9GT2.5]GOTO3004
G00C#3

N11
G10L52
N1430P5R48000000
G11
#100=ABS[#21]
#101=#4001
#102=#4002
#103=#4005
#104=#4109
#105=ABS[#21/2]*36./#9
#106=#19*#9*20000
#107=#100*25.4
G98G21
G1U-#100A-#105F#126
#127=#126*1.4
G4X.3
G1U#100A0.
(IF[#11EQ0]GOTO1300)
(#130=#130+1)
(IF[#130EQ#11]GOTO1300)
(G0H#1)
(GOTO11)
N1300

G21
G#101G#102
G#103F#104
G10L52
N1430P5R10000000
G11
GOTO9999
N3001#3000=1(TAPPING U=0)
N3002#3000=2(TAPPING F=0)
N3003#3000=3(U OVER)
N3004#3000=4(F OVER)
N9999
M99

Dzięki Albercik za ten link, prawdę mówiąc przeszukiwałem net wzdłuż i w poprzek ale tego mi wujek nie pokazał jeszcze. Gość pod koniec napisał ze nic w tym programie macro nie zmieniał i w końcu zadziałało, więc skupię się jutro na analizie tego programu który wywołuje ten cykl/podprogram, zobaczymy czy pójdzie. Pozdrówka!