text11111lcd

温度传感器18B20汇编程序,采用器件默认的12位转化,最大转化时间750微秒 可以将检测到的温度直接显示到AT89C51开发实验板的两个数码管上 显示温度00到99度,很准确哦~~无需校正!

      E   EQU P2.7
RW  EQU P2.6
RS  EQU P2.5
LW  EQU P0

ORG 0000H
LJMP LCD
ORG 0030H

LCD:
LCALL DELAY1
LCALL DELAY1

MOV LW,#01H;
LCALL WRITE1
MOV LW,#02H;
LCALL WRITE1 
MOV LW,#06H;
LCALL WRITE1 
MOV LW,#0CH;
LCALL WRITE1 
MOV LW,#18H;
LCALL WRITE1
MOV LW,#38H;
LCALL WRITE1
MOV LW,#80h;
LCALL WRITE1


START1:
MOV LW,#80H
ACALL WRITE1
MOV A,#'A'
MOV LW,A
LCALL WRITE2
LJMP START1

WRITE1:  ;写指令
CLR RS
CLR RW 
CLR E 
LCALL DELAY1
LCALL DELAY1
SETB E 
RET

WRITE2:  ;写数据
SETB RS
CLR RW
CLR E
LCALL DELAY1
LCALL DELAY1
SETB E
RET 


DELAY1:  
MOV R7,#250
D1:
MOV R6,#250
D2:
DJNZ R6,D2
DJNZ R7,D1
RET


END