一个成功的万历汇编程序,显示日期时间和温度.docVIP

ORG 0000H LJMP MAIN ORG 001BH LJMP SUBT1 ORG 0030H MAIN: MOV 50H,#1H//显示缓冲区 MOV 51H,#2H MOV 52H,#3H MOV 53H,#4H//显示缓冲区 MOV 54H,#5H//显示缓冲区 MOV 55H,#6H MOV 56H,#7H MOV 57H,#8H//显示缓冲区 MOV 58H,#0H//S4 MOV 59H,#0H//S1 MOV 5AH,#0H//0表示0～9键按下，1～6表示A～F键按下，用于按键散转 MOV 5BH,#0H//0～F键值，0F0H表示无键按下 MOV 5CH,#21H//秒 MOV 5DH,#43H//分 MOV 5EH,#65H//时 MOV 5FH,#41H//日 MOV 60H,#02H//月 MOV 61H,#0H//年 MOV 62H,#22H//温度 MOV 63H,#22H//温度 SETB PSW.1 MOV TL1,#0FDH MOV TH1,#0FFH MOV TMOD,#00H MOV TCON,#04H MOV IP,#08H MOV IE,#88H SETB TR1 MJMP: JNB PSW.1,MJMP1 LCALL LED4RDELAY SJMP MJMP2 MJMP1: LCALL LED8DELAY MJMP2: LCALL KEY LCALL KEYPRE SJMP MJMP KEYPRE: MOV 5BH,A CJNE A,#0F0H,KEYPRE1 SJMP KEYPRE2 KEYPRE1: MOV 5AH,#0 ADD A,#0 SUBB A,#10 JC KEYPRE2 INC A MOV 5AH,A KEYPRE2: MOV DPTR,#PTAB1 MOV A,5AH MOV B,#3 MUL AB MOV R1 ,A MOV A,B ADD A,DPH MOV A,R1 JMP @ A+DPTR KEYPRE0: RET PTAB1:LJMP KEYPRE3 PL001:LJMP PL001P PL002:LJMP PL002P PL003:LJMP PL003P PH001:LJMP PH001P PH002:LJMP PH002P PH003:LJMP PH003P LJMP KEYPRE0 KEYPRE3:MOV A,5BH CLR C SUBB A,#0F0H JZ KEYPRE4 mov 53h,52h mov 52h,51h mov 51h,50h mov 50h,5BH KEYPRE4:CLR PSW.1 LJMP KEYPRE0 PL001P:MOV A,5BH//S1键 CJNE A,#0AH,PL001END MOV A,58H JZ PL001END LCALL COMMS1K PL001END:LCALL S1MOVBUF CLR PSW.1 LJMP KEYPRE0 PL002P://MOV DPTR,#L002 //LCALL MOVXSBUF MOV A,5BH CJNE A,#0BH,PL002END MOV A,59H JZ PL002END MOV A,58H CJNE A,#01H,PL002P2 MOV A,#5BH ADD A,59H MOV R0,A