深圳市英銳恩科技有限公司:臺灣麥肯單片機(Micon MDT單片機)亞太地區A級代理商

QLdsPIC3]DS18B20[C30+dsPIC30F6014A]
//實驗目的：熟悉DS18B20的使用
//轉換結果送LCD1602顯示（其中整數部分3位，小數點部分4位，小數點1位）
//每隔0.1S轉換一次。
//硬件要求：把DS18B20插在18B20插座上
//          跳線J5接通
//          跳線J18全部接通

#include             //dsPIC30F6014標準頭文件

  _FOSC(0x0ffe5);                 //XT振蕩，4倍頻晶振.
  _FWDT(WDT_OFF);                 //關閉看門狗定時器
  _FBORPOR(PBOR_OFF & MCLR_EN);   //掉電復位禁止，MCLR復位使能。
  _FGS(CODE_PROT_OFF);            //代碼保護禁止

#define  uch unsigned char                     //給unsigned char起別名 uch
# define DQ PORTFbits.RF6                      //定義18B20數據端口
# define DQ_DIR TRISFbits.TRISF6               //定義18B20D口方向寄存器
# define DQ_HIGH() DQ_DIR =1                   //設置數據口為輸入
# define DQ_LOW() DQ = 0; DQ_DIR = 0           //設置數據口為輸出

#define rs LATBbits.LATB4          //定義LCD控制位(注意這里只能用LATB寄存器，不能直接用PORTB寄存器）
#define rw LATBbits.LATB5
#define e  LATBbits.LATB6
                       
unsigned char __attribute__((address(0x900))) TLV;   //采集到的溫度高8位
unsigned char __attribute__((address(0x902))) THV;   //采集到的溫度低8位
unsigned char __attribute__((address(0x904))) TZ;    //轉換后的溫度值整數部分
unsigned char __attribute__((address(0x906))) TX;    //轉換后的溫度值小數部分
unsigned int  __attribute__((address(0x908))) wd;    //轉換后的溫度值BCD碼形式
unsigned char __attribute__((address(0x9a0))) loop;  //LCD顯示次數計數器

unsigned char __attribute__((address(0x930))) result[8]={0,0,0,'.',0,0,0,0};

//****************延時函數**************************************
//延時函數(延時時間為(2+x)us）
void delay(  char x)
{
   unsigned char i;
   for(i=0;i<x;i++);
}

//*****************寫一個字節數據函數***************************
//在電平發生改變后需要插入一段延時時間，否則LCD反應不過來。
void write(unsigned char x)
 {
  PORTD=x;                   //待顯示數據送PORTD口
  delay(98);                  
  rs=1;                      //該字節數據為數據，而不是命令
  delay(98);
  rw=0;                      //此次操作為寫，而不是讀
  delay(98);
  e=0;                       //拉低使能信號
  delay(98);                   //保持使能信號為低一段時間
  e=1;                       //拉高使能信號，建立LCD操作所需要的上升沿
  delay(98);
 }

//******************LCD顯示設置函數*****************************
//在電平發生改變后需要插入一段延時時間，否則LCD反應不過來。
void lcd_enable()
 {
   delay(98);
   rs=0;                     //該字節數據為命令，而不是數據
   delay(98);
   rw=0;                     //此次操作為寫，而不是讀
   delay(98);
   e=0;                      //拉低使能信號
   delay(98);                  //保持使能信號為低一段時間
   e=1;                      //拉高使能信號，建立LCD操作所需要的上升沿
   delay(98);
}

//------------------------------------------------
//系統初始化函數
void init()
{
  TRISF=0X0000;                                 //先設置18B20口方向為輸出
  TRISB=0X0000;                                 //設置B口方向為輸出
  TRISD=0X0000;                                 //設置D口方向為輸出
  IFS0bits.T1IF=0;                              //先清除定時器中斷標志位
  PR1=0XFFFF;                                   //周期定最大
  T1CON=0X0020;                                 //分頻比為1：64
}

//*******************LCD初始化函數*******************************
void lcd_init()
 {
    PORTD=0X1;                 //清除顯示
    lcd_enable();
    PORTD=0X38;                //8位2行5*7點陣
    lcd_enable();
    PORTD=0X0e;                //顯示開，光標開，閃爍
    lcd_enable();
    PORTD=0X06;                //文字不動，光標右移
    lcd_enable();
 }
 
//*********************LCD顯示函數*******************************
void display()
 {
    PORTD=0X84;                //顯示首地址
    lcd_enable();
    for(loop=0;loop<8;loop++)  //共顯示8位
      {
        write(result[loop]);   //查表并送顯示
        delay(100);            //插入一定延時
      }
 }

//******************復位DS18B20函數*****************************
//主控制器（dsPIC30F6014A）先拉低總線480us，然后釋放總線回到高電平
//18B20檢測到上升沿后先等待15-60us，然后拉低總線做為復位的應答信號
//主控制器釋放總線后到復位結束時間應為480US
reset(void)
{
  char presence=1;
  while(presence)
  {
    DQ_LOW() ;                                //主機拉至低電平
    delay(100);                        
    delay(100);  
    delay(100);  
    delay(100);
    delay(78);                                //以上5條共延時480us
    DQ_HIGH();                                //釋放總線等電阻拉高總線,并保持15~60us
    delay(38);                                //延時40us       
    if(DQ==1) presence=1;                     //沒有接收到應答信號，繼續復位
    else presence=0;                          //接收到應答信號
    delay(100);                        
    delay(100);  
    delay(100);  
    delay(100);
    delay(38);                                //以上5條共延時440us
   }
  }

//****************寫18b20寫字節函數*****************************
//主控制器寫數據1：先把總線拉低，然后在15us內釋放總線
//主控制器寫數據0：把總線拉低至少60us
//寫一位數據至少需要60us
//兩位數據之間至少延時1us
void write_byte(uch val)
{
 uch i;
 uch temp;
 for(i=8;i>0;i--)
 {
   temp=val&0x01;                            //最低位移出
   DQ_LOW();
   delay(3);                                 //保持拉低5us
   if(temp==1)  DQ_HIGH();                   //如果寫1,拉高電平
   delay(58);                                //延時60us
   DQ_HIGH();
   delay(1);                                 //在兩位之間插入3us延時
   val=val>>1;                               //右移一位
  }
}

//****************18b20讀字節函數********************************
//主控制器把總線拉低至少1US，然后釋放
//主控制器讀數據1：18B20保持總線狀態不變
//主控制器讀數據0：18B20檢測到總線拉低后繼續拉低總線至少60ms
//主控制器在拉低總線后的15us讀取總線上的狀態
//讀取1位數據至少需要60us
uch read_byte(void)
{
 uch i;
 uch value=0;                                //讀出溫度
 for(i=8;i>0;i--)
 {
   value>>=1;
   DQ_LOW();
   delay(1);                                //保持總線拉低3us
   DQ_HIGH();                               //拉至高電平
   delay(5);                                //釋放總線后保持7us再讀取數據
   if(DQ) value|=0x80;
   delay(48);                               //延時50us，保證每1位的60us延時
  }
  return(value);
}

//-------------------------------------------------
//啟動溫度轉換函數
void get_temp()
{
int i;
DQ_HIGH();                              
reset();                                 //復位等待從機應答
write_byte(0XCC);                        //忽略ROM匹配
write_byte(0X44);                        //發送溫度轉化命令
for(i=0;i<8;i++)
    {
       
      delay(98);                         //確保溫度轉換完成所需要的時間
    }
reset();                                 //再次復位，等待從機應答
write_byte(0XCC);                        //忽略ROM匹配
write_byte(0XBE);                        //發送讀溫度命令
TLV=read_byte();                         //讀出溫度低8
THV=read_byte();                         //讀出溫度高8位
DQ_HIGH();                               //釋放總線
TZ=(TLV>>4)|(THV<<4)&0X3f;               //溫度整數部分
TX=TLV<<4;                               //溫度小數部分

result[0]=(TZ/100)+0x30;                 //整數百位
result[1]=((TZ%100)/10)+0X30;            //整數十位
result[2]=((TZ%100)%10)+0X30;            //整數部分個位          
wd=0;
if (TX & 0x80) wd=wd+5000;
if (TX & 0x40) wd=wd+2500;
if (TX & 0x20) wd=wd+1250;
if (TX & 0x10) wd=wd+625;                //以上4條指令把小數部分轉換為BCD碼形式            
result[4]=(wd/1000)+0x30;                //十分位
result[5]=((wd%1000)/100)+0x30;          //百分位
result[6]=((wd%100)/10)+0x30;            //千分位
result[7]=(wd%10)+0x30;                  //萬分位
}

//--------------------------------------------------
//主豬函數
int main(void)
{
   init();                              //調用系統初始化函數
   lcd_init();                          //LCD初始化函數
   while(1)
     {
       TMR1=0XC2F6;                     //定時器初值
       T1CONbits.TON=1;                 //啟動定時器
       while(!IFS0bits.T1IF);           //等待0.1s定時到
       IFS0bits.T1IF=0;
       get_temp();                      //調用溫度轉換函數
       display();                       //調用結果顯示函數
     }
}