Makro Kreistasche, Makro für Fanuc und Sinumerik

Hallo an alle!
Ich schreibe einen Postprozessor für Sinumerik und Fanuc.
Ich muss Makro simulieren (Kreistasche u.s.w)
Kann mir jemand helfen?
Vielleicht arbeitet jemand mit Sienumerik 840c 840d oder Fanuc ?
whatsapp +4917642661375

%
O702
n10 #20=[#2400+#3026]
n20 #1=#101
n30 #2=#102
n40 #3=#103
n50 #5=abs[#105]
n60 #6=abs[#106]
n70 #7=abs[#107]
n80 #8=#7/2-#20
;----------
n90 if [#3 ge r1] goto 260
n100 if [#3 ge r2] goto 260
n110 if [#8 le 0 ] goto 260
;----------
n120 if [#6 eq 0 ] then #6=abs[