35 lines
371 B
Plaintext
35 lines
371 B
Plaintext
;>>>>> LASER_DIST - Z_KOSGRIP = R9 <<<<<
|
|
|
|
EXTERN SETKOS(INT)
|
|
|
|
DEFINE XSTART AS 15.0
|
|
DEFINE YSTART AS 15.0
|
|
DEFINE ZSTART AS 250
|
|
DEFINE FEED_FAST AS 11000.0
|
|
|
|
|
|
R9=0
|
|
H1=370.0
|
|
|
|
SETKOS(0)
|
|
TRAORI
|
|
G54
|
|
|
|
G90 G1 A0 B0 C0 F1700
|
|
G90 G1 X=XSTART Y=YSTART Z=ZSTART F=FEED_FAST
|
|
M01
|
|
|
|
CYC_MESSZ1
|
|
|
|
; BERECHNE
|
|
OFFSET_LASER_Z = R9 - ZSTART
|
|
|
|
M0
|
|
|
|
G90 G1 A0 B0 C0 F1700
|
|
;HOME
|
|
SETKOS(1)
|
|
|
|
|
|
M17
|