planfraesen.ngc 701 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. %
  2. ( ########## )
  3. ( ####Z0#### )
  4. ( X0########## )
  5. ( Y0 )
  6. #1 = 6 ( Werkzeug Durchmesser )
  7. #10 = 60 ( Werkstücklänge in X )
  8. #11 = 15 ( Werkstücklänge in Y )
  9. #12 = 0.0 ( Zustellung in Z )
  10. #20 = 150 ( Vorschub )
  11. #2 = [#1 / 2]
  12. #3 = [#1 * 75 / 100]
  13. G17 G40 G49 G80 G90 G94 G61 G21
  14. G54
  15. O1 if [ #12 ne 0 ]
  16. G0 Z2
  17. O1 else
  18. G0 Z0
  19. O1 endif
  20. G0 X[0 - #2 - 1] Y[0 - #2 + #3]
  21. G0 Z[0 - #12] F#20
  22. M1
  23. #99 = 0
  24. #100 = [#11 + 1]
  25. O2 while [#99 lt #100]
  26. G0 Y[#99 - #2 + #3]
  27. G1 X[#10 + #2 + 1]
  28. #99 = [#99 + #3]
  29. O3 if [#99 ge #100]
  30. O1 break
  31. O3 endif
  32. G0 Y[#99 - #2 + #3]
  33. G1 X[0 - #2 - 1]
  34. #99 = [#99 + #3]
  35. O2 endwhile
  36. O4 if [ #12 ne 0 ]
  37. G0 Z10
  38. O4 endif
  39. M30
  40. %
  41. vim: syntax=rs274ngc ts=4