RET
;---------------------------------------------------- ;显示
;--------------------------------------------------- MODD: MOV P0,#8EH
LCALL ENABLE MOV A,37H
MOV DPTR,#TABLE3 MOVC A,@A+DPTR LCALL WRITE2 RET
;-------------------------------------------------- ;开机提示字
;------------------------------------------------- KAIJI: MOV A,37H CJNE A,#0FH,DFF
MOV P0,#80H ;设光标地址 LCALL ENABLE
MOV DPTR,#TABLE1;写数据 LCALL WRITE1 DFF: RET
;---------------------------------------------- ;按键值播放歌曲
;---------------------------------------------- SOP: MOV A,37H CJNE A,#01H,A11
15
LCALL MODD
MOV 52H,#HIGH TABLE10 MOV 53H,#LOW TABLE10 LCALL INITILE2 LCALL MAIN0 A11:
CJNE A,#02H,A22 LCALL MODD
MOV 52H,#HIGH TABLE20 MOV 53H,#LOW TABLE20 LCALL INITILE2 LCALL MAIN0 A22:
CJNE A,#03H,AAA LCALL MODD
MOV 52H,#HIGH TABLE30 MOV 53H,#LOW TABLE30 LCALL INITILE2 LCALL MAIN0 AAA:RET
;****************************************** INITILE2: MOV L50MS,#20 MOV L1MS,#00H MOV L250MS,#00H MOV SEC,#00H MOV MIN,#00H MOV HOU,#00H MOV A,HOU MOV B,#10
16
DIV AB
ADD A,#30H ;将BCD吗转化为ASIIC码 MOV P0,#0C8H ;显示小时十位 CALL ENABLE CALL WRITE2 MOV A,B ADD A,#30H
MOV P0,#0C9H ;CALL ENABLE CALL WRITE2 MOV A,#3AH
MOV P0,#0DH ;CALL ENABLE CALL WRITE2 MOV A,MIN MOV B,#10 DIV AB ADD A,#30H
MOV P0,#0CBH ;CALL ENABLE CALL WRITE2 MOV A,B ADD A,#30H
MOV P0,#0CCH ;CALL ENABLE CALL WRITE2 MOV A,#3AH
MOV P0,#0CDH ;CALL ENABLE CALL WRITE2
显示小时个位 显示冒号 显示分十位 显示分个位 显示冒号 17
MOV A,SEC MOV B,#10 DIV AB ADD A,#30H
MOV P0,#0CEH ;显示秒十位 CALL ENABLE CALL WRITE2 MOV A,B ADD A,#30H
MOV P0,#0CFH ;显示秒个位 CALL ENABLE CALL WRITE2
MOV P0,#0C0H ;设光标地址 CALL ENABLE
MOV DPTR,#TABLE2;写数据 CALL WRITE1 RET
;*********************************************写指令 ENABLE: CLR RS CLR RW CLR E LCALL DELAY SETB E RET
;**********************************************写数据 WRITE1: MOV R1,#00H A1: MOV A,R1
18
MOVC A,@A+DPTR CALL WRITE2 INC R1
CJNE A,#0FEH,A1 ;未到字符串末尾继续 RET WRITE2: MOV P0,A SETB RS CLR RW CLR E CALL DELAY SETB E RET
;**********************************************延时 DELAY: MOV R4,#05 D1:
MOV R5,#0FFH DJNZ R5,$ DJNZ R4,D1 RET
;----------------------------------------------显示开机，查表 TAB:
DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H DB 80H,90H,88H,83H,0C6H,0A1H,86H,8EH TAB1:DB 89H,86H,0C7H,0C7H,0C0H TAB2:DB 0C6H,88H,0C0H TABLE1:DB' WELCOME! ',0FEH TABLE2:DB'DFF WB ',0FEH TABLE4:DB 'CAU',0FEH
19