📄 1820.asm
字号:
BP DATA 20H
DAT DATA 23H
COM DATA 24H
D_L DATA 25H
D_LL DATA 26H
D_H DATA 27H
D_M DATA 28H
WD DATA 29H
WD1 DATA 2AH
WD2 DATA 2BH
WD3 DATA 2CH
SECOND EQU 30H ;秒寄存器
MINUTE EQU 31H ;分寄存器
HOUR EQU 32H ;时寄存器
DAY EQU 33H ;号寄存器
MONTH EQU 34H ;月寄存器
WEEK EQU 35H ;星期寄存器
YEAR EQU 36H ;年寄存器
T_CLK Bit P1.1 ;实时时钟时钟线引脚
T_IO Bit P1.2 ;实时时钟数据线引脚
T_RST Bit P1.3 ;实时时钟复位线引脚
CS BIT P1.5
SID BIT P1.7
SCK BIT P1.6
DATAIN BIT P2.2
ORG 0000H
AJMP INTT
ORG 000BH
AJMP INSS
org 0023h
AJMP SERIAL
ORG 60H
INTT:
MOV A,#0
MOV R0,#20H
MOV R1,#32
QQW: MOV @R0,A
INC R0
DJNZ R1,QQW
mov TMOD,#21h ;T1: 工作模式2
; mov PCON,#80h ;SMOD=1
mov TH1,#0FDH ;初始化波特率
MOV TL1,#0FDH
mov SCON,#50h ;Standard UART settings
SETB TR1 ;T1 开始工作
SETB EA ;开总中断
SETB ES ;开串口中断
MOV SECOND,#00H
MOV MINUTE,#30H
MOV HOUR,#12H
MOV DAY,#30H
MOV MONTH,#11H
MOV WEEK,#07H
MOV YEAR,#08H
ACALL Set1302
CLR IE.0
CLR TR0
; MOV TMOD,#01H
MOV TH0,#0F3H
MOV TL0,#0BH
SETB TR0
SETB ET0
MOV DPTR,#TAB
SETB EA
MOV COM,#30H ;功能设置,基本指令集
ACALL WRI
ACALL DLAY
MOV COM,#0CH ;显示打开,光标关,反白显示关
ACALL WRI
ACALL DLAY
MOV COM,#01H ;清除屏幕显示,将DDRAM地址计数器归零
ACALL WRI
ACALL DLAY
MOV COM,#06H
ACALL WRI
ACALL DLAY
MOV R7,#0FFH
DJNZ R7,$
MOV R7,#0FFH
DJNZ R7,$
DISP:
MOV A,WD
ADD A,#24
MOVC A,@A+DPTR
MOV P0,A
CLR P2.0
ACALL DLAY
SETB P2.0
MOV A,WD1
ADD A,#24
MOVC A,@A+DPTR
MOV P0,A
CLR P2.1
ACALL DLAY
SETB P2.1
MOV A,WD2
ADD A,#24
MOVC A,@A+DPTR
MOV P0,A
CLR P2.6
ACALL DLAY
SETB P2.6
MOV A,WD3
ADD A,#24
MOVC A,@A+DPTR
MOV P0,A
CLR P2.7
ACALL DLAY
SETB P2.7
JB BP.0,DISP
SETB BP.0
MOV COM,#81H
ACALL WRI
MOV A,YEAR
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR ;年
MOV DAT,A
ACALL WRD
MOV A,YEAR
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#0C4H
MOV DAT,A
ACALL WRD
MOV A,#0EAH
MOV DAT,A
ACALL WRD
;,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
MOV A,MONTH
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR ;月
MOV DAT,A
ACALL WRD
MOV A,MONTH
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#0D4H
MOV DAT,A
ACALL WRD
MOV A,#0C2H
MOV DAT,A
ACALL WRD
;,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
MOV A,DAY
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR ;号
MOV DAT,A
ACALL WRD
MOV A,DAY
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#0C8H
MOV DAT,A
ACALL WRD
MOV A,#0D5H
MOV DAT,A
ACALL WRD
;,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
MOV COM,#8AH
ACALL WRI
MOV A,HOUR ;时
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,HOUR
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MOV A,#3AH
MOV DAT,A
ACALL WRD
MOV A,MINUTE
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR ;分
MOV DAT,A
ACALL WRD
MOV A,MINUTE
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MOV A,#3AH
MOV DAT,A
ACALL WRD
MOV A,SECOND
SWAP A
ANL A,#0FH
MOVC A,@A+DPTR ;秒
MOV DAT,A
ACALL WRD
MOV A,SECOND
ANL A,#0FH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MOV COM,#91H
ACALL WRI
MOV A,#0D0H ;星
MOV DAT,A
ACALL WRD
MOV A,#0C7H
MOV DAT,A
ACALL WRD
MOV A,#0C6H ;期
MOV DAT,A
ACALL WRD
MOV A,#0DAH
MOV DAT,A
ACALL WRD
MOV A,WEEK
MOV B,#2
MUL AB
ADD A,#8
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,WEEK
MOV B,#2
MUL AB
ADD A,#9
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
MOV A,2EH
ANL A,#0F0H
JZ MMM
CPL 2EH
CPL 2FH
MOV A,#20H ;空
MOV DAT,A
ACALL WRD
MOV A,#2DH ;-
MOV DAT,A
ACALL WRD
JMP DDS
MMM:
MOV A,#20H ;空
MOV DAT,A
ACALL WRD
MMM1:
MOV A,WD
JNZ DDS1
MOV A,#20H ;空
MOV DAT,A
ACALL WRD
JMP DDS
DDS1: MOV A,WD
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
DDS:
MOV A,WD1
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,WD2
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#2EH
MOV DAT,A
ACALL WRD
MOV A,WD3
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#0A1H ; 度
MOV DAT,A
ACALL WRD
MOV A,#0E6H
MOV DAT,A
ACALL WRD
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
JNB BP.1,AZ
MOV COM,#9AH
ACALL WRI
MOV A,#0D0H
MOV DAT,A
ACALL WRD
MOV A,#0CDH
MOV DAT,A
ACALL WRD
MOV A,#0BAH
MOV DAT,A
ACALL WRD
MOV A,#0C5H
MOV DAT,A
ACALL WRD
MOV A,#31H ;探头型号18B20
MOV DAT,A
ACALL WRD
MOV A,#38H
MOV DAT,A
ACALL WRD
MOV A,#42H
MOV DAT,A
ACALL WRD
MOV A,#32H
MOV DAT,A
ACALL WRD
MOV A,#30H
MOV DAT,A
ACALL WRD
MOV A,#20H
MOV DAT,A
ACALL WRD
MOV A,2DH
MOVC A,@A+DPTR
MOV DAT,A
ACALL WRD
MOV A,#20H
MOV DAT,A
ACALL WRD
AJMP CCS
AZ:
MOV COM,#9AH
ACALL WRI
MOV A,#0C3H
MOV DAT,A
ACALL WRD
MOV A,#0BBH
MOV DAT,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -