/*********************************************************************************** 
;功能說明:DHT90與LCD1602的溫濕度顯示KeilC程序
;文件名稱:DHT90.c     
;微處理器:AT89S52
;編譯環境:Keil uVision V2.38a 
;作    者:Huang Yanxiang
;版    權:(c)Huang Yanxiang
;創建日期:2008.08.15    
;版    本:V1.2  
;修改日期:2008.08.26
;修改說明:添加了一個LCD_disp_str()函數，修改了延時函數的注釋。
;***********************************************************************************/

/*************定義接口********************
         P0------DB0～DB7  (LCD1602)     
         P2.0------RS      (LCD1602)
         P2.1------RW      (LCD1602)
         P2.2------E       (LCD1602)
   P2.6------SCK     (DHT90)
   P2.7------DATA    (DHT90)
*****************************************/

#include <AT89x51.h>
#include <intrins.h> 
#include <math.h>    //Keil library   
#include <stdio.h>   //Keil library 

//*********************第一部分LCD1602設置 START****************************************
#define LCD_DB        P0
        sbit         LCD_RS=P2^0;   //P2^0是p2.0的意思；LCD_RS與P2.0等效起來，對LCD_RS 讀寫，就是對P2.0讀寫 好處在于LCD_RS含義直接明了，寫程序多了就會知道有必要de
        sbit         LCD_RW=P2^1;   //P2^1是p2.1的意思
        sbit         LCD_E=P2^2;    //P2^2是p2.2的意思

/******定義函數****************/
#define uchar unsigned char
#define uint unsigned int
void LCD_init(void);                          //初始化函數
void LCD_write_command(uchar command);        //寫指令函數
void LCD_write_data(uchar dat);               //寫數據函數
void LCD_disp_char(uchar x,uchar y,uchar dat);//在某個屏幕位置上顯示一個字符,X（0-15),y(1-2)
void LCD_disp_str(uchar x,uchar y,uchar *str); //LCD1602顯示字符串函數
void delay_n10us(uint n);                     //延時函數

/*-------------------------------------- 
;模塊名稱:LCD_init(); 
;功    能:初始化LCD1602 
;占用資源:--
;參數說明:--
;創建日期:2008.08.15 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:--
;-------------------------------------*/ 
void LCD_init(void)
{
delay_n10us(10);
LCD_write_command(0x38);//設置8位格式，2行，5x7
delay_n10us(10);
LCD_write_command(0x0c);//整體顯示，關光標，不閃爍
delay_n10us(10);
LCD_write_command(0x06);//設定輸入方式，增量不移位
delay_n10us(10);
LCD_write_command(0x01);//清除屏幕顯示
delay_n10us(100);       //延時清屏，延時函數，延時約n個10us
}

/*-------------------------------------- 
;模塊名稱:LCD_write_command(); 
;功    能:LCD1602寫指令函數 
;占用資源: P2.0--RS(LCD_RS),P2.1--RW(LCD_RW),P2.2--E(LCD_E).
;參數說明:dat為寫命令參數
;創建日期:2008.08.15 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:--
;-------------------------------------*/ 
void LCD_write_command(uchar dat)
{
delay_n10us(10);
LCD_RS=0;         //指令
LCD_RW=0;         //寫入
LCD_E=1;          //允許
LCD_DB=dat;
delay_n10us(10);  //實踐證明，我的LCD1602上，用for循環1次就能完成普通寫指令。
LCD_E=0;
delay_n10us(10);  //實踐證明，我的LCD1602上，用for循環1次就能完成普通寫指令。
}

/*-------------------------------------- 
;模塊名稱:LCD_write_data(); 
;功    能:LCD1602寫數據函數 
;占用資源: P2.0--RS(LCD_RS),P2.1--RW(LCD_RW),P2.2--E(LCD_E).
;參數說明:dat為寫數據參數
;創建日期:2008.08.15 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:--
;-------------------------------------*/
void LCD_write_data(uchar dat)
{
delay_n10us(10);
LCD_RS=1;          //數據
LCD_RW=0;          //寫入
LCD_E=1;           //允許
LCD_DB=dat;
delay_n10us(10);
LCD_E=0;
delay_n10us(10);
}

/*-------------------------------------- 
;模塊名稱:LCD_disp_char(); 
;功    能:LCD1602顯示一個字符函數，在某個屏幕位置上顯示一個字符,X（0-15),y(1-2)。
;占用資源:--
;參數說明:X為1602的列值(取值范圍是0-15),y為1602的行值(取值范圍是1-2)，dat為所要顯示字符對應的地址參數。
;創建日期:2008.08.15 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:--
;-------------------------------------*/
void LCD_disp_char(uchar x,uchar y,uchar dat)
{
  uchar address;
  if(y==1)
         address=0x80+x;
  else
         address=0xc0+x;
  LCD_write_command(address);
  LCD_write_data(dat);
}

/*-------------------------------------- 
;模塊名稱:LCD_disp_str(); 
;功    能:LCD1602顯示字符串函數，在某個屏幕起始位置{X（0-15),y(1-2)}上顯示一個字符串。
;占用資源:--
;參數說明:X為1602的列值(取值范圍是0-15),y為1602的行值(取值范圍是1-2)，str為所要顯示字符串對應的指針參數。
;創建日期:2008.08.16 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:-- 
;-------------------------------------*/
void LCD_disp_str(uchar x,uchar y,uchar *str)
{
  uchar address;
  if(y==1)
         address=0x80+x;
  else
         address=0xc0+x;
  LCD_write_command(address);
  while(*str!='\0')
  { 
    LCD_write_data(*str);   
    str++;
  }
}

/*-------------------------------------- 
;模塊名稱:delay_n10us(); 
;功    能:延時函數，延時約n個10us
;占用資源:--
;參數說明:--
;創建日期:2008.08.15 
;版    本:FV1.1(函數版本Function Version)
;修改日期:2008.08.26
;修改說明:修改為較精確的延時函數,"_nop_()"延時1us@12M晶振
;-------------------------------------*/
void delay_n10us(uint n)  //延時n個10us@12M晶振
{       
        uint i;           
        for(i=n;i>0;i--)    
        {
        _nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); 
  }
}  

//*********************第一部分LCD1602設置 END****************************************

//*********************第二部分DHT90設置   START**************************************** 
sbit SCK  = P2^6;      //定義通訊時鐘端口
sbit DATA = P2^7;      //定義通訊數據端口

typedef union  
{ unsigned int i;      //定義了兩個共用體
  float f; 
} value; 

enum {TEMP,HUMI};      //TEMP=0,HUMI=1

#define noACK 0             //用于判斷是否結束通訊
#define ACK   1             //結束數據傳輸
                            //adr  command  r/w 
#define STATUS_REG_W 0x06   //000   0011    0 
#define STATUS_REG_R 0x07   //000   0011    1 
#define MEASURE_TEMP 0x03   //000   0001    1 
#define MEASURE_HUMI 0x05   //000   0010    1 
#define RESET        0x1e   //000   1111    0 

/****************定義函數****************/
void s_transstart(void);               //啟動傳輸函數
void s_connectionreset(void);          //連接復位函數
char s_write_byte(unsigned char value);//DHT90寫函數
char s_read_byte(unsigned char ack);   //DHT90讀函數
char s_measure(unsigned char *p_value, unsigned char *p_checksum, unsigned char mode);//測量溫濕度函數
void calc_dht90(float *p_humidity ,float *p_temperature);//溫濕度補償

/*-------------------------------------- 
;模塊名稱:s_transstart(); 
;功    能:啟動傳輸函數
;占用資源:--
;參數說明:--
;創建日期:2008.08.15 
;版    本:FV1.0(函數版本Function Version)
;修改日期:--
;修改說明:--
;-------------------------------------*/  
void s_transstart(void) 
// generates a transmission start  
//       _____         ________ 
// DATA:      |_______| 
//           ___     ___ 
// SCK : ___|   |___|   |______ 
{   
   DATA=1; SCK=0;                   //Initial state