- #include <reg51.h>
- #include <intrins.h>
- sbit SDA=P2^0; // 將p1.2口模擬數據口
- sbit SCL=P2^1; // 將p1.7口模擬時鐘口
- sbit DS1302 =P2^4;
- sbit DU = P2^0;
- sbit WE = P2^1;
- #define uchar unsigned char
- #define uint unsigned int
- #define disdata P0 //顯示數據碼輸出口
- sbit LCD_RS = P1^0;
- sbit LCD_RW = P1^1;
- sbit LCD_EN = P2^5;
- uint data dis[4]={0x00,0x00,0x00,0x00};
- //定義3個顯示數據單元和1個數據存儲單元
- uchar code dis4[] = {"1- . V 2- . V"};
- uchar code dis5[] = {"3- . V 4- . V"};
- #define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};
-
- bit bdata SystemError; //從機錯誤標志位
- /*********************** PCF8591專用變量定義 ***********************/
- #define PCF8591_WRITE 0x90
- #define PCF8591_READ 0x91
- #define NUM 4 //接收和發送緩存區的深度
- uchar idata receivebuf[NUM]; //數據接收緩沖區
- void cmg88()//關數碼管,點陣函數
- {
- DU=1;
- P0=0X00;
- DU=0;
- }
- /*******************************************************************/
- /* */
- /* 延時函數 */
- /* */
- /*******************************************************************/
- void delay(int ms)
- {
- while(ms--)
- {
- uchar i;
- for(i=0;i<250;i++)
- {
- _nop_();
- _nop_();
- _nop_();
- _nop_();
- }
- }
- }
- /*******************************************************************/
- /* */
- /*檢查LCD忙狀態 */
- /*lcd_busy為1時,忙,等待。lcd-busy為0時,閑,可寫指令與數據。 */
- /* */
- /*******************************************************************/
- bit lcd_busy()
- {
- bit result;
- LCD_RS = 0;
- LCD_RW = 1;
- LCD_EN = 1;
- delayNOP();
- result = (bit)(P0&0x80);
- LCD_EN = 0;
- return(result);
- }
- /*******************************************************************/
- /* */
- /*寫指令數據到LCD */
- /*RS=L,RW=L,E=高脈沖,D0-D7=指令碼。 */
- /* */
- /*******************************************************************/
- void lcd_wcmd(uchar cmd)
- {
- while(lcd_busy());
- LCD_RS = 0;
- LCD_RW = 0;
- LCD_EN = 0;
- _nop_();
- _nop_();
- P0 = cmd;
- delayNOP();
- LCD_EN = 1;
- delayNOP();
- LCD_EN = 0;
- }
- /*******************************************************************/
- /* */
- /*寫顯示數據到LCD */
- /*RS=H,RW=L,E=高脈沖,D0-D7=數據。 */
- /* */
- /*******************************************************************/
- void lcd_wdat(uchar dat)
- {
- while(lcd_busy());
- LCD_RS = 1;
- LCD_RW = 0;
- LCD_EN = 0;
- P0 = dat;
- delayNOP();
- LCD_EN = 1;
- delayNOP();
- LCD_EN = 0;
- }
- /*******************************************************************/
- /* */
- /* LCD初始化設定 */
- /* */
- /*******************************************************************/
- void lcd_init()
- {
- delay(15);
- lcd_wcmd(0x38); //16*2顯示,5*7點陣,8位數據
- delay(5);
- lcd_wcmd(0x38);
- delay(5);
- lcd_wcmd(0x38);
- delay(5);
- lcd_wcmd(0x0c); //顯示開,關光標
- delay(5);
- lcd_wcmd(0x06); //移動光標
- delay(5);
- lcd_wcmd(0x01); //清除LCD的顯示內容
- delay(5);
- }
- /*******************************************************************/
- /* */
- /* 設定顯示位置 */
- /* */
- /*******************************************************************/
- void lcd_pos(uchar pos)
- {
- lcd_wcmd(pos | 0x80); //數據指針=80+地址變量
- }
- /******************************************************************/
- /* */
- /* 數據處理與顯示 */
- /* 將采集到的數據進行16進制轉換為ASCLL碼。 */
- /* */
- /******************************************************************/
- show_value(uchar ad_data)
- {
- dis[2]=ad_data/51; //AD值轉換為3為BCD碼,最大為5.00V。
- dis[2]=dis[2]+0x30; //轉換為ACSII碼
- dis[3]=ad_data%51; //余數暫存
- dis[3]=dis[3]*10; //計算小數第一位
- dis[1]=dis[3]/51;
- dis[1]=dis[1]+0x30; //轉換為ACSII碼
- dis[3]=dis[3]%51;
- dis[3]=dis[3]*10; //計算小數第二位
- dis[0]=dis[3]/51; //
- dis[0]=dis[0]+0x30; //轉換為ACSII碼
- }
- //-------------------------------------------------------------------
- // 函數名稱: iic_start()
- // 函數功能: 啟動I2C總線子程序
- //-------------------------------------------------------------------
- void iic_start(void)
- { //時鐘保持高,數據線從高到低一次跳變,I2C通信開始
- SDA = 1;
- SCL = 1;
- delayNOP(); // 延時5us
- SDA = 0;
- delayNOP();
- SCL = 0;
- }
- //-------------------------------------------------------------------
- // 函數名稱: iic_stop()
- // 函數功能: 停止I2C總線數據傳送子程序
- //-------------------------------------------------------------------
- void iic_stop(void)
- {
- SDA = 0; //時鐘保持高,數據線從低到高一次跳變,I2C通信停止
- SCL = 1;
- delayNOP();
- SDA = 1;
- delayNOP();
- SCL = 0;
- }
- //------------------------------------------------------------------
- // 函數名稱: iicInit_()
- // 函數功能: 初始化I2C總線子程序
- //------------------------------------------------------------------
- void iicInit(void)
- {
- SCL = 0;
- iic_stop();
- }
- //-------------------------------------------------------------------
- // 函數名稱: slave_ACK
- // 函數功能: 從機發送應答位子程序
- //-------------------------------------------------------------------
- void slave_ACK(void)
- {
- SDA = 0;
- SCL = 1;
- delayNOP();
- SCL = 0;
- }
- //-------------------------------------------------------------------
- // 函數名稱: slave_NOACK
- // 函數功能: 從機發送非應答位子程序,迫使數據傳輸過程結束
- //-------------------------------------------------------------------
- void slave_NOACK(void)
- {
- SDA = 1;
- SCL = 1;
- delayNOP();
- SDA = 0;
- SCL = 0;
- }
- //-------------------------------------------------------------------
- // 函數名稱: check_ACK
- // 函數功能: 主機應答位檢查子程序,迫使數據傳輸過程結束
- //-------------------------------------------------------------------
- void check_ACK(void)
- {
- SDA = 1; // 將SDA設置成輸入,必須先向端口寫1
- SCL = 1;
- F0 = 0;
- delayNOP();
- if(SDA == 1) // 若SDA=1表明非應答,置位非應答標志F0
- F0 = 1;
- SCL = 0;
- }
- //-------------------------------------------------------------------
- // 函數名稱: IICSendByte
- // 入口參數: ch
- // 函數功能: 發送一個字節
- //-------------------------------------------------------------------
- void IICSendByte(uchar ch)
-
- {
- unsigned char idata n=8; // 向SDA上發送一位數據字節,共八位
- while(n--)
- {
- if((ch&0x80) == 0x80) // 若要發送的數據最高位為1則發送位1
- {
- SDA = 1; // 傳送位1
- SCL = 1;
- delayNOP();
- // SDA = 0;
- SCL = 0;
- }
- else
- {
- SDA = 0; // 否則傳送位0
- SCL = 1;
- delayNOP();
- SCL = 0;
- }
- ch = ch<<1; // 數據左移一位
- }
- }
- //-------------------------------------------------------------------
- // 函數名稱: IICreceiveByte
- // 返回接收的數據
- // 函數功能: 接收一字節子程序
- //-------------------------------------------------------------------
- uchar IICreceiveByte(void)
- {
- uchar idata n=8; // 從SDA線上讀取一上數據字節,共八位
- uchar tdata=0;
- while(n--)
- {
- SDA = 1;
- SCL = 1;
- tdata =tdata<<1; //左移一位
- if(SDA == 1)
- tdata = tdata|0x01; // 若接收到的位為1,則數據的最后一位置1
- else
- tdata = tdata&0xfe; // 否則數據的最后一位置0
- SCL = 0;
- }
- return(tdata);
- }
- //-------------------------------------------------------------------
- // 函數名稱: DAC_PCF8591
- // 入口參數: slave_add從機地址,n要發送的數據個數
- // 函數功能: 發送n位數據子程序
- //-------------------------------------------------------------------
- void DAC_PCF8591(uchar controlbyte,uchar w_data)
- {
-
- iic_start(); // 啟動I2C
- delayNOP();
- IICSendByte(PCF8591_WRITE); // 發送地址位
- check_ACK(); // 檢查應答位
- if(F0 == 1)
- {
- SystemError = 1;
- return; // 若非應答,置錯誤標志位
- }
- IICSendByte(controlbyte&0x77); //Control byte
- check_ACK(); //檢查應答位
- if(F0 == 1)
- {
- SystemError = 1;
- return; // 若非應答,置錯誤標志位
- }
- IICSendByte(w_data); //data byte
- check_ACK(); // 檢查應答位
- if(F0 == 1)
- {
- SystemError = 1;
- return; // 若非應答表明器件錯誤或已壞,置錯誤標志位SystemError
- }
- iic_stop(); // 全部發完則停止
- delayNOP();
- delayNOP();
- delayNOP();
- delayNOP();
- }
- //-------------------------------------------------------------------
- // 函數名稱: ADC_PCF8591
- // 入口參數: controlbyte控制字
- // 函數功能: 連續讀入4路通道的A/D轉換結果到receivebuf
- //-------------------------------------------------------------------
- void ADC_PCF8591(uchar controlbyte)
- {
- uchar idata receive_da,i=0;
- iic_start();
- IICSendByte(PCF8591_WRITE); //控制字
- check_ACK();
- if(F0 == 1)
- {
- SystemError = 1;
- return;
- }
- IICSendByte(controlbyte); //控制字
- check_ACK();
- if(F0 == 1)
- {
- SystemError = 1;
- return;
- }
- iic_start(); //重新發送開始命令
- IICSendByte(PCF8591_READ); //控制字
- check_ACK();
- if(F0 == 1)
- {
- SystemError = 1;
- return;
- }
-
- IICreceiveByte(); //空讀一次,調整讀順序
- slave_ACK(); //收到一個字節后發送一個應答位
- while(i<4)
- {
- receive_da=IICreceiveByte();
- receivebuf[i++]=receive_da;
- slave_ACK(); //收到一個字節后發送一個應答位
- }
- slave_NOACK(); //收到最后一個字節后發送一個非應答位
- iic_stop();
- }
- //-------------------------------------------------------------------
- // 函數名稱: main
- // 函數功能: 主程序
- //-------------------------------------------------------------------
- main()
- {
- uchar i,l;
- delay(10); //延時
- cmg88();//關數碼管,點陣函數
- DS1302 =0;
- lcd_init(); //初始化LCD
-
- lcd_pos(0); //設置顯示位置為第一行的第1個字符
- i = 0;
- while(dis4[i] != '\0')
- { //顯示字符
- lcd_wdat(dis4[i]);
- i++;
- }
- lcd_pos(0x40); //設置顯示位置為第二行第1個字符
- i = 0;
- while(dis5[i] != '\0')
- {
- lcd_wdat(dis5[i]); //顯示字符
- i++;
- }
-
- while(1)
- {
- iicInit(); //I2C總線初始化
- ADC_PCF8591(0x04);
- if(SystemError == 1) //有錯誤,重新來
- {
- iicInit(); //I2C總線初始化
- ADC_PCF8591(0x04);
- }
-
- for(l=0;l<4;l++)
- {
- show_value(receivebuf[0]); //顯示通道0
- lcd_pos(0x02);
- lcd_wdat(dis[2]); //整數位顯示
- lcd_pos(0x04);
- lcd_wdat(dis[1]); //第一位小數顯示
- lcd_pos(0x05);
- lcd_wdat(dis[0]); //第二位小數顯示
- show_value(receivebuf[1]); //顯示通道1
- lcd_pos(0x0b);
- lcd_wdat(dis[2]); //整數位顯示
- lcd_pos(0x0d);
- lcd_wdat(dis[1]); //第一位小數顯示
- lcd_pos(0x0e);
- lcd_wdat(dis[0]); //第二位小數顯示
- show_value(receivebuf[2]); //顯示通道2
- lcd_pos(0x42);
- lcd_wdat(dis[2]); //整數位顯示
- lcd_pos(0x44);
- lcd_wdat(dis[1]); //第一位小數顯示
- lcd_pos(0x45);
- lcd_wdat(dis[0]); //第二位小數顯示
- show_value(receivebuf[3]); //顯示通道3
- lcd_pos(0x4b);
- lcd_wdat(dis[2]); //整數位顯示
- lcd_pos(0x4d);
- lcd_wdat(dis[1]); //第一位小數顯示
- lcd_pos(0x4e);
- lcd_wdat(dis[0]); //第二位小數顯示
- iicInit(); //I2C總線初始化
- DAC_PCF8591(0x40,receivebuf[0]); //D/A輸出
- if(SystemError == 1) //有錯誤,重新來
- {
- iicInit(); //I2C總線初始化
- DAC_PCF8591(0x40,receivebuf[0]); //D/A輸出
- }
- //delay(50); //延時
- }
- }
- }
復制代碼 |