/*******************************************************************/
/*                                                                 */
/* ME300B單片機開發系統演示程序 - DS18B20溫度顯示                  */
/*                                                                 */
/* LCD1602顯示                                                     */
/*                                                                 */
/* 工作芯片：ATMGA8515L   工作頻率：8MHz                           */
/*                                                                 */
/* 版本： V1.0 (2006/11/20)                                        */
/* 作者： gguoqing (Email: gguoqing@willar.com)                    */
/* 網站： www.willar.com(偉納電子)   www.mcusj.com(偉納單片機世界) */
/* 郵箱： support@willar.com                                       */
/*                                                                 */                                                               
/*【版權】Copyright(C)偉納電子 www.willar.com  All Rights Reserved */
/*【聲明】此程序僅用于學習與參考，引用請注明版權和作者信息！       */
/*                                                                 */
/*******************************************************************/

#include "avr/io.h"         //頭文件
#include "avr/delay.h"      //頭文件
#include <compat/ina90.h>   //定義_NOP(),_CLI(),_SEI()

#define uchar unsigned char
#define uint  unsigned int

#define  BEEP  PD7       //蜂鳴器
#define  DQ    PD3	     //ds18b20的DQ
#define  FREQ  8         //芯片工作頻率
#define  busy  PA7       //LCD_DB7

#define  LCD_RS   PC0    //LCD1602控制端口
#define  LCD_RW   PC1
#define  LCD_EN   PC2

uchar m,presence;
									  
uchar temp_data[2] = {0x00,0x00};

uchar display[5] =   {0x00,0x00,0x00,0x00,0x00};

uchar ditab[16] =    {0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,
                      0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};

uchar  mytab[8] =    {0x0C,0x12,0x12,0x0C,0x00,0x00,0x00,0x00};

uchar   cdis1[ ] = {"   DS18B20 OK   "};
uchar   cdis2[ ] = {"  TEMP:    .  C "};
uchar   cdis3[ ] = {" DS18B20  ERR0R "};
uchar   cdis4[ ] = {"  PLEASE CHECK  "};

/********************** 函數聲明 ************************/

void  lcd_init(void);
void  lcd_wcmd(uchar command,uchar wait_en);
void  lcd_wdat(uchar dat);
void  lcd_busy(void);
void  lcd_pos(uchar pos);

void  Error_Menu (void);
void  Ok_Menu (void);
void  Disp_Temperature(void);
 
/********************************************************/
/*                                                      */
/* N*ms延時函數                                         */
/*                                                      */
/********************************************************/    
void delay_nms(uint n)        
   { 
      uint i=0 ; 
      for (i=0 ;i<n ;i++) 
      _delay_loop_2(250*FREQ) ;
   }
 
/********************************************************/
/*                                                      */
/* y*us延時函數                                         */
/*                                                      */
/********************************************************/   
void  Delay(uint y)
  { 
    _delay_loop_2(2*y);
  }
  
/********************************************************/
/*                                                      */
/* 蜂鳴器驅動函數                                       */
/*                                                      */
/********************************************************/
void beep(void)
  {
    uchar i;
    for (i=0;i<100;i++)
    {
      PORTD&=~_BV(BEEP);
      Delay(500);
      PORTD=_BV(BEEP);
      Delay(500);
    } 
    PORTD|=_BV(BEEP);           //關閉蜂鳴器
	delay_nms(200); 
  } 
   
/********************************************************/
/*                                                      */
/* IO口初始化                                            */
/*                                                      */
/********************************************************/
void  init_io(void)
  {
    DDRA=0xFF;       //置PA口輸出
    PORTA=0xFF;      //PA口設置內部上拉電阻 
    DDRB=0xFF;       //置PB口輸出
    PORTB=0xFF;      //PB口設置內部上拉電阻
    DDRC=0xFF;       //置PC口輸出
    PORTC=0xFF;      //PC口設置內部上拉電阻
    DDRD=0xFF;       //置PD口輸出
    PORTD=0xFF;      //PD口設置內部上拉電阻
  }

/*********************************************************/
/*                                                       */
/* 初始化DS18B20                                         */ 
/*                                                       */ 
/*********************************************************/
int Init_DS18B20(void)
{    
    PORTD|=_BV(DQ);       //DQ復位
    Delay(70);            //稍做延時70us    

    PORTD&=~_BV(DQ);      //將DQ拉低  
    Delay(780);           //精確延時780us 大于 480us
    PORTD|=_BV(DQ);       //拉高總線
    
    DDRD&=~_BV(DQ);       //置PD3為輸入
    Delay(70);            //稍做延時
   
    if(PIND&_BV(DQ))      //如果=0則初始化成功 =1則初始化失敗
     presence = 1;
    else  
	 presence = 0;
          
    Delay(870);           //精確延時870us
    DDRD  |=_BV(DQ);      //置PD3為輸出 
    PORTD |=_BV(DQ);      //釋放總線 
     
    return(presence);    //返回信號，0=presence,1= no presence
}
/*********************************************************/
/*                                                       */
/* 讀一個字節                                            */
/*                                                       */
/*********************************************************/
int ReadOneChar(void)
 {
    uchar i = 0;
    uchar dat = 0;

    for (i = 8; i > 0; i--)
    {
      PORTD&=~_BV(DQ);      //總線為低電平
      dat >>= 1;
    
      PORTD|=_BV(DQ);       //總線為高電平(釋放總線)   
      DDRD&=~_BV(DQ);       //置PD3為輸入
        
      if(PIND&_BV(DQ))
      dat |= 0x80;
      Delay(70);
      DDRD |=_BV(DQ);  
      PORTD|=_BV(DQ);  
    }
    return (dat);
 }

/**********************************************************/
/*                                                        */
/* 寫一個字節                                             */
/*                                                        */
/**********************************************************/
void WriteOneChar(uchar dat)
{
  uchar i = 0;
  
  for (i = 8; i > 0; i--)
  {
    PORTD&=~_BV(DQ);
 
    if(dat&0x01)
     PORTD|=_BV(DQ);      //寫"1" 
	else     
	 PORTD&=~_BV(DQ);     //寫"0"

    Delay(70);
    PORTD|=_BV(DQ);        
    dat>>=1;
  }
}

/*********************************************************/
/*                                                       */
/* 讀取溫度                                              */
/*                                                       */
/*********************************************************/
void Read_Temperature(void)
{
   Init_DS18B20();
   if(presence==1)
   { beep();}
   else        
   {
     WriteOneChar(0xCC);  // 跳過讀序號列號的操作
     WriteOneChar(0x44);  // 啟動溫度轉換

     Init_DS18B20();
     WriteOneChar(0xCC);  //跳過讀序號列號的操作
     WriteOneChar(0xBE);  //讀取溫度寄存器
     
     temp_data[0] = ReadOneChar();   //溫度低8位
     temp_data[1] = ReadOneChar();   //溫度高8位
    }
}

/*************************************************************/
/*                                                           */
/*  LCD初始化設定                                            */
/*                                                           */
/*************************************************************/
void lcd_init(void)