( CASA TC-Edges.Drl - Spot drilling 14 x EDGE hole array for BASE plates
( drills matrix of holes on 350mm edges of the BASE plate drawing 
( .
( Install 4.0 mm centre drill
( Set start reference 0:0 corner 
( Spindle speed set to 2500~3000rpm
( 80% Kero+ 20% RTD used as cutting lubricant
( .
clr		( clear all existing programs/commands
p		( begin programme
m 1		( set motor to FULL step mode
t 200		( set start speed to 200 steps/sec
max 400	( set MAXimum motor speed to steps per sec. i.e. 400 steps/sec
a 500		( set acceleration to 500 steps/sec/sec
de 500      ( set deceleration to 1500 steps/sec/sec
k 50        ( sets step constant to 50
x 1250	    ( move x 12.5mm
y 600	          ( move y 6mm (or whatever is 1/2 the material thickness
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 2nd hole @ 25mm pitch 
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 3rd hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 4th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 5th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 6th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 7th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 8th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 9th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 10th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 11th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 12th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x 2500          ( 13th hole @ 25mm pitch
s 4 0           ( BDC switch OPEN
s 4 1           ( check that the TDC switch is closed
o 1 1           ( mist lubrication on
s 4 0           ( BDC switch OPEN
o 1 0           ( mist lubrication off
x-33500	    ( return to x = 000.00 	
y-600           ( return to y = 000.00
c 0             ( turn motor current off
g
q