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

ID:852609 · 发表于 2021-3-22 19:45

咸鱼买了个48V165F电容，拆开了里面18个电容，3个电容串联做了个点焊机，带均压，STC89C52控制，一个数码管静态显示时间ms，可以保存上一次设置的时间，6个串联做了两个应急电源，实验了可以不用电瓶启动轿车，新手发贴

制作出来的实物图如下：

点焊机

Altium Designer画的PCB图如下：(51hei附件中可下载工程文件)

PCB

ID:328014 · 发表于 2021-3-22 20:16

好东东,大家注意PCB只能用Protel99才能打开,其他版本均不行.楼主的单片机程序:

#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);
}
}

复制代码

ID:739610 · 发表于 2021-3-22 22:28

应急电源均压板那块用修电机的绝缘漆抹一层抠出焊盘再焊接元件也比你像啃得似的强

ID:381496 · 发表于 2021-6-13 16:30

这个是个好东西，准备做一个。

ID:362097 · 发表于 2021-8-18 02:56

谢谢楼主分享这么好的教程，有时间试试做一个。

ID:829622 · 发表于 2021-8-19 14:32

值得收藏一下，学习学习。想做一个试试

ID:898320 · 发表于 2021-9-12 21:46

学习学习。想做一个

ID:128560 · 发表于 2021-9-23 14:41

很感兴趣，也想仿制一个。

ID:128560 · 发表于 2021-9-27 16:04

下载了，电路图都没有一个，是诚心分享吗

ID:672895 · 发表于 2021-11-29 21:23

电路图都没有，是诚心分享吗

ID:993738 · 发表于 2021-12-19 22:10

楼主，能贴个电路原理图吗?

ID:253767 · 发表于 2021-12-20 07:37

好东西，谢谢分享！！！

ID:994031 · 发表于 2021-12-20 22:22

楼主，贴个电路图啊，

ID:292518 · 发表于 2021-12-23 15:54

值得收藏一下，学习学习。想做一个试试

ID:1043826 · 发表于 2022-9-5 08:18

楼主厉害了，也想制作个玩玩，赚分下载

ID:1045132 · 发表于 2022-9-18 21:52

头大看不懂程序

ID:1045132 · 发表于 2022-9-18 22:22

pcb文件怎么导入到立创eda

ID:1045132 · 发表于 2022-9-19 12:00

没有原理图，这个pcb软件看不懂

ID:1050833 · 发表于 2022-11-7 13:04

能贴个电路原理图吗?

ID:1048397 · 发表于 2022-11-10 10:33

感谢楼主的分享！均压板地方够，还用贴片原件，实力强呀。

ID:993738 · 发表于 2023-2-1 14:10

贴pcb还不如直接发电路图，，太丑了。。。

ID:993738 · 发表于 2023-2-4 20:21

不发电路图也就罢了，最起码画图，该标的名称应该有吧？还有，protel也可以画双层吧。你焊盘直接放上，啥都不标，而且，做出来的实物图，你拍个照也可作为参考，结果，啥都没，，是诚心分享么。。。

帐号		自动登录	找回密码
密码			立即注册

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

评分

评分

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

评分

评分

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