關于ad0809的模數轉換與顯示的單片機程序

ID:330927 · 發表于 2018-5-16 00:37

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

單片機源程序如下:

/*************** 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; //根據規定，RS為低電平，RW為高電平時，可以讀狀態
RW=1;
E=1; //E=1，才允許讀寫
_nop_(); //空操作
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
result=BF; //將忙碌標志電平賦給result
E=0; //將E恢復低電平
return result;
}
void WriteInstruction (unsigned char dictate)
{
while(BusyTest()==1); //如果忙就等待
RS=0; //根據規定，RS和R/W同時為低電平時，可以寫入指令
RW=0;
E=0; //E置低電平(根據表8-6，寫指令時，E為高脈沖，
// 就是讓E從0到1發生正跳變，所以應先置"0"
_nop_();
_nop_(); //空操作兩個機器周期，給硬件反應時間
P0=dictate; //將數據送入P0口，即寫入指令或地址
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=0; }
void WriteAddress(unsigned char x)
{
WriteInstruction(x|0x80); }//顯示位置的確定方法規定為"80H+地址碼x"
void WriteData(unsigned char y)
{
while(BusyTest()==1);
RS=1; //RS為高電平，RW為低電平時，可以寫入數據
RW=0;
E=0; //E置低電平(根據表8-6，寫指令時，E為高脈沖，
// 就是讓E從0到1發生正跳變，所以應先置"0"
P0=y; //將數據送入P0口，即將數據寫入液晶模塊
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=1; //E置高電平
_nop_();
_nop_();
_nop_();
_nop_(); //空操作四個機器周期，給硬件反應時間
E=0; //當E由高電平跳變成低電平時，液晶模塊開始執行命令
}
void LcdInitiate(void)
{
delaynms(15); //延時15ms，首次寫指令時應給LCD一段較長的反應時間
WriteInstruction(0x38); //顯示模式設置：16×2顯示，5×7點陣，8位數據接口
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x38);
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x38); //連續三次，確保初始化成功
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x0c); //顯示模式設置：顯示開，無光標，光標不閃爍
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x06); //顯示模式設置：光標右移，字符不移
delaynms(5); //延時5ms　，給硬件一點反應時間
WriteInstruction(0x01); //清屏幕指令，將以前的顯示內容清除
delaynms(5); //延時5ms　，給硬件一點反應時間
}
void xianshi(void)
{ unsigned char i;
WriteAddress(0x00); //寫顯示地址，將在第1行第1列開始顯示
i = 0; //從第一個字符開始顯示
while(CL[i] != '\0') //只要沒有寫到結束標志，就繼續寫
{
WriteData(CL[i]); //將字符常量寫入LCD
i++; //指向下一個字符
delaynms(100); //延時100ms較長時間，以看清關于顯示的說明
} }
void danwei(void)
{
unsigned char h;
WriteAddress(0x0b); //寫顯示地址，將在第1行第1列開始顯示
h = 0; //從第一個字符開始顯示
while(DW[h]!= '\0') //只要沒有寫到結束標志，就繼續寫
{
WriteData(DW[h]); //將字符常量寫入LCD
h++; //指向下一個字符
delaynms(100); //延時100ms較長時間，以看清關于顯示的說明
} }
void panduan(void)
{
unsigned char k;
LcdInitiate() ;
WriteAddress(0x00); //寫顯示地址，將在第1行第1列開始顯示
k = 0; //從第一個字符開始顯示
while(CW[k] != '\0') //只要沒有寫到結束標志，就繼續寫
{
WriteData(CW[k]); //將字符常量寫入LCD
k++; //指向下一個字符
delaynms(100); //延時100ms較長時間，以看清關于顯示的說明
} }
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()
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

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

ID:335078 · 發表于 2018-6-13 23:46

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

ID:335078 · 發表于 2018-6-13 23:59

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

ID:334094 · 發表于 2019-1-2 15:09

很好，學習學習

ID:334094 · 發表于 2019-1-2 15:10

很好，學習學習

ID:512403 · 發表于 2019-4-25 15:45

收藏起來，看看

ID:528654 · 發表于 2019-5-11 01:45

仿真不了啊

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

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

關于ad0809的模數轉換與顯示的單片機程序