16 lines
383 B
Plaintext
16 lines
383 B
Plaintext
; opa_demo.ngc:
|
|
; invoke subroutine circles.ngc for multiple circles (#<revs>)
|
|
; with:
|
|
; x = #<radius>
|
|
; z = #<_z>
|
|
|
|
#<radius> = 1
|
|
#<z> = #<_z> ; current value
|
|
#<aspeed> = 8 ; angular speed (RPM)
|
|
#<lspeed> = 10 ; linear speed (units/minute)
|
|
#<revs> = 100
|
|
|
|
g0 x#<radius> z#<z>
|
|
o<circles> call [#<radius>][#<aspeed>][#<lspeed>][#<revs>]
|
|
m2
|