單片機感測器編程

① avr單片機18B20溫度感測器編程

;這是關於DS18B20的讀寫程序,數據腳P2.2,晶振12MHZ
;溫度感測器18B20匯編程序,採用器件默認的12位轉化,最大轉化時間750微秒
;可以將檢測到的溫度直接顯示到AT89C51開發實驗板的兩個數碼管上
;顯示溫度00到99度,很准確哦~~無需校正!
ORG 0000H ;單片機內存分配申明!
TEMPER_L EQU 29H;用於保存讀出溫度的低8位
TEMPER_H EQU 28H;用於保存讀出溫度的高8位
FLAG1 EQU 38H;是否檢測到DS18B20標志位
a_bit equ 20h ;數碼管個位數存放內存位置
b_bit equ 21h ;數碼管十位數存放內存位置
TEMP_TH EQU
MAIN:
LCALL GET_TEMPER;調用讀溫度子程序 ,顯示範圍00到99度,顯示精度為1度
;因為12位轉化時每一位的精度為0.0625度,我們不要求顯示小數所以可以拋棄29H的低4位
;將28H中的低4位移入29H中的高4位,這樣獲得一個新位元組,這個位元組就是實際測量獲得的溫度
MOV A,29H
MOV C,40H;將28H中的最低位移入C
RRC A
MOV C,41H
RRC A
MOV C,42H
RRC A
MOV C,43H
RRC A
MOV 29H,A
LCALL DISPLAY ;調用數碼管顯示子程序
CPL P1.0
AJMP MAIN
; 這是DS18B20復位初始化子程序
INIT_1820:
SETB P3.5
NOP
CLR P3.5 ;主機發出延時537微秒的復位低脈沖
MOV R1,#3
TSR1:MOV R0,#107
DJNZ R0,$
DJNZ R1,TSR1
SETB P3.5 ;然後拉高數據線
NOP
NOP
NOP
MOV R0,#25H
TSR2:
JNB P3.5,TSR3 ;等待DS18B20回應
DJNZ R0,TSR2
LJMP TSR4 ; 延時
TSR3:
SETB FLAG1 ; 置標志位,表示DS1820存在
CLR P1.7 ;檢查到DS18B20就點亮P1.7LED
LJMP TSR5
TSR4:
CLR FLAG1 ; 清標志位,表示DS1820不存在
CLR P1.1 ;點亮P1。1腳LED表示溫度感測器通信失敗
LJMP TSR7
TSR5:
MOV R0,#117
TSR6:
DJNZ R0,TSR6 ; 時序要求延時一段時間
TSR7:
SETB P3.5
RET

; 讀出轉換後的溫度值
GET_TEMPER:
SETB P3.5
LCALL INIT_1820 ;先復位DS18B20
JB FLAG1,TSS2
CLR P1.2
RET ; 判斷DS1820是否存在?若DS18B20不存在則返回
TSS2:
CLR P1.3 ;DS18B20已經被檢測到!!!!!!!!!!!!!!!!!!
MOV A,#0CCH
LCALL WRITE_1820
MOV A,#44H ;發出溫度轉換命令
LCALL WRITE_1820
;這里通過調用顯示子程序實現延時一段時間,等待AD轉換結束,12位的話750微秒
LCALL DISPLAY
LCALL INIT_1820 ;准備讀溫度前先復位
MOV A,#0CCH ; 跳過ROM匹配
LCALL WRITE_1820
MOV A,#0BEH ; 發出讀溫度命令
LCALL WRITE_1820
LCALL READ_18200; 將讀出的溫度數據保存到35H/36H
CLR P1.4
RET

;寫DS18B20的子程序(有具體的時序要求)
WRITE_1820:
MOV R2,#8;一共8位數據
CLR C
WR1:
CLR P3.5
MOV R3,#6
DJNZ R3,$
RRC A
MOV P3.5,C
MOV R3,#23
DJNZ R3,$
SETB P3.5
NOP
DJNZ R2,WR1
SETB P3.5
RET

; 讀DS18B20的程序,從DS18B20中讀出兩個位元組的溫度數據
READ_18200:
MOV R4,#2 ; 將溫度高位和低位從DS18B20中讀出
MOV R1,#29H ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)
RE00:
MOV R2,#8;數據一共有8位
RE01:
CLR C
SETB P3.5
NOP
NOP
CLR P3.5
NOP
NOP
NOP
SETB P3.5
MOV R3,#9
RE10:
DJNZ R3,RE10
MOV C,P3.5
MOV R3,#23
RE20:
DJNZ R3,RE20
RRC A
DJNZ R2,RE01
MOV @R1,A
DEC R1
DJNZ R4,RE00
RET

;顯示子程序
display: mov a,29H;將29H中的十六進制數轉換成10進制
mov b,#10 ;10進制/10=10進制
div ab
mov b_bit,a ;十位在a
mov a_bit,b ;個位在b
mov dptr,#numtab ;指定查表啟始地址
mov r0,#4
dpl1: mov r1,#250 ;顯示1000次
dplop: mov a,a_bit ;取個位數
MOVC A,@A+DPTR ;查個位數的7段代碼
mov p1,a ;送出個位的7段代碼
setb p2.0 ;開個位顯示
acall d1ms ;顯示1ms
clr p2.0
mov a,b_bit ;取十位數
MOVC A,@A+DPTR ;查十位數的7段代碼
mov p1,a ;送出十位的7段代碼
setb p2.1 ;開十位顯示
acall d1ms ;顯示1ms
clr p2.1
djnz r1,dplop ;100次沒完循環
djnz r0,dpl1 ;4個100次沒完循環
ret
;1MS延時(按12MHZ算)
D1MS: MOV R7,#80
DJNZ R7,$
RET
numtab: ;數碼管共陽極0～9代碼
DB 0C0H,0F9H,0A4H,0B0H,99H, 92H,82H,0F8H,80H,90H
end

感覺對你有用就賞分吧~

② 基於AT89C51單片機和DS18B20溫度感測器、LCD1602液晶顯示的高精度數字溫度計程序，用C語言編程

/***********ds18b20子程序*************************/

/***********ds18b20延遲子函數（晶振12MHz ）*******/
#include<reg51.h>
sbit DQ=P1^2;
#define uchar unsigned char

void delay_18B20(unsigned int i)
{
while(i--);
}

/**********ds18b20初始化函數**********************/

void Init_DS18B20(void)
{
unsigned char x=0;
DQ = 1; //DQ復位
delay_18B20(8); //稍做延時
DQ = 0; //單片機將DQ拉低
delay_18B20(80); //精確延時 大於 480us
DQ = 1; //拉高匯流排
delay_18B20(4);
x=DQ; //稍做延時後 如果x=0則初始化成功 x=1則初始化失敗
delay_18B20(20);
}

/***********ds18b20讀一個位元組**************/

unsigned char ReadOneChar(void)
{
uchar i=0;
uchar dat = 0;
for (i=8;i>0;i--)
{
DQ = 0; // 給脈沖信號
dat>>=1;
DQ = 1; // 給脈沖信號
if(DQ)
dat|=0x80;
delay_18B20(4);
}
return(dat);
}

/*************ds18b20寫一個位元組****************/

void WriteOneChar(uchar dat)
{
unsigned char i=0;
for (i=8; i>0; i--)
{
DQ = 0;
DQ = dat&0x01;
delay_18B20(5);
DQ = 1;
dat>>=1;
}
}

/**************讀取ds18b20當前溫度************/

ReadTemp(void)
{ float val;
uchar temp_value,value;
unsigned char a=0;
unsigned char b=0;
unsigned char t=0;

Init_DS18B20();
WriteOneChar(0xCC); // 跳過讀序號列號的操作
WriteOneChar(0x44); // 啟動溫度轉換

delay_18B20(100); // this message is wery important

Init_DS18B20();
WriteOneChar(0xCC); //跳過讀序號列號的操作
WriteOneChar(0xBE); //讀取溫度寄存器等（共可讀9個寄存器） 前兩個就是溫度

delay_18B20(100);

a=ReadOneChar(); //讀取溫度值低位
b=ReadOneChar(); //讀取溫度值高位
temp_value=b<<4;
temp_value+=(a&0xf0)>>4;
value=a&0x0f;
val=temp_value+value;
return(val);

}
以上是DS18B20的驅動程序。然後在主程序中直接調用函數就可以了。
以上是在主程序中的調用，你看關於溫度的那個就可以。
#include "reg51.h"
#include "18b20.h"
#define uchar unsigned char
#define uint unsigned int
uchar code table[]="Welcome To" ;//初始化日期和星期
uchar code table1[]="Our System!";//初始化時間

uchar code table2[]="Temperature is:";//初始化時間

//以下三個是定義LCD的引腳
sbit lcden=P2^2;
sbit lcdwrite=P2^1;
sbit lcdrs=P2^0;

char wen;

//延時程序
void delay(uint z)
{ uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}

//lcd的寫指令
void write_com(uchar com)
{
lcdrs=0;
lcden=0;
P0=com;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

//lcd的寫數據
void write_data(uchar da)
{ lcdrs=1;
lcden=0;
P0=da;
delay(5);
lcden=1;
delay(5);
lcden=0;
}

//初始化
void init()
{
uchar num;

lcdwrite=0;
lcden=0;
write_com(0x38); //16*2顯示，5*7點陣，8位數據
write_com(0x0c);//顯示開，關游標
write_com(0x06); //移動游標
write_com(0x01);//清除LCD的顯示內容

write_com(0x80);
for (num=0;num<10;num++)
{
write_data(table[num]);
delay(5);
}

write_com(0x80+0x40);

for (num=0;num<11;num++)
{
write_data(table1[num]);
delay(5);
}

}

void write_wen(uchar add, char da)
{
uchar shi,ge;
shi=da/10;
ge=da%10;
write_com(0x80+0x40+add);
write_data(0x30+shi);
write_data(0x30+ge);
}

//主函數
void main ()
{

uchar num;

init();
delay(2000);

delay(2000);
delay(2000);

write_com(0x01);//清除LCD的顯示內容

while(1)
{

write_com(0x80);
for (num=0;num<15;num++)
{
write_data(table2[num]);
delay(5);
}

wen = ReadTemp( );
write_wen(2,wen);
}
}

③ 誰有空幫我用52單片機和振動感測器編程，懸賞100分，測試成功後追加100分

enum { eInit, eWork, eAlarm1, eAlarm2 } eState = eInit;
while ( 1 )
{
switch( eState )
{
case eInit:
if ( KeyS1 )
{
eState = eWork;
}
else if ( KeyS2 )
{
}
else if ( KeyS3 )
{
ibeep = 30;
}
break;
case eWork:
if ( KeyJD )
{
ibeep = 10;         //  蜂鳴器鳴響時間
eState = eAlarm1;
}
else if ( KeyS1 )
{
}
else if ( KeyS2 )
{
eState = eInit; //  解除工作狀態
}
else if ( KeyS3 )
{
ibeep = 30;
}
else
{
}
break;
case eAlarm1:
if ( KeyJD )
{
ibeep = 60;
eState = eAlarm2;
}
else if ( KeyS1 )
{
}
else if ( KeyS2 )
{
eState = eInit;
}
else if ( KeyS3 );
{
ibeep = 30;
}
break;
case eAlarm2:
if ( KeyJD )
{
ibeep = 60;
eState = eAlarm2;
}
else if ( KeyS1 )
{
}
else if ( KeyS2 )
{
eState = eInit;
}
else if ( KeyS3 );
{
ibeep = 30;
}
break;
}
if ( ibeep > 0 )
{
//  響鈴1秒鍾;
-- ibeep;
}
}

搞不懂你的外部介面，你說的這些用狀態機做，雖然有點繁瑣，但好在條理清楚，比較好改好調。