30 lines
866 B
Plaintext
30 lines
866 B
Plaintext
;M428 by remap: select mill kins
|
|
o<428remap>sub
|
|
#<SWITCHKINS_PIN> = 3 ; set N as required: motion.analog-out-0N
|
|
#<kinstype> = 0 ; mill
|
|
|
|
o1 if [exists [#<_hal[motion.switchkins-type]>]]
|
|
o1 else
|
|
(debug,M428:Missing)
|
|
(debug,STOP)
|
|
M2
|
|
o1 endif
|
|
|
|
M66 E0 L0 ; force synch
|
|
M68 E#<SWITCHKINS_PIN> Q#<kinstype> ; set kinstype value
|
|
M128 ; switch limits
|
|
G10 L2 P7 X-290 Y0 Z-160 A0 ; reset home offset
|
|
G59.1 ; activate home offset
|
|
M66 E0 L0 ; force synch
|
|
;(debug, M428: mill)
|
|
|
|
o2 if [[#<_task> EQ 1] AND [#<_hal[motion.switchkins-type]> NE 0]]
|
|
(debug,M428: Wrong motion.switchkins-type)
|
|
(debug,or missing hal net to analog-out-0x)
|
|
(debug,STOP)
|
|
M2
|
|
o2 else
|
|
o2 endif
|
|
|
|
o<428remap>endsub
|