Example: Polar hole patterns

0 BEGIN PGM 200 MM

1 BLK FORM 0.1 Z X+0 Y+0 Z-40

2 BLK FORM 0.2 X+100 Y+100 Z+0

3 TOOL CALL 200 Z S3500

; Tool call

4 L Z+100 R0 FMAX M3

; Retract the tool

5 CYCL DEF 200 DRILLING ~

Q200=+2

;SET-UP CLEARANCE ~

Q201=-15

;DEPTH ~

Q206=+250

;FEED RATE FOR PLNGNG ~

Q202=+4

;PLUNGING DEPTH ~

Q210=+0

;DWELL TIME AT TOP ~

Q203=+0

;SURFACE COORDINATE ~

Q204=+50

;2ND SET-UP CLEARANCE ~

Q211=+0.25

;DWELL TIME AT DEPTH ~

Q395=+0

;DEPTH REFERENCE

6 CYCL DEF 220 POLAR PATTERN ~

Q216=+30

;CENTER IN 1ST AXIS ~

Q217=+70

;CENTER IN 2ND AXIS ~

Q244=+50

;PITCH CIRCLE DIAMETR ~

Q245=+0

;STARTING ANGLE ~

Q246=+360

;STOPPING ANGLE ~

Q247=+0

;STEPPING ANGLE ~

Q241=+10

;NR OF REPETITIONS ~

Q200=+2

;SET-UP CLEARANCE ~

Q203=+0

;SURFACE COORDINATE ~

Q204=+100

;2ND SET-UP CLEARANCE ~

Q301=+1

;MOVE TO CLEARANCE ~

Q365=+0

;TYPE OF TRAVERSE

7 CYCL DEF 220 POLAR PATTERN ~

Q216=+90

;CENTER IN 1ST AXIS ~

Q217=+25

;CENTER IN 2ND AXIS ~

Q244=+70

;PITCH CIRCLE DIAMETR ~

Q245=+90

;STARTING ANGLE ~

Q246=+360

;STOPPING ANGLE ~

Q247=+30

;STEPPING ANGLE ~

Q241=+5

;NR OF REPETITIONS ~

Q200=+2

;SET-UP CLEARANCE ~

Q203=+0

;SURFACE COORDINATE ~

Q204=+100

;2ND SET-UP CLEARANCE ~

Q301=+1

;MOVE TO CLEARANCE ~

Q365=+0

;TYPE OF TRAVERSE

8 L Z+100 R0 FMAX

; Retract the tool

9 M30

; End of program

10 END PGM 200 MM