51單片機(jī)0-30v 4A數(shù)控電源

ID:138783 · 發(fā)表于 2016-9-7 22:55

給51黑論壇的朋友們分享一個不錯的51單片機(jī)0-30v 4A數(shù)控電源.就是成本有點高！兩路輸出：1：0-30V/4A 2: 5V/1.5A（固定輸出）

電壓分辨率0.458mV，電流分辨率0.076mA
電壓步進(jìn)0.0073V，實際用的是0.1V步進(jìn)調(diào)節(jié)

在制作中發(fā)現(xiàn)；C37極性畫反了！還有就是復(fù)位電路是51和AVR都兼容的，不能把四個原件都焊接上去，
用什么芯片就焊接什么樣的復(fù)位電路！特此告知！

單片機(jī)源程序：

#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[] = {
/*-- 調(diào)入了一幅圖像：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,
};
/************************************************************************************
查忙函數(shù)
************************************************************************************/
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;
}
/************************************************************************************
寫指令函數(shù)
************************************************************************************/
void w_code(uchar c)//RS=0;RW=0;E下降沿
{
busy();
RS = 0;
RW = 0;
DB = c;
E = 1;
E = 0;
DB = 0xff;
}
/************************************************************************************
寫數(shù)據(jù)函數(shù)
************************************************************************************/
void w_data(uchar d)//RS=1;RW=0;E下降沿
{
busy();
RS = 1;
RW = 0;
DB = d;
E = 1;
E = 0;
DB = 0xff;
}
/************************************************************************************
讀數(shù)據(jù)函數(shù)
************************************************************************************/
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橫坐標(biāo),y_lcd縱坐標(biāo)
************************************************************************************/
void address(uchar x_lcd,uchar y_lcd)//
{
w_code(y_lcd);//垂直坐標(biāo)
w_code(x_lcd);//水平坐標(biāo)
}
/************************************************************************************
初始化液晶屏
0：字庫 1：繪圖
************************************************************************************/
void lcd_rst(bit a)
{
if(a)
{
w_code(0x01);// 清屏
w_code(0x32);// 功能設(shè)置---8BIT控制界面，繪圖顯示ON
w_code(0x36);// 功能設(shè)置---8BIT控制界面，擴(kuò)充指令集
}
else
{
w_code(0x30);// 功能設(shè)置---8BIT控制界面，基本指令集
w_code(0x0c);//顯示打開，光標(biāo)關(guān)，反白顯示關(guān)
w_code(0x01);// 清除屏幕顯示，將DDRAM的地址計數(shù)器歸零
}
}
/************************************************************************************
---------------------------寫整屏點陣數(shù)據(jù)
---------------------------x ：圖像數(shù)據(jù)的起始地址
************************************************************************************/
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++;
}
}
}

復(fù)制代碼

數(shù)控電源的所有資料下載：

0-30V 4A數(shù)控穩(wěn)壓電源資料.zip (2.37 MB, 下載次數(shù): 1229)

ID:138155 · 發(fā)表于 2016-9-15 16:11

51黑有你更精彩~~！

ID:69271 · 發(fā)表于 2016-10-11 10:43

這個文檔不得不說，太全了，什么都有，我就喜歡這樣的帖子。謝謝，樓主辛苦了！

ID:69271 · 發(fā)表于 2016-10-11 15:47

但是好像沒有PID的內(nèi)容，在單片機(jī)內(nèi)的程序里。

ID:143914 · 發(fā)表于 2016-11-8 06:27

厲害啊，我才剛開始學(xué)，不知啥時候能到這水平啊

ID:147195 · 發(fā)表于 2016-11-11 09:30

我最想做出來的一樣?xùn)|西，可惜水平差太多，先收藏了

ID:134868 · 發(fā)表于 2016-11-12 18:44

業(yè)余愛好，正在做這個準(zhǔn)備自用，以后自己維修方便點，正在做電壓電流取樣部分，想看看你的資料差點積分

ID:79034 · 發(fā)表于 2016-11-21 08:39

謝謝樓主分享，下載了就頂貼，養(yǎng)成良好的習(xí)慣，也方便新手學(xué)習(xí)

ID:154111 · 發(fā)表于 2016-12-12 14:00

資料還不錯哦，謝謝樓主分享�。。。。。。。。�！

ID:74784 · 發(fā)表于 2016-12-19 16:40

有壇友做出來的嗎？
說說效果咋樣？

ID:124995 · 發(fā)表于 2016-12-19 18:11

高手哇，新手來學(xué)習(xí)

ID:157346 · 發(fā)表于 2016-12-24 15:08

還差一點就可以看樓主的資料了

ID:59611 · 發(fā)表于 2016-12-26 18:32

謝謝樓主分享下載學(xué)習(xí)學(xué)習(xí)

ID:157505 · 發(fā)表于 2016-12-29 23:02

新手學(xué)習(xí)了

ID:158812 · 發(fā)表于 2016-12-30 09:34

不錯的東西，但是黑幣不夠

ID:158812 · 發(fā)表于 2016-12-30 09:34

新手學(xué)習(xí)了

ID:139856 · 發(fā)表于 2016-12-31 17:04

這個可以

ID:73762 · 發(fā)表于 2017-1-4 21:48

不錯的東西

ID:160455 · 發(fā)表于 2017-1-6 16:14

高手啊，學(xué)習(xí)一下，參考參考。

ID:159575 · 發(fā)表于 2017-1-7 15:50

學(xué)習(xí)了，改天做一個

ID:153194 · 發(fā)表于 2017-1-12 08:23

喜歡這樣的帖子。謝謝，樓主辛苦了！

ID:159122 · 發(fā)表于 2017-1-22 07:53

初學(xué)者膜拜

ID:162916 · 發(fā)表于 2017-1-25 11:33

很好的資料

ID:161527 · 發(fā)表于 2017-1-28 19:39

該電源真好，可惜本人水平有限，看不懂。但是也要謝謝。

ID:113020 · 發(fā)表于 2017-2-10 10:59

謝謝樓主分享

ID:96881 · 發(fā)表于 2017-2-26 21:46

非常感謝分享，學(xué)習(xí)一下

ID:56054 · 發(fā)表于 2017-5-15 09:51

很滿意的資料

ID:201207 · 發(fā)表于 2017-5-16 09:05

非常感謝分享，學(xué)習(xí)一下

ID:86001 · 發(fā)表于 2017-6-12 22:05

非常感謝正需要這部分資料

ID:225934 · 發(fā)表于 2017-8-9 09:06

先收藏了有時間了做一個試試

ID:231788 · 發(fā)表于 2017-9-7 22:02

做DC/DC參考一下

ID:198608 · 發(fā)表于 2017-9-15 18:40

樓主有沒有元件清單

ID:237459 · 發(fā)表于 2017-10-6 13:41

主要是電路，電路很好

ID:242891 · 發(fā)表于 2017-10-27 20:43

強(qiáng)烈要求有75V25A的，300塊錢求購成品。

ID:244044 · 發(fā)表于 2017-10-29 22:40

新手學(xué)習(xí)中點贊

ID:244062 · 發(fā)表于 2017-10-30 00:27

不錯，又做出實物的嘛

ID:154669 · 發(fā)表于 2017-10-30 08:32

這個電路板怎么買還是自己做的

ID:244719 · 發(fā)表于 2017-10-31 21:16

大部分都是來混分，水經(jīng)驗的，只有我是認(rèn)真回帖的

ID:96218 · 發(fā)表于 2017-11-1 08:46

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

ID:245291 · 發(fā)表于 2017-11-2 14:02

正要做這方面的東西用你資料來驗證一下，做出來后來展示一下成果

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

51單片機(jī)0-30v 4A數(shù)控電源

評分

相關(guān)帖子