单片机数字温度计汇编程序.docx
- 文档编号:4183808
- 上传时间:2022-11-28
- 格式:DOCX
- 页数:7
- 大小:14.90KB
单片机数字温度计汇编程序.docx
《单片机数字温度计汇编程序.docx》由会员分享,可在线阅读,更多相关《单片机数字温度计汇编程序.docx(7页珍藏版)》请在冰豆网上搜索。
单片机数字温度计汇编程序
Companynumber【1089WT-1898YT-1W8CB-9UUT-92108】
单片机数字温度计汇编程序
ORG0000H
LJMPMAIN
ORG0100H
;*********************************************
DATBITP1.0
TEMPER_LEQU40H
TEMPER_HEQU41H
A_BITEQU60H
B_BITEQU61H
C_BITEQU62H
D_BITEQU63H
;***主程序****************************************
MAIN:
MOVA,#7FH
LCALLWRITE_1820
LCALLINIT_1820
LCALLGET_TEMPER
LCALLCONVER
LCALLDISPLAY
LJMPMAIN
;***初始化db18b20****************************************************
INIT_1820:
CLREA
INI10:
SETBDAT
MOVR2,#200
INI11:
CLRDAT
DJNZR2,INI11
SETBDAT
MOVR2,#30
INT12:
DJNZR2,INT12
CLRC
ORLC,DAT
JCINI10
MOVR6,#80
INI13:
ORLC,DAT
JCINI14
DJNZR6,INI13
SJMPINI10
INI14:
MOVR2,#240
INT15:
DJNZR2,INT15
RET
;**读温度子程序*********************************************************
GET_TEMPER:
MOVA,#0CCH
LCALLWRITE_1820
MOVA,#44H
LCALLWRITE_1820
SETBDAT
LCALLDISPLAY
LCALLINIT_1820
MOVA,#0CCH
LCALLWRITE_1820
MOVA,#0BEH
LCALLWRITE_1820
LCALLREAD_1820
MOVTEMPER_L,A
LCALLREAD_1820
MOVTEMPER_H,A
RET
;***写ds18b20的程序***********************************************************
WRITE_1820:
CLREA
MOVR3,#8
WR11:
SETBDAT
MOVR4,#8
RRCA
CLRDAT
WR12:
DJNZR4,WR12
MOVDAT,C
MOVR4,#30
WR13:
DJNZR4,WR13
DJNZR3,WR11
SETBDAT
RET
;***读ds18b20的程序*********************************************************************
READ_1820:
CLREA
MOVR6,#8
RD11:
CLRDAT
MOVR4,#8
NOP
SETBDAT
RD12:
DJNZR4,RD12
MOVC,DAT
RRCA
MOVR5,#30
RD13:
DJNZR5,RD13
DJNZR6,RD11
SETBDAT
RET
;***计算温度子程序************************************************
CONVER:
MOVA,#0F0H
ANLA,TEMPER_H
MOV64H,A
JZUNSIGN
DECTEMPER_L
MOVA,TEMPER_H
CPLA
MOVTEMPER_H,A
MOVA,TEMPER_L
CPLA
MOVTEMPER_L,A
UNSIGN:
MOVA,#0FH
ANLA,TEMPER_L
MOVB,#10
MULAB
MOVB,#16
DIVAB
MOVA_BIT,A
MOVA,#0F0H
ANLA,TEMPER_L
SWAPA
MOVB,A
MOVA,#0FH
ANLA,TEMPER_H
SWAPA
ADDA,B
MOV32H,A
BCD:
MOVB,#100
DIVAB
MOV30H,A
MOVD_BIT,A
MOVA,#10
XCHA,B
DIVAB
MOVC_BIT,A
MOVB_BIT,B
SWAPA
ADDA,B
MOV31H,A
RET
;****显示温度子程序***********************************************************
DISPLAY:
MOV5FH,#00H
MOV5EH,#03H
MOVDPTR,#TAB
MOVR3,#100
S3:
MOVR1,#20
S2:
MOVR2,#08H
MOVR0,#63H
MOVR4,#4
SETBC
S1:
MOVP2,R2
CJNER4,#4,DLP3
CJNE@R0,#00H,DLP6
MOVA,#0FFH
LJMPDLP1
DLP3:
CJNER4,#3,DLP6
CJNE@R0,#00H,DLP6
MOVA,63H
CJNEA,#00H,DLP3
MOVA,#0FFH
LJMPDLP1
DLP6:
MOVA,@R0
MOVCA,@A+DPTR
CJNER4,#2,DLP1
ANLA,#7FH
DLP1:
MOVR5,64H
CJNER5,#0F0H,DLP2
CJNER4,#4,DLP5
MOVR6,62H
CJNER6,#0,DLP4
MOVA,#0FFH
LJMPDLP2
DLP4:
MOVA,#0BFH
LJMPDLP2
DLP5:
CJNER4,#3,DLP2
CJNE@R0,#0,DLP2
MOVA,#0BFH
DLP2:
MOVP0,A
LCALLDELAY
MOVA,R2
RRA
MOVR2,A
DECR0
DJNZR4,S1
DJNZR1,S2
DJNZR3,S3
RET
TAB:
DB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
DELAY:
MOVR7,#118
DJNZR7,$
RET
END
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 单片机 数字 温度计 汇编程序