( Krypton Pentium HS Assy with fan 88.8mm x 63mm
( Set start reference datum at x-1000, y5000
( Install Centre Drill 3.2mm and depth to suit CSK of the 2.5mm tapped holes
( Spindle speed set to 2500rpm
( operation begins automatically when quil TDC switch is opened
( raise the quill at the end of the last X+zzzmm stroke
( with appropriate care the part can be remove the part during the parked condition
( 80% Kero+ 20% RTD used as cutting lubricant during the X+13100mm cutting stroke
( return speed may be increased if justified by higher production rate
clr		( clear all existing programms/commands
p		( begin programme
m 1		( set motor to FULL step mode
t 200		( set start speed to 300 steps/sec
max 400	        ( set MAXimum motor speed to steps per sec. i.e. 1500 steps/sec
a 500		( set acceleration to 1500 steps/sec/sec
de 500		( set deceleration to 1500 steps/sec/sec
k 50            ( sets step constant to 50 ?
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
x 1250          ( move "x" axis +12.50mm
y 355          ( move "x" axis -3.55mm
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x 3800          ( move "x" axis +38.00mm
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x -1370
y 1135
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
y 2150
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
y 1620
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
y 2150
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x 820
y 1135
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x -2700
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off
x 820
y -1135
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x 530
y -1100
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x -530
y -1050
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
y -1620
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
y -2150
o 1 1           ( mister on 
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
o 1 0           ( mister off 
x -2620
y -1490
s 4 1           ( check that the TDC switch is closed
s 4 0           ( BDC switch OPEN - press is cycling or at TDC
c 0             ( turn motor current off
g               ( go to begining and repeas as often as job/parts require