雕刻機(jī)c程序

ID:103834 · 發(fā)表于 2017-2-16 21:42

/*z地址定義
50 1=x+，2=x-，3=y+,4=y-
51 前進(jìn)后退步數(shù)高
52 前進(jìn)后退步數(shù)低
53
54/55 字寬
56
57 弱光開關(guān)
58/59 激光強(qiáng)度
60 x軸速度
61 y軸速度
62 開始打印0,57
63 暫停
64 停止標(biāo)志
65
66  左右標(biāo)記
100開始時(shí)灰度圖數(shù)據(jù)
*/

#include <STC12C5A60S2.h>
#define uint unsigned int
#define uchar unsigned char
#define N z[60]    //X速度
#define M z[61]    //Y速度
sbit a=P2^0;//步進(jìn)電機(jī)接線定義
sbit a_=P2^1;
sbit b=P2^2;
sbit b_=P2^4;
sbit xa=P1^0;
sbit xa_=P1^1;
sbit xb=P1^2;
sbit xb_=P1^3;
sbit jg=P1^7;
sbit led=P1^6;//指示燈
uchar xdata z[500]={0};//緩存
uchar buff[3];//串口緩存
uchar x1,x0,y1,y0,cont2=0;
uchar xfb=4,yfb=4;//走步標(biāo)志位

unsigned char HighRH = 0;  //高電平重載值的高字節(jié)
unsigned char HighRL = 0;  //高電平重載值的低字節(jié)
unsigned char LowRH  = 0;  //低電平重載值的高字節(jié)
unsigned char LowRL  = 0;  //低電平重載值的低字節(jié)

void delayms(uint xms)
{
uint i,j;
for(i=xms;i>0;i--)       //i=xms即延時(shí)約xms毫秒
for(j=110;j>0;j--);
}

/* 配置并啟動PWM，fr-頻率，dc-占空比 */
void ConfigPWM(unsigned int fr, unsigned char dc)
{
unsigned int  high, low;
unsigned long tmp;

tmp  = (11059200/12) / fr;  //計(jì)算一個(gè)周期所需的計(jì)數(shù)值
high = (tmp*dc) / 100;    //計(jì)算高電平所需的計(jì)數(shù)值
low  = tmp - high;       //計(jì)算低電平所需的計(jì)數(shù)值
high = 65536 - high + 12; //計(jì)算高電平的重載值并補(bǔ)償中斷延時(shí)
low  = 65536 - low  + 12; //計(jì)算低電平的重載值并補(bǔ)償中斷延時(shí)
HighRH = (unsigned char)(high>>8); //高電平重載值拆分為高低字節(jié)
HighRL = (unsigned char)high;
LowRH  = (unsigned char)(low>>8);  //低電平重載值拆分為高低字節(jié)
LowRL  = (unsigned char)low;
TMOD &= 0xF0; //清零T0的控制位
TMOD |= 0x01; //配置T0為模式1
TH0 = HighRH; //加載T0重載值
TL0 = HighRL;
ET0 = 1;       //使能T0中斷
TR0 = 1;       //啟動T0
jg = 0;    //輸出低電平，關(guān)閉激光
}
/* 關(guān)閉PWM */
void ClosePWM()
{
TR0 = 0;    //停止定時(shí)器0
ET0 = 0;    //禁止定時(shí)器0中斷
jg = 0;  //輸出低電平，關(guān)閉激光
}
/* T0中斷服務(wù)函數(shù)，產(chǎn)生PWM輸出 */
void InterruptTimer0() interrupt 1
{
if (jg == 0)  //當(dāng)前輸出為低電平時(shí)，裝載高電平值并輸出高電平
{
      TH0 = LowRH;
      TL0 = LowRL;
      jg = 1;
}
else             //當(dāng)前輸出為高電平時(shí)，裝載低電平值并輸出低電平
{
      TH0 = HighRH;
      TL0 = HighRL;
      jg = 0;
}
}

void xfor(uint i) //x軸前進(jìn)函數(shù)，前進(jìn)多少步
{
  while(1)
  {
if(xfb==4)
   {
      xa=xb=1;
         xb_=xa_=0;
      xfb=1;
      i--;
         delayms(N);
      if(i==0){xa=xb=0; break;}
   }
   if(xfb==1)
   {
      xb=xa_=1;
         xa=xb_=0;
      xfb=2;
      i--;
         delayms(N);
      if(i==0){xa_=xb=0; break;}
   }
   if(xfb==2)
   {
      xa_=xb_=1;
      xb=xa=0;
      xfb=3; //走步標(biāo)志位
      i--;
         delayms(N);
      if(i==0){xa_=xb_=0; break;}
   }
   if(xfb==3)
   {
      xa_=xb=0;
         xb_=xa=1;
      xfb=4;
      i--;
         delayms(N);
      if(i==0){xa=xb_=0; break;}
   }

}

}

void xbac(uint i) //xxx后退函數(shù)
{
   while(1)
      {
if(xfb==1)
   {
      xa_=xb=0;
         xb_=xa=1;
      xfb=4;
      i--; //走步標(biāo)志位
         delayms(N);
      if(i==0){xa=xb_=0; break;}
   }
   if(xfb==4)
   {
      xa_=xb_=1;
      xb=xa=0;
      xfb=3;
      i--;
         delayms(N);
      if(i==0){xa_=xb_=0; break;}
   }
   if(xfb==3)
   {
      xb=xa_=1;
         xa=xb_=0;
      xfb=2; //走步標(biāo)志位
      i--;
         delayms(N);
      if(i==0){xa_=xb=0; break;}
   }
   if(xfb==2)
   {
      xa=xb=1;
         xb_=xa_=0;
      xfb=1;
      i--;
         delayms(N);
      if(i==0){xa=xb=0; break;}
   }
}
}

void yfor(uint i) //y軸前進(jìn)函數(shù)
{
   while(1)
   {
         switch(yfb)
   {
      case 4:{a=b=1; b_=a_=0; yfb=1; i--; delayms(M); if(i==0){a=b=0;break;}}
   case 1:{b=a_=1; a=b_=0; yfb=2; i--; delayms(M); if(i==0){a_=b=0;break;}}
   case 2:{a_=b_=1; b=a=0; yfb=3; i--; delayms(M); if(i==0){a_=b_=0;break;}}
   case 3:{b_=a=1; a_=b=0; yfb=4; i--; delayms(M); if(i==0){a=b_=0;break;}}
   }
   if(i==0)  break;
   }
}

void ybac(uint i) //yy后退函數(shù)
{
   while(1)
   {
         switch(yfb)
   {
      case 1:{a=b_=1; b=a_=0; yfb=4; i--; delayms(M); if(i==0){a=b_=0;break;}}
   case 4:{b_=a_=1; a=b=0; yfb=3; i--; delayms(M); if(i==0){a_=b_=0;break;}}
   case 3:{a_=b=1; b_=a=0; yfb=2; i--; delayms(M); if(i==0){a_=b=0;break;}}
   case 2:{b=a=1; a_=b_=0; yfb=1; i--; delayms(M); if(i==0){a=b=0;break;}}
   }
   if(i==0)  break;
   }
}

void dazi(uint zik)//打印函數(shù)    ******打印函數(shù)已更改******
{
uint x;
jg=0;

for(x=0;x<zik;x++)//執(zhí)行zik個(gè)循環(huán)，x軸右移zik步
{
   while(z[63]);//暫停等待
if(z[64]==1) break;//停止標(biāo)志跳出循環(huán)
jg=1;//開激光
delayms((z[99+x]*(z[58]*256+z[59]))/100);
      jg=0;  //關(guān)閉激光
if(z[66]==1)
{
xbac(1);
}
         else
   {
   xfor(1);
   }
}
if(z[64==1]) z[64]=0;
      else{yfor(1);} //y軸進(jìn)一行
z[62]=0;//一行打印完成
SBUF=1;//發(fā)送信息，表示打印完成

}

/* 串口配置函數(shù)，baud-通信波特率 */
void ConfigUART(unsigned int baud)
{
SCON  = 0x50;  //配置串口為模式1
TMOD &= 0x0F;  //清零T1的控制位
TMOD |= 0x20;  //配置T1為模式2
TH1 = 256 - (11059200/12/32)/baud;  //計(jì)算T1重載值
TL1 = TH1;    //初值等于重載值
ET1 = 0;    //禁止T1中斷
ES  = 1;    //使能串口中斷
TR1 = 1;    //啟動T1
}

void chuanlo() interrupt 4
{
  if(RI)
  {
   buff[cont2]=SBUF;//每次3字節(jié)，地址高，地址低，數(shù)據(jù)，，

   cont2++;
   if(cont2==3)//每收3個(gè)字節(jié)，把數(shù)據(jù)寫入地址中
   {
      z[(buff[0]*256)+buff[1]]=buff[2];
   cont2=0;
   SBUF=0;  //*****************在這里加入這行代碼測試一下*******************************
   }
   RI=0;

  }
  if(TI)
{
TI=0;

}
}

main()
{
EA=1;
P0=0xff;
ConfigUART(9600) ;
z[60]=15;//默認(rèn)的參數(shù)
z[61]=15;
z[56]=1;
z[62]=0;
jg=0;
cont2=0;

while(1)
{
      // *****此處已更改******

if(z[57]==100){ConfigPWM(100, 98);delayms(10);}    //上位機(jī)指令處理，打開弱光定位，頻率100Hz，占空比98%
else if(z[57]==1) jg=1;    //打開強(qiáng)光
else { ClosePWM(); delayms(10);}

   if(cont2!=0) led=0;  else led=1;//指示通信是否可用
   if(z[50]==1){xfor(z[51]*256+z[52]);z[50]=0;}//x+
   if(z[50]==2){xbac(z[51]*256+z[52]);z[50]=0;}//x-
   if(z[50]==3){yfor(z[51]*256+z[52]);z[50]=0;}//y+
   if(z[50]==4){ybac(z[51]*256+z[52]);z[50]=0;}//y-


   if(z[62])//開始打印標(biāo)志
   {
      dazi(z[54]*256+z[55]);
   }

  }

}

ID:239485 · 發(fā)表于 2017-12-9 13:09

請教一下，怎么調(diào)整激光雕刻時(shí)的灰度？

帳號		自動登錄	找回密碼
密碼			立即注冊

雕刻機(jī)c程序

評分