langloch.ngc 363 B

12345678910111213141516171819202122232425262728293031
  1. %
  2. G17 G40 G49 G80 G90 G94 G61 G21
  3. G54
  4. G0 X0 Y0 Z1
  5. ( #1 = X offset, #2 = Y offset)
  6. O1 sub
  7. #10 = 0
  8. G0 X[#1 - 5] Y[#2]
  9. O2 while [#10 gt -15.5]
  10. G1 Z[#10] F15
  11. G1 Y[#2 + 1.5] F100
  12. G1 X[#1 + 5]
  13. G1 Y[#2 - 1.5]
  14. G1 X[#1 - 5]
  15. G1 Y[#2]
  16. #10 = [#10 - 0.4]
  17. O2 endwhile
  18. G0 Z2
  19. O1 endsub
  20. O1 call [-15] [0]
  21. O1 call [15] [0]
  22. M30
  23. %
  24. vim: syntax=rs274ngc ts=4