Konturbeispiel

Programmierbeispiel

Mantelflächentransformation

(* Mantelflächentransformation *)

N30 #SLOPE [TYPE=STEP]

N40 G00 X0 Y0 Z100 U0

N50 #CYL [X, U, Z35]  (* Anwahl Mantelflächenbearbeitung *)

N70 G01 G90 X0 U0 F5000

N80 G01 Z10 G90  F50000

N90 $FOR P1=1, 4, 1

N100 G00 G90 X0 U[P1*90]

N110 $FOR P2=1, 5, 1

N120  P3=P2*4

N130  P4=P3+2

N140  G01 G91 U-P3

N150          XP3

N160          U[2*P3]

N170          X-P3

N180 G90 U0

N190 G91 XP4

N190 $ENDFOR

N200 $FOR P2=1, 5, 1

N210  P3=P2*4

N220  P4=P3*2+2

N230  G90 G02 IP3

N240      G91 G01 XP4

N250 $ENDFOR

N260 $ENDFOR

N290 #CYL OFF

M30