AU kinematics, CA programming

(* C is simulation axis *)

%L SUB_1

N570 G261

N575          A15

N580  G01 G90 U50

N590          Y50

N600          U0

N610          Y0  

N620          U[-50]

N630          Y-50

N640          U0

N650          Y0  

N620 G260

M29  

%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] = 9  (* Kinematic 9: A-U  10: B-V *)

V.G.KIN[90].PARAM[13] = 1  (* Progr. orientation 0: same as Kin. 1: CA *)

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

N05 #SLOPE [TYPE=STEP]

N10 #SET AX[X,1,0][Y,2,1][Z,3,2][C,4,3][A,5,4][U,6,5]

N20 G01 X0 Y0 Z150 C0 A0 U0 F2000

N30 #CONTOUR MODE[DEV PATH_DEV 0.1 TRACK_DEV 1]

N40 #CYL ORI LATERAL[AX1=U AX2=Y RADIUS=25]

N50 G01 U0 X0 Y0 Z30 C0 A0

N56 #CAXTRACK ON[AX=C ANGLIMIT 0.1]

N60 LL SUB_1

N70 #CAXTRACK OFF

N110 #CYL OFF

M30