四、核心部分的編程
該控制部分編程相對于激光控制難度較大，其加工控制部分及斷點，事件處理可參見激光編輯核心部分。此處介紹銑邊及鉆孔在加工控制編程當中，需考慮的主要因素是刀具的參數及操作（如下刀，抬刀，換刀）。
其刀具需要一個數據結構定義如下：
class Cknife
{
public:
Cknife();
~Cknife();

double fDR; //刀徑
double fDownSpeed; //下刀速度
double fUpSpeed; //抬刀速度

const static int MAXLAYLE=0x10; //支持最大的 下刀次數(16次)
int nDups; //需要下刀次數(此值不參大于MAXLAYLE
double fLayle[MAXLAYE];//每次下刀深度不一樣

int nLife; //壽命長度
int nFinish; //完成多少次孔操作
BOOL bDiWei; //是否只用來作定位孔處理

COLORREF color; //顏色標識
//…其它用戶自定義屬性
}

有了單一刀具的數據，還需要一個刀具管理類：
class CProcessknife
{
public:
CProcessKnife()
~CProcessKnife()

int Drill_Hold( int nKnife, PARA ¶); //專用于單孔鉆處理
//此函數，需要區別定位孔，處理多次鉆孔，不同抬刀高度（停止時抬刀高度與作業抬刀高度是不一樣的，此處編程有一小小技巧）

int Drill_Mark(int nKnife, BOOL bUpDown, PARA ¶ );//用于銑邊的下刀或抬刀處理，此函數，只管下刀到位，然后抬刀即可，需要取消定位孔的影響

int ReplaceKnife( int nKnife, PARA ¶);//換刀函數
// 此函數需要完成，達到指定位置進行換刀操作，需要考慮其操作被中斷的情況

CArray knifeArray; //建立一個動態的刀具數組
Int m_nCurrKnife; //當前被操作的刀具索引

Struct TAG_SPEEDSC
{
double fDR; //刀具
double fSC; //速度比
}
TAG_SPEED m_speedSC[20]; //建立一個速度比,最多20即可
Int ComplieSpeed( … ); //速度比計算函數
// … 其它用戶函數，如增加刀具，刪除刀具，取指定刀具參數，查找刀具

}

從純編程技術手段來處理，以上的CprocessKnife類，可以處理成這樣：
class CprocessKnife : public Carray
{//…用戶函數
};
如此以來，動態數組所有特性功能CprocessKnife都具備，不必上述方法，要增加一個刀具對象需要如下函數：
設有CprocessKnife 對象有proknife；
int Add( Cknife &knife ){
knifeArray.Add( knife );
return knifeArray.GetSize();
}

則調用為: proknife.Add( knife );
或者通過外部調來增加：
proknife.knifeArray.Add( knife );

需要使下新的方法，則無須寫Add函數，如直接添加代碼如下：
proknife.Add( knife );
諸如此類，可以節省大量編寫代碼時間，而其它用戶定義函數照定義不誤。

如此以來，鉆孔或銑邊時，編程基本思路如下：
鉆孔為例：
void Chold::OnMark( PARA ¶ ){
proknife.Replace( holdKnife, para ); //先處理是否要換刀
int step(0); //為了說明問題，使用步進式編程較易明白

while( m_nWorkStatus == RUNNING && step < 2){
doEvent()
switch( step ){
case 0:
if( ismove() ) break;
fast_moveto( X, Y ); //快速移到孔的XY位置
step ++;
case 1:
if( ismove() ) break;
m_nWorkStatus = proknife.Drill_Hold( holdKnife, para ); //作一次鉆孔操作
step ++;
break;
}
//其它處理
銑邊處理為(以多邊形圖形為例)：
void PolyLine::OnMark( PARA &para; )
{
const int nSize = runData.GetSize();
for( int I(0); I
{
if( I == 0 || bBreak ){// 第一點，或有斷點時（當中恐刀具有變動）
bBreak ?
moveto( break.x, break.y):
moveto( runData[I].x, runData[I].y );
while( ismove() ) ::doevent();
m_nWorkStatus = proknife.ReplaceKnife(polyKinife, para );//換刀
if( m_nWorkStatus != RUNNING ) break;
proknife.Drill_Mark( polyKnife, TRUE , para );//只下刀
continue;
}
conline(rundata[I].x, rundata[I].y,runSpeed); //加工路徑
//…其它處理
}// end for i
proknife.Drill_Mark( polyKnife, FALSE, para ); //只抬刀
}// end on mark function