SUBB A,#0AH
SUB1111: JC SUB1110
MOV @R0,#09H ;大于等于0AH，为9
SUB110: MOV A,R3 ;取回R3中暂存数据
INC R0 ;指向当前地址单元
SWAP A ;A中数据高四位与低四位交换
ANL A,#0FH ;高四位变0
MOV @R0,A ;数据放入当削地址单元中
RET ;子程序返回
;
SUB11: MOV A,#59H
AJMP SUB111
SUB1110:MOV A,R3 ;移入R3寄存器
ANL A,#0FH ;高四位变0
MOV @R0,A
AJMP SUB110
;****************************************
;; 时减1子 程 序 ;;
;****************************************
;
SUBB1:MOV A,@R0 ;取当前计时单元数据到A
DEC R0 ;指向前一地址
SWAP A ;A中数据高四位与低四位交换
ORL A,@R0 ;前一地址中数据放入A中低四位
JZ SUBB11 ;00减1为23（小时）
DEC A ;A减1操作
SUBB111:MOV R3,A ;移入R3寄存器
ANL A,#0FH ;高四位变0
CLR C ;清进位标志
SUBB A,#0AH ;时个位大于9为9
SUBB1111: JC SUBB1110 ;
MOV @R0,#09H ;大于等于0AH，为9
SUBB110: MOV A,R3 ;取回R3中暂存数据
INC R0 ;指向当前地址单元
SWAP A ;A中数据高四位与低四位交换
ANL A,#0FH ;高四位变0
MOV @R0,A ;时十位数数据放入
RET ;子程序返回
;
SUBB11: MOV A,#23H
AJMP SUBB111
SUBB1110:MOV A,R3 ;时个位小于0A不处理
ANL A,#0FH ;高四位变0
MOV @R0,A ;个位移入
AJMP SUBB110
;****************************************
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] 下一页
本文关键字：程序 51单片机，单片机-工控设备 - 51单片机
