0 BEGIN PGM 7070 MM 1 BLK FORM 0.1 Z X-55 Y+0 Z-55 2 BLK FORM 0.2 X+55 Y+100 Z+0 3 FN 0: Q1 =+0 4 FN 0: Q2 =-50.1 5 FN 0: Q3 =+0 6 FN 0: Q4 =+100 7 FN 0: Q5 =+50 8 FN 0: Q6 =+50 9 FN 0: Q7 =+10 10 FN 0: Q8 =+600 11 FN 0: Q9 =+300 12 FN 0: Q30 =+5 13 TOOL CALL 115 Z S8000 14 TOOL CALL Z DL-Q30 15 FN 2: Q31 =+Q108 - +Q30 16 FN 1: Q26 =+Q6 + +Q30 17 FN 1: Q10 =+Q1 + +Q31 18 FN 2: Q11 =+Q1 - +Q31 19 FN 2: Q13 =+Q3 - +Q108 20 FN 1: Q14 =+Q4 + +Q108 21 FN 2: Q15 =+Q14 - +Q13 22 FN 4: Q16 =+Q15 DIV +Q5 23 FN 2: Q17 =+Q5 - +1 24 FN 1: Q18 =+Q6 + +Q108 25 FN 1: Q19 =+Q1 + +Q18 26 FN 2: Q20 =+Q1 - +Q18 27 L Z+100 R0 F9999 28 L X+Q19 Y+Q13 R0 F9999 M3 29 L Z+Q7 R0 F9999 30 CC X+Q10 Z+Q2 31 LBL 1 32 L X+Q19 R0 F9999 33 LP PR+Q26 PA+90 FQ9 34 L IY+Q16 R0 FQ8 35 CP IPA-90 DR- FQ8 36 L Z+Q7 R0 F9999 37 CALL LBL 1 REPQ17 38 L X+Q20 Y+Q14 R0 F9999 39 CC X+Q11 Z+Q2 40 LBL 2 41 L X+Q20 R0 F9999 42 LP PR+Q26 PA-90 FQ9 43 L IY-Q16 R0 FQ8 44 CP IPA+90 DR+ FQ8 45 L Z+Q7 R0 F9999 46 CALL LBL 2 REPQ17 47 L Z+100 R0 F9999 M2 48 END PGM 7070 MM