AB Kopf, CA Programming

%t_tube
V.G.KIN[90].PARAM[0] = 1000000
V.G.KIN[90].PARAM[1] = 0
V.G.KIN[90].PARAM[2] = 0
V.G.KIN[90].PARAM[3] = 0
V.G.KIN[90].PARAM[4] = 0
V.G.KIN[90].PARAM[5] = 0
V.G.KIN[90].PARAM[6] = 0
V.G.KIN[90].PARAM[7] = 0
V.G.KIN[90].PARAM[8] = 0
V.G.KIN[90].PARAM[9] = 0
V.G.KIN[90].PARAM[10] = 0
V.G.KIN[90].PARAM[11] = 0
V.G.KIN[90].PARAM[12] = 0   AB Kopf
V.G.KIN[90].PARAM[13] = 1   (* CA programming *)
V.G.KIN[90].PARAM[14] = 0
V.G.KIN[90].PARAM[15] = 0
V.G.KIN[90].PARAM[16] = 0
V.G.KIN[90].PARAM[17] = 0
N10 #SLOPE [TYPE=TRAPEZ]
N20 #KIN ID[90]
N30 G01 X0 Y0 Z0 A0 C0 U0 F2000
N40 #SET AX[X,1,0][Y,2,1][Z,3,2][C,4,3][A,5,4][U,7,5]
N45 #CONTOUR MODE[DEV PATH_DEV 0.1 TRACK_DEV 1]
N50 #TRAFO ON
N55 G01 U0 X0 Y0 Z0 C0 A45
N56 #CAXTRACK ON[ANGLIMIT 1]
N57 G261
N58  G01 G91 X50
N60  G90 G02 J-30
N61  G01 G91 X50
N62 G260
N63 #CAXTRACK OFF
N80 #TRAFO OFF
N90 M30