《单片机音乐盒程序设计源代码》.docVIP

RS BIT P2.0;定义液晶显示端口标号 RW BIT P2.1 E BIT P2.2 ORG 0000H LJMP MAIN ORG 000BH LJMP TT0 ORG 001BH LJMP TIINT ORG 1000H MAIN: ;---------------------------液晶初始化 MOV SP,#70H MOV P0,#01H;清屏 CALL ENABLE MOV P0,#38H;8位，2行显示 LCALL ENABLE MOV P0,#0FH;屏显ON,光标ON,闪烁ON LCALL ENABLE MOV P0,#06H;计数地址加1，显示幕ON LCALL ENABLE ;----------------------------内在初始化 LCALL INITIL ;----------------------------- KEY1: LCALL KEY LCALL MODD LJMP KEY1 ;----------------------------键盘扫描 KEY: NOP NOP LCALL KS JNZ K1;有按键转到K1 LCALL KAIJI LCALL SOP XN: LJMP KEY K1: LCALL MODD LCALL MODD LCALL KS JNZ K2 LJMP KEY K2: MOV R2,#0FEH;读键盘 MOV R4,#00H K3: MOV A,R2 MOV P1,A MOV A,P1 JB ACC.4,L1;为1跳转，第一行无按键 MOV A,#00H LJMP LK L1: JB ACC.5,L2 MOV A,#04H LJMP LK L2: JB ACC.6,L3 MOV A,#08H LJMP LK L3: JB ACC.7,NEXT1 MOV A,#0CH ;------------------------------------------ LK: ADD A,R4 PUSH ACC K4: LCALL DELAY1;若同时有其他键，则等待 LCALL KS JNZ K4 ;-------------------------------------------- MOV R3,#07H CLR A MOV R0,#30H MOV R1,#31H MM1: MOV A,@R1 MOV @R0,A INC R0 INC R1 DJNZ R3,MM1 POP ACC MOV @R0,A RET ;------------------------------------------------ NEXT1; INC R4;--------------列扫描 MOV A,R2 JNB ACC.3,N2 LJMP N1 N2: LJMP KEY N1: RL A MOV R2,A LJMP K3 ;----------------------------------- KS: MOV A,#0F0H;判断P1口 MOV P1,A NOP NOP MOV A,P1 CPL A ANL A,#0F0H RET ;------------------------------------- DELAY1: SETB RS0 DL: MOV R5,#0AH DL2: MOV R6,#63 DL3: NOP NOP DJNZ R6,DL3 DJNZ R5,DL2 CLR RS0 RET ;30H-37H初值为零 ;-------------------------------------- INITIL: MOV R3,#08H MOV R0,#30H M1: MOV @R0,#00H M1: MOV @R0,#00H M1: MOV @R0,#00H INC R0 DJNZ R3,M1 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,#TABLE