HEIDENHAIN iTNC 530 spiral outside to inside idea

That is my idea for program that make on any cylindrical setup block - top clean surface. Opposite to cycle 5 it will start from outside by spiral to inside.
Keep in mind that depending of the tool size the start point will be different For example if we clean 65mm diameter with 20mm will give totally different start angle than if we use 10mm. So, in that case leave enough "room" .

here is the CODE. Feel free to use it:

0 BEGIN PGM test MM
1 BLK FORM 0.1 Z X-36 Y-36 Z-1
2 BLK FORM 0.2 X+36 Y+36 Z+1
3 TOOL CALL 5 Z S2500
4 ;------------------------------
5 Q1 = 65 ;diameter of setup piece
6 ;------------------------------
7 Q2 = ( Q1 / 2 ) ;diameter / 2
8 Q3 = Q2 + Q108 + 3 ;safe stop
9 ;Q108-take tool R from offset list
10 Q4 = ( 1.2 * Q108 ) / 360 ;spiral step
11 Q5 = INT ( Q2 / Q4 ) ;how many turns
12 Q6 = Q5 ;counter for repeat
13 Q7 = INT ( ( FRAC ( Q5 / 360 ) ) * 360 )
14 ;Q7-calculate the start position
15 ;------------------------------
16 CC X+0 Y+0
17 LP PR+Q3 PA+Q7 R0 FMAX
18 L Z+2 R0 FMAX M3
19 L Z-0.01 R0 F1000
20 LP PR+Q2 PA+Q7 R0
21 CP IPA+360 DR-
22 LBL 1
23 LP PR+Q2 PA+Q5 R0
24 Q5 = Q5 - 1
25 Q2 = Q2 - Q4
26 CALL LBL 1 REPQ6
27 L Z+20 R0 F2000 M2
28 END PGM test MM

Good luck!

Видео HEIDENHAIN iTNC 530 spiral outside to inside idea канала longgo