0  BEGIN PGM 13_006_POCKET1 MM 
1  * 1 contours
2  ;* origin_file = "Adaptergehaeuse.stp"
3  ; FUNCTION MODE MILL
4  ;* origin = X+0.0000 Y+0.0000 Z+0.0000
5  ; PLANE RESET STAY
6  ; TRANS DATUM AXIS X+0.0000 Y+0.0000 Z+0.0000
7  ; 1 + 0 line(s) + 1 arc(s) + 0 gap-filler(s), minimum arc radius = +18.0000
8  ; all_blk_form from complete file
9  BLK FORM 0.1 Z X-58.7563 Y-38.3047 Z-0.025
10 BLK FORM 0.2  X+58.1873  Y+38.1148  Z+0.025
11 ; sel_blk_form from selection
12 BLK FORM 0.1 Z X-9.4238 Y-18.7195 Z-0.025
13 BLK FORM 0.2  X+26.5762  Y+17.2805  Z+0.025
14 L  X+8.5762  Y+17.2805
15 CC  X+8.5762  Y-0.7195
16 C  X+8.5762  Y+17.2805 DR+
17 ;* end contours
18 END PGM 13_006_POCKET1 MM