v.20180621

 

CLOSE

 

;*****************set-up and Definition***************

#DEFINE FEED_RATE_INI     P161

#DEFINE LEN_CUT_Z_INI    P162

#DEFINE FEED_RATE_MID   P163

#DEFINE LEN_CUT_Z_MID   P164

#DEFINE FEED_RATE_LAS    P165

#DEFINE LEN_CUT_Z_LAS    P166

 

 

;************** Coordinate Setting ****************

&2

#3->1000Z

;******************************************************

;******************* Motion program text ****************

Open Prog 4 Clear

 

DWELL 100

PSET X0 Y0 Z0

 

///blind hole drilling with second step

///Start machining

GOSUB1 //forward with condition #1

DWELL 10

GOSUB10 //backward

DWELL 10

GOSUB2 //forward with condition #2

DWELL 10

GOSUB10 //backward

DWELL 10

GOTO20 // Go to CLOSE

 

N1 //drilling with Condition #1

FEED_RATE_INI = 0.002

LEN_CUT_Z_INI = 0.020

INC

F (FEED_RATE_INI)

Z (LEN_CUT_Z_INI)

RETURN

 

N2 // drilling with Condition #2

FEED_RATE_MID = 0.100

LEN_CUT_Z_MID = 0.400 + (LEN_CUT_Z_INI)

INC

F (FEED_RATE_MID)

Z (LEN_CUT_Z_MID)

RETURN

 

N10 // move to origin point

ABS

Z 0

RETURN

 

N10

ABS

Z 0

RETURN

 

N20

CLOSE