Hallo
zum Beispiel:
%
O0086(3D KREISTASCHE)
(D = #7 TASCHENDURCHMESSER)
(T = #20 TIEFE ABSOLUT)
(R = #18 SICHERHEITSABSTAND ABSOLUT)
(E = #8 FRAESEBENE ABSOLUT)
(Q = #17 ANZAHL DER UMLAUFE)
(F = #9 VORSCHUB)
IF[#18LT#8]GOTO91
IF[#20GT#8]GOTO92
IF[#17LT1]GOTO93
#1=[#[2400+#4107]+#[2600+#4107]]
IF[[#7/2]LE#1]GOTO94
#2=#4109(SICHERN VORSCHUB)
#30=1(ZAHELER FUER WIEDERHOLUNG)
IF[#8LE0]GOTO10(WENN FRAESEBENE KLEINER 0 GOTO10)
(FRAESEBENE POSITIV)
#20=SQRT[#20*#20](WERT POSITIV MACHEN)
#31=[#20+#8]/#17(ZUSTELLUNG PRO UMLAUF)
G90G0Z#18(POSITIONIEREN AUF SICHERHEITSABSTAND)
G1Z#8F#9(POSITIONIEREN AUF FRAESEBENE)
G91G1G41X[#7/2]Y0
WH[#30LE#17]DO3
G91G3I-[#7/2]J0Z-#31
#30=#30+1
END3
G3I-[#7/2]J0
G1G40X-[#7/2]Y0
G90G0Z#18
GOTO100
N10(FRAESEBENE NEGATIV)
#20=SQRT[#20*#20](WERT POSITIV MACHEN)
#8=SQRT[#8*#8](WERT POSITIV MACHEN)
#31=[#20-#8]/#17(ZUSTELLUNG PRO UMLAUF)
G90G0Z#18(POSITIONIEREN AUF SICHERHEITSABSTAND)
G1Z-#8F#9(POSITIONIEREN AUF FRAESEBENE)
G91G1G41X[#7/2]Y0
WH[#30LE#17]DO3
G3I-[#7/2]J0Z-#31
#30=#30+1
END3
G3I-[#7/2]J0
G1G40X-[#7/2]Y0
G90G0Z#18
GOTO100
N91
#3000=1(R-WERT KLEINER EBENE)
N92
#3000=1(TIEFE GROESSER EBENE)
N93
#3000=1(ANZAHL UMLAUFE KLEINER 1)
N94
#3000=1(TASCHNDURCHMESSER ZU KLEIN)
N100F#2
--------------------
Eine Schraube ohne Gewinde ist ein Nagel
Grüsse aus dem Harz - InTex