Skala fräsen

Da hatte sich doch tatsächlich noch ein Fehler eingeschlichen. #106 war doppelt.
Jetzt sollte es passen.

N10 T5 M06 (NC Egra 6x60 VHM 4s)
(L Spitze / R0)
G17
G54
S7500 M03
(---------------------------------)
#101=33 (Startpunkt XY)
#102=-25.5
#103=21 (Abstand Zeile Spalte XY)
#104=-25
#105=10 (Anzahl XY)
#106=7
#107=6.025 (Breite Laenge Reta)
#108=9.025
#109=0.3 (Fasengroesse)
#110=30 (Winkel)
#111=0.866 (Werkzeugversatz in Z)
#112=1.5 (Einlaufradius)
#113=0.5 (Ueberlauf)
(-----------------------------)
#121=0 (Zaehler XY loeschen)
#122=0
(-----)
#125=+[TAN[#110]*#109]
#126=-[TAN[#110]*#111]
#127=#107/2
#127=#127+#125+#126
#128=#108/2
#128=#128+#125+#126
#129=[#125+#113]/TAN[#110]

WHILE [#121 LT #105] DO 1
WHILE [#122 LT #106] DO 2
G52 X[#101+#121*#103] Y[#102+#122*#104] Z0
(fasen Reta)
S7500 M03
GOTO 1122
G0 X-1.298 Y0.
G00 G43 H5 Z5. M8
G00 Z1.
G01 G94 Z-0.866 F500.
G01 G41 Y1.5 D5
G03 X-2.798 Y0. I0 J-1.5
G01 Y-4.186
G01 X2.798
G01 Y4.186
G01 X-2.798
G01 Y0.
G03 X-1.298 Y-1.5 I1.5 J0
G01 G40 Y0.
G00 Z5.
N1122
G0 X-#127+1.5 Y0.
G00 G43 H5 Z5. M8
G00 Z1.
G01 G94 Z-#111 F500.
G01 G41 Y#112 D5
G03 X-[#127] Y0. I0 J-#112
G01 Y-[#128]
G01 X+[#127]
G01 Y+[#128]
G01 X-[#127]
G01 Y0.
G03 X-#127+#112 Y-#112 I#112 J0
G01 G40 Y0.
G00 Z5.
(senken ecken)
S4000 M3
GOTO 1123
G00 X-2.625 Y-4.513
G00 Z5.
G81 Z-1.166 R1. F1000.
X2.625 Y-4.513
X2.625 Y4.513
X-2.625 Y4.513
G80
N1123
G00 X-[[#107/2]-#113] Y-[#108/2]
G00 Z5.
G81 Z-#129 R1. F1000.
X[[#107/2]-#113] Y-[#108/2]
X[[#107/2]-#113] Y[#108/2]
X-[[#107/2]-#113] Y[#108/2]
#122=#122+1
END 2
#122=0
#121=#121+1
END 1
G52 X0. Y0. Z0.
M09
G00 G53 Z0.
M05