51单片机0-30v 4A数控电源

ID:138783 · 发表于 2016-9-7 22:55

给51黑论坛的朋友们分享一个不错的51单片机0-30v 4A数控电源.就是成本有点高！两路输出：1：0-30V/4A 2: 5V/1.5A（固定输出）

电压分辨率0.458mV，电流分辨率0.076mA
电压步进0.0073V，实际用的是0.1V步进调节

在制作中发现；C37极性画反了！还有就是复位电路是51和AVR都兼容的，不能把四个原件都焊接上去，
用什么芯片就焊接什么样的复位电路！特此告知！

单片机源程序：

#include"reg52.h"
#include"math.h"
#include"intrins.h"
#include"function.h"
#define DB P0
sbit RS = P1^4;
sbit RW = P1^5;
sbit E = P1^6;
uchar code logo[] = {
/*-- 调入了一幅图像：I:\液晶屏BMP图\菜单.bmp --*/
/*-- 宽度x高度=128x64 --*/
0x00,0x00,0x00,0x20,0x20,0x08,0x20,0x20,0x00,0x10,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x20,0x17,0xFC,0x13,0xF0,0x3F,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x78,0x20,0x50,0x08,0x12,0x20,0x24,0x90,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x4B,0xFC,0x40,0x08,0x02,0x20,0x3F,0xF0,0x00,0x00,0x00,0x00,0x00,0x00,
0x70,0x00,0x48,0x20,0x47,0xC8,0x02,0x1C,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x48,0x20,0x44,0x48,0xF4,0x00,0x7F,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x79,0x20,0x44,0x48,0x1B,0xF0,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x48,0xA0,0x47,0xC8,0x11,0x10,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x48,0xA0,0x44,0x48,0x11,0x10,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x48,0x20,0x44,0x48,0x14,0xA0,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x78,0x20,0x47,0xC8,0x18,0x40,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x60,0x48,0x20,0x40,0x08,0x10,0xA0,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x7C,0x60,0x40,0xA0,0x40,0x28,0x03,0x1C,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x40,0x40,0x10,0x0C,0x08,0xFF,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x10,0x00,0x10,0x20,0x20,0x00,0x10,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x1F,0xF8,0x3F,0xF8,0x13,0xF0,0x3F,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x10,0x10,0x00,0x00,0x12,0x20,0x24,0x90,0x00,0x00,0x00,0x00,0x00,0x00,
0x3C,0x00,0x1F,0xF0,0x00,0x00,0x02,0x20,0x3F,0xF0,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x00,0x10,0x10,0x00,0x08,0x02,0x1C,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x00,0x1F,0xF0,0x7F,0xFC,0xF4,0x00,0x7F,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,
0x02,0x00,0x10,0x10,0x01,0x00,0x1B,0xF0,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x04,0x00,0x04,0x80,0x09,0x40,0x11,0x10,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x08,0x00,0x44,0x88,0x09,0x20,0x11,0x10,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x10,0x00,0x24,0x90,0x11,0x10,0x14,0xA0,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x20,0x00,0x14,0xA0,0x21,0x08,0x18,0x40,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x60,0x14,0xC0,0x41,0x08,0x10,0xA0,0x1F,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,
0x7E,0x60,0x04,0x88,0x05,0x00,0x03,0x1C,0x10,0x20,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0xFF,0xFC,0x02,0x00,0x0C,0x08,0xFF,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x08,0x40,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x1C,0x40,0x02,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0xF0,0x40,0x7F,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x3C,0x00,0x11,0x50,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x00,0xFD,0x48,0x3F,0xF0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x00,0x11,0x44,0x02,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x04,0x00,0x32,0x44,0xFF,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x18,0x00,0x3A,0x40,0x05,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x04,0x00,0x52,0x48,0x09,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x02,0x00,0x50,0x10,0x18,0xA0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x00,0x90,0x20,0x28,0x40,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x42,0x60,0x10,0x40,0xC9,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x3C,0x60,0x11,0x80,0x0A,0x1C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x16,0x00,0x0C,0x08,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x20,0x08,0x20,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x17,0xFC,0x20,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x48,0x08,0x3C,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x08,0x00,0x42,0x08,0x41,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x08,0x00,0x5F,0xE8,0x41,0x24,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x18,0x00,0x42,0x08,0xF9,0x24,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x28,0x00,0x4F,0xC8,0xA1,0x24,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x48,0x00,0x4A,0x48,0x21,0xFC,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x48,0x00,0x4A,0x48,0xFD,0x24,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x7E,0x00,0x4A,0x48,0x20,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x08,0x00,0x4A,0xC8,0x20,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x08,0x60,0x42,0x08,0x28,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x1E,0x60,0x42,0x28,0x30,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x40,0x10,0x20,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
};
/************************************************************************************
查忙函数
************************************************************************************/
void busy(void)//RS=0;RW=1;wait=0闲;wait!=0忙
{
uchar wait;
RS = 0;
RW = 1;
E = 1;
for(;;)
{
wait = DB;
wait &= 0x80;
if(wait == 0)break;
}
E = 0;
}
/************************************************************************************
写指令函数
************************************************************************************/
void w_code(uchar c)//RS=0;RW=0;E下降沿
{
busy();
RS = 0;
RW = 0;
DB = c;
E = 1;
E = 0;
DB = 0xff;
}
/************************************************************************************
写数据函数
************************************************************************************/
void w_data(uchar d)//RS=1;RW=0;E下降沿
{
busy();
RS = 1;
RW = 0;
DB = d;
E = 1;
E = 0;
DB = 0xff;
}
/************************************************************************************
读数据函数
************************************************************************************/
uchar r_data(void)//RS=1;RW=1;E下降沿
{
uchar rd_lcd;
busy();
RS = 1;
RW = 1;
E = 1;
rd_lcd = DB;
E = 0;
return rd_lcd;
}
/************************************************************************************
写DGRAM:x_lcd横坐标,y_lcd纵坐标
************************************************************************************/
void address(uchar x_lcd,uchar y_lcd)//
{
w_code(y_lcd);//垂直坐标
w_code(x_lcd);//水平坐标
}
/************************************************************************************
初始化液晶屏
0：字库 1：绘图
************************************************************************************/
void lcd_rst(bit a)
{
if(a)
{
w_code(0x01);// 清屏
w_code(0x32);// 功能设置---8BIT控制界面，绘图显示ON
w_code(0x36);// 功能设置---8BIT控制界面，扩充指令集
}
else
{
w_code(0x30);// 功能设置---8BIT控制界面，基本指令集
w_code(0x0c);//显示打开，光标关，反白显示关
w_code(0x01);// 清除屏幕显示，将DDRAM的地址计数器归零
}
}
/************************************************************************************
---------------------------写整屏点阵数据
---------------------------x ：图像数据的起始地址
************************************************************************************/
void write_lcd_full(uint x )
{
uchar i,j,a;
j = 0x80; //Y地址寄存器
for(a = 0;a < 32;a++)
{
w_code(j);
j++;
w_code(0x80);//X地址寄存器
for(i = 0;i < 16;i ++)
{
w_data(logo[x]);
x++;
}
}
j = 0x80; //Y地址寄存器
for(a = 0;a < 32;a++)
{
w_code(j);
j++;
w_code(0x88);//X地址寄存器
for(i = 0;i < 16;i ++)
{
w_data(logo[x]);
x++;
}
}
}

复制代码

数控电源的所有资料下载：

0-30V 4A数控稳压电源资料.zip (2.37 MB, 下载次数: 1206)

ID:138155 · 发表于 2016-9-15 16:11

51黑有你更精彩~~！

ID:69271 · 发表于 2016-10-11 10:43

这个文档不得不说，太全了，什么都有，我就喜欢这样的帖子。谢谢，楼主辛苦了！

ID:69271 · 发表于 2016-10-11 15:47

但是好像没有PID的内容，在单片机内的程序里。

ID:143914 · 发表于 2016-11-8 06:27

厉害啊，我才刚开始学，不知啥时候能到这水平啊

ID:147195 · 发表于 2016-11-11 09:30

我最想做出来的一样东西，可惜水平差太多，先收藏了

ID:134868 · 发表于 2016-11-12 18:44

业余爱好，正在做这个准备自用，以后自己维修方便点，正在做电压电流取样部分，想看看你的资料差点积分

ID:79034 · 发表于 2016-11-21 08:39

谢谢楼主分享，下载了就顶贴，养成良好的习惯，也方便新手学习

ID:154111 · 发表于 2016-12-12 14:00

资料还不错哦，谢谢楼主分享！！！！！！！！！！

ID:74784 · 发表于 2016-12-19 16:40

有坛友做出来的吗？
说说效果咋样？

ID:124995 · 发表于 2016-12-19 18:11

高手哇，新手来学习

ID:157346 · 发表于 2016-12-24 15:08

还差一点就可以看楼主的资料了

ID:59611 · 发表于 2016-12-26 18:32

谢谢楼主分享下载学习学习

ID:157505 · 发表于 2016-12-29 23:02

新手学习了

ID:158812 · 发表于 2016-12-30 09:34

不错的东西，但是黑币不够

ID:158812 · 发表于 2016-12-30 09:34

新手学习了

ID:139856 · 发表于 2016-12-31 17:04

这个可以

ID:73762 · 发表于 2017-1-4 21:48

不错的东西

ID:160455 · 发表于 2017-1-6 16:14

高手啊，学习一下，参考参考。

ID:159575 · 发表于 2017-1-7 15:50

学习了，改天做一个

ID:153194 · 发表于 2017-1-12 08:23

喜欢这样的帖子。谢谢，楼主辛苦了！

ID:159122 · 发表于 2017-1-22 07:53

初学者膜拜

ID:162916 · 发表于 2017-1-25 11:33

很好的资料

ID:161527 · 发表于 2017-1-28 19:39

该电源真好，可惜本人水平有限，看不懂。但是也要谢谢。

ID:113020 · 发表于 2017-2-10 10:59

谢谢楼主分享

ID:96881 · 发表于 2017-2-26 21:46

非常感谢分享，学习一下

ID:56054 · 发表于 2017-5-15 09:51

很满意的资料

ID:201207 · 发表于 2017-5-16 09:05

非常感谢分享，学习一下

ID:86001 · 发表于 2017-6-12 22:05

非常感谢正需要这部分资料

ID:225934 · 发表于 2017-8-9 09:06

先收藏了有时间了做一个试试

ID:231788 · 发表于 2017-9-7 22:02

做DC/DC参考一下

ID:198608 · 发表于 2017-9-15 18:40

楼主有没有元件清单

ID:237459 · 发表于 2017-10-6 13:41

主要是电路，电路很好

ID:242891 · 发表于 2017-10-27 20:43

强烈要求有75V25A的，300块钱求购成品。

ID:244044 · 发表于 2017-10-29 22:40

新手学习中点赞

ID:244062 · 发表于 2017-10-30 00:27

不错，又做出实物的嘛

ID:154669 · 发表于 2017-10-30 08:32

这个电路板怎么买还是自己做的

ID:244719 · 发表于 2017-10-31 21:16

大部分都是来混分，水经验的，只有我是认真回帖的

ID:96218 · 发表于 2017-11-1 08:46

追求精度，成本就上去了。

ID:245291 · 发表于 2017-11-2 14:02

正要做这方面的东西用你资料来验证一下，做出来后来展示一下成果

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

51单片机0-30v 4A数控电源

评分

相关帖子