關(guān)于ad0809的模數(shù)轉(zhuǎn)換與顯示的單片機(jī)程序

ID:330927 · 發(fā)表于 2018-5-16 00:37

adc0809的51程序及仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機(jī)源程序如下:

/*************** writer:shopping.w ******************/
#include <reg52.h>
#include<intrins.h>
#include<math.h>
#define uint unsigned int
#define uchar unsigned char
uchar code LCD[10]={"0123456789"};
uchar code CL[]={"CL%:0.00"} ;
uchar code DW[]={"MOL/L"};
uchar code CW[]={" error "} ;
sbit OE = P1^0;
sbit EOC = P1^1;
sbit ST = P1^2;
sbit CLK = P1^3;
void delay1ms()
{
unsigned char i,j;
for(i=0;i<10;i++)
for(j=0;j<33;j++)
;}
void delaynms(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
delay1ms();
}
bit BusyTest(void)
{
bit result;
RS=0; //根據(jù)規(guī)定，RS為低電平，RW為高電平時(shí)，可以讀狀態(tài)
RW=1;
E=1; //E=1，才允許讀寫(xiě)
_nop_(); //空操作
_nop_();
_nop_();
_nop_(); //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
result=BF; //將忙碌標(biāo)志電平賦給result
E=0; //將E恢復(fù)低電平
return result;
}
void WriteInstruction (unsigned char dictate)
{
while(BusyTest()==1); //如果忙就等待
RS=0; //根據(jù)規(guī)定，RS和R/W同時(shí)為低電平時(shí)，可以寫(xiě)入指令
RW=0;
E=0; //E置低電平(根據(jù)表8-6，寫(xiě)指令時(shí)，E為高脈沖，
// 就是讓E從0到1發(fā)生正跳變，所以應(yīng)先置"0"
_nop_();
_nop_(); //空操作兩個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
P0=dictate; //將數(shù)據(jù)送入P0口，即寫(xiě)入指令或地址
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
E=0; }
void WriteAddress(unsigned char x)
{
WriteInstruction(x|0x80); }//顯示位置的確定方法規(guī)定為"80H+地址碼x"
void WriteData(unsigned char y)
{
while(BusyTest()==1);
RS=1; //RS為高電平，RW為低電平時(shí)，可以寫(xiě)入數(shù)據(jù)
RW=0;
E=0; //E置低電平(根據(jù)表8-6，寫(xiě)指令時(shí)，E為高脈沖，
// 就是讓E從0到1發(fā)生正跳變，所以應(yīng)先置"0"
P0=y; //將數(shù)據(jù)送入P0口，即將數(shù)據(jù)寫(xiě)入液晶模塊
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個(gè)機(jī)器周期，給硬件反應(yīng)時(shí)間
E=0; //當(dāng)E由高電平跳變成低電平時(shí)，液晶模塊開(kāi)始執(zhí)行命令
}
void LcdInitiate(void)
{
delaynms(15); //延時(shí)15ms，首次寫(xiě)指令時(shí)應(yīng)給LCD一段較長(zhǎng)的反應(yīng)時(shí)間
WriteInstruction(0x38); //顯示模式設(shè)置：16×2顯示，5×7點(diǎn)陣，8位數(shù)據(jù)接口
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
WriteInstruction(0x38);
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
WriteInstruction(0x38); //連續(xù)三次，確保初始化成功
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
WriteInstruction(0x0c); //顯示模式設(shè)置：顯示開(kāi)，無(wú)光標(biāo)，光標(biāo)不閃爍
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
WriteInstruction(0x06); //顯示模式設(shè)置：光標(biāo)右移，字符不移
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
WriteInstruction(0x01); //清屏幕指令，將以前的顯示內(nèi)容清除
delaynms(5); //延時(shí)5ms　，給硬件一點(diǎn)反應(yīng)時(shí)間
}
void xianshi(void)
{ unsigned char i;
WriteAddress(0x00); //寫(xiě)顯示地址，將在第1行第1列開(kāi)始顯示
i = 0; //從第一個(gè)字符開(kāi)始顯示
while(CL[i] != '\0') //只要沒(méi)有寫(xiě)到結(jié)束標(biāo)志，就繼續(xù)寫(xiě)
{
WriteData(CL[i]); //將字符常量寫(xiě)入LCD
i++; //指向下一個(gè)字符
delaynms(100); //延時(shí)100ms較長(zhǎng)時(shí)間，以看清關(guān)于顯示的說(shuō)明
} }
void danwei(void)
{
unsigned char h;
WriteAddress(0x0b); //寫(xiě)顯示地址，將在第1行第1列開(kāi)始顯示
h = 0; //從第一個(gè)字符開(kāi)始顯示
while(DW[h]!= '\0') //只要沒(méi)有寫(xiě)到結(jié)束標(biāo)志，就繼續(xù)寫(xiě)
{
WriteData(DW[h]); //將字符常量寫(xiě)入LCD
h++; //指向下一個(gè)字符
delaynms(100); //延時(shí)100ms較長(zhǎng)時(shí)間，以看清關(guān)于顯示的說(shuō)明
} }
void panduan(void)
{
unsigned char k;
LcdInitiate() ;
WriteAddress(0x00); //寫(xiě)顯示地址，將在第1行第1列開(kāi)始顯示
k = 0; //從第一個(gè)字符開(kāi)始顯示
while(CW[k] != '\0') //只要沒(méi)有寫(xiě)到結(jié)束標(biāo)志，就繼續(xù)寫(xiě)
{
WriteData(CW[k]); //將字符常量寫(xiě)入LCD
k++; //指向下一個(gè)字符
delaynms(100); //延時(shí)100ms較長(zhǎng)時(shí)間，以看清關(guān)于顯示的說(shuō)明
} }
void Display_Result(uchar d)
{ double x,y;
uchar xs1, xs2,ds, xs3;
d=d*5*100/256 ;
x=(d-110)/59;
y=pow(10,x);
if(y*10000<1||y*10000>100)
{panduan(); }
else if(y*1000>0)
{ds=y*100000;
xs1=ds%1000;
xs2=ds%100;
xs3=ds%10;
xianshi();
danwei();
WriteAddress(0x08);
WriteData(LCD[xs1]);
delaynms(10);
WriteData(LCD[xs2]);
delaynms(10);
WriteData(LCD[xs3]) ;
delaynms(10); }
else if(y*10000>0) {
xs2=ds%100;
xs3=ds%10;
xianshi();
danwei();
WriteAddress(0x08);
WriteData(LCD[0]);
delaynms(10);
WriteData(LCD[xs2]);
delaynms(10);
WriteData(LCD[xs3]) ;
delaynms(10);
}
else xs3=ds%10;
xianshi();
danwei();
WriteAddress(0x08);
WriteData(LCD[0]);
delaynms(10);
WriteData(LCD[0]);
delaynms(10);
WriteData(LCD[xs3]) ;
delaynms(10);}
void main()
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼

所有資料51hei提供下載:

adc0808.rar (63.75 KB, 下載次數(shù): 75)

ID:335078 · 發(fā)表于 2018-6-13 23:46

剛好需要，看一下能不能用

ID:335078 · 發(fā)表于 2018-6-13 23:59

程序不完整，還是得慢慢改才行。望完善

ID:334094 · 發(fā)表于 2019-1-2 15:09

很好，學(xué)習(xí)學(xué)習(xí)

ID:334094 · 發(fā)表于 2019-1-2 15:10

很好，學(xué)習(xí)學(xué)習(xí)

ID:512403 · 發(fā)表于 2019-4-25 15:45

收藏起來(lái)，看看

ID:528654 · 發(fā)表于 2019-5-11 01:45

仿真不了啊

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

關(guān)于ad0809的模數(shù)轉(zhuǎn)換與顯示的單片機(jī)程序