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, 下载次数: 1229)

ID:1062827 · 发表于 2023-8-25 09:55

高手真多，这板设计的中规中矩，看出来功力深厚

ID:1091903 · 发表于 2023-8-24 20:25

观摩大佬的技术，不知道什么时候才能达到大佬的水平。

ID:963956 · 发表于 2023-8-24 08:23

想搞个大电流点的，参考一下，谢谢

ID:1074355 · 发表于 2023-4-27 10:01

新手来了，刚刚学习51单片机

ID:419064 · 发表于 2023-4-23 05:03

十多年前的经典电源。真怀念啊……

ID:866972 · 发表于 2023-4-20 16:00

看看，收藏下，学习下控制思路。

ID:1072097 · 发表于 2023-4-16 19:52

太难了，

要努力才行

ID:913410 · 发表于 2023-3-18 07:46

51黑有你更精彩

！

ID:163044 · 发表于 2023-2-20 19:35

谢谢楼主分享，下载了就顶贴

ID:604020 · 发表于 2023-2-2 13:06

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

ID:405183 · 发表于 2023-1-13 07:19

楼主，电压电流校准步骤出来没

ID:539649 · 发表于 2021-6-2 14:43

谢谢楼主分享，新手来学习学习。

ID:641660 · 发表于 2021-5-19 12:04

这份图纸资料很全，赞

ID:111463 · 发表于 2021-4-17 14:08

线性电源，纹波小，这个设计值得参考

ID:3802 · 发表于 2021-4-16 13:53

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

ID:303735 · 发表于 2020-11-25 20:55

顶一个，不知道程序有没问题，想做一台电源玩玩。

ID:709679 · 发表于 2020-10-30 09:14

初学看看能看懂不，谢谢

ID:479226 · 发表于 2019-7-19 15:34

很好的资料，谢谢楼主分享！！！！！！！！！！

ID:583641 · 发表于 2019-7-18 16:32

感谢楼主的分享！

ID:142141 · 发表于 2019-5-31 07:34

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

ID:317472 · 发表于 2019-4-21 23:17

是否包含了恒流工作模式？

ID:271166 · 发表于 2019-4-20 08:11

51黑有你更精彩~~！

ID:228528 · 发表于 2019-4-17 10:54

谢谢分享，下来看看

ID:93625 · 发表于 2019-4-10 08:18

这个资料是我需要的，感谢楼主

ID:111676 · 发表于 2019-4-9 21:08

谢谢楼主分享

ID:58625 · 发表于 2019-4-9 15:01

学习下。感谢分享

ID:443306 · 发表于 2019-2-7 18:38

想照猫画虎做一个可惜没有黒币。过几天在下载跟着做个吧

ID:452539 · 发表于 2019-2-4 16:59

谢谢你的无私提供，下载源码学习一下

ID:418770 · 发表于 2019-1-28 21:37

好东西

ID:452173 · 发表于 2018-12-30 11:37

可惜没有币，做个数控实验电源不错，电压够用电流低点。

ID:225481 · 发表于 2018-12-26 22:20

下载看下，做个玩下，谢谢

ID:450548 · 发表于 2018-12-26 10:16

做的真漂亮，感谢楼主！！

ID:13074 · 发表于 2018-12-11 09:52

很好的资料！给楼主加分！点赞!

ID:74143 · 发表于 2018-12-8 21:30

资料很全。

ID:305810 · 发表于 2018-12-6 15:09

目前手里就有个用51单片机做可控LED电源的项目，学习了

ID:21783 · 发表于 2018-11-27 12:14

hao好资料，顶起来，谢谢分享~

ID:409828 · 发表于 2018-10-20 11:55

一直想做一台数控电源

ID:349690 · 发表于 2018-9-17 23:10

这个是很不错的制作资料

ID:349690 · 发表于 2018-9-17 23:10

很不错的资料

ID:389836 · 发表于 2018-8-25 09:19

楼主，有功率大点的吗？

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

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

评分

相关帖子