电容点焊机制作附单片机程序与PCB文件 -

#include <reg52.h> //定义头文件
#include <intrins.h>
#define uchar unsigned char //宏定义
#define uint unsigned int //宏定义
#define D P2 //段选用D代替
sbit s1=P3^0;//定义加按键
sbit s2=P3^1;//定义减按键
sbit q1=P0^2;//定义蜂鸣器
sbit s3=P1^0;//定义点焊开始
sbit m=P0^0;//定义点焊脉冲输出
uchar a; //设置全局变量
#define RdCommand 0x01 //定义ISP的操作命令
#define PrgCommand 0x02
#define EraseCommand 0x03
#define Error 1
#define Ok 0
#define WaitTime 0x01 //定义CPU的等待时间
sfr ISP_DATA=0xe2; //寄存器申明
sfr ISP_ADDRH=0xe3;
sfr ISP_ADDRL=0xe4;
sfr ISP_CMD=0xe5;
sfr ISP_TRIG=0xe6;
sfr ISP_CONTR=0xe7;
uchar code d[]={0x88,0xEE,0x94,0xC4,0xE2,0xC1,0x81,0xEC,0x80,0xC0}; //不带小数点
void DelayMs(unsigned int t); //ms级延时
void anjian( ); //按键函数
void mchshch( ); //脉冲输出函数
/* ================ 打开 ISP,IAP 功能 ================= */
void ISP_IAP_enable(void)
{
EA = 0; /* 关中断 */
ISP_CONTR = ISP_CONTR & 0x18; /* 0001,1000 */
ISP_CONTR = ISP_CONTR | WaitTime; /* 写入硬件延时 */
ISP_CONTR = ISP_CONTR | 0x80; /* ISPEN=1 */
}
/* =============== 关闭 ISP,IAP 功能 ================== */
void ISP_IAP_disable(void)
{
ISP_CONTR = ISP_CONTR & 0x7f; /* ISPEN = 0 */
ISP_TRIG = 0x00;
EA = 1; /* 开中断 */
}
/* ================ 公用的触发代码 ==================== */
void ISPgoon(void)
{
ISP_IAP_enable(); /* 打开 ISP,IAP 功能 */
ISP_TRIG = 0x46; /* 触发ISP_IAP命令字节1 */
ISP_TRIG = 0xb9; /* 触发ISP_IAP命令字节2 */
_nop_();
}
/* ==================== 字节读 ======================== */
unsigned char byte_read(unsigned int byte_addr)
{
ISP_ADDRH = (unsigned char)(byte_addr >> 8);/* 地址赋值 */
ISP_ADDRL = (unsigned char)(byte_addr & 0x00ff);
ISP_CMD = ISP_CMD & 0xf8; /* 清除低3位 */
ISP_CMD = ISP_CMD | RdCommand; /* 写入读命令 */
ISPgoon(); /* 触发执行 */
ISP_IAP_disable(); /* 关闭ISP,IAP功能 */
return (ISP_DATA); /* 返回读到的数据 */
}
/* ================== 扇区擦除 ======================== */
void SectorErase(unsigned int sector_addr)
{
unsigned int iSectorAddr;
iSectorAddr = (sector_addr & 0xfe00); /* 取扇区地址 */
ISP_ADDRH = (unsigned char)(iSectorAddr >> 8);
ISP_ADDRL = 0x00;
ISP_CMD = ISP_CMD & 0xf8; /* 清空低3位 */
ISP_CMD = ISP_CMD | EraseCommand; /* 擦除命令3 */
ISPgoon(); /* 触发执行 */
ISP_IAP_disable(); /* 关闭ISP,IAP功能 */
}
/* ==================== 字节写 ======================== */
void byte_write(unsigned int byte_addr, unsigned char original_data)
{
ISP_ADDRH = (unsigned char)(byte_addr >> 8); /* 取地址 */
ISP_ADDRL = (unsigned char)(byte_addr & 0x00ff);
ISP_CMD = ISP_CMD & 0xf8; /* 清低3位 */
ISP_CMD = ISP_CMD | PrgCommand; /* 写命令2 */
ISP_DATA = original_data; /* 写入数据准备 */
ISPgoon(); /* 触发执行 */
ISP_IAP_disable(); /* 关闭IAP功能 */
}
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{ DelayMs(5);
a=byte_read(0x2000);//程序开始时读取EEPROM中数据
//SectorErase(0x2000);//擦除扇区
// byte_write(0x2000,5);//重新写入数据
while (1) //主循环
{ D=d[a];
anjian( );
mchshch( );
}
}
void anjian( ) //按键函数
{ if(s1==0)
{DelayMs(5);
if(s1==0)
{while(!s1) //按键不松开调用显示函数
DelayMs(5);
a++;
if(a==10)
a=1;
SectorErase(0x2000);//擦除扇区
byte_write(0x2000,a);//重新写入数据
} }
if(s2==0)
{DelayMs(5);
if(s2==0)
{while(!s2) //按键不松开调用显示函数
DelayMs(5);
a--;
if(a==0)
a=9;
SectorErase(0x2000);//擦除扇区
byte_write(0x2000,a);//重新写入数据
} }
}
void mchshch( ) //脉冲输出函数
{ if(s3==0)
{DelayMs(1000);
if(s3==0)
{DelayMs(500);
m=0;
q1=0;
DelayMs(a);
m=1;
q1=1;
DelayMs(100);
m=0;
q1=0;
DelayMs(a);
m=1;
q1=1;
DelayMs(100);
while(!s3)
DelayMs(50); }
} }
/*------------------------------------------------
uS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编,大致延时
长度如下 T=tx2+5 uS
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{
while(--t);
}
/*------------------------------------------------
mS延时函数，含有输入参数 unsigned char t，无返回值
unsigned char 是定义无符号字符变量，其值的范围是
0~255 这里使用晶振12M，精确延时请使用汇编
------------------------------------------------*/
void DelayMs(unsigned int t) //大致延时1mS
{
while(t--)
{
DelayUs2x(245);
DelayUs2x(245);
}
}

复制代码